1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46
|
10 REM PC-BASIC test
20 REM SOUND syntax
30 OPEN "OUTPUT.TXT" FOR OUTPUT AS 1
40 ON ERROR GOTO 1000
50 SOUND
60 SOUND 0
65 SOUND 0,
70 SOUND 0,0
75 SOUND 0,0,
80 SOUND 0,0,0
85 SOUND 0,0,0,
90 SOUND 0,0,0,0
95 SOUND 0,0,0,0,
97 SOUND 0,0,0,0,0
99 SOUND 0,0,0,0,0,
100 SOUND -1
110 SOUND -1,0
120 SOUND 256,0
130 SOUND 32768,0
140 SOUND "!",0
150 SOUND 0,-1
180 SOUND 0,0,1
190 SOUND 1,1,1
210 SOUND 1,1,1,1
220 SOUND 1,1,1,3
230 SOUND 1,1,1,-1
240 SOUND 1,1,1,256
250 SOUND 1,1,1,32768
260 SOUND 1,1,1,"!"
270 SOUND 1,1,-1
280 SOUND 1,1,256
290 SOUND 1,1,32768
300 SOUND 1,1,"!"
310 SOUND 0,0,-1
320 SOUND 0,0,256
330 SOUND 0,0,32768
340 SOUND 0,0,"!"
350 SOUND 1,1,1,"!",
360 SOUND 32768,1,1,"!",
370 SOUND ON
380 SOUND OFF
390 SOUND STOP
400 SOUND LPRINT
999 END
1000 PRINT#1, ERR, ERL
1010 RESUME NEXT
|