1 REM-----1812 Overture-----arr. by Rob Elliott for the Model 100 2 CLS:PRINT@90,"Overture 1812" 3 PRINT@135,"...by Tschaikowsky" 4 PRINT@175,"...arr. by Rob Elliott"; 5 READA,B:IFA=0ANDB=0THENMENUELSESOUNDA,B:GOTO5 6 DATA2348,5,0,5,2348,5,2092,5,1864,5,2092,5,2348,5,2092,5 7 DATA1864,5,0,5,2348,5,0,5,2348,20,0,10,2348,5,2092,5,1864,5 8 DATA2092,5,2348,5,2092,5,1864,5,0,5,2348,5,0,5,2348,20,0,10 9 DATA2092,5,1864,5,2092,5,2793,5,3516,5,3134,5,2092,5,2793,5 10 DATA3516,5,2793,5,2092,30,0,10,2348,5,2092,5,2348,5,3134,5 11 DATA3718,5,3134,5,2348,5,3134,5,3718,5,3134,5,2348,30,0,10 12 DATA0,5,2348,5,2092,5,1864,5,2092,5,2348,5,2092,5 13 DATA1864,5,0,5,2348,5,0,5,2348,20,0,10,2348,5,2092,5,1864,5 14 DATA2092,5,2348,5,2092,5,1864,5,0,5,2348,5,0,5,2348,20,0,10 15 DATA2092,5,1864,5,2092,5,2793,5,3516,5,3134,5,2092,5,2793,5 16 DATA3516,5,2793,5,2092,30,0,10,2348,5,2092,5,2348,5,3134,5 17 DATA3718,5,3134,5,2348,5,3134,5,3718,5,3134,5,2348,30,0,10 18 DATA2793,10,2348,10,2793,10,0,10,3134,10,2484,10,3134,10,0,10,3134,10 19 DATA2793,10,3134,10,2348,10,2484,10,2092,10,2348,10,1864,50,0,30,3134,10 20 DATA0,10,2953,10,0,10,2793,10,0,10,2484,10,0,10,2348,10,0,10,2092,10 21 DATA2484,10,2348,10,0,10,2092,10,2484,10,2348,10,2484,10,2348,10,2484,10 22 DATA2348,10,2484,10,2348,10,2484,10,2348,10,2484,10,2348,10,2484,10,2348 23 DATA10,2484,10,2348,10,2484,10,2348,10,0,30,1864,10,0,30,2348,10,0,30 24 DATA1864,10,0,30,2348,10,0,10,4697,22.5,4697,5,3718,20,3134,20,2348,30 25 DATA0,10,1864,30,0,10,4697,75,0,20,2348,50,0,20,1864,50,0,20,4697,50,0,10 26 DATA4697,10,0,10,4697,75,0,0