10 REM ---- マシンコ゛ せってい --------- 20 RESTORE　110 30 FOR AD=&HED00 TO &HED00+89 40 READ A$ 45 A=VAL("&h"+A$) 50 POKEAD,A:NEXT AD 60 RESTORE 220 70 FOR AD=&HEE00 TO &HEE00+1151 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,0F,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 DATA 0,AA,28,BE,0,AA,0,AA,0,AA,28,BE,0,AA,0 222 DATA AA,2,AB,AA,FF,80,EA,0,AA,0,AA,28,BE,0,AA,0,AA 225 DATA 20,BA,28,BE,0,AA,28,BE,20,BA,0,AA,0,AA,AA,FF 227 DATA AA,FF,0,AA,0,AA,28,BE,20,BA,AA,FF,AA,FF,28,BE 230 DATA 2,AB,EE,FF,EE,FF,80,EA,A,AF,EB,FF,EB,FF,A0,FA 235 DATA A,AF,AE,FF,AE,FF,A0,FA,2,AB,BA,FF,EA,FF,80,EA 240 DATA 0,AA,BB,FF,AB,FF,0,AA,0,AA,2A,BF,EC,FE,0,AA,0 250 DATA AA,A,AF,B0,FA,0,AA,0,AA,2,AB,80,EA,0,AA 260 DATA 0,AA,14,BE,0,AA,0,AA,0,AA,14,BE,0,AA,0,AA 263 DATA 1,AB,55,FF,40,EA,0,AA,0,AA,14,BE,0,AA,0,AA 265 DATA 10,BA,14,BE,0,AA,14,BE,10,BA,0,AA,0,AA,55,FF 268 DATA 55,FF,0,AA,0,AA,14,BE,10,BA,55,FF,55,FF,14,BE 270 DATA 1,AB,DD,FF,DD,FF,40,EA,5,AF,D7,FF,D7,FF,50,FA 275 DATA 5,AF,5D,FF,5D,FF,50,FA,1,AB,75,FF,D5,FF,40,EA 278 DATA 0,AA,77,FF,57,FF,0,AA,0,AA,15,BF,DC,FE,0,AA,0 279 DATA AA,5,AF,70,FA,0,AA,0,AA,1,AB,40,EA,0,AA 280 DATA 0,AA,28,AA,0,AA,0,AA,0,AA,28,AA,0,AA,0,AA,2 283 DATA AA,AA,AA,80,AA,0,AA,0,AA,28,AA,0,AA,0,AA 285 DATA 20,AA,28,AA,0,AA,28,AA,20,AA,0,AA,0,AA,AA,AA,AA 288 DATA AA,0,AA,0,AA,28,AA,20,AA,AA,AA,AA,AA,28,AA 290 DATA 2,AA,EE,EE,EE,EE,80,AA,A,AA,EB,EB,EB,EB,A0,AA 293 DATA A,AA,AE,AE,AE,AE,A0,AA,2,AA,BA,BA,EA,EA,80,AA 295 DATA 0,AA,BB,BB,AB,AB,0,AA,0,AA,2A,AA,EC,EE,0,AA,0 298 DATA AA,A,AA,B0,BA,0,AA,0,AA,2,AA,80,AA,0,AA 300 DATA 0,AA,1,AB,40,EA,0,AA,0,AA,15,BF,54,FE,0 305 DATA AA,0,AA,6A,FF,A9,FF,0,AA,5,AF,AA,FF,AA,FF,50,FA 310 DATA 6,AF,65,FF,59,FF,90,FA,6,AF,9F,FF,A6,FF,90,FA,6 315 DATA AF,9F,FF,A6,FF,90,FA,6,AF,9E,FF,A6,FF,90,FA 320 DATA 6,AF,9A,FF,A6,FF,90,FA,6,AF,9A,FF,A6,FF,90,FA,6 325 DATA AF,9A,FF,A6,FF,90,FA,6,AF,65,FF,59,FF,90,FA 330 DATA 5,AF,AA,FF,AA,FF,50,FA,0,AA,6A,FF,A9,FF,0,AA,0 335 DATA AA,15,BF,54,FE,0,AA,0,AA,1,AB,40,EA,0,AA 340 DATA 0,AA,3,AB,C0,EA,0,AA,0,AA,3F,BF,FC,FE 345 DATA 0,AA,0,AA,D5,FF,57,FF,0,AA,F,AF,55,FF,55,FF,F0,FA 350 DATA D,AF,DF,FF,F7,FF,70,FA,D,AF,7F,FF,5D,FF 355 DATA 70,FA,D,AF,7F,FF,5D,FF,70,FA,D,AF,7D,FF,5D,FF,70,FA 360 DATA D,AF,75,FF,5D,FF,70,FA,D,AF,75,FF,5D,FF,70,FA,D 365 DATA AF,75,FF,5D,FF,70,FA,D,AF,DF,FF,F7,FF,70,FA 370 DATA F,AF,55,FF,55,FF,F0,FA,0,AA,D5,FF,57,FF,0,AA 375 DATA 0,AA,3F,BF,FC,FE,0,AA,0,AA,3,AB,C0,EA,0,AA 380 DATA 0,AA,1,AB,40,EA,0,AA,0,AA,15,BF,54,FE 385 DATA 0,AA,0,AA,6A,EA,A9,AB,0,AA,5,AF,AA,AA,AA,AA,50,FA 390 DATA 6,AE,65,EF,59,FB,90,BA,6,AE,9F,BF,A6,AE,90 395 DATA BA,6,AE,9F,BF,A6,AE,90,BA,6,AE,9E,BE,A6,AE,90,BA 400 DATA 6,AE,9A,BA,A6,AE,90,BA,6,AE,9A,BA,A6,AE,90 405 DATA BA,6,AE,9A,BA,A6,AE,90,BA,6,AE,65,EF,59,FB,90,BA 410 DATA 5,AF,AA,AA,AA,AA,50,FA,0,AA,6A,EA,A9,AB,0,AA 415 DATA 0,AA,15,BF,54,FE,0,AA,0,AA,1,AB,40,EA,0,AA 420 DATA 0,AA,3F,BF,A8,FE,0,AA,3,AB,EA,FF,AA,FF,80 425 DATA EA,B,AF,AA,FF,AA,FF,A0,FA,3,AB,AA,FF,AA,FF,80,EA 430 DATA 0,AA,6A,BF,A9,FE,0,AA,0,AA,1A,AF,A4,FA,0,AA,0 435 DATA AA,5,AA,50,AA,0,AA,0,AA,15,BB,54,EE,0,AA 440 DATA 1,AB,54,EA,15,AB,40,EA,5,AB,40,AA,1,AA,50,EA,5 445 DATA AB,40,AA,1,AA,50,EA,5,AB,40,AA,1,AA,50,EA 450 DATA 5,AB,54,AA,15,AA,50,EA,1,AA,55,FE,55,BF,40,AA 455 DATA 0,AA,55,AF,55,FA,0,AA,0,AA,15,AA,54,AA,0,AA 460 DATA 0,AA,3F,BF,54,FE,0,AA,3,AB,D5,FF,55,FF,40,EA,7 465 DATA AF,55,FF,55,FF,50,FA,3,AB,55,FF,55,FF,40,EA 470 DATA 0,AA,55,BF,55,FE,0,AA,0,AA,15,AF,54,FA,0,AA,0 475 DATA AA,5,AA,50,AA,0,AA,0,AA,15,BB,54,EE,0,AA 480 DATA 1,AB,54,EA,15,AB,40,EA,5,AB,40,AA,1,AA,50,EA 485 DATA 5,AB,40,AA,1,AA,50,EA,5,AB,40,AA,1,AA,50,EA 490 DATA 5,AB,54,AA,15,AA,50,EA,1,AA,55,FE,55,BF,40,AA 495 DATA 0,AA,55,AF,55,FA,0,AA,0,AA,15,AA,54,AA,0,AA 500 DATA 0,AA,3F,BF,A8,AA,0,AA,3,AB,EA,EA,AA,AA,80,AA 505 DATA B,AB,AA,AA,AA,AA,A0,AA,3,AB,AA,AA,AA,AA,80,AA 510 DATA 0,AA,6A,AA,A9,AA,0,AA,0,AA,1A,AA,A4,AA,0,AA,0 515 DATA AA,5,AA,50,AA,0,AA,0,AA,15,BB,54,EE,0,AA 520 DATA 1,AB,54,EA,15,AB,40,EA,5,AB,40,AA,1,AA,50,EA,5 525 DATA AB,40,AA,1,AA,50,EA,5,AB,40,AA,1,AA,50,EA 530 DATA 5,AB,54,AA,15,AA,50,EA,1,AA,55,FE,55,BF,40,AA,0 535 DATA AA,55,AF,55,FA,0,AA,0,AA,15,AA,54,AA,0,AA,@