Apple-2-SW
/
dos33fsprogs
mirror of https://github.com/deater/dos33fsprogs.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

botdemo: minor changes

This commit is contained in:
Vince Weaver 2020-11-20 00:22:19 -05:00
parent b814d981d3
commit 67eb010eef
2 changed files with 18 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
bot_demo/botdemo.s
View File

@ -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"

32
bot_demo/hello.bas
View File

@ -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