dos33fsprogs/basic/appleiibot/tunnel.bas

3 lines
276 B
QBasic

1FORI=0TO140:POKE875+I,4*PEEK(2125+I)-192+(PEEK(2266+I/3)-35)/4^(I-INT(I/3)*3):NEXT
2&",=nQYh$i4571RHB<AU\jRZlkI0d\foT0QmZ0HlZPl2,11fXR?o>F4fP0\6hnC3QoZRQ;Q-NnbmYaFo8InNlR76nRmYk76lRZVn8:nYbVn8:n^e4Z[aj3[7XXQSRKML@FFDCA0:;8904G0SIVWC=#K/[<)HH=E04#=@##\AX#O'?3+0#W#SK5788M&a0_