Tone var Byte [11]

Note: Tone is now an Array, but since the first element of the array is Tone[0], Tone[10] is actually the eleventh element, which is why I've defined eleven elements above.

Loop:
FOR i = 1 TO 10
FREQOUT Pin, Period, Tone[i]
NEXT i

Naturally you will have to preset the array values of Tone before you run the subroutine...

...or if you have lots of tunes to play try presetting them in EEPROM...

Loop:
For i = 1 to 10
Read i,tone
FREQOUT Pin, Period, Tone
NEXT i

Melanie