Sound: Türklingel (Beispiel Sourcecode)

10 REM * * * TUERKLINGEL * * *
20 GRAPHICS 18
30 POSITlON 1, 6 : PRINT #6 ; “ ** TUERKLINGEL * * “
40 FOR I=1000 TO 200 STEP -4
50 IF I>=1000 AND I®700 THEN SOUND 0, 150, 10, INT ( I-700 ) /20 )
60 IF I>=800 AND I=600 AND I=1000 AND I=800 AND I=600 AND I=400 AND I