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

basicbot: add coolbot, why not

This commit is contained in:
Vince Weaver 2021-06-16 23:36:45 -04:00
parent 4504371823
commit a4d51c5fd1
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basic/appleiibot/Makefile
View File

@ -17,7 +17,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS HELLO \
COMBO.BAS WIRES.BAS PATTERN.BAS BALL.BAS LINES.BAS MOD9.BAS \
XOR_ZOOM.BAS MOD9_HGR.BAS SIER_HGR.BAS MOVE.BAS SINE.BAS XDRAW128.BAS \
GATOR.BAS CURSOR.BAS STARGATE.BAS TUNNEL.BAS STARFIELD.BAS \
STAROOPS.BAS HGRSTARFIELD.BAS
STAROOPS.BAS HGRSTARFIELD.BAS COOL_BOT.BAS
# cp $(EMPTY_DISK)/empty.dsk appleiibot.dsk
cp empty.dsk appleiibot.dsk
@ -89,6 +89,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS HELLO \
$(DOS33) -y appleiibot.dsk SAVE A STARFIELD.BAS
$(DOS33) -y appleiibot.dsk SAVE A STAROOPS.BAS
$(DOS33) -y appleiibot.dsk SAVE A HGRSTARFIELD.BAS
$(DOS33) -y appleiibot.dsk SAVE A COOL_BOT.BAS
####
@ -503,5 +504,10 @@ SIERPINSKI.BAS: sierpinski.bas
####
COOL_BOT.BAS: cool_bot.bas
$(TOKENIZE) < cool_bot.bas > COOL_BOT.BAS
####
clean:
rm -f *~ *.o *.lst convert_to convert_from convert_qkumba convert_vmw make_boxes convert_back convert_tgreene LOAD *.BAS

2
basic/appleiibot/cool_bot.bas Normal file
View File

@ -0,0 +1,2 @@
1FORI=0TO140:POKE875+I,4*PEEK(2125+I)-192+(PEEK(2266+I/3)-35)/4^(I-INT(I/3)*3):NEXT
2&",clS0[C/Vc.kI0R`lYg1JF82BN:Ml:-Y_glQ[VlWlX,74hXlX0X08<cglaldela<00EC<G-RD50BRI-QFIG@JK<:0S?C4,\48JLS4=C0T'>2/X0>5DLC31LZ558@V924D!U?*A?WL64G0S7BF03;KD4>=[,37%#L%#&[S-5EJXA[3$3AQ.%_?.Z8_W._