10 CLS:PRINT@130,"The Imperial March":PRINT@170,"...by John Williams"
20 PRINT@210,"...arr. by Rob Elliott"
30 READ A,B
35 IF A=0 AND B=0 THEN MENU
40 SOUND A,B
45 GOTO 30
50 DATA3134,24,3134,24,3134,24,3950,18,2636,6,3134,24,3950,18,2636,6,3134,48
60 DATA2092,24,2092,24,2092,24,1975,18,2636,6,3321,24,3950,18,2636,6
70 DATA3134,48,1567,24,3134,18,3134,6,1567,24,1660,18,1758,6,1864,6,1975,6
80 DATA1864,12,0,12,2959,12,2216,24,2348,18,2484,6,2636,6,2793,6,2636,12,0,12
90 DATA3950,12,3321,24,3950,18,3321,6,2636,24,3134,18,2636,6,2092,48
95 DATA1567,24,3134,18,3134,6,1567,24,1660,18,1758,6,1864,6,1975,6
96 DATA1864,12,0,12,2959,12,2216,24,2348,18,2484,6,2636,6,2793,6,2636,12,0,12
97 DATA3950,12,3321,24,3950,18,2636,6,3134,24,3950,18,2636,6,3134,48,0,0