home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Hack-Phreak Scene Programs
/
cleanhpvac.zip
/
cleanhpvac
/
CASIOCOL.ZIP
/
KRILE1A.ZIP
/
SOURCE.ZIP
/
TEST.ASI
< prev
next >
Wrap
Text File
|
1997-11-11
|
196b
|
22 lines
gosub up:
gosub down:
gosub up:
gosub down:
gosub up:
gosub down:
end
up:
for x=1 to 2000
sound x,1
next x
return
down:
for x=1 to 2000
y=2000
y=y-x
sound y,1
next x
return