This is the "example 1", right? You added the line with `PLAY` "p" command, but what is `i` being assigned to?
LOL I like the end music, like the Atari2600 version of Pac-Man!
Code: (Select All)
Dim As Integer i, j
Play "q0mll64"
For j = 0 To 6
For x = 1 To 50
a$ = a$ + "v" + LTrim$(Str$(x)) + "n" + LTrim$(Str$(x))
Next
i = 2 ^ j
a$ = a$ + "p" + _Trim$(Str$(i))
For x = 50 To 1 Step -1
a$ = a$ + "v" + LTrim$(Str$(x)) + "n" + LTrim$(Str$(x))
Next
Print a$
Play a$
a$ = ""
Next
Play "v10l1c,l4egl2o5c,o4l4eg"
LOL I like the end music, like the Atari2600 version of Pac-Man!