start tok64 d64-72312S 10 REM *** bymp's musik rippare *** 20 REM *** gjord f{pound}r 64 in toto *** 30 REM *** av mikael pawlo 1991 *** 40 FORbymp=49152TO50107:READshn 50 POKE bymp,shn:NEXTbymp 51 INPUT "spara till vilken enhet (k/d)";a$ 52 IF a$="k" THEN POKE 50059,1:REM kassett 57 POKE53280,0:POKE53281,0 60 PRINT "{clear}{dark gray}{right*2}musikrippare av mikael pawlo f{pound}r shn" 70 PRINT "{right*2}{cm t*37}" 80 PRINT "starta med sys 49152 ($c{0*3})." 90 PRINT "ripparen ligger mellan $c{0*3}-$c3bb" 100 PRINT "dvs. #49152-#50107." 110 PRINT "t[nk p] upphovsr[tten n[r du rippar" 115 PRINT "musik." 120 PRINT "{down*2}{white}lycka till!{space*2}/mikael pawlo" 300 DATA 76 , 18 , 192 , 77 , 73 310 DATA 75 , 65 , 69 , 76 , 96 320 DATA 80 , 65 , 87 , 76 , 79 330 DATA 96 , 32 , 32 , 32 , 163 340 DATA 253 , 32 , 21 , 253 , 32 350 DATA 91 , 255 , 32 , 83 , 228 360 DATA 120 , 169 , 55 , 133 , 1 370 DATA 169 , 0 , 160 , 194 , 32 380 DATA 30 , 171 , 169 , 0 , 133 390 DATA 2 , 133 , 4 , 169 , 1 400 DATA 133 , 3 , 133 , 5 , 169 410 DATA 31 , 141 , 24 , 212 , 169 420 DATA 0 , 141 , 14 , 220 , 169 430 DATA 48 , 133 , 1 , 76 , 96 440 DATA 192 , 24 , 165 , 2 , 105 450 DATA 1 , 133 , 2 , 165 , 3 460 DATA 105 , 0 , 133 , 3 , 208 470 DATA 7 , 169 , 54 , 133 , 1 480 DATA 76 , 226 , 252 , 177 , 2 490 DATA 96 , 160 , 6 , 32 , 71 500 DATA 192 , 201 , 173 , 208 , 247 510 DATA 160 , 9 , 32 , 93 , 192 520 DATA 201 , 201 , 208 , 238 , 160 530 DATA 10 , 32 , 93 , 192 , 201 540 DATA 2 , 208 , 229 , 160 , 11 550 DATA 32 , 93 , 192 , 201 , 240 560 DATA 208 , 220 , 160 , 0 , 32 570 DATA 93 , 192 , 201 , 76 , 208 580 DATA 6 , 32 , 43 , 193 , 76 590 DATA 203 , 192 , 24 , 165 , 2 600 DATA 105 , 6 , 141 , 18 , 1 610 DATA 165 , 3 , 105 , 0 , 141 620 DATA 19 , 1 , 169 , 0 , 141 630 DATA 16 , 1 , 141 , 17 , 1 640 DATA 133 , 4 , 24 , 165 , 3 650 DATA 233 , 3 , 133 , 5 , 105 660 DATA 5 , 133 , 6 , 76 , 209 670 DATA 192 , 24 , 165 , 4 , 105 680 DATA 1 , 133 , 4 , 165 , 5 690 DATA 105 , 0 , 133 , 5 , 197 700 DATA 6 , 208 , 3 , 76 , 16 710 DATA 193 , 177 , 4 , 96 , 160 720 DATA 6 , 32 , 186 , 192 , 201 730 DATA 76 , 208 , 247 , 160 , 7 740 DATA 32 , 206 , 192 , 205 , 18 750 DATA 1 , 208 , 237 , 160 , 8 760 DATA 32 , 206 , 192 , 205 , 19 770 DATA 1 , 208 , 227 , 160 , 0 780 DATA 32 , 206 , 192 , 201 , 76 790 DATA 208 , 218 , 165 , 4 , 141 800 DATA 16 , 1 , 165 , 5 , 141 810 DATA 17 , 1 , 24 , 165 , 4 820 DATA 105 , 6 , 141 , 18 , 1 830 DATA 165 , 5 , 105 , 0 , 141 840 DATA 19 , 1 , 169 , 55 , 133 850 DATA 1 , 173 , 18 , 1 , 32 860 DATA 110 , 193 , 24 , 32 , 159 870 DATA 255 , 32 , 228 , 255 , 240 880 DATA 248 , 201 , 74 , 208 , 30 890 DATA 76 , 139 , 193 , 24 , 165 900 DATA 2 , 141 , 16 , 1 , 165 910 DATA 3 , 141 , 17 , 1 , 24 920 DATA 165 , 2 , 105 , 6 , 141 930 DATA 18 , 1 , 165 , 3 , 105 940 DATA 0 , 141 , 19 , 1 , 96 950 DATA 169 , 74 , 160 , 194 , 32 960 DATA 30 , 171 , 76 , 64 , 192 970 DATA 133 , 7 , 41 , 15 , 32 980 DATA 100 , 193 , 170 , 165 , 7 990 DATA 41 , 240 , 74 , 74 , 74 1000 DATA 74 , 32 , 100 , 193 , 168 1010 DATA 96 , 24 , 105 , 48 , 201 1020 DATA 58 , 48 , 2 , 105 , 6 1030 DATA 96 , 32 , 79 , 193 , 142 1040 DATA 114 , 194 , 140 , 113 , 194 1050 DATA 173 , 19 , 1 , 32 , 79 1060 DATA 193 , 142 , 112 , 194 , 140 1070 DATA 111 , 194 , 169 , 91 , 160 1080 DATA 194 , 32 , 30 , 171 , 96 1090 DATA 173 , 17 , 1 , 208 , 17 1100 DATA 169 , 63 , 141 , 141 , 194 1110 DATA 141 , 142 , 194 , 141 , 143 1120 DATA 194 , 141 , 144 , 194 , 76 1130 DATA 185 , 193 , 173 , 17 , 1 1140 DATA 32 , 79 , 193 , 140 , 141 1150 DATA 194 , 142 , 142 , 194 , 173 1160 DATA 16 , 1 , 32 , 79 , 193 1170 DATA 140 , 143 , 194 , 142 , 144 1180 DATA 194 , 173 , 19 , 1 , 32 1190 DATA 79 , 193 , 140 , 154 , 194 1200 DATA 142 , 155 , 194 , 173 , 18 1210 DATA 1 , 32 , 79 , 193 , 140 1220 DATA 156 , 194 , 142 , 157 , 194 1230 DATA 169 , 130 , 160 , 194 , 32 1240 DATA 30 , 171 , 173 , 17 , 1 1250 DATA 240 , 27 , 173 , 16 , 1 1260 DATA 133 , 16 , 173 , 17 , 1 1270 DATA 133 , 17 , 32 , 219 , 194 1280 DATA 177 , 16 , 133 , 18 , 200 1290 DATA 177 , 16 , 133 , 19 , 160 1300 DATA 0 , 76 , 202 , 194 , 169 1310 DATA 0 , 141 , 32 , 1 , 76 1320 DATA 179 , 194 , 147 , 5 , 17 1330 DATA 32 , 66 , 89 , 77 , 80 1340 DATA 32 , 77 , 85 , 83 , 73 1350 DATA 75 , 32 , 82 , 73 , 80 1360 DATA 80 , 32 , 65 , 86 , 32 1370 DATA 77 , 73 , 75 , 65 , 69 1380 DATA 76 , 32 , 80 , 65 , 87 1390 DATA 76 , 79 , 32 , 71 , 74 1400 DATA 79 , 82 , 68 , 32 , 13 1410 DATA 17 , 32 , 32 , 32 , 32 1420 DATA 32 , 32 , 32 , 32 , 32 1430 DATA 32 , 32 , 70 , 92 , 82 1440 DATA 32 , 54 , 52 , 32 , 73 1450 DATA 78 , 32 , 84 , 79 , 84 1460 DATA 79 , 47 , 83 , 72 , 78 1470 DATA 13 , 13 , 17 , 32 , 32 1480 DATA 83 , 92 , 75 , 69 , 82 1490 DATA 32 , 77 , 85 , 83 , 73 1500 DATA 75 , 32 , 0 , 13 , 17 1510 DATA 32 , 32 , 77 , 85 , 83 1520 DATA 73 , 75 , 32 , 70 , 85 1530 DATA 78 , 78 , 69 , 78 , 32 1540 DATA 80 , 93 , 36 , 48 , 57 1550 DATA 70 , 54 , 44 , 32 , 83 1560 DATA 80 , 69 , 76 , 65 , 32 1570 DATA 77 , 85 , 83 , 73 , 75 1580 DATA 63 , 0 , 13 , 13 , 32 1590 DATA 32 , 73 , 78 , 73 , 84 1600 DATA 58 , 32 , 36 , 63 , 63 1610 DATA 63 , 63 , 44 , 32 , 80 1620 DATA 76 , 65 , 89 , 58 , 32 1630 DATA 36 , 48 , 57 , 70 , 54 1640 DATA 0 , 177 , 18 , 32 , 209 1650 DATA 194 , 201 , 72 , 240 , 24 1660 DATA 201 , 170 , 240 , 20 , 201 1670 DATA 162 , 240 , 16 , 76 , 189 1680 DATA 194 , 169 , 95 , 141 , 16 1690 DATA 1 , 169 , 192 , 141 , 17 1700 DATA 1 , 76 , 199 , 194 , 169 1710 DATA 0 , 160 , 195 , 32 , 30 1720 DATA 171 , 76 , 226 , 194 , 169 1730 DATA 48 , 133 , 1 , 76 , 159 1740 DATA 194 , 141 , 32 , 1 , 72 1750 DATA 169 , 55 , 133 , 1 , 104 1760 DATA 96 , 160 , 1 , 169 , 48 1770 DATA 133 , 1 , 96 , 169 , 35 1780 DATA 160 , 195 , 32 , 30 , 171 1790 DATA 120 , 169 , 53 , 133 , 1 1800 DATA 169 , 0 , 32 , 250 , 194 1810 DATA 32 , 253 , 194 , 76 , 56 1820 DATA 195 , 0 , 108 , 16 , 1 1830 DATA 108 , 18 , 1 , 13 , 13 1840 DATA 32 , 32 , 86 , 91 , 76 1850 DATA 74 , 32 , 76 , 93 , 84 1860 DATA 65 , 82 , 32 , 77 , 69 1870 DATA 68 , 32 , 78 , 85 , 77 1880 DATA 77 , 69 , 82 , 84 , 65 1890 DATA 78 , 71 , 69 , 78 , 84 1900 DATA 69 , 82 , 0 , 13 , 13 1910 DATA 32 , 32 , 40 , 83 , 41 1920 DATA 80 , 65 , 82 , 65 , 82 1930 DATA 32 , 32 , 32 , 32 , 32 1940 DATA 32 , 32 , 32 , 0 , 169 1950 DATA 250 , 205 , 18 , 208 , 208 1960 DATA 251 , 169 , 55 , 133 , 1 1970 DATA 32 , 159 , 255 , 32 , 228 1980 DATA 255 , 208 , 7 , 169 , 53 1990 DATA 133 , 1 , 76 , 243 , 194 2000 DATA 201 , 83 , 240 , 18 , 201 2010 DATA 49 , 48 , 241 , 201 , 52 2020 DATA 16 , 237 , 24 , 233 , 48 2030 DATA 162 , 53 , 134 , 1 , 76 2040 DATA 240 , 194 , 169 , 54 , 133 2050 DATA 1 , 88 , 169 , 0 , 141 2060 DATA 24 , 212 , 169 , 0 , 141 2070 DATA 48 , 1 , 141 , 64 , 1 2080 DATA 173 , 19 , 1 , 24 , 233 2090 DATA 0 , 141 , 49 , 1 , 105 2100 DATA 18 , 141 , 65 , 1 , 169 2110 DATA 1 , 162 , 8 , 32 , 186 2120 DATA 255 , 169 , 5 , 162 , 182 2130 DATA 160 , 195 , 32 , 189 , 255 2140 DATA 173 , 48 , 1 , 133 , 32 2150 DATA 173 , 49 , 1 , 133 , 33 2160 DATA 169 , 32 , 174 , 64 , 1 2170 DATA 172 , 65 , 1 , 32 , 216 2180 DATA 255 , 120 , 169 , 31 , 141 2190 DATA 24 , 212 , 76 , 238 , 194 2200 DATA 47 , 66 , 89 , 77 , 80 2210 DATA 0 , 0 , 0 , 0 , 0 stop tok64 (bastext 1.0)