10 REM ---- マシンコ゛ せってい --------- 20 CLEAR 6000,&HBFFF:RESTORE 110 30 FOR AD=&HED00 TO &HED00+89 40 READ A$ 45 A=VAL("&h"+A$) 50 POKEAD,A:NEXT AD 60 RESTORE 221 70 FOR AD=&HEE00 TO &HEE00+1791 75 READ A$ 80 A=VAL("&h"+A$) 85 POKEAD,A:NEXT AD 90 POKE&HFAEB,&H0A:POKE&HFAEC,&HED:END 100 REM ----- キャラ put ルーチン ----- 110 DATA E5,21,28,00,19,54,5D,E1,18,18,26,80,1E,01,44,16,00,62,6A,19 120 DATA 10,FD,01,00,EE,09,CD,41,07,00,00,00,06,10,DD,21,00,00,DD,19 130 DATA FD,21,00,20,FD,19,7E,DD,77,00,23,7E,FD,77,00,23,7E,DD,77,01 140 DATA 23,7E,FD,77,01,23,7E,DD,77,02,23,7E,FD,77,02,23,7E,DD,77,03 150 DATA 23,7E,FD,77,03,23,10,A8,C9 210 REM ----- キャラ テ゛ータ --------- 220 REM スペース 221 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 222 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0 223 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 224 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0 225 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 226 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0 227 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 228 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0 259 REM YUUSYA 260 DATA 0,0,2A,0,0,0,C0,C0,8,0,AA,0,88,0,F0,F0,2A,0,AA 261 DATA 3F,AA,0,F0,F0,A,0,AA,FB,AA,C0,F0,F0 262 DATA A,0,AA,EA,A8,C0,F0,F0,A,F,AA,FF,A8,FC,F0,F0,B,1,CF 263 DATA 65,38,90,F0,F0,3,1,FF,55,FC,54,F0,F0 264 DATA 0,0,5A,6F,5A,9F,F0,F0,1,1,5A,6F,5A,9F,FA,FF,5,6,55,AA 265 DATA 56,9F,A8,FC,5,6,55,AA,55,9F,E0,C0 266 DATA 5,6,56,AB,90,E0,80,0,D,6,55,AA,50,A0,0,0,3,1,FF,55 267 DATA F0,50,0,0,0,0,F3,51,C0,40,0,0 299 REM SURAIMU 280 DATA 0,0,1,3,40,40,0,0,0,0,1,3,40,40,0,0,0,0,1,3 282 DATA 40,40,0,0,0,0,5,D,50,50,0,0 285 DATA 0,0,5,D,50,50,0,0,0,0,D5,FD,55,55,0,0,3,3,55 286 DATA FD,55,55,40,40,D,F,55,F5,55,55,50,60 290 DATA 35,3F,F5,F5,5F,5F,54,58,35,3F,C5,E5,53,5B,54 291 DATA 58,35,3F,55,55,55,55,54,58,35,3F,55,D5,55,55,54,58 292 DATA 35,3F,5D,D9,5D,59,54,58,D,F,57,D6,F5,A5,50,60,0,0 293 DATA 55,F5,55,55,40,80,0,0,15,2A,54,A8,0,0 299 REM KING SURAIMU 300 DATA 0,AA,2,AB,80,EA,0,AA,0,AA,2,AB,80,EA,0,AA,0,AA 305 DATA 2A,BF,A8,FE,0,AA,0,AA,33,CE,C,F2,0,AA 310 DATA 0,AB,C3,3E,C,F3,0,AA,0,AB,C3,3E,CC,F3,0,AA,2,AB 315 DATA AA,FF,AA,FF,0,AA,5,AF,55,55,55,55,50,6A 320 DATA 15,B5,F5,F5,7D,7D,54,5A,55,D5,C5,E5,4D,6D,54,5A 325 DATA 55,D5,55,55,55,55,54,5A,55,D5,75,65,75,65,54,5A 330 DATA 15,B5,5F,5A,D5,95,54,5A,15,B5,55,55,55,55,50,6A 335 DATA 1,A9,55,55,55,55,40,AA,0,AA,55,AA,55,AA,40,AA 339 REM KOUMORI 340 DATA 0,AA,0,AA,0,AA,0,AA,0,AA,0,AA,0,AA,0,AA,0,AA,0 345 DATA AA,0,AA,0,AA,1,AA,81,AA,12,AA,40,AA 350 DATA 6,AA,42,AA,61,AA,90,AA,1A,AA,42,AA,61,AA,A4,AA 355 DATA 6A,AA,96,AA,65,AA,A9,AA,6A,AA,AA,AA,AA,AA,A9,AA 360 DATA 6A,AA,AA,AA,AA,AA,A9,AA,6A,AA,AA,AA,AA,AA,A9,AA 365 DATA 1A,AA,5A,AA,A5,AA,A4,AA,6,AA,1,AA,81,AA,90,AA 370 DATA 1,AA,40,AA,41,AA,40,AA,0,AA,0,AA,1,AA,0,AA,0,AA 375 DATA 0,AA,0,AA,0,AA,0,AA,0,AA,0,AA,0,AA 379 REM BANPAIA 380 DATA 0,AA,96,AA,96,AA,0,AA,0,AA,55,AA,55,AA,0,AA,0 385 DATA AA,55,AA,55,AA,0,AA,0,AA,69,AA,69,AA,0,AA 390 DATA 2,AA,6F,AF,F9,FA,80,AA,2,AA,63,AB,C9,EA,80,AA,0 395 DATA AA,6F,AF,F9,FA,0,AA,0,AA,6E,AE,B9,BA,0,AA 400 DATA 2,AA,5F,AF,F5,FA,80,AA,2,AA,5F,AF,F5,FA,80,AA,2 405 DATA AA,97,AB,D6,EA,80,AA,9,AA,55,AA,55,AA,60,AA 410 DATA 25,AA,55,AA,55,AA,58,AA,25,AA,55,AA,55,AA,58,AA 415 DATA 25,AA,55,AA,55,AA,58,AA,A,AA,95,AA,56,AA,A0,AA 419 REM OKU 420 DATA C,AE,A,A0,80,2A,C0,EA,F,AF,2A,8F,A3,CB,C0,EA 425 DATA 3,AB,EA,FF,AF,FF,0,AA,A,A3,AA,3F,AA,F3,80,2A 430 DATA 2A,8F,AA,3,AA,3,A0,CA,2A,8F,A2,3B,2A,B3,A0,CA 435 DATA 2A,B3,AA,3C,AA,F3,A8,F2,AA,33,AA,CF,AA,CF,A8,F2 440 DATA AA,3C,AA,CF,AA,CF,AA,CC,AA,3C,AA,F0,AA,3F,AA,CC 445 DATA AA,3F,A0,3A,2A,BF,AA,3C,2A,8F,AA,30,AA,FF,A8,32 450 DATA 2A,8F,AA,30,AA,3C,A8,F2,A,A3,A0,CA,AA,0,A0,CA,2 455 DATA A8,A0,A,2,A8,80,2A,0,AA,0,AA,0,AA,0,AA 459 REM ORKKING 460 DATA FC,FE,A,AA,80,AA,FF,FF,CF,EF,2A,AA,A3,AB,C3,EB 465 DATA C3,EB,EA,EA,AF,AF,3,AB,A,A9,AA,6A,AA,A5,80,AA 470 DATA 2A,A5,AA,A9,AA,A9,A0,6A,2A,A5,A2,99,2A,99,A0,6A 475 DATA 2A,99,AA,96,AA,59,A8,5A,AA,99,AA,65,AA,65,A8,5A 480 DATA AA,96,AA,65,AA,65,AA,66,AA,96,AA,5A,AA,95,AA,66 485 DATA AA,95,A0,9A,2A,95,AA,96,2A,A5,AA,9A,AA,55,A8,9A 490 DATA 2A,A5,AA,9A,AA,96,A8,5A,A,A9,A0,6A,AA,AA,A0,6A,2 495 DATA AA,A0,AA,2,AA,80,AA,0,AA,0,AA,0,AA,0,AA REM HINOTORI 500 DATA 0,AA,8,AA,0,AA,0,AA,0,AA,2A,AA,0,AA,0,AA,0,AA 505 DATA 2A,AA,80,AA,28,AA,0,AA,AA,AA,80,AA,AA,AA 510 DATA A,AA,AA,AA,A0,AA,AA,BA,2A,AA,AA,AA,AA,AA,AA,FA 515 DATA AA,AB,AA,EA,AA,AB,AA,EA,A8,AE,AA,EA,AA,AB,AA,EA 520 DATA 8A,AF,AA,AB,AA,AB,A8,EA,2,AA,AA,FF,AA,FA,A8,AA,2,AA 525 DATA AA,FF,AA,FA,80,AA,0,AA,AA,FF,80,EA,0,AA 530 DATA 0,AA,2A,AA,80,AA,0,AA,0,AA,8,AA,A0,AA,0,AA,0,AA,0 535 DATA AA,28,AA,0,AA,0,AA,0,AA,2,AA,0,AA 599 REM FENICS 600 DATA 0,AA,0,AA,0,AA,0,AA,0,AA,80,AA,8,AA,0,AA,2,AA,88 605 DATA AA,A,AA,0,AA,A,AA,A,AA,82,AA,80,AA 620 DATA 2A,AA,2,AA,2,AA,A0,AA,2A,AA,8A,AA,82,AA,A0,AA,2A,AA 625 DATA AA,AA,AA,AA,A0,AA,2A,AA,AA,AA,AA,AA,A0,AA 640 DATA 2,AA,AA,AA,A8,AA,0,AA,8,AA,2A,AA,A0,AA,80,AA,2,AA 645 DATA 8A,AA,8A,AA,0,AA,0,AA,2A,AA,A0,AA,0,AA 660 DATA 22,AA,A2,AA,2A,AA,20,AA,A,AA,2,AA,2,AA,80,AA,0 665 DATA AA,2,AA,0,AA,0,AA,0,AA,0,AA,0,AA,0,AA 699 REM TROLL 700 DATA 28,B2,1,AA,0,AA,40,AA,AA,C0,5,AB,41,AA,50,EA,AA 710 DATA C0,5,AB,45,AB,10,EA,2A,80,5,AA,55,AA,10,EA 720 DATA 8,A2,15,AF,54,FF,14,FA,5,AA,51,BB,14,BF,14,FA 730 DATA 15,AF,56,BE,A0,AF,15,FE,15,AF,56,BC,A0,AF,15,FE 740 DATA 9,A2,55,BE,60,EF,15,FE,9,A2,55,AA,50,AF,15,FE,4 750 DATA AB,0,FF,0,FF,1,FE,4,AB,0,FF,0,FF,1,FE 760 DATA 5,AB,40,FF,0,FF,5,FE,5,AB,55,FE,15,EF,55,FE,5,AB 770 DATA 54,FA,5,AB,55,FE,1,AA,50,AA,1,AA,55,FA 799 REM BOS TROLL 800 DATA 28,B2,1,AA,0,AA,40,AA,AA,C0,7,A9,41,AA,D0,6A,AA 810 DATA C0,7,A9,47,A9,90,2A,2A,80,5,AA,55,AA,90,2A 820 DATA 8,A2,1F,A5,FE,54,B4,1A,5,AA,73,99,3E,94,B4,1A,1F 830 DATA A5,7E,96,AA,A0,BD,16,1F,A5,7E,94,AA,A0,BD,16 840 DATA 9,A2,7D,96,EA,60,BD,16,9,A2,55,AA,5A,A0,BD,16,6,A8 850 DATA AA,0,AA,0,A9,2,6,A8,AA,0,AA,0,A9,2 860 DATA 7,A9,EA,40,AA,0,AD,6,7,A9,FD,56,9F,25,FD,56,7,A9 870 DATA F4,5A,7,A9,FD,56,1,AA,50,AA,1,AA,F5,5A 899 REM GAIKOTU 900 DATA 0,AA,F,AF,FC,FE,0,AA,0,AA,3F,BF,FF,FF,0,AA,0,AA 910 DATA FF,FF,FF,FF,0,AA,0,AA,FF,FF,FF,FF,C0,EA 920 DATA 0,AA,F3,FB,F3,FB,C0,EA,0,AA,C0,EA,C0,EA,C0,EA,0 930 DATA AA,F3,FB,F3,FB,C0,EA,0,AA,FF,FF,FF,FF,C0,EA 940 DATA 0,AA,F,AF,FC,FE,0,AA,0,AA,C3,EB,F0,FA,30,BA,0,AA 950 DATA FC,FE,3,AB,F0,FA,0,AA,F,AF,F,AF,0,AA 960 DATA 0,AA,F,AF,FF,FF,0,AA,0,AA,FC,FE,F,AF,C0,EA,0,AA 970 DATA F0,FA,3,AB,C0,EA,0,AA,C0,EA,0,AA,C0,EA 999 REM MAOU 1000 DATA 30,BA,0,AA,0,AA,C,AE,30,BA,5,A0,50,A,C,AE,3C,BE 1010 DATA 15,80,54,2,3C,BE,3F,BF,55,0,55,0,FC,FE 1020 DATA 3D,BC,75,30,5D,C,7C,3E,D,AC,7D,3C,7D,3C,70,3A,45 1030 DATA 20,55,0,55,0,51,8,51,8,5F,F,F5,F0,45,20 1040 DATA 57,3,55,40,5F,F,D5,C0,55,1,55,15,7D,7C,D5,C0 1050 DATA 15,95,55,41,FF,FF,D4,D6,15,91,57,57,F5,F5,54,56 1060 DATA 15,91,57,43,55,45,54,56,55,51,55,1,55,45,55,15 1070 DATA 57,53,D5,D5,55,11,55,45,5F,4F,55,54,55,54,55,11