From a2816f92377ee074cbc6d1280815074aeb25ced6 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Wed, 4 Dec 2024 21:32:19 -0500 Subject: Added a FreeDOS logo --- gwfetch.bas | 33 +++++++++++++++++++++++++++++++-- 1 file changed, 31 insertions(+), 2 deletions(-) (limited to 'gwfetch.bas') diff --git a/gwfetch.bas b/gwfetch.bas index 0445d20..34ad593 100644 --- a/gwfetch.bas +++ b/gwfetch.bas @@ -64,7 +64,8 @@ 510 DIM LOGO$(25) 520 IF DOSBOX = 1 THEN GOSUB 20050:GOTO 1000 530 IF OEM% = &HEE OR OEM% = &HEF THEN GOSUB 20100:GOTO 1000 -540 GOSUB 20000 +540 IF OEM% = &HFD THEN GOSUB 20150:GOTO 1000 +550 GOSUB 20000 1000 REM Output time 1001 WHILE TIMER - STARTTIME < 5:WEND @@ -540,7 +541,7 @@ 20075 LOGO$(25) = " " 20076 RETURN -20100 REM DOSBox Logo +20100 REM DR DOS Logo 20101 LOGO$(1) = " " 20102 LOGO$(2) = " XXXXX" 20103 LOGO$(3) = " XXXXXXXXX" @@ -568,6 +569,34 @@ 20125 LOGO$(25) = " " 20126 RETURN +20150 REM FreeDOS Logo +20151 LOGO$(1) = " " +20152 LOGO$(2) = " " +20153 LOGO$(3) = " " +20154 LOGO$(4) = " x&;:::::::&+" +20155 LOGO$(5) = " &::::::::::::::&" +20156 LOGO$(6) = " $::::::::::::::::::&" +20157 LOGO$(7) = " &::::::::::::::::::::&" +20158 LOGO$(8) = " &::::::::::::::::::::::&" +20159 LOGO$(9) = " $:::::::::::::::::::::::$" +20160 LOGO$(10) = " X::: :::::::::::::::::&_____" +20161 LOGO$(11) = " &::: 00 : :::::::::::::+::&&/" +20162 LOGO$(12) = " &::: 00 : 0 :::::::::::::::x&/" +20163 LOGO$(13) = " x&:: ::::::&:::\:::|&&:+&/" +20164 LOGO$(14) = " &:&&&&&&&&&&:::::\::| \&&\" +20165 LOGO$(15) = " |:/::::::::::::::&\:| \--+" +20166 LOGO$(16) = " |/ &&&XXX&&&X \|" +20167 LOGO$(17) = " " +20168 LOGO$(18) = " " +20169 LOGO$(19) = " ,---. ,--. ,---.,---." +20170 LOGO$(20) = " |__. ,---.,---.,---.| || |`---." +20171 LOGO$(21) = " | | |---'|---'| || | |" +20172 LOGO$(22) = " ` ` `---'`---'`--' `---'`---'" +20173 LOGO$(23) = " " +20174 LOGO$(24) = " " +20175 LOGO$(25) = " " +20176 RETURN + 30000 REM String Trim Function 30010 REM input/output: TOTRIM$ 30015 IF LEN(TOTRIM$) = 0 THEN RETURN -- cgit v1.2.3