.png "The Goonies 'R' Good Enough • Cyndi Lauper (MSX BASIC)")
(Link para download)
--------------
SUGGESTED BASIC COMMANDS FOR FASTER TYPING / PRE-TYPING
(Sugestões de comandos BASIC para uma digitação mais rápida / pré-digitação)
--------------
key1,"DATA"+CHR$(32)
auto
PROGRAM LISTING IN BASIC LANGUAGE
(Listagem do programa em linguagem BASIC)
--------------
10 ' THE GOONIES 'R' GOOD ENOUGH
20 ' CYNDI LAUPER
30 ' --------------------
40 ' MSX 1/2/2+/TURBO-R
50 ' MSX-BASIC YEAR: 2026
60 ' --------------------
70 COLOR 15,1,1:SCREEN2,,0
80 BLOAD"A:GOONIES1.SC2",S
90 ' Reading of Data
100 ' ---------------
110 READ A$, B$, C$
120 IF A$="!" THEN GOTO 150
130 PLAY A$, B$, C$
140 GOTO 110
150 ' End
160 ' ---
170 IF PLAY(1) GOTO 170
180 I$=INPUT$(1)
190 SCREEN 0:WIDTH 40:LIST
200 END
210 ' Data for the PLAY command
220 ' ‐------------------------
230 DATA T140L4S0M15000V12V0G+1,T140L4S0M15000V12V0G+1,T140L4S0M15000V12V0G+1,G+2V12O5G+4C+8G+8,G+1,C+4V11O3C+4V0C+7V11C+4.,V0G+2V12G+4C+8G+8,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4
240 DATA O6C+4V0G+4V12O5G+4C+8G+8,C+1,B4O3C+4V0C+7V11C+4.,C+8V0G+4.V12G+4C+8G+8,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4,O6C+4V0G+4V12O5G+4C+8G+8,G+1,B4O3C+4V0C+7V11C+4.,V0G+2V12G+4C+8G+8,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4
250 DATA O6C+4V0G+4V12O5G+4C+8G+8,C+1,B4O3C+4V0C+7V11C+4.,C+8V0G+4.V12G+4C+8G+8,C+1,V0C+8V11C+4V0D+4V11D+8F+8D+8,O6C+4V0G+4V12O4G+4E8G+8,E4V11O4E2.,O2B4O3E4V0E7V11E8E4,V0G+8V12G+8A4G+4F+4,V0C+1,V0E8V11E8E2E4,E4G+2.,C+1,D+4C+4V0C+7V11C+8C+4
260 DATA O3B8O4C+7V0B4V12O3B16O4E16G+8B8G+8,C+1,V0C+8V11C+8C+4.C+8C+8O2B8,E8O3B8O4E4G+8G+8G+4,C+1,O3C+8D+8E4V0E7V11E8E4,G+4A4G+4F+8E8,C+1,V0E8V11E8E2E4,V0E4V12E4D+4E4,C+1,D+4C+4V0C+7V11C+8C+4,V0E8V12E8F+4E4F+4,C+1,V0C+8V11C+8C+2C+4
270 DATA G+4V0B4V12B4A4,C+1,O2B4A4.A8A4,G+4F+4E4D+8E8,C+1,V0B4V11B4.B8B4,V0G+2V12G+4F+4,C+1,G+4E4.E8E4,E4D+4C+4O3B8O4C+8,C+1,V0E8V11E8F+2G+4,V0B2V12B2,C+1,V0A4V11A4.A8A4,A8G+4F+8E8B4G+8,C+1,A4B2.
280 DATA F+8E9V0G+4V12G+8.G+16G+4,C+1,O3C+8D+8E4V0E8V11E8O2B8O3E8,V0G+2V12G+2,C+1,D+8E4V0F+4V11F+8E4,G+4V0G+4V12G+4G+8.F+16,C+1,D+4C+4V0C+8V11C+8O2A8O3C+8,E4V0G+4V12G+4A4,C+1,O2B8O3C+4V0D+4V11D+8C+4,B4O5C+4.O4B4.,C+1,O2B4A4V0A8V11A8E8A8
290 DATA V0F+2V12F+4G+8,C+1,F+8A4V0B4V11B8A4,A8B4B2,E2V11O5E4D+4,G+4B4.B8B4,V0B8V12B8O5E6D+10.C+6O4B4,C+4O4B4A4G+4,V0B8V11B8B2O3E4,O5C+4V0G+4V12G+4C+8G+8,F+1,D+4C+4V0C+7V11C+4.,V0G+2V12G+4C+8G+8,V0C+1,V0C+8V11C+4V0C+4V11C+8O2G+4
300 DATA O6C+4V0G+4V12O5G+4C+8G+8,C+1,B4O3C+4V0C+7V11C+4.,C+8V0G+4.V12G+4C+8G+8,C+1,V0C+8V11C+4V0D+4V11D+8F+8D+8,O6C+4V0G+4V12O4G+4E8G+8,E4V11E2.,O2B4O3E4V0E7V11E8E4,V0G+8V12G+8A4G+4F+4,V0C+1,V0E8V11E8E2E4,E4G+2.,C+1,D+4C+4V0C+7V11C+8C+4
310 DATA O3B8O4C+8V0B4V12O3B16O4E16G+8B8G+8,C+1,V0C+8V11C+8C+4.C+8C+8O2B8,E8O3B8O4E4G+8G+8G+8G+8,C+1,O3C+8D+8E4V0E7V11E8E4,V0G+8V12G+8A4G+4F+8E8,C+1,V0E8V11E8E2E4,V0E4V12E4D+4E4,C+1,D+4C+4V0C+7V11C+8C+4,V0E8V12E8F+4E4F+4,C+1,V0C+8V11C+8C+2C+4
320 DATA G+4V0B4V12B4A4,C+1,O2B4A4.A4.,G+4V0F+8V12F+8E4D+4,C+1,V0A8V11A8B4.B4.,E4V0G+4V12G+4F+4,C+1,G+4E4.E4.,E4D+4C+4O3B8O4C+8,C+1,V0E8V11E8F+4.F+4.,V0B2V12B2,C+1,G+4A4.A4.,A8G+4F+8E8B4G+8,C+1,A4B4.B4.
330 DATA F+8E9V0G+4V12G+8.G+16G+4,C+1,O3C+8D+8E4V0E8V11E8O2B8O3E8,V0G+2V12G+2,C+1,D+8E4V0F+4V11F+8E4,G+4V0G+4V12G+4G+8.F+16,C+1,D+4C+4V0C+8V11C+8O2A8O3C+8,E4V0G+4V12G+4A4,C+1,O2B8O3C+4V0D+4V11D+8C+4,B4O5C+4.O4B4.,C+1,O2B4A4V0A8V11A8E8A8
340 DATA V0F+2V12F+4G+8,C+1,F+8A4V0B4V11B8A4,A8B1,E2V11O5E4D+4,G+4B4.B8B4,V0B8V12B8O5E6D+10.C+6O4B4,C+4O4B4A4G+4,V0B8V11B8B2O3E4,O5C+4O4G+4.F+8E4,F+1,D+4E4V0E8V11E8O2B8O3E8,V0G+2V12G+4A4,V0C+1,D+8E4V0F+4V11F+8E4
350 DATA B4O5C+4.O4B4.,C+1,D+4C+4V0C+8V11C+8O2A8O3C+8,V0G+2V12G+2,C+1,O2B8O3C+4V0D+4V11D+8C+4,A4O5C+4V0B8V12O4B8O5C+4,C+1,O2B4A4V0A8V11A8E8A8,O4B2V0F+8V12F+4G+8,C+1,F+8A4V0B4V11B8A4,A8B1,E2V11O5E4D+4,G+4B4.B8B4
360 DATA V0E4V12O5E6D+10.C+6O4B4,C+4O4B4A4G+4,V0B8V11B8B2O3E4,O5C+4.V0G+9V12G+4C+8G+8,F+1,D+4C+4V0C+7V11C+4.,V0G+2V12G+4C+8G+8,V0C+1,V0C+8V11C+4V0C+4V11C+8O2G+4,O6C+4V0G+4V12O5G+4C+8G+8,C+1,B4O3C+4V0C+7V11C+4.
370 DATA C+8V0G+4.V12G+4C+8G+8,C+1,V0C+8V11C+4V0D+4V11D+8F+8D+8,O6C+1,C+1,O2B4O3C+4V0C+7V11C+4.,V0C+1,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4,C+1,C+1,B4O3C+4V0C+7V11C+4.,C+1,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4,C+4V12O4C+4.G+16B16O5C+4,C+1,B4O3C+4V0C+7V11C+4.
380 DATA V0C+1,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4,G+4V12O4G+4F+4G+4,C+1,B4O3C+4V0C+7V11C+4.,V0C+1,C+1,V0C+8V11C+4V0C+4V11C+8O2G+4,E4V12E4C+2,C+1,B4O3C+4V0C+7V11C+4.,V0C+1,E2.V11E4,V0C+8V11C+4V0C+4V11C+8O2G+4,C+1,D+4C+2O3G+4,B4O3C+4V0C+7V11C+4.
390 DATA C+1,V0C+1,V0C+8V11C+1,B2V12B4A4,C+1,V0A4V11O2A4.A4.,G+4V0F+8V12F+8E4D+4,C+1,V0A8V11A8B4.B4.,E4V0G+4V12G+4F+4,C+1,G+4E4.E4.,E4D+4C+4O3B8O4C+8,C+1,V0E8V11E8F+4.F+4.,V0B2V12B2,C+1,G+4A4.A4.,A8G+4F+8E8B4G+8,C+1,A4B4.B4.
400 DATA F+8E9V0G+4V12G+8.G+16G+4,C+1,O3C+8D+8E4V0E8V11E8O2B8O3E8,V0G+2V12G+2,C+1,D+8E4V0F+4V11F+8E4,G+4V0G+4V12G+4G+8.F+16,C+1,D+4C+4V0C+8V11C+8O2A8O3C+8,E4V0G+4V12G+4A4,C+1,O2B8O3C+4V0D+4V11D+8C+4,B4O5C+4.O4B4.,C+1,O2B4A4V0A8V11A8E8A8
410 DATA V0F+2V12F+4G+8,C+1,F+8A4V0B4V11B8A4,A8B1,E2V11O5E4D+4,G+4B4.B8B4,V0B8V12B8O5E6D+10.C+6O4B4,C+4O4B4A4G+4,V0B8V11B8B2O3E4,O5C+4O4G+4.F+8E4,F+1,D+4E4V0E8V11E8O2B8O3E8,V0G+2V12G+4A4,V0C+1,D+8E4V0F+4V11F+8E4
420 DATA B4O5C+4.O4B4.,C+1,D+4C+4V0C+8V11C+8O2A8O3C+8,V0G+2V12G+2,C+1,O2B8O3C+4V0D+4V11D+8C+4,A4O5C+4V0B8V12O4B8O5C+4,C+1,O2B4A4V0A8V11A8E8A8,O4B2V0F+8V12F+4G+8,C+1,F+8A4V0B4V11B8A4,A8B1,E2V11O5E4D+4,G+4B4.B8B4
430 DATA V0E4V12O5E6D+10.C+6O4B4,C+4O4B4A4G+4,V0B8V11B8B2O3E4,O5C+1,F+1,D+4E4V0E8V11E8O2B8O3E8,V0C+1,V0C+1,D+8E4V0F+4V11F+8E4,C+1,C+1,D+4C+4V0C+8V11C+8O2A8O3C+8,C+1,C+1,O2B8O3C+4V0D+4V11D+8C+4,C+1,C+1,O2B4A4V0A8V11A8E8A8,C+1,C+1,F+8A4V0B4V11B8A4
440 DATA C+1,E2V11O5E4D+4,G+4B4.B8B4,C+1,C+4O4B4A4G+4,V0B8V11B8B2O3E4,C+4V12O3C+9C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16,F+1,D+1,C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16,V0G+1,V0G+1
450 DATA C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16C+16,G+1,G+1,C+1,F+1,D+1,!,!,!