100 ' 105 '======================================= 110 ' 115 ' PMx88 Binary File Creation Program 120 ' 125 ' for PC-8801 series V1/V2 mode 130 ' 135 ' Copyright(C) 1990 by Yoshihiko Mino 140 ' 145 '======================================= 150 ' 155 CLEAR,&HBE00:DEFINT A-Z:DIM T(31) 160 PRINT"Creating:PMx88.bin" 165 FOR I=&HBF00 TO &HCC7F STEP 32 170 READ A$,B$ 175 S=0 180 FOR J=0 TO 31 185 V=VAL("&H"+MID$(A$,J*2+1,2)) 190 POKE I+J,V 195 S=S XOR V 200 T(J)=T(J) XOR V 205 NEXT 210 IF S<>VAL("&H"+B$) THEN GOTO 270 215 NEXT 220 READ A$,B$ 225 S=0 230 FOR J=0 TO 31 235 V=VAL("&H"+MID$(A$,J*2+1,2)) 240 IF V<>T(J) THEN GOTO 270 245 S=S XOR V 250 NEXT 255 IF S<>VAL("&H"+B$) THEN GOTO 270 260 BSAVE"PMx88.bin",&HBF00,&HCC7C-&HBF00 265 PRINT"Completed.":END 270 PRINT"Data error.":BEEP:END 275 ' 280 DATA 183C504D7838382056657220312E303000000000000000000000000000000000,1F 285 DATA 0000000000000000000000000000000000000000000000000000000000002268,4A 290 DATA CCED736ACC31FEBE7EFE01DA98BFCA6FC6FE03DA5DC6CACBBFED7B6CCCF1C1D1,4F 295 DATA E1DDE1FDE1C9FDE5DDE5E5D5C5F5ED736CCC2A68CC7323723E02ED7B6ACCC9F3,8C 300 DATA D35E7ED35FFBC9F3D35E77D35FFBC9F3D35EEDB0D35FFBC92100D016005D0608,D3 305 DATA CB3ACB1B30083E01AB5F3EA0AA5710F0722473252CC29BBF2110BF545D133600,39 310 DATA 012D00EDB0110000C372BFAF217ECC545D1377010A00EDB02100C0226ECC3E40,76 315 DATA 327DCC21FFD21101D3AF772C121C3CC2EABF327FD23D3220D33E203287CC32FF,D4 320 DATA D23D32A0D33E8032DFD23D3200D33EA0321FD23D32E0D33EE0329FD23D3280D3,53 325 DATA 3A74CCFE32CABDC3FE31CA43C0FE6CCA5DC5FE4CCAC6C5CD08C9CD2DCBCD73CA,94 330 DATA C337C021EACB2248C12255C12264C122FCC022F2C021ECCB2209C12213C121C0,5D 335 DATA FF2280CC210100CD81CB16005F626B2929191112C21922A6C12A84CCCDD1CBB7,F0 340 DATA CAE4C02A84CCCDBDCBFE03DABBC02A84CCCDA9CBC603FE0ADABBC02A84CCCD95,0C 345 DATA CBC60AFE18DABBC02A84CCC2B6C0CD6DCBC618C3BBC0CD59CBC6583C47C5CDA5,8C 350 DATA C1573A87CC14C3CBC06F7E15C2C9C0CD2DCBCD49CACD95C9CD73CA10E1C178FE,C2 355 DATA D8CA79C02A84CCCDD1CBB7C205C12A84CCCDEACBB7C24DC12A84CCCDEACBB7CA,2B 360 DATA 1CC1C32AC12A84CCCDECCBB7CA40C12A84CCCDECCBB7CA5CC1C330C106021600,C9 365 DATA 2A84CCCD6DCB5FC375C10602AFC368C1CDB2C24716002A84CCCD6DCB5FC375C1,2D 370 DATA CDB2C2472A84CCCDA9CBC368C1CDB2C2472A84CCCDA9CBC602C368C1CDB2C247,3E 375 DATA 2A84CCCDA9CBC60A572A84CCCD45CB5F21400019EB2A82CC13B7ED52D283C111,45 380 DATA 0040191100C019CD7FBFCD2DCBCD49CACD95C9CD73CA237CFE00C2A0C12100C0,FF 385 DATA 10E5C379C01112C21AB7CAE7C12A84CCCDD1CBB71A13200407070707E60FFE0A,3D 390 DATA 30083DCAADC113C3C2C12A84CCD60A2819FE02381B2821FE043825282BCD6DCB,A6 395 DATA 6F3E409526D3C92A84CCCD95CB26D2C9CD95CBC61026D2C9CD81CBC62026D2C9,50 400 DATA CD6DCBC64026D2C9CD6DCB6F3E809526D3C9122DEF1CAB1223DEABCF122CD2AB,68 405 DATA EF12A2D2BCEF12A2C2BDEF12A2CDB1EF12AB12CDEF12AB1DC1EF12ABC1D1EFA1,39 410 DATA 122CDEBFA11D1CB1EFA1122DEFBCA112B2DECFA112BCD1EFA11CB1D1EFA1B112,7D 415 DATA CDEFA1B1C1D1EF121CDEAB0012A2CDBE0012ABC1DE00A11D1CBE00A112BCDE00,1C 420 DATA A11CB1DE00A1B1C1DE001D1CAB00001CA1BD000012ABCD0000A11CBD0000A1B1,13 425 DATA CD0000A1BC000000AB0000000000000000002A84CCCDBDCBC603FE06D82A84CC,25 430 DATA CDA9CBC606FE0BD82A84CCC2D4C2CDBDCBC60BC9FE0CC2DFC2CDA9CBC60FC9CD,04 435 DATA 6DCBC617FE55D82A84CCC2F3C2CD81CBC655C9CD59CBC675C92A84CCCD81CB32,BA 440 DATA 7CCC2188CC545D133600011C00EDB02A84CCCDA9CB327BCCB720083A7CCC3D32,EB 445 DATA B0CCC92A84CCCDA9CB327ACC8716005F214DC5195E2356ED534AC31188CC3A7C,8D 450 DATA CC473A7BCC4F2A84CCCD95CBB728023D81121310F121B0CC1188CC3A7CCCCD15,23 455 DATA C8C93A7CCCFE0AD8FE1D20053A7BCCB7C8C511A8CC626B133600010700EDB0C1,95 460 DATA 11A8CC2A84CCCDA9CB121310F621A8CC1100000E0006087EB728021459230C10,9A 465 DATA F67AFE01D820057B3210CDC93E01327BCC2110CD11A8CC3E08CD15C8C9210000,2E 470 DATA 2280CC210100CDD1CBCDF9C20605CD62C321B0CCCDDCC8FE08D255C42A84CCFE,AD 475 DATA 01381B281FFE0338232829FE05382D2833FE07383ECD6DCB573E40C339C4CDA9,E0 480 DATA CBC329C4CDA9CBC608C329C4CD95CBC610C329C4CD81CBC620C329C4CD81CBC6,CF 485 DATA 40C329C4CD81CBC66026D2573A87CC14C342C4CD6DCB573E8026D392573A87CC,0F 490 DATA 6F7E15C240C4CD2DCBCD49CACD3DC9CD73CAC3D1C3C266C42A84CCCD6DCB5F16,9B 495 DATA 000602C31DC5FE1738412A84CC2834FE1938282816FE1B381A28080600110000,C8 500 DATA C31DC5CD59CBC681C3ADC4CD81CBC621C3ADC4CD6DCBC641C3ADC4CDA9CBC619,55 505 DATA C3ADC4CDA9CBC611C3ADC4D606472110CDCDDCC82A84CCFE01DADCC4CAE5C4FE,80 510 DATA 03DAF0C4CAFBC4FE05DA00C5CA08C5FE07DA10C5CD95CBC610C315C5CD6DCB5F,6F 515 DATA 1600C31DC5CD6DCBC6405F1600C31DC5CD59CBC6805F1600C31DC51601C316C5,FE 520 DATA CDD1CBC602C315C5CDBDCBC604C315C5CDA9CBC608572A84CCCD45CB5F2A82CC,46 525 DATA 13B7ED52D22BC5110040191100C019CD7FBFCD2DCBCD49CACD3DC9CD73CA237C,DD 530 DATA FE00C248C52100C010E5C3D1C3EACBD1CBBDCBA9CB95CB81CB6DCB59CB2100C0,9A 535 DATA 545D133E20CD87BF01FF07CD8FBF2101002284CC3E08327DCC2A84CCCDD1CBB7,08 540 DATA 280C2A84CCCD45CBCD73CAC379C52A84CCCDA9CB572A84CCCD45CB5F2A84CCCD,45 545 DATA 95CBC60247211100197CE607671100C019CD7FBFCD73CA237CFEC8C2C1C52100,31 550 DATA C010EEC379C52100C0545D133E20CD87BF011100CD8FBF23AF060DCD87BF2310,FD 555 DATA FA3CC2D9C5CD87BF233CC2E5C53DCD87BF23C2EDC50680CD87BF2310FA3E2006,B3 560 DATA 6ECD87BF2310FA3E10327DCC0E80CB013006CD08C93287CC3A87CCA12809CD08,CC 565 DATA C9CD73CAC30EC6CD08C95FCD08C9470F0F0F0FE60F5778E60FC6034721120019,29 570 DATA 7CE60F671100C019CD7FBFCD73CA237CFED0C258C62100C010EEC30EC62170CC,E7 575 DATA 1114BF010300EDB0ED5B15BFC372BFCD08C9B72006110000C372BF47CD08C94F,71 580 DATA 2128CDAF57CD08C977822310F7B9280611FFFFC372BF11EFCB2128CD0E000605,75 585 DATA 1AAEB14F132310F879B72809131AB720E83EFF18011A3274CC3A2ACD3238BF2A,01 590 DATA 2DCD221CBFED5B14BF192270CC3A2FCD321EBF4F3A16BF893272CC2A31CD2220,BD 595 DATA BF3A33CD3222BF2A35CD7C0F0F0FE61FCDFCC73227BF7DE61F87CDFCC73229BF,81 600 DATA CB15CB14CB15CB14CB15CB147CE63FCDFCC73228BF2A37CD7C0FE67FC650CDFC,6A 605 DATA C73224BF7DE61FCDFCC73226BFCB1CCB1D7D0F0F0F0FE60FCDFCC73225BF2128,75 610 DATA CD1117BF010500EDB03A39CD3237BF3A3ACD323ABF210000222ABF3A38BFFE7A,8C 615 DATA 281F3A3BCD16005F213CCD197E322ABF237E322BBF233A3ABFB728057E3239BF,95 620 DATA 23213BCD4E23AF0C323BBFE5C5212CBF112DBF010A003620EDB0C1E10DCADAC7,27 625 DATA 112CBF06087E23FE2E281BFE5C28D912130DCADAC710EE7E23FE2E2809FE5C28,62 630 DATA C70D20F318141134BF06030D280C7E23FE5C28B4E67F121310F13A74CCFE7328,9E 635 DATA 0D1102003CC272BF110300C372BF2170CC1114BF010300EDB0C36FC60E00D60A,F1 640 DATA 38030C18F9C60A4779FE0A3802D60A07070707B0C92275CCED5377CC3279CC47,11 645 DATA AFE577237723772310F8E13A7BCC5706000E0136FFD515280A23712323700C04,C5 650 DATA C336C8D1E5FDE12A77CC1E007E23BAC2AAC8FD7E01B7C262C87BF680FD7701C3,C5 655 DATA AAC87BF680FD7702E5D5060004FD7E00FEFFCAD9C816005F2A75CC191919E5FD,57 660 DATA E1FD7E02B7C26CC87BFD71021600590C2A75CC191919E5FDE1FD770005CAA7C8,5E 665 DATA 7BFD7101C38CC843D1E11C3A79CCBBC24CC8FD7E01B7C2BFC8FD7101C3C2C8FD,55 670 DATA 7102D51600590C2A75CC191919E5FDE1FD700043D114C347C8D1E1C97EFEFFC0,97 675 DATA 2275CCD5EB132A84CCCDD1CBB72801131AFE80D204C92A75CC16005F191919EB,DD 680 DATA 13C3E6C8E67FD1C9E5D5ED5B15BF2A3CBFB7ED52CA21C9ED533CBF110100CD66,56 685 DATA BF3A14BF2A10BF16005F197E2114BF34C23AC92334C23AC92334D1E1C9E5D5C5,37 690 DATA F52A80CC232280CC7DB7C290C97CFE202827FE1028120607FE08280605FE04C2,12 695 DATA 90C9CD62C3C390C92A84CCCDD1CBB7C4F9C20608CD62C318172100102280CC2A,4A 700 DATA 84CCCDD1CBB72808CDF9C20608CD62C3F1C1D1E1C9E5D5F5ED5B80CC7AFE2ACA,0E 705 DATA 45CA7B3C3280CCC245CA21D1CB7A3C3281CCFE01D2C0C922FCC02209C1C345CA,65 710 DATA C2C9C92248C1C345CAFE03D2D4C922F2C0C345CAC2DDC92255C1C345CAFE04C2,5F 715 DATA EBC921BDCB2255C1C345CAFE06C2F9C921A9CB2255C1C345CAFE0ADA45CAC207,58 720 DATA CA2213C1C345CAFE0CD212CA2264C1C345CAC21ECA21BDCB2264C1C345CAFE0E,3F 725 DATA C22CCA21A9CB2264C1C345CAFE12C23ACA2195CB2264C1C345CAFE1AC245CA21,4E 730 DATA 81CB2264C1F1D1E1C9E5D5F55F3A87CCBB281C26D36F7E736B56776F25736B7E,50 735 DATA 6A776F2472256B3A87CC777B3287CCF1D1E1C9E5D5C5F52A6ECCED5B82CCCD87,5C 740 DATA BF23133A7DCCBAC2A8CA472100C0C5ED5B12BF010001CD8FBF110200CD66BFC1,5D 745 DATA 10EC2100C0110000ED5382CC226ECC2120BF5E2356237BD6015FD2C5CA7AD601,49 750 DATA 57D2C5CA357E2B722B73B3B22805F1C1D1E1C9F1C1D1E1F1C3DBCA2A82CC7DB4,AB 755 DATA 282C4C7DB7280FAF95471100C019AFCD87BF2310FA0C412100C0C5ED5B12BF01,F0 760 DATA 0001CD8FBF110200CD66BFC110EC3A38BFFE7A2812ED4B2ABF2A7ECCB7ED4228,5E 765 DATA 0611FFFFC372BF110000C372BFE5D5F5ED5B7ECCAB6F26D17EAA5F2556ED537E,CC 770 DATA CCF1D1E1C9CB0D3A86CCD253CBCD08C93286CCA5280137CB14CB0D3A86CCD267,2B 775 DATA CBCD08C93286CCA5280137CB14CB0D3A86CCD27BCBCD08C93286CCA5280137CB,0B 780 DATA 14CB0D3A86CCD28FCBCD08C93286CCA5280137CB14CB0D3A86CCD2A3CBCD08C9,24 785 DATA 3286CCA5280137CB14CB0D3A86CCD2B7CBCD08C93286CCA5280137CB14CB0D3A,E8 790 DATA 86CCD2CBCBCD08C93286CCA5280137CB14CB0D3A86CCD2DFCBCD08C93286CCA5,29 795 DATA 2801377D3284CC7C17C9AFC93E01C92D706D302D302D706D312D312D706D322D,04 800 DATA 322D706D732D7301706D732D732D6C68302D302D6C7A732D6C2D6C7A342D302D,2C 805 DATA 6C7A352D4C003C3C3C2020504D783838202056657273696F6E20312E30302020,7E 810 DATA 436F70797269676874284329203139393020627920596F73686968696B6F204D,11 815 DATA 696E6F20203E3E3E000000000000000000000000000000000000000000000000,56 820 DATA D96E57366900573F89F36F7C276BFBDBB5EE40CDD1C1A4877AC781BBED5BB783,32 825 ' 830 '<<< PMx88 Version 1.00 Copyright(C) 1990 by Yoshihiko Mino >>> 835 '