From 519f9e73e480468d85eb6e421b947d5916bc3d50 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Thu, 5 Dec 2024 08:18:52 -0500 Subject: Added PC-DOS logo --- gwfetch.bas | 31 ++++++++++++++++++++++++++++++- 1 file changed, 30 insertions(+), 1 deletion(-) (limited to 'gwfetch.bas') diff --git a/gwfetch.bas b/gwfetch.bas index 34ad593..f38d8d6 100644 --- a/gwfetch.bas +++ b/gwfetch.bas @@ -65,7 +65,8 @@ 520 IF DOSBOX = 1 THEN GOSUB 20050:GOTO 1000 530 IF OEM% = &HEE OR OEM% = &HEF THEN GOSUB 20100:GOTO 1000 540 IF OEM% = &HFD THEN GOSUB 20150:GOTO 1000 -550 GOSUB 20000 +550 IF OEM% = 0 THEN GOSUB 20200:GOTO 1000 +560 GOSUB 20000 1000 REM Output time 1001 WHILE TIMER - STARTTIME < 5:WEND @@ -597,6 +598,34 @@ 20175 LOGO$(25) = " " 20176 RETURN +20200 REM PC-DOS Logo +20201 LOGO$(1) = " " +20202 LOGO$(2) = " " +20203 LOGO$(3) = " ###########" +20204 LOGO$(4) = " ####################" +20205 LOGO$(5) = " ##########################" +20206 LOGO$(6) = " ####### ##################" +20207 LOGO$(7) = " ##### # #####################" +20208 LOGO$(8) = " ###### # # ####### ########" +20209 LOGO$(9) = " ####### # ## # ## ## ########" +20210 LOGO$(10) = " ######### #### ### ############" +20211 LOGO$(11) = " ############ ########## #####" +20212 LOGO$(12) = " ############# ### #### ###" +20213 LOGO$(13) = " ########### ### ## ######### ##" +20214 LOGO$(14) = " ######## # #### ## ### ##" +20215 LOGO$(15) = " ####### ### # ### # ###" +20216 LOGO$(16) = " ######## ### ## #### ##########" +20217 LOGO$(17) = " ######### ### # ### ########" +20218 LOGO$(18) = " ######### ### ## ### ######" +20219 LOGO$(19) = " ######### ### # ######" +20220 LOGO$(20) = " ########## ## #############" +20221 LOGO$(21) = " ######### ############" +20222 LOGO$(22) = " ######### #############" +20223 LOGO$(23) = " #################" +20224 LOGO$(24) = " " +20225 LOGO$(25) = " " +20226 RETURN + 30000 REM String Trim Function 30010 REM input/output: TOTRIM$ 30015 IF LEN(TOTRIM$) = 0 THEN RETURN -- cgit v1.2.3