I Was Made for Lovin' You - Kiss

 
I Was Made for Lovin' You - Kiss (MSX-BASIC)



DOWNLOAD LINK
(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,"PLAY"+CHR$(34)

key2,CHR$(34)+","+CHR$(34)

auto




PROGRAM LISTING IN BASIC LANGUAGE
(Listagem do programa em linguagem BASIC)
---------------


 
10 ' I WAS MADE FOR LOVIN' YOU - KISS
20 ' MSX 1/2/2+/TURBO-R
30 ' ------------------
40 COLOR 15,1,1 : SCREEN 2,,0
50 BLOAD"A:KISS01.SC2",S
60 OPEN"GRP:" FOR OUTPUT AS#1
70 PSET(30,8),1
80 PRINT#1,"I Was Made for Lovin' You"
90 ' ------------------
100 PLAY"O2V8L4T133","O4V8L4T133","O4V8L4T133"
110 PLAY"S0M30000","S0M30000","S0M30000"
120 ' Measure  1
130 PLAY"R4"
140 ' Measure  2
150 PLAY"O3B4","O4E4","O4A4"
160 PLAY"O3B4.","O4E4.","O4G4."
170 PLAY"O3B8","O4E8","O4A8"
180 ' Measure  3
190 PLAY"O3B8","O4E8","O4A8"
200 PLAY"O3B8","O4E8","O4A8"
210 PLAY"O3B2.","O4E2.","O4G2."
220 ' Measure  4
230 PLAY"R4"
240 PLAY"O4D4","O4E4"
250 PLAY"O4C4.","O4E4."
260 PLAY"O3B8","O4E8","O4G8"
270 ' Measure  5
280 PLAY"O3B8","O4E8","O4G8"
290 PLAY"O3B8","O4E8","O4G8"
300 PLAY"O3A8","O4D8","O4F#8"
310 PLAY"O3A8","O4D8","O5F#8"
320 PLAY"O5F#4"
330 PLAY"O5G8"
340 PLAY"O5E8"
350 ' Measure  6
360 PLAY"O5F#16"
370 PLAY"O5E16"
380 PLAY"O5F#16"
390 PLAY"O5E16"
400 PLAY"O5E4"
410 PLAY"O3B4.","O4E4.","O4G4."
420 PLAY"O3B8","O4E8","O4A8"
430 ' Measure  7
440 PLAY"O3B8","O4E8","O4A8"
450 PLAY"O3B8","O4E8","O4A8"
460 PLAY"O3B2.","O4E2.","O4G2."
470 ' Measure  8
480 PLAY"R4"
490 PLAY"O4D4","O4E4"
500 PLAY"O4C4.","O4E4."
510 PLAY"O3B8","O4E8","O4G8"
520 ' Measure  9
530 PLAY"O3B8","O4E8","O4G8"
540 PLAY"O3B8","O4E8","O4G8"
550 PLAY"O3A2.","O4D2.","O4F#2."
560 ' Measure  10
570 PLAY"O5E4"
580 PLAY"O5F#4"
590 PLAY"O5G4"
600 PLAY"O5A8"
610 PLAY"O5B8"
620 ' Measure  11
630 PLAY"O5B8"
640 PLAY"O5B8"
650 PLAY"O5A8"
660 PLAY"O5G8"
670 PLAY"O5G4"
680 PLAY"O5F#4"
690 ' Measure  12
700 PLAY"O5E4"
710 PLAY"O5F#4"
720 PLAY"O5G4"
730 PLAY"O5A8"
740 PLAY"O5B8"
750 ' Measure  13
760 PLAY"O5B8"
770 PLAY"O5B8"
780 PLAY"O5A2"
790 PLAY"R4"
800 ' Measure  14
810 PLAY"O5E4"
820 PLAY"O5F#4"
830 PLAY"O5G4"
840 PLAY"O5A8"
850 PLAY"O5B8"
860 ' Measure  15
870 PLAY"O5B8"
880 PLAY"O5B8"
890 PLAY"O5A8"
900 PLAY"O5G8"
910 PLAY"O5G4"
920 PLAY"O5F#4"
930 ' Measure  16
940 PLAY"O5E4"
950 PLAY"O5F#4"
960 PLAY"O5G4"
970 PLAY"O5A8"
980 PLAY"O5B8"
990 ' Measure  17
1000 PLAY"O5B8"
1010 PLAY"O5B8"
1020 PLAY"O5A2"
1030 PLAY"R8."
1040 PLAY"O4D8"
1050 FOR I=1 TO 2
1060 ' Measure  18
1070 PLAY"O4E2"
1080 PLAY"R2"
1090 ' Measure  19
1100 PLAY"R4"
1110 PLAY"R16"
1120 PLAY"O4A16"
1130 PLAY"O4B16"
1140 PLAY"O4A16"
1150 PLAY"O4B16"
1160 PLAY"O4A16"
1170 PLAY"O4G8"
1180 PLAY"O4G8"
1190 PLAY"O4G16"
1200 PLAY"O4A16"
1210 ' Measure  20
1220 PLAY"O4B2"
1230 PLAY"R2"
1240 ' Measure  21
1250 PLAY"R2"
1260 PLAY"R8"
1270 PLAY"O4A8"
1280 PLAY"O4B4"
1290 ' Measure  22
1300 PLAY"O4B4."
1310 PLAY"O4A8"
1320 PLAY"O4A2"
1330 ' Measure  23
1340 PLAY"R4"
1350 PLAY"R8"
1360 PLAY"O3B8"
1370 PLAY"O4A8"
1380 PLAY"O4A4"
1390 PLAY"O4B8"
1400 ' Measure  24
1410 PLAY"O4B8"
1420 PLAY"O4A8"
1430 PLAY"O4G8"
1440 PLAY"O4A8"
1450 PLAY"O4A16"
1460 PLAY"O4G16"
1470 PLAY"O4E8"
1480 PLAY"R4"
1490 ' Measure  25
1500 PLAY"R2"
1510 PLAY"R8"
1520 PLAY"O4D8"
1530 PLAY"O4D8"
1540 PLAY"O4E8"
1550 ' Measure  26
1560 PLAY"O4E2"
1570 PLAY"R2"
1580 ' Measure  27
1590 PLAY"R4"
1600 PLAY"R16"
1610 PLAY"O4A16"
1620 PLAY"O4B16"
1630 PLAY"O4A16"
1640 PLAY"O4B16"
1650 PLAY"O4A16"
1660 PLAY"O4G8"
1670 PLAY"O4G8"
1680 PLAY"O4A16"
1690 PLAY"O4B16"
1700 ' Measure  28
1710 PLAY"O4B2"
1720 PLAY"R2"
1730 ' Measure  29
1740 PLAY"R4"
1750 PLAY"R8"
1760 PLAY"O4D8"
1770 PLAY"O4B8."
1780 PLAY"O4B16"
1790 PLAY"O4B8"
1800 PLAY"O4A8"
1810 ' Measure  30
1820 PLAY"O4B4."
1830 PLAY"O4A8"
1840 PLAY"O4A2"
1850 ' Measure  31
1860 PLAY"R4"
1870 PLAY"R8"
1880 PLAY"O3B8"
1890 PLAY"O4A8."
1900 PLAY"O4A16"
1910 PLAY"O4A8"
1920 PLAY"O4G8"
1930 ' Measure  32
1940 PLAY"O4A4."
1950 PLAY"O4G8"
1960 PLAY"O4G2"
1970 ' Measure  33
1980 PLAY"R1"
1990 ' Measure  34
2000 PLAY"O5E4"
2010 PLAY"O5F#4"
2020 PLAY"O5G4"
2030 PLAY"O5A8"
2040 PLAY"O5B8"
2050 ' Measure  35
2060 PLAY"O5B8"
2070 PLAY"O5B8"
2080 PLAY"O5A4"
2090 PLAY"O5G8"
2100 PLAY"O5F#8"
2110 PLAY"O5F#4"
2120 ' Measure  36
2130 PLAY"O5E4"
2140 PLAY"O5F#4"
2150 PLAY"O5G4"
2160 PLAY"O5A8"
2170 PLAY"O5B8"
2180 ' Measure  37
2190 PLAY"O5B8"
2200 PLAY"O5B8"
2210 PLAY"O5A2"
2220 PLAY"R8"
2230 PLAY"O5D8"
2240 ' Measure  38
2250 PLAY"O5E4"
2260 PLAY"O5F#4"
2270 PLAY"O5G4"
2280 PLAY"O5A8"
2290 PLAY"O5B8"
2300 ' Measure  39
2310 PLAY"O5B8"
2320 PLAY"O5B8"
2330 PLAY"O5A4"
2340 PLAY"O5G8"
2350 PLAY"O5F#8"
2360 PLAY"O5F#4"
2370 ' Measure  40
2380 PLAY"O5E4"
2390 PLAY"O5F#4"
2400 PLAY"O5G4"
2410 PLAY"O5A8"
2420 PLAY"O5B8"
2430 ' Measure  41
2440 PLAY"O5B8"
2450 PLAY"O5A2"
2460 PLAY"R8."
2470 PLAY"O4D16"
2480 NEXT
2490 ' Measure  42
2500 PLAY"O5B8"
2510 PLAY"O5B8"
2520 PLAY"O5A2"
2530 PLAY"R4"
2540 ' Measure  43
2550 PLAY"O5E4"
2560 PLAY"O5F#4"
2570 PLAY"O5G4"
2580 PLAY"O5A8"
2590 PLAY"O5B8"
2600 ' Measure  44
2610 PLAY"O5B8"
2620 PLAY"O5B8"
2630 PLAY"O5A4"
2640 PLAY"O5G8"
2650 PLAY"O5F#8"
2660 PLAY"O5F#4"
2670 ' Measure  45
2680 PLAY"O5E4"
2690 PLAY"O5F#4"
2700 PLAY"O5G4"
2710 PLAY"O5A8"
2720 PLAY"O5B8"
2730 ' Measure  46
2740 PLAY"O5B8"
2750 PLAY"O5B8"
2760 PLAY"O5A2"
2770 PLAY"R8"
2780 PLAY"O5D8"
2790 ' Measure  47
2800 PLAY"O5E4"
2810 PLAY"O5F#4"
2820 PLAY"O5G4"
2830 PLAY"O5A8"
2840 PLAY"O5B8"
2850 ' Measure  48
2860 PLAY"O5B8"
2870 PLAY"O5B8"
2880 PLAY"O5A4"
2890 PLAY"O5G8"
2900 PLAY"O5F#8"
2910 PLAY"O4F#4"
2920 ' Measure  49
2930 PLAY"O5E4"
2940 PLAY"O5F#4"
2950 PLAY"O5G4"
2960 PLAY"O5A8"
2970 PLAY"O5B8"
2980 ' Measure  50
2990 PLAY"O5B8"
3000 PLAY"O5B8"
3010 PLAY"O5A2"
3020 PLAY"R4"
3030 ' Measure  51
3040 PLAY"O4C2","O4A2"
3050 PLAY"O4C4.","O4A4."
3060 PLAY"O4C8","O4G8"
3070 ' Measure  52
3080 PLAY"O4C2.","O4C2."
3090 PLAY"R8"
3100 PLAY"O5F#8"
3110 ' Measure  53
3120 PLAY"O5F#4"
3130 PLAY"O5G8"
3140 PLAY"O5F#8"
3150 PLAY"O5F#8"
3160 PLAY"O5E8"
3170 PLAY"O5D8"
3180 PLAY"O5E8"
3190 ' Measure  54
3200 PLAY"O5E4"
3210 PLAY"R4"
3220 PLAY"O5D8"
3230 PLAY"O5D8"
3240 PLAY"O5B8"
3250 PLAY"O5E8"
3260 ' Measure  55
3270 PLAY"O5E2."
3280 PLAY"O5D8"
3290 PLAY"O5B8"
3300 ' Measure  56
3310 PLAY"O4B16"
3320 PLAY"O4A16"
3330 PLAY"O4G4."
3340 PLAY"R2"
3350 ' Measure  57
3360 PLAY"O4B4"
3370 PLAY"O5C8"
3380 PLAY"O4B8"
3390 PLAY"O4B8"
3400 PLAY"O4A8"
3410 PLAY"O4G4"
3420 ' Measure  58
3430 PLAY"O4G4"
3440 PLAY"R8"
3450 PLAY"O5A8"
3460 PLAY"O5G8."
3470 PLAY"O5F#16"
3480 PLAY"O5F#8"
3490 PLAY"O5E8"
3500 ' Measure  59
3510 PLAY"O5F#8"
3520 PLAY"O5E4."
3530 PLAY"O5E4"
3540 PLAY"O5D8"
3550 PLAY"O4B16"
3560 PLAY"O4A16"
3570 ' Measure  60
3580 PLAY"O4B2."
3590 PLAY"R8"
3600 PLAY"O4B8"
3610 ' Measure  61
3620 PLAY"O4B8"
3630 PLAY"O4A4."
3640 PLAY"O4A4"
3650 PLAY"O5E8"
3660 PLAY"O4B8"
3670 ' Measure  62
3680 PLAY"O4B4"
3690 PLAY"R8"
3700 PLAY"O4G8"
3710 PLAY"O5A4"
3720 PLAY"O5G8"
3730 PLAY"O5F#8"
3740 ' Measure  63
3750 PLAY"O5F#8"
3760 PLAY"O5E4."
3770 PLAY"O5E4"
3780 PLAY"O5D8"
3790 PLAY"O5F#8"
3800 ' Measure  64
3810 PLAY"O5F#4"
3820 PLAY"O5E2."
3830 ' Measure  65
3840 PLAY"O3A8","O4D8"
3850 PLAY"O3A8","O4D8"
3860 PLAY"O3A8","O4D8"
3870 PLAY"O3A8","O4D8"
3880 PLAY"O3A4","O4D4"
3890 PLAY"O3A8","O4B8","O5A8"
3900 PLAY"O3B8","O4A8","O5B8"
3910 ' Measure  66
3920 PLAY"O3B4","O4F#4","O4B4"
3930 PLAY"O3B4","O4F#4","O4B4"
3940 PLAY"O3B4","O4F#4","O4B4"
3950 PLAY"O3B4","O4F#4","O4B4"
3960 ' Measure  67
3970 PLAY"O3B4","O4F#4","O4B4"
3980 PLAY"O3B4","O4F#4","O4B4"
3990 PLAY"O3B4","O4F#4","O4B4"
4000 PLAY"O3B4","O4F#4","O4B4"
4010 ' Measure  68
4020 PLAY"O3B8","O4F#8","O5B8"
4030 PLAY"O3B8","O4F#8","O5B8"
4040 PLAY"O3B8","O4F#8","O5B8"
4050 PLAY"O3B8","O4F#8","O5B8"
4060 PLAY"O3B8","O4F#8","O5B8"
4070 PLAY"O3B8","O4F#8","O5B8"
4080 PLAY"O3B8","O4F#8","O5B8"
4090 PLAY"O3B8","O4F#8","O5B8"
4100 ' Measure  69
4110 PLAY"O3B8","O4F#8","O4B8"
4120 PLAY"R8"
4130 PLAY"R4"
4140 PLAY"R4"
4150 PLAY"O4E4"
4160 FOR I=1 TO 2
4170 ' Measure  70
4180 PLAY"O3B1","O4E1","O4B1"
4190 ' Measure  71
4200 PLAY"O3B8","O4E8","O4B8"
4210 PLAY"R8"
4220 PLAY"R4"
4230 PLAY"R2"
4240 ' Measure  72
4250 PLAY"O4E2","O4A2"
4260 PLAY"O4E4.","O4A4."
4270 PLAY"O4E8","O4B8"
4280 ' Measure  73
4290 PLAY"O4E4","O4B4"
4300 PLAY"O4D2.","O4A2."
4310 NEXT
4320 FOR I=1 TO 2
4330 ' Measure  74
4340 PLAY"O5E4"
4350 PLAY"O5F#4"
4360 PLAY"O5G4"
4370 PLAY"O5A8"
4380 PLAY"O5B8"
4390 ' Measure  75
4400 PLAY"O5B8"
4410 PLAY"O5B8"
4420 PLAY"O5A4"
4430 PLAY"O5G8"
4440 PLAY"O5F#8"
4450 PLAY"O5F#4"
4460 ' Measure  76
4470 PLAY"O5E4"
4480 PLAY"O5F#4"
4490 PLAY"O5G4"
4500 PLAY"O5A8"
4510 PLAY"O5B8"
4520 ' Measure  77
4530 PLAY"O5B8"
4540 PLAY"O5B8"
4550 PLAY"O5A2"
4560 PLAY"R8"
4570 PLAY"O5D8"
4580 ' Measure  78
4590 PLAY"O5E4"
4600 PLAY"O5F#4"
4610 PLAY"O5G4"
4620 PLAY"O5A8"
4630 PLAY"O5B8"
4640 ' Measure  79
4650 PLAY"O5B8"
4660 PLAY"O5B8"
4670 PLAY"O5A4"
4680 PLAY"O5G8"
4690 PLAY"O5F#8"
4700 PLAY"O5F#4"
4710 ' Measure  80
4720 PLAY"O5E4"
4730 PLAY"O5F#4"
4740 PLAY"O5G4"
4750 PLAY"O5A8"
4760 PLAY"O5B8"
4770 ' Measure  81
4780 PLAY"O5B8"
4790 PLAY"O5B8"
4800 PLAY"O5A2"
4810 PLAY"R4"
4820 NEXT
4830 IF PLAY(1) THEN 4830
4840 END