Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-02-15 12:31:53 +00:00
Code Issues Projects Releases Wiki Activity

rr: can't believe I'm doing this

Browse Source 
waste not want not
This commit is contained in:
Vince Weaver 2021-02-04 14:23:20 -05:00
parent 073ced5cb0
commit 0f625b90a3
3 changed files with 33 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basic/appleiibot/Makefile
View File

@ -12,7 +12,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS \
A2.BAS FOURAM.BAS FLOPPY.BAS QR.BAS A2_4EVER.BAS RLE.BAS RLE2.BAS \
RLEASM.BAS HORIZON.BAS FLYER.BAS STAR.BAS HYPER.BAS FASTAR.BAS \
FASTAR2.BAS BIN.BAS FALLING.BAS SNOW.BAS XMAS.BAS AN3.BAS PLASMA.BAS \
C64.BAS SIERPINSKI.BAS FAKES.BAS SIER.BAS DROPS.BAS
C64.BAS SIERPINSKI.BAS FAKES.BAS SIER.BAS DROPS.BAS RR.BAS
cp empty.dsk appleiibot.dsk
$(DOS33) -y appleiibot.dsk BSAVE -a 0x0300 LOAD
# $(DOS33) -y appleiibot.dsk BSAVE -a 0x0C00 FASTAR2
@ -61,6 +61,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS \
$(DOS33) -y appleiibot.dsk SAVE A FAKES.BAS
$(DOS33) -y appleiibot.dsk SAVE A SIER.BAS
$(DOS33) -y appleiibot.dsk SAVE A DROPS.BAS
$(DOS33) -y appleiibot.dsk SAVE A RR.BAS
###
@ -355,6 +356,11 @@ SIER.BAS: sier.bas
DROPS.BAS: drops.bas
$(TOKENIZE) < drops.bas > DROPS.BAS
####
RR.BAS: rr.bas
$(TOKENIZE) < rr.bas > RR.BAS
####

4
basic/appleiibot/rr.bas Normal file
View File

@ -0,0 +1,4 @@
0REM' G G//8/G$$./9$6:/>,#,39,'8>G,696>#.2(.+05#,(/6 "(,0!)%453G%36-2+56') !.:A#/39>';@9C 9@>D#@E@C':G>E :?>D#;>9>
1GR:?" ./^ NEVER GONNA GIVE YOU UP ./^":DEFFNP(X)=PEEK(2054+I*5+X)-32
2FORI=0TO22:IFI=22THENI=15
3COLOR=FNP(0):FORY=FNP(3)TOFNP(4):HLINFNP(1),FNP(2)ATY:NEXTY,I

22
basic/appleiibot/rr.boxes Normal file
View File

@ -0,0 +1,22 @@
7 0 39 0 39 ; 0 background x1 x2 y1 y2
15 15 24 15 39 ; 1 grey lower
4 4 14 15 25 ; 2 left dgrey
4 22 26 15 30 ; 3 right dgrey
12 3 12 19 25 ; 4 l green
12 7 24 30 39 ; 5 l green bottom
12 22 25 22 30 ; 6 l green
3 14 18 8 14 ; 7 neck
11 16 21 3 12 ; 8 face
8 15 22 0 2 ; 9 hair
8 12 16 1 9 ; 10 hair
5 20 21 19 39 ; 11 mic
5 19 22 13 18 ; 12 mic
11 21 22 7 9 ; 13 nose
0 1 14 26 33 ; 14 l arm
3 15 19 25 30 ; 15 l hand
7 27 32 25 35 ; 16 erase r arm up
0 25 32 30 36 ; 17 r arm
3 32 37 32 35 ; 18 r hand
7 26 39 30 37 ; 19 erase r arm down
0 26 31 30 36 ; 20 r arm up
3 27 30 25 30 ; 21 r hand up