home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1985 October
/
Ahoy_Magazine_85-10_1985_Double_L.d64
/
cd22-6
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
267b
|
9 lines
0 poke53281,1:print"[147]":t=55792:s=1520:x=500:fori=0to500:ifpeek(s+j+40)=65thenx=x-40
1 a=rnd(1)*41:printspc(a)"[193]":k=peek(197):j=j+(k=7)-(k=2):pokes+j,22:poket+j,0:next:print"score="x
10 rem << cd22-6 >>
11 rem
12 rem solution to problem #18-3 :
13 rem ski scroll
14 rem by larry snyder
15 rem