150 DIM DE(100),PA(100)
160 DATA 59,50,42,50,39,42,50,64,59,26,32,39,42,50,42,59,32,59,50,42,50,39,42,50,64
170 DATA 59,26,32,39,42,50,42,59,32,50,42,50,64,86,39,42,50,64,86,32,39,42,42,35,35
180 DATA 32,32,18,21,21,26,32,26,32,32,39,42,50,42,39,32,26,39,50,59,42,50,59,59,18
190 DATA 21,21,26,32,26,32,32,39,42,50,42,39,32,26,39,50,59,42,50,59,59
200 DATA 150,125,200,200,200,200,125,125,200,200,200,200,200,125,125,275,150,125
210 DATA 200,200,200,200,125,125,200,200,200,200,200,200,125,125,275,200,200,125
220 DATA 125,200,200,200,125,125,200,200,200,150,125,200,125,125,275,150,125,125
230 DATA 125,200,150,125,125,125,200,150,75,75,125,125,125,125,200,125,125,125,275
240 DATA 150,125,125,125,200,150,135,125,125,200,150,75,75,125,125,125,125,200,275
250 DATA 125,125,275
260 RESTORE 200 :FOR A=1TO 95:READ PA(A):NEXT A
270 RESTORE 160 :FOR A=1TO 95:READ DE(A):BEEP 1,DE(A),PA(A):NEXT A
280 END