REM PROGRAMMED BY: TRAVIS SCHULTZ
CLS
LOCATE 2, 27: COLOR 15: PRINT "LA CUCARACHA"
RANDOMIZE VAL(MID$(TIME$, 7, 2))
FOR I = 1 TO 65: LOCATE (RND * 17) + 5, (RND * 77) + 1: COLOR 2: PRINT CHR$(14): NEXT
 PLAY "mf t190 ms l16o2dp16 l16dp16 l16dp16 l12gp6. bp6."
 PLAY "l16o2dp16 l16dp16 l16dp16 l12gp6. bp6."
PLAY "o1l16dp16 dp16 gp8. l16o2 gp16 gp16 f#p16 f#p16 ep16 ep16 l2d."
 PLAY "l16dp16 l16dp16 l16dp16 l12f#p6. ap6."
PLAY "l16dp16 l16dp16 l16dp16 l12f#p6. ap6."
PLAY "o1l16ap16 ap16 dp8. o3l8d e d c o2 b a l2g."