Apple II Programs 
Byte-sized delights that are guaranteed to ward off hysteria and melancholy!
2 April 2020
Mind The Gaps
by Lee Fastenau
Program
0LOMEM:24576:DATA1,0,4,0,58,36,45,54,7,0:POKE232,0:POKE233,3:FORI=0TO9:READJ:POKE768+I,J:NEXT:HGR:POKE34,20:HOME:T$="MIND_THE_GAPS!__BTN_0_TO_JUMP_HIGHER!___":SCALE=2:ROT=8:Y=157:XDRAW1AT52,Y:FORN=0TO1:U=Y+V
1V=(U<157)*V-(U>=157)*(6+(PEEK(49249)>127)*2)+1:Y=Y+V:XDRAW1AT52,Y:XDRAW1AT52,Y-V:VTAB21:P=PDL(0)>169:S=S+P:T$=RIGHT$(T$,40-P)+MID$("_TT",RND(1)*3+1,P):N=MID$(T$,8,1)="_"ANDY>=157:?T$"SCORE:"S:NEXT:VTAB21:HTAB8:XDRAW1AT52,Y:?0;CHR$(7)
Information
First Place - 2020 Two-Liner Contest
Fast-paced action platformer! Move the bouncing ball to the right using your joystick. Pressing button 0 will make the ball bounce higher.
Discussion
Apple II Software Enthusiasts Group Permalink