Home » Archimedes archive » Acorn User » AU 1996-Xmas.adf » Regulars » StarInfo/Graham/SkiDown
StarInfo/Graham/SkiDown
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Archimedes archive » Acorn User » AU 1996-Xmas.adf » Regulars |
Filename: | StarInfo/Graham/SkiDown |
Read OK: | ✔ |
File size: | 00EB bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
10MODE2:OFF:REPEAT:A%=10:B%=FALSE:C%=0:REPEAT:D%=INKEY(5+(1000-C%)/100):A%+=(D%=44)-(D%=46):COLOUR2:PRINTTAB(0,31)"X";:PRINTTAB(RND(17)+1,31)"X";:PRINTTAB(19,31)"X":COLOUR1:WAIT:PRINTTAB(0,0)"Score ";C%;SPC14-LENSTR$C%:PRINTTAB(A%,1)"I";:B%=(POINT(A%*64+32,944)<>0):C%+=1:UNTILB%=TRUE:PRINTTAB(6,15)"Game Over":T=TIME:REPEATUNTILTIME=T+500:CLS:UNTILFALSE
��2:�:�:A%=10:B%=�:C%=0:�:D%=�(5+(1000-C%)/100):A%+=(D%=44)-(D%=46):�2:�0,31)"X";:�(17)+1,31)"X";:�19,31)"X":�1:Ȗ:�0,0)"Score ";C%;�14-��C%:�A%,1)"I";:B%=(�A%*64+32,944)<>0):C%+=1:�B%=�:�6,15)"Game Over":T=�:���=T+500:�:�� �
00000000 0d 00 0a e9 eb 32 3a 87 3a f5 3a 41 25 3d 31 30 |.....2:.:.:A%=10| 00000010 3a 42 25 3d a3 3a 43 25 3d 30 3a f5 3a 44 25 3d |:B%=.:C%=0:.:D%=| 00000020 a6 28 35 2b 28 31 30 30 30 2d 43 25 29 2f 31 30 |.(5+(1000-C%)/10| 00000030 30 29 3a 41 25 2b 3d 28 44 25 3d 34 34 29 2d 28 |0):A%+=(D%=44)-(| 00000040 44 25 3d 34 36 29 3a fb 32 3a f1 8a 30 2c 33 31 |D%=46):.2:..0,31| 00000050 29 22 58 22 3b 3a f1 8a b3 28 31 37 29 2b 31 2c |)"X";:...(17)+1,| 00000060 33 31 29 22 58 22 3b 3a f1 8a 31 39 2c 33 31 29 |31)"X";:..19,31)| 00000070 22 58 22 3a fb 31 3a c8 96 3a f1 8a 30 2c 30 29 |"X":.1:..:..0,0)| 00000080 22 53 63 6f 72 65 20 22 3b 43 25 3b 89 31 34 2d |"Score ";C%;.14-| 00000090 a9 c3 43 25 3a f1 8a 41 25 2c 31 29 22 49 22 3b |..C%:..A%,1)"I";| 000000a0 3a 42 25 3d 28 b0 41 25 2a 36 34 2b 33 32 2c 39 |:B%=(.A%*64+32,9| 000000b0 34 34 29 3c 3e 30 29 3a 43 25 2b 3d 31 3a fd 42 |44)<>0):C%+=1:.B| 000000c0 25 3d b9 3a f1 8a 36 2c 31 35 29 22 47 61 6d 65 |%=.:..6,15)"Game| 000000d0 20 4f 76 65 72 22 3a 54 3d 91 3a f5 fd 91 3d 54 | Over":T=.:...=T| 000000e0 2b 35 30 30 3a db 3a fd a3 0d ff |+500:.:....| 000000eb