start tok64 d64-xYk4C7 10 REM *** autostart *** 20 REM *** av mikael pawlo *** 30 REM *** f{pound}r 64 in toto. *** 40 FORt=49152TO49536:READbymp 50 POKEt,bymp:NEXT 60 INPUT"anv[nder du kassett eller diskett (k/d)";io$ 70 IF io$="k"THEN POKE 49268,1:POKE49418,1 80 PRINT"starta med sys 49152." 300 DATA 169 , 152 , 160 , 192 , 32 310 DATA 30 , 171 , 32 , 96 , 165 320 DATA 162 , 255 , 232 , 224 , 16 330 DATA 176 , 8 , 189 , 0 , 2 340 DATA 157 , 55 , 193 , 208 , 243 350 DATA 142 , 54 , 193 , 169 , 200 360 DATA 160 , 192 , 32 , 30 , 171 370 DATA 32 , 228 , 255 , 240 , 251 380 DATA 201 , 66 , 240 , 42 , 201 390 DATA 77 , 208 , 243 , 169 , 236 400 DATA 160 , 192 , 32 , 30 , 171 410 DATA 32 , 96 , 165 , 169 , 0 420 DATA 133 , 122 , 169 , 2 , 133 430 DATA 123 , 32 , 121 , 0 , 32 440 DATA 107 , 169 , 165 , 20 , 141 450 DATA 52 , 193 , 165 , 21 , 141 460 DATA 53 , 193 , 169 , 176 , 208 470 DATA 2 , 169 , 144 , 141 , 41 480 DATA 193 , 162 , 0 , 189 , 253 490 DATA 192 , 157 , 178 , 2 , 232 500 DATA 224 , 82 , 208 , 245 , 169 510 DATA 4 , 162 , 249 , 160 , 192 520 DATA 32 , 189 , 255 , 169 , 1 530 DATA 162 , 8 , 160 , 1 , 32 540 DATA 186 , 255 , 169 , 178 , 133 550 DATA 251 , 169 , 2 , 133 , 252 560 DATA 169 , 251 , 162 , 4 , 160 570 DATA 3 , 32 , 216 , 255 , 169 580 DATA 131 , 141 , 2 , 3 , 169 590 DATA 164 , 141 , 3 , 3 , 108 600 DATA 2 , 160 , 147 , 17 , 17 610 DATA 86 , 65 , 68 , 32 , 72 620 DATA 69 , 84 , 69 , 82 , 32 630 DATA 70 , 73 , 76 , 69 , 78 640 DATA 32 , 68 , 85 , 32 , 86 650 DATA 73 , 76 , 76 , 32 , 76 660 DATA 91 , 71 , 71 , 65 , 32 670 DATA 65 , 85 , 84 , 79 , 83 680 DATA 84 , 65 , 82 , 84 , 13 690 DATA 80 , 93 , 63 , 32 , 0 700 DATA 13 , 18 , 66 , 146 , 65 710 DATA 83 , 73 , 67 , 32 , 69 720 DATA 76 , 76 , 69 , 82 , 32 730 DATA 18 , 77 , 146 , 65 , 83 740 DATA 75 , 73 , 78 , 75 , 79 750 DATA 68 , 32 , 63 , 32 , 40 760 DATA 66 , 47 , 77 , 41 , 32 770 DATA 0 , 13 , 83 , 84 , 65 780 DATA 82 , 84 , 45 , 74 , 77 790 DATA 80 , 63 , 32 , 0 , 65 800 DATA 85 , 84 , 79 , 169 , 131 810 DATA 141 , 2 , 3 , 169 , 164 820 DATA 141 , 3 , 3 , 169 , 1 830 DATA 162 , 8 , 160 , 1 , 32 840 DATA 186 , 255 , 173 , 235 , 2 850 DATA 162 , 236 , 160 , 2 , 32 860 DATA 189 , 255 , 169 , 0 , 32 870 DATA 213 , 255 , 134 , 45 , 132 880 DATA 46 , 169 , 13 , 32 , 210 890 DATA 255 , 56 , 144 , 8 , 169 900 DATA 0 , 32 , 113 , 168 , 76 910 DATA 174 , 167 , 76 , 102 , 254 920 DATA 0 , 0 , 0 , 0 , 0 930 DATA 0 , 0 , 0 , 0 , 0 940 DATA 0 , 0 , 0 , 0 , 0 950 DATA 0 , 0 , 0 , 0 , 0 960 DATA 0 , 139 , 227 , 178 , 2 970 DATA 255 , 255 , 255 , 255 , 255 980 DATA 255 , 255 , 255 , 255 , 255 990 DATA 255 , 255 , 255 , 255 , 255 1000 DATA 255 , 255 , 0 , 0 , 0 1010 DATA 0 , 0 , 0 , 0 , 0 1020 DATA 0 , 0 , 0 , 0 , 0 1030 DATA 0 , 0 , 0 , 0 , 0 1040 DATA 0 , 0 , 0 , 0 , 0 1050 DATA 0 , 0 , 0 , 0 , 0 1060 DATA 0 , 0 , 0 , 0 , 255 stop tok64 (bastext 1.0)