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

appleiibot: add selfie code

This commit is contained in:
Vince Weaver 2020-10-18 00:07:23 -04:00
parent e6f81a06b7
commit ba0111987c
3 changed files with 42 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
appleiibot/Makefile
View File

@ -8,7 +8,8 @@ all: appleiibot.dsk convert_to convert_back convert_qkumba make_boxes
appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS \
CIRCLES.BAS AUTUMN.BAS QKUMBA.BAS ASTEROID.BAS PERSON.BAS SHIP.BAS \
CONCERT.BAS NYAN.BAS RASTER.BAS RASTER2.BAS RASTER3.BAS LOTS.BAS LOAD \
RASTER4.BAS RASTER5.BAS PUMPKIN.BAS PUMPKIN_SMALL.BAS LADY.BAS
RASTER4.BAS RASTER5.BAS PUMPKIN.BAS PUMPKIN_SMALL.BAS LADY.BAS \
A2.BAS
cp empty.dsk appleiibot.dsk
$(DOS33) -y appleiibot.dsk BSAVE -a 0x0300 LOAD
$(DOS33) -y appleiibot.dsk SAVE A E2.BAS
@ -31,6 +32,7 @@ appleiibot.dsk: E2.BAS FLAME.BAS FLAME2.BAS \
$(DOS33) -y appleiibot.dsk SAVE A PUMPKIN.BAS
$(DOS33) -y appleiibot.dsk SAVE A PUMPKIN_SMALL.BAS
$(DOS33) -y appleiibot.dsk SAVE A LADY.BAS
$(DOS33) -y appleiibot.dsk SAVE A A2.BAS
###
@ -184,5 +186,10 @@ LOTS.BAS: lots.bas
####
A2.BAS: a2.bas
$(TOKENIZE) < a2.bas > A2.BAS
####
clean:
rm -f *~ *.o *.lst convert_to convert_from convert_qkumba make_boxes convert_back LOAD *.BAS

4
appleiibot/a2.bas Normal file
View File

@ -0,0 +1,4 @@
0REM/ G O(*;!K-#4HI-#6DG-%7@C-(8<?('.CF((2DG(-2??%#4JK%&3LM(47LM(<<(6-)8":(*5$8 +4&7(BD3H(BB5I%<C34%;A56-9A7K :@8@ :@BJ%;@<<%;@FF#???@#??IJ%=>9>%=>CH,77"#
1DEFFNP(X)=PEEK(2054+I*5+X)-32:GR:POKE49234,0:FORI=0TO29:COLOR=FNP(0):FORY=FNP(3)TOFNP(4):HLINFNP(1),FNP(2)ATY:NEXTY,I:GETA

30
appleiibot/a2.data Normal file
View File

@ -0,0 +1,30 @@
15 0 39 0 47 ; background
8 10 27 1 43 ; monitor back
13 3 20 40 41 ; base bottom
13 3 22 36 39 ; base middle
13 5 23 32 35 ; base top
13 8 24 28 31 ; base tip
8 7 14 35 38 ; keyboard
8 8 18 36 39 ; keyboard
8 13 18 31 31 ; logo
5 3 20 42 43 ; base
5 6 19 44 45 ; base
8 20 23 44 45 ; base brown
8 28 28 8 22 ; monitor back
13 9 24 2 26 ; monitor
8 10 21 4 24 ; bezel
0 11 20 6 23 ; screen
8 34 36 19 40 ; drive side
8 34 34 21 41 ; drive side
5 28 35 19 20 ; drive top
5 27 33 21 22 ; drive top
13 25 33 23 43 ; drive outline
0 26 32 24 32 ; drive 1
0 26 32 34 42 ; drive 2
5 27 32 28 28 ; drive 1 slot
5 27 32 38 38 ; drive 2 slot
3 31 31 31 32 ; drive 1 logo
3 31 31 41 42 ; drive 2 logo
5 29 30 25 30 ; drive 1 door
5 29 30 35 40 ; drive 2 door
12 23 23 2 3 ; monitor power