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

appleiibot: add split

This commit is contained in:
Vince Weaver 2022-02-28 16:29:40 -05:00
parent fb5f895e8d
commit 430f5dad3a
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

@ -21,7 +21,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS HELLO \
FIREWORKS.BAS THINKING.BAS ARCS.BAS WIRE_HGR.BAS STATIC.BAS \
OVAL.BAS OVAL_HGR.BAS MOVING.BAS THICK_SINE.BAS TURKEY.BAS \
FLAME_HGR.BAS RECT.BAS SNOWY.BAS EDGAR.BAS OOPS4.BAS OOPS3.BAS \
HORROR.BAS DIAMOND.BAS LEMM.BAS OOPS.BAS
HORROR.BAS DIAMOND.BAS LEMM.BAS OOPS.BAS SPLIT.BAS
# cp $(EMPTY_DISK)/empty.dsk appleiibot.dsk
cp empty.dsk appleiibot.dsk
$(DOS33) -y appleiibot.dsk BSAVE -a 0x0300 LOAD
@ -115,6 +115,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS HELLO \
$(DOS33) -y appleiibot.dsk SAVE A DIAMOND.BAS
$(DOS33) -y appleiibot.dsk SAVE A LEMM.BAS
$(DOS33) -y appleiibot.dsk SAVE A OOPS.BAS
$(DOS33) -y appleiibot.dsk SAVE A SPLIT.BAS
####
@ -654,5 +655,10 @@ LEMM.BAS: lemm.bas
####
SPLIT.BAS: split.bas
$(TOKENIZE) < split.bas > SPLIT.BAS
####
clean:
rm -f *~ *.o *.lst convert_to convert_from convert_qkumba convert_vmw make_boxes convert_back convert_tgreene LOAD *.BAS make_hgr_boxes

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

@ -0,0 +1,2 @@
1FORI=0TO115:POKE900+I,4*PEEK(2125+I)-204+(PEEK(2241+I/3)-35)/4^(I-INT(I/3)*3):NEXT
2&"/@qP:U];LdZ>O=]3;=oe7f9kg<Ga[3W2]?8Hn[3]V[Z9AjZ3Z8[C9Ak]9W<q]9c4q>Hc>Gc;j3>Hc>Gc;j3>@amP>[:egrUgmEd2\3QF[2egrUgqKFQ3SQ#W8#+FF+3S+$F<0C8S(/%$/%#/FO-$3*K-$#/