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