mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-04 05:05:13 +00:00
botdemo: minor changes
This commit is contained in:
parent
b814d981d3
commit
67eb010eef
@ -57,7 +57,7 @@ mockingboard_not_found:
|
||||
|
||||
jsr TEXT
|
||||
jsr SETGR
|
||||
; jsr HOME
|
||||
jsr HOME
|
||||
; bit SET_GR
|
||||
; bit TEXTGR
|
||||
bit KEYRESET
|
||||
@ -170,4 +170,4 @@ original_stack: .byte $00
|
||||
PT3_LOC = song
|
||||
.align $100
|
||||
song:
|
||||
.incbin "music/A_UpBeat_Thingy.pt3"
|
||||
.incbin "music/mAZE_-_The_Upbeated_Eaten_Apple.pt3"
|
||||
|
@ -1,23 +1,23 @@
|
||||
5 HOME
|
||||
10 GOSUB 100
|
||||
20 PRINT:PRINT
|
||||
30 PRINT " @APPLEIIBOT BASIC DEMOS V0.1"
|
||||
40 PRINT "EACH SCENE FITS IN A 280 CHARACTER TWEET"
|
||||
30 PRINT " @AppleIIbot BASIC Demos v0.1"
|
||||
40 PRINT "Each scene fits in a 280 character tweet"
|
||||
45 HTAB 15:FLASH:PRINT "LOADING...":NORMAL
|
||||
90 PRINT CHR$(4)"BRUN LOADER"
|
||||
100 HTAB 8:PRINT " ___________"
|
||||
110 HTAB 8:PRINT " / \ \"
|
||||
120 HTAB 8:PRINT " / \___\"
|
||||
130 HTAB 8:PRINT " / . / \"
|
||||
140 HTAB 8:PRINT " / / \"
|
||||
150 HTAB 8:PRINT " / / . \"
|
||||
160 HTAB 8:PRINT "/__________/ \"
|
||||
170 HTAB 8:PRINT "\ \ /"
|
||||
180 HTAB 8:PRINT " \ __\ / /"
|
||||
190 HTAB 8:PRINT " \ \/ \/"
|
||||
200 HTAB 8:PRINT " \___ \ /"
|
||||
210 HTAB 8:PRINT " \ \ /"
|
||||
220 HTAB 8:PRINT " \__________\/"
|
||||
100 HTAB 9:PRINT " ___________"
|
||||
110 HTAB 9:PRINT " / \ \"
|
||||
120 HTAB 9:PRINT " / \___\"
|
||||
130 HTAB 9:PRINT " / . / \"
|
||||
140 HTAB 9:PRINT " / / \"
|
||||
150 HTAB 9:PRINT " / / . \"
|
||||
160 HTAB 9:PRINT "/__________/ \"
|
||||
170 HTAB 9:PRINT "\ \ /"
|
||||
180 HTAB 9:PRINT " \ __\ / /"
|
||||
190 HTAB 9:PRINT " \ \/ \/"
|
||||
200 HTAB 9:PRINT " \___ \ /"
|
||||
210 HTAB 9:PRINT " \ \ /"
|
||||
220 HTAB 9:PRINT " \__________\/"
|
||||
230 PRINT:PRINT
|
||||
250 HTAB 8:PRINT " - d e s i r e -"
|
||||
250 HTAB 9:PRINT " - d e s i r e -"
|
||||
999 RETURN
|
||||
|
Loading…
Reference in New Issue
Block a user