8-Bit Software Online Conversion
Airwolf - Listing
50CLS
60ENVELOPE1,1,0,0,0,1,1,1,60,-4,-1,-1
,126,70
70ENVELOPE2,1,0,0,0,1,1,1,60,-4,-1,-1
,127,90
80ENVELOPE3,1,0,0,0,1,1,1,60,-4,-1,-1
,120,60
90ENVELOPE4,1,0,0,0,1,1,1,60,-5,-5,-5
,120,60
100T=-33
110RESTORE
120DIMA(4,265)
130FORE=1TO4
140FORF=1TO265
150READA(E,F)
160NEXT
170NEXT
180PRINT''"
190PRINT"
230PROCplay(1,36)
240PROCplay(37,216)
250PROCplay(1,36)
260PROCplay(1,120)
270PROCplay(217,265)
280CLS
290PRINT''" Finished. "
300END
330DEFPROCsound(C,V)
340W=&300
350D=3
360O=C
370IFA(C,V)=-1ORA(C,V)=999O=0
380IFA(C,V)>1000O=4:A(C,V)=A(C,V)-1000
390P=A(C,V):IFC<>4P=P+T
400IF(C=2ORC=3)ANDV<=216P=P+48
410IFO=3O=-12
420IFV>216ANDO<>0O=1
430IFC=4C=0
440SOUNDW+C,O,P,D
450ENDPROC
460:
470:
480DEFPROCplay(S,F)
490FORG=STOF
500FORC=1TO4
510PROCsound(C,G)
520NEXT
530NEXT
540ENDPROC
550:
560:
570REMch1(bass)
580DATA 41,61,69,81,101,81,89,69
590DATA 81,61,69,81,41,61,69,81,101
600DATA 81,89,69,81,61,69,81,41,61
610DATA 69,81,101,81,89,69,81,61
620DATA 69,81
630DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
640DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
650DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
660DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
670DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
680DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
690DATA 53,73,81,101,121,101,117,93,10
1,73,81,93
700DATA 41,61,69,89,101,89,97,69,81,61
,69,81
710DATA 41,61,69,89,101,89,97,69,81,61
,69,81
720DATA 41,61,69,89,101,89,97,69,81,61
,69,81
730DATA 41,61,69,89,101,89,97,69,81,61
,69,81
740DATA 53,69,53,69,81,69,53,69,53,33,
53,69
750DATA 61,81,61,81,61,81,97,81,61,81,
61,49
760DATA 53,69,53,69,81,69,53,69,53,33,
53,69
770DATA 61,81,61,81,61,81,97,81,61,81,
61,49
780:
790DATA 41,-1,-1,41,41,41
800DATA 41,-1,-1,41,41,41
810DATA 61,-1,-1,61,61,61
820DATA 81,-1,-1,81,81,81
830DATA 101,101,101,101,101,101
840DATA 121,121,121,121,121,121
850DATA 117,117,117,117,117,117
860DATA 117,117,117,117,117,117
870DATA 117
880REMch2(tune)
890DATA 41,41,41,61,69,81,89,89,89
900DATA 101,97,81,89,89,89,101,97
910DATA 81,89,89,89,81,81,97,69,69
920DATA 69,61,61,81,53,53,61,49,49
930DATA 33,53,53,53,73,81,93,101,101
940DATA 101,121,117,93,101,101,101
950DATA 121,117,93,101,101,101,93
960DATA 93,109,81,81,81,73,73,93
970DATA 69,69,73,61,61,45
980DATA 53,53,53,73,81,93,101,101
990DATA 101,121,117,93,101,101,101
1000DATA 121,117,93,101,101,101
1010DATA 141,137,121,129,129,129
1020DATA129,129,129,129,129,129
1030DATA129,129,129
1040DATA129,129,129,129,129,129,129,129
,129
1050DATA129,129,129
1060DATA 149,149,149,145,145,145
1070DATA 129,129,129,137,137,137
1080DATA 109,109,109,117,117,117
1090DATA 97,97,97,109,109,109
1100DATA 149,149,149,145,145,145
1110DATA 129,129,129,137,137,137
1120DATA 109,109,109,117,117,117
1130DATA 97,97,97,109,109,109
1140DATA 169,169,169,165,165,165
1150DATA 129,129,129,149,149,149
1160DATA 157,157,157,129,129,129
1170DATA 145,145,145,157,157,157
1180DATA 169,169,169,165,165,165
1190DATA 129,129,129,149,149,149
1200DATA 157,157,157,129,129,129
1210DATA 145,145,145,157,157,157
1220:
1230DATA -1,-1,-1,-1,-1,-1
1240DATA 61,-1,-1,61,61,61
1250DATA 81,-1,-1,81,81,81
1260DATA 101,-1,-1,101,101,101
1270DATA 121,121,121,121,121,121
1280DATA 141,141,141,141,141,141
1290DATA 137,137,137,137,137,137
1300DATA 137,137,137,137,137,137
1310DATA 137
1320REMch3(harmony)
1330DATA 41,41,41,41,41,41,53,53,53
1340DATA 61,61,61,69,69,69,69,69,69
1350DATA 61,61,61,53,53,53,49,49,49
1360DATA 33,33,33,21,21,21,33,33,33
1370DATA 53,53,53,53,53,53,69,69,69
1380DATA 73,73,73,81,81,81,81,81,81
1390DATA 73,73,73,69,69,69,61,61,61
1400DATA 45,45,45,33,33,33,45,45,45
1410DATA 53,53,53,53,53,53,69,69,69
1420DATA 73,73,73,81,81,81,81,81,81
1430DATA 73,73,73,61,61,61,69,69,69
1440DATA 69,69,69,69,69,69,69,69,69
1450DATA 69,69,69,69,69,69,69,69,69
1460DATA 69,69,69
1470DATA 101,101,101,101,101,101
1480DATA 101,101,101,101,101,101
1490DATA 97,97,97,97,97,97
1500DATA 97,97,97,97,97,97
1510DATA 101,101,101,101,101,101
1520DATA 101,101,101,101,101,101
1530DATA 97,97,97,97,97,97
1540DATA 97,97,97,97,97,97
1550DATA 117,117,117,117,117,117
1560DATA 117,117,117,117,117,117
1570DATA 109,109,109,109,109,109
1580DATA 109,109,109,109,109,109
1590DATA 117,117,117,117,117,117
1600DATA 117,117,117,117,117,117
1610DATA 109,109,109,109,109,109
1620DATA 109,109,109,109,109,109
1630:
1640DATA-1,-1,-1,-1,-1,-1
1650DATA-1,-1,-1,-1,-1,-1
1660DATA41,-1,-1,41,41,41
1670DATA41,-1,-1,41,41,41
1680DATA61,61,61,61,61,61
1690DATA73,73,73,73,73,73
1700DATA89,89,89,89,89,89
1710DATA89,89,89,89,89,89
1720DATA 89
1730REMdrums!
1740DATA 6,-1,-1,4,-1,-1
1750DATA 6,-1,-1,4,-1,-1
1760DATA 6,-1,-1,4,-1,-1
1770DATA 6,-1,-1,4,5,5
1780DATA 6,-1,-1,4,-1,-1
1790DATA 6,-1,-1,4,-1,-1
1800DATA 6,-1,-1,4,-1,-1
1810DATA 6,-1,-1,4,-1,-1
1820DATA 6,-1,-1,4,5,5
1830DATA 6,-1,-1,4,-1,-1
1840DATA 6,-1,-1,4,-1,-1
1850DATA 6,-1,-1,4,-1,-1
1860DATA 6,-1,-1,4,-1,-1
1870DATA 6,-1,-1,4,5,5
1880DATA 6,-1,-1,4,-1,-1
1890DATA 6,-1,-1,4,-1,-1
1900DATA 6,-1,-1,4,-1,-1
1910DATA 6,-1,-1,4,-1,-1
1920DATA 6,-1,-1,4,-1,-1
1930DATA 6,-1,-1,4,4,4
1940DATA 6,-1,-1,4,-1,-1
1950DATA 6,-1,-1,4,-1,-1
1960DATA 6,-1,-1,4,-1,-1
1970DATA 6,-1,-1,4,-1,-1
1980DATA 6,-1,-1,4,-1,-1
1990DATA 6,-1,-1,4,-1,-1
2000DATA 6,-1,-1,4,-1,-1
2010DATA 6,4,4,4,4,4
2020DATA 6,-1,-1,4,-1,-1
2030DATA 6,-1,-1,4,-1,-1
2040DATA 6,-1,-1,4,-1,-1
2050DATA 6,-1,-1,4,-1,-1
2060DATA 6,-1,-1,4,-1,-1
2070DATA 6,-1,-1,4,-1,-1
2080DATA 6,-1,-1,4,4,4
2090DATA 5,5,5,6,6,6
2100DATA -1,-1,-1,4,-1,-1
2110DATA -1,-1,-1,4,-1,-1
2120DATA -1,-1,-1,4,-1,-1
2130DATA -1,-1,-1,4,-1,-1
2140DATA 6,-1,-1,4,-1,-1
2150DATA 6,-1,-1,4,-1,-1
2160DATA 6,-1,-1,4,-1,-1
2170DATA 6,4,5,5,6,6
2180DATA 5