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

appleiibot: more compact pumpkin

This commit is contained in:
Vince Weaver 2020-10-16 17:05:51 -04:00
parent da0ad65c3e
commit e52ea923f7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
appleiibot/pumpkin_small.bas
View File

@ -1,2 +1,2 @@
0REM! G?O)+;*L)(>-J)&@0E)%A4>$15$)-+/26-8<26-*<?B-,:CD)./?A)67BD-346;-16:;
1DEFFNP(X)=PEEK(2054+X)-32:GR:POKE49234,0:FORI=0TO65STEP5:C=FNP(I):A=FNP(I+1):B=FNP(I+2):Q=FNP(I+3):Z=FNP(I+4):COLOR=C:FORY=QTOZ:HLINA,BATY:NEXTY,I
1DEFFNP(X)=PEEK(2054+X)-32:GR:POKE49234,0:FORI=0TO65STEP5:COLOR=FNP(I):FORY=FNP(I+3)TOFNP(I+4):HLINFNP(I+1),FNP(I+2)ATY:NEXTY,I