Important Notice

The pages on this site contain documentation for very old MS-DOS software, purely for historical purposes. If you're looking for up-to-date documentation, particularly for programming, you should not rely on the information found here, as it will be woefully out of date.

                        ◄Example►                ◄Contents►  ◄Index►  ◄Back►
──────────────────────────────────────────────────────────────────────────────
' This example uses the ON PLAY and PLAY statements within an event-trapping
' routine.
 
' To try this example:
' 1. Choose New Project from the File menu
' 2. Copy the code example below to the code window
' 3. Press F5 to run the example
 
 CLS                               ' Clear the screen
 ON PLAY(3) GOSUB Background
 PLAY ON
 Music$ = "MBo3L8ED+ED+Eo2Bo3DCL2o2A"
 PLAY Music$
 LOCATE 2, 1: PRINT "Press any key to stop.";
 DO WHILE INKEY$ = "": LOOP
 END
 
Background:
     i% = i% + 1
     LOCATE 1, 1: PRINT "Background called "; i%; "time(s)";
     PLAY Music$
     RETURN