; Origin set to 00000H, EOF = 03FFFH ORG 00000H ; CPU Type: CPU 1805 ; Labels: R0036 EQU 0036H R0037 EQU 0037H R0040 EQU 0040H R0067 EQU 0067H R006B EQU 006BH R007A EQU 007AH R0082 EQU 0082H R0085 EQU 0085H R009C EQU 009CH R00A1 EQU 00A1H R00AB EQU 00ABH R00B2 EQU 00B2H R00CB EQU 00CBH R00D9 EQU 00D9H R00F5 EQU 00F5H S00FB EQU 00FBH S020B EQU 020BH S0217 EQU 0217H S0239 EQU 0239H R0244 EQU 0244H R0248 EQU 0248H R024C EQU 024CH S027F EQU 027FH S029A EQU 029AH R02AA EQU 02AAH R02BC EQU 02BCH R02D2 EQU 02D2H J02D4 EQU 02D4H J0300 EQU 0300H R0304 EQU 0304H R030C EQU 030CH S0310 EQU 0310H R031B EQU 031BH R032F EQU 032FH R0339 EQU 0339H R0340 EQU 0340H J0347 EQU 0347H R0350 EQU 0350H R0358 EQU 0358H R0368 EQU 0368H R0379 EQU 0379H R038E EQU 038EH R0397 EQU 0397H R039F EQU 039FH J03A7 EQU 03A7H R03C4 EQU 03C4H R03D4 EQU 03D4H J03DA EQU 03DAH J0405 EQU 0405H R0415 EQU 0415H R0419 EQU 0419H R0428 EQU 0428H J042C EQU 042CH R0447 EQU 0447H J0451 EQU 0451H R0457 EQU 0457H R046A EQU 046AH J046B EQU 046BH R0470 EQU 0470H R047B EQU 047BH R048D EQU 048DH R0496 EQU 0496H R04A3 EQU 04A3H R04A8 EQU 04A8H R04AB EQU 04ABH J04AE EQU 04AEH R04B6 EQU 04B6H R04BC EQU 04BCH R04BF EQU 04BFH R04C6 EQU 04C6H J0500 EQU 0500H R050E EQU 050EH J051A EQU 051AH R053B EQU 053BH R0543 EQU 0543H R0549 EQU 0549H R055E EQU 055EH R0561 EQU 0561H S056B EQU 056BH S056C EQU 056CH S0572 EQU 0572H S0577 EQU 0577H S057E EQU 057EH S0582 EQU 0582H S0586 EQU 0586H S058A EQU 058AH S059D EQU 059DH S05A5 EQU 05A5H S05A6 EQU 05A6H S05AF EQU 05AFH S05B1 EQU 05B1H S05D5 EQU 05D5H S05DD EQU 05DDH S05DE EQU 05DEH S05E7 EQU 05E7H S05F2 EQU 05F2H S05FE EQU 05FEH S05FF EQU 05FFH S060F EQU 060FH S0615 EQU 0615H S0616 EQU 0616H S061C EQU 061CH S0627 EQU 0627H J062E EQU 062EH J0630 EQU 0630H S0635 EQU 0635H S0641 EQU 0641H S0647 EQU 0647H S0654 EQU 0654H S065D EQU 065DH S0661 EQU 0661H S066A EQU 066AH S0673 EQU 0673H S0676 EQU 0676H S067D EQU 067DH S0686 EQU 0686H S068A EQU 068AH S0691 EQU 0691H S0694 EQU 0694H S0699 EQU 0699H R069D EQU 069DH R06A4 EQU 06A4H S06A5 EQU 06A5H S06A9 EQU 06A9H S06AA EQU 06AAH S06AD EQU 06ADH S06B3 EQU 06B3H R06BB EQU 06BBH S06BE EQU 06BEH S06C2 EQU 06C2H S06C6 EQU 06C6H S06D0 EQU 06D0H S06D5 EQU 06D5H R06D8 EQU 06D8H J06D9 EQU 06D9H S06DF EQU 06DFH S06EA EQU 06EAH S06F1 EQU 06F1H S06F8 EQU 06F8H S0700 EQU 0700H J0709 EQU 0709H J070C EQU 070CH S070F EQU 070FH S072F EQU 072FH R0753 EQU 0753H R075C EQU 075CH R0765 EQU 0765H R0769 EQU 0769H R076E EQU 076EH R0771 EQU 0771H R0775 EQU 0775H R077E EQU 077EH R0782 EQU 0782H R0793 EQU 0793H R0797 EQU 0797H R07AC EQU 07ACH R07B2 EQU 07B2H R07B6 EQU 07B6H S07C3 EQU 07C3H R07D9 EQU 07D9H R07E2 EQU 07E2H S07E3 EQU 07E3H R07E6 EQU 07E6H S07F5 EQU 07F5H S07F6 EQU 07F6H R0808 EQU 0808H S0815 EQU 0815H S0816 EQU 0816H S081D EQU 081DH S081E EQU 081EH R0822 EQU 0822H J083E EQU 083EH R0846 EQU 0846H J084F EQU 084FH S0853 EQU 0853H R086A EQU 086AH S0875 EQU 0875H S0879 EQU 0879H S087D EQU 087DH S0884 EQU 0884H S0888 EQU 0888H S088B EQU 088BH S0892 EQU 0892H S0893 EQU 0893H S0899 EQU 0899H S089C EQU 089CH S08AE EQU 08AEH S08C8 EQU 08C8H S08C9 EQU 08C9H R08CB EQU 08CBH R08DA EQU 08DAH R08DE EQU 08DEH S08E2 EQU 08E2H S08E8 EQU 08E8H R08ED EQU 08EDH S08F1 EQU 08F1H J08FB EQU 08FBH J0902 EQU 0902H S0907 EQU 0907H R090B EQU 090BH J091E EQU 091EH J0923 EQU 0923H R092E EQU 092EH R0939 EQU 0939H J0949 EQU 0949H S0959 EQU 0959H R095D EQU 095DH J0971 EQU 0971H J0977 EQU 0977H J0984 EQU 0984H J098E EQU 098EH J0998 EQU 0998H R09AD EQU 09ADH R09B5 EQU 09B5H S09B6 EQU 09B6H R09C1 EQU 09C1H R09C7 EQU 09C7H R09CF EQU 09CFH R09D9 EQU 09D9H R09E0 EQU 09E0H J09F7 EQU 09F7H S09F8 EQU 09F8H R0A22 EQU 0A22H S0A23 EQU 0A23H S0A4D EQU 0A4DH S0A4E EQU 0A4EH S0A63 EQU 0A63H S0A64 EQU 0A64H S0A72 EQU 0A72H S0A73 EQU 0A73H J0A7C EQU 0A7CH J0A8D EQU 0A8DH J0AB6 EQU 0AB6H R0ABB EQU 0ABBH S0AC1 EQU 0AC1H S0AC2 EQU 0AC2H R0ACA EQU 0ACAH J0ADC EQU 0ADCH R0AEF EQU 0AEFH J0B03 EQU 0B03H J0B05 EQU 0B05H S0B10 EQU 0B10H S0B15 EQU 0B15H S0B1A EQU 0B1AH S0B1F EQU 0B1FH R0B22 EQU 0B22H S0B2A EQU 0B2AH S0B2D EQU 0B2DH S0B30 EQU 0B30H S0B33 EQU 0B33H S0B36 EQU 0B36H S0B3C EQU 0B3CH S0B41 EQU 0B41H S0B46 EQU 0B46H S0B4B EQU 0B4BH R0B4E EQU 0B4EH J0B75 EQU 0B75H J0B7E EQU 0B7EH R0B89 EQU 0B89H R0B94 EQU 0B94H R0B9B EQU 0B9BH J0BA2 EQU 0BA2H R0BAD EQU 0BADH R0BBB EQU 0BBBH R0BBD EQU 0BBDH R0BC2 EQU 0BC2H R0BD8 EQU 0BD8H R0BDF EQU 0BDFH S0BE3 EQU 0BE3H S0BE4 EQU 0BE4H R0C0F EQU 0C0FH J0C10 EQU 0C10H R0C1E EQU 0C1EH J0C25 EQU 0C25H R0C52 EQU 0C52H R0C77 EQU 0C77H R0C7D EQU 0C7DH J0D00 EQU 0D00H R0D7F EQU 0D7FH J0D82 EQU 0D82H R0D9B EQU 0D9BH J0D9E EQU 0D9EH J0DA1 EQU 0DA1H J0DA7 EQU 0DA7H R0DC3 EQU 0DC3H R0DC5 EQU 0DC5H R0DD9 EQU 0DD9H R0DF6 EQU 0DF6H J0E0C EQU 0E0CH J0E14 EQU 0E14H R0E2C EQU 0E2CH J0E34 EQU 0E34H R0E37 EQU 0E37H R0E4D EQU 0E4DH J0E55 EQU 0E55H J0E5B EQU 0E5BH R0E75 EQU 0E75H J0F20 EQU 0F20H R0F32 EQU 0F32H R0F34 EQU 0F34H S0F45 EQU 0F45H R0F59 EQU 0F59H J0F81 EQU 0F81H S0FBD EQU 0FBDH S0FF1 EQU 0FF1H J0FFA EQU 0FFAH R1005 EQU 1005H S100B EQU 100BH S1039 EQU 1039H S10BA EQU 10BAH R10BC EQU 10BCH R10CA EQU 10CAH S10E3 EQU 10E3H J1113 EQU 1113H R1144 EQU 1144H R114D EQU 114DH R1153 EQU 1153H R1159 EQU 1159H R116D EQU 116DH R117A EQU 117AH S1181 EQU 1181H S11A0 EQU 11A0H S11A1 EQU 11A1H S11A2 EQU 11A2H J11B4 EQU 11B4H J11CE EQU 11CEH R11DB EQU 11DBH J11E0 EQU 11E0H R11EB EQU 11EBH R11EF EQU 11EFH J1208 EQU 1208H J120B EQU 120BH J120F EQU 120FH J1231 EQU 1231H J1242 EQU 1242H J1243 EQU 1243H J125B EQU 125BH J125C EQU 125CH R1267 EQU 1267H R1273 EQU 1273H S1280 EQU 1280H R1294 EQU 1294H S12A0 EQU 12A0H S12A8 EQU 12A8H J12AD EQU 12ADH R12CC EQU 12CCH J12D2 EQU 12D2H J1349 EQU 1349H S13B5 EQU 13B5H R13B6 EQU 13B6H S13BF EQU 13BFH R13C5 EQU 13C5H J13E0 EQU 13E0H R13FB EQU 13FBH R13FD EQU 13FDH J1421 EQU 1421H J1425 EQU 1425H J142B EQU 142BH J142F EQU 142FH J1430 EQU 1430H S1453 EQU 1453H S145D EQU 145DH S1465 EQU 1465H S146D EQU 146DH J1475 EQU 1475H R148E EQU 148EH R14A5 EQU 14A5H J14B1 EQU 14B1H J14BE EQU 14BEH J14BF EQU 14BFH S14CB EQU 14CBH R14E1 EQU 14E1H R14E3 EQU 14E3H S14E7 EQU 14E7H J1510 EQU 1510H S1522 EQU 1522H J1564 EQU 1564H S156E EQU 156EH J1581 EQU 1581H S1589 EQU 1589H J15BE EQU 15BEH J15C5 EQU 15C5H S15CC EQU 15CCH S15D3 EQU 15D3H S15D5 EQU 15D5H J15DA EQU 15DAH J15DC EQU 15DCH J15DE EQU 15DEH J15E9 EQU 15E9H J15F7 EQU 15F7H J160B EQU 160BH S160D EQU 160DH J160F EQU 160FH J1619 EQU 1619H S162E EQU 162EH R162F EQU 162FH J1647 EQU 1647H R164D EQU 164DH R1660 EQU 1660H J1663 EQU 1663H J1670 EQU 1670H J1681 EQU 1681H J1697 EQU 1697H J16A1 EQU 16A1H J16C0 EQU 16C0H J16CA EQU 16CAH J1703 EQU 1703H J1704 EQU 1704H J171B EQU 171BH J1727 EQU 1727H J172D EQU 172DH R173B EQU 173BH S1745 EQU 1745H S174D EQU 174DH S1755 EQU 1755H S175D EQU 175DH S1765 EQU 1765H J177D EQU 177DH S1781 EQU 1781H R1786 EQU 1786H S178B EQU 178BH S1795 EQU 1795H J179A EQU 179AH J179D EQU 179DH S17A1 EQU 17A1H S17AD EQU 17ADH R17B2 EQU 17B2H S17C3 EQU 17C3H S17D3 EQU 17D3H J17DB EQU 17DBH J17F0 EQU 17F0H J1804 EQU 1804H J1831 EQU 1831H S1837 EQU 1837H J183C EQU 183CH S1848 EQU 1848H J1853 EQU 1853H R1855 EQU 1855H J1870 EQU 1870H J187B EQU 187BH J1885 EQU 1885H J1890 EQU 1890H J1897 EQU 1897H J18A9 EQU 18A9H J18AD EQU 18ADH J18C0 EQU 18C0H J18EC EQU 18ECH J18ED EQU 18EDH J18FA EQU 18FAH J190A EQU 190AH J191D EQU 191DH R1938 EQU 1938H J193F EQU 193FH J1965 EQU 1965H S1967 EQU 1967H R1971 EQU 1971H J1987 EQU 1987H R19CA EQU 19CAH J19DC EQU 19DCH S19E1 EQU 19E1H J19E8 EQU 19E8H J1A04 EQU 1A04H J1A13 EQU 1A13H J1A1C EQU 1A1CH R1A1F EQU 1A1FH J1A2F EQU 1A2FH S1A31 EQU 1A31H J1A39 EQU 1A39H J1A44 EQU 1A44H R1A62 EQU 1A62H J1A79 EQU 1A79H J1A8D EQU 1A8DH J1A96 EQU 1A96H S1A9C EQU 1A9CH J1AA6 EQU 1AA6H J1AB5 EQU 1AB5H J1ABE EQU 1ABEH J1ACC EQU 1ACCH J1AD5 EQU 1AD5H J1AE3 EQU 1AE3H R1AEA EQU 1AEAH J1AF8 EQU 1AF8H J1AF9 EQU 1AF9H J1B06 EQU 1B06H R1B12 EQU 1B12H J1B1D EQU 1B1DH R1B25 EQU 1B25H J1B34 EQU 1B34H J1B3D EQU 1B3DH J1B4B EQU 1B4BH J1B4C EQU 1B4CH J1B5E EQU 1B5EH J1BCB EQU 1BCBH R1BE1 EQU 1BE1H R1BFA EQU 1BFAH J1C20 EQU 1C20H J1C29 EQU 1C29H R1C4A EQU 1C4AH J1C50 EQU 1C50H R1C60 EQU 1C60H J1C7C EQU 1C7CH J1C86 EQU 1C86H R1CB2 EQU 1CB2H J1CBD EQU 1CBDH J1CC5 EQU 1CC5H J1CD3 EQU 1CD3H R1CDE EQU 1CDEH R1CE1 EQU 1CE1H R1CED EQU 1CEDH J1CFF EQU 1CFFH J1D1B EQU 1D1BH J1D1C EQU 1D1CH J1D1F EQU 1D1FH J1D3A EQU 1D3AH J1D44 EQU 1D44H J1D4B EQU 1D4BH J1D58 EQU 1D58H J1D61 EQU 1D61H J1D70 EQU 1D70H J1D79 EQU 1D79H J1D7F EQU 1D7FH J1D8D EQU 1D8DH J1D91 EQU 1D91H J1D96 EQU 1D96H J1DA1 EQU 1DA1H R1DB8 EQU 1DB8H J1DC0 EQU 1DC0H J1DCD EQU 1DCDH J1DE2 EQU 1DE2H J1E08 EQU 1E08H J1E1A EQU 1E1AH J1E24 EQU 1E24H J1E2D EQU 1E2DH J1E3C EQU 1E3CH J1E4B EQU 1E4BH J1E5E EQU 1E5EH J1E77 EQU 1E77H J1E8D EQU 1E8DH J1E96 EQU 1E96H J1EA5 EQU 1EA5H J1EAA EQU 1EAAH S212E EQU 212EH S2132 EQU 2132H S2136 EQU 2136H S213A EQU 213AH S213E EQU 213EH S2369 EQU 2369H S237F EQU 237FH S23E5 EQU 23E5H S2427 EQU 2427H S2431 EQU 2431H S2439 EQU 2439H S245B EQU 245BH S248F EQU 248FH S249F EQU 249FH S2575 EQU 2575H S2583 EQU 2583H S2589 EQU 2589H S258F EQU 258FH S261F EQU 261FH S271B EQU 271BH S2725 EQU 2725H S272D EQU 272DH S2737 EQU 2737H S273F EQU 273FH S2745 EQU 2745H S274D EQU 274DH S2753 EQU 2753H S275B EQU 275BH S2761 EQU 2761H S2769 EQU 2769H S2773 EQU 2773H S2779 EQU 2779H S277F EQU 277FH S27A7 EQU 27A7H S27B1 EQU 27B1H S27BB EQU 27BBH S27CF EQU 27CFH S27EB EQU 27EBH S27FD EQU 27FDH S285D EQU 285DH S2865 EQU 2865H S286D EQU 286DH S2875 EQU 2875H S287B EQU 287BH S2883 EQU 2883H S2889 EQU 2889H S288F EQU 288FH S2AAF EQU 2AAFH S2B4B EQU 2B4BH S2B89 EQU 2B89H S2BD3 EQU 2BD3H S2BF7 EQU 2BF7H S2BFD EQU 2BFDH S2C21 EQU 2C21H S2C39 EQU 2C39H S2C61 EQU 2C61H S2C81 EQU 2C81H S2C99 EQU 2C99H S2CCD EQU 2CCDH S2CFB EQU 2CFBH S2D0B EQU 2D0BH S2D13 EQU 2D13H S2D17 EQU 2D17H S2D2D EQU 2D2DH S2D35 EQU 2D35H S2D3B EQU 2D3BH S2D43 EQU 2D43H S2D51 EQU 2D51H S2D59 EQU 2D59H S2D65 EQU 2D65H S2D71 EQU 2D71H S2D95 EQU 2D95H S2D9D EQU 2D9DH S2DA3 EQU 2DA3H S2DAB EQU 2DABH S2DC9 EQU 2DC9H S2DD1 EQU 2DD1H S2DD7 EQU 2DD7H S2DE5 EQU 2DE5H S2E01 EQU 2E01H S2E23 EQU 2E23H S2E3D EQU 2E3DH S2E5B EQU 2E5BH S2E85 EQU 2E85H S2E99 EQU 2E99H S2EA5 EQU 2EA5H S2EDD EQU 2EDDH S2EE1 EQU 2EE1H S2EED EQU 2EEDH S2F4B EQU 2F4BH S2FD7 EQU 2FD7H S2FE9 EQU 2FE9H S2FFF EQU 2FFFH S3053 EQU 3053H S305D EQU 305DH S3181 EQU 3181H S31FB EQU 31FBH S3201 EQU 3201H S3209 EQU 3209H S331D EQU 331DH S336F EQU 336FH S33F9 EQU 33F9H S3419 EQU 3419H S34CB EQU 34CBH S34FF EQU 34FFH S350B EQU 350BH S356D EQU 356DH S35B3 EQU 35B3H S35F3 EQU 35F3H S3661 EQU 3661H S3687 EQU 3687H S3697 EQU 3697H S36AB EQU 36ABH S36D1 EQU 36D1H S3707 EQU 3707H S3759 EQU 3759H S377F EQU 377FH S383D EQU 383DH S3845 EQU 3845H S384B EQU 384BH S3857 EQU 3857H S3863 EQU 3863H S3875 EQU 3875H S38B9 EQU 38B9H S38C3 EQU 38C3H S3935 EQU 3935H S393F EQU 393FH S3987 EQU 3987H S399D EQU 399DH S3A23 EQU 3A23H S3A2B EQU 3A2BH S3A3F EQU 3A3FH S3A47 EQU 3A47H S3A59 EQU 3A59H S3A8F EQU 3A8FH S3AA9 EQU 3AA9H S3AB9 EQU 3AB9H S3ABF EQU 3ABFH S3ADF EQU 3ADFH S3AEB EQU 3AEBH S3AFD EQU 3AFDH S3B17 EQU 3B17H S3B51 EQU 3B51H S3B5B EQU 3B5BH S3B9D EQU 3B9DH S3BA7 EQU 3BA7H S3BB1 EQU 3BB1H S3BCF EQU 3BCFH S3BD5 EQU 3BD5H S3BDB EQU 3BDBH S3BE1 EQU 3BE1H S3BE7 EQU 3BE7H S3BED EQU 3BEDH S3BF3 EQU 3BF3H S3BF9 EQU 3BF9H S3BFD EQU 3BFDH S3C13 EQU 3C13H S3C1F EQU 3C1FH S3C2B EQU 3C2BH S3C6B EQU 3C6BH S3C9B EQU 3C9BH S3D03 EQU 3D03H S3D0B EQU 3D0BH S3D4D EQU 3D4DH S3D75 EQU 3D75H S3D83 EQU 3D83H S3D91 EQU 3D91H ; Unused or indirect labels: ; S0000 ; S0096 ; S00B9 ; S00D2 ; S00E0 ; S00FE ; S0203 ; S0206 ; S020C ; S0215 ; S0220 ; S0228 ; S0229 ; S022B ; J022E ; S0232 ; S023D ; S0250 ; S0254 ; S0259 ; S025A ; S025F ; S0260 ; S0266 ; S0267 ; S026C ; S026D ; S0272 ; S0278 ; S027E ; S0284 ; S0285 ; S028A ; S028B ; S028C ; S028E ; S0294 ; S0299 ; S02A4 ; S02A7 ; S02B7 ; J02BE ; S02CA ; S02CF ; S02D5 ; S02E8 ; S02EB ; S02F4 ; S02F7 ; S02FA ; S02FD ; S050C ; S0514 ; S0573 ; S0578 ; S0581 ; S0585 ; S0589 ; S058B ; S059E ; S05B0 ; S05B2 ; S05D6 ; S05E8 ; S05F3 ; S0601 ; J0603 ; J0604 ; S0605 ; S0607 ; S060A ; S060C ; S0610 ; S061E ; S0625 ; S0628 ; S0636 ; S064B ; S064E ; J064F ; S0652 ; S0658 ; S065B ; S065F ; S0662 ; S066E ; S0671 ; S0675 ; S0677 ; S0681 ; S0684 ; S0688 ; S068B ; S0693 ; S0695 ; S069A ; S069C ; S06A6 ; S06AE ; S06B4 ; S06BF ; J06C0 ; S06C4 ; S06C7 ; S06CA ; S06D1 ; S06D6 ; J06DE ; S06E0 ; S06EB ; J06EC ; S06F2 ; S06F9 ; S06FC ; S06FE ; S0701 ; S070B ; S070E ; S0710 ; J072E ; S0730 ; S0736 ; S0738 ; S073C ; S073D ; S073F ; S0746 ; S0749 ; S074D ; J07AD ; S07BB ; J07C0 ; S07C1 ; J07CE ; J07DE ; J07E0 ; S07E4 ; J07EC ; S07EE ; S07F9 ; S07FE ; S080D ; S0814 ; S0819 ; S0821 ; S0828 ; S084A ; S0851 ; S0876 ; S087A ; S087E ; S0885 ; S0887 ; S088A ; S088C ; S0891 ; S089B ; S089D ; S08AF ; S08B9 ; S08E3 ; S08E5 ; S08E9 ; S08F0 ; S08F2 ; S08F4 ; S0905 ; S0908 ; S0919 ; S095A ; S096C ; S09B7 ; S09FB ; S09FE ; J0A03 ; J0A05 ; S0A0D ; S0A11 ; S0A24 ; S0A28 ; S0A2B ; S0A2E ; S0A3D ; S0A41 ; S0A44 ; S0A5D ; S0A76 ; S0A7F ; S0A86 ; S0A89 ; S0AC5 ; S0ACD ; S0AD4 ; S0AD7 ; S0B11 ; S0B16 ; S0B1B ; S0B20 ; S0B2C ; S0B2F ; S0B32 ; S0B35 ; S0B39 ; S0B3D ; S0B42 ; S0B47 ; S0B4C ; S0C85 ; J0E03 ; J0E04 ; J0E0A ; J0E1D ; J0E2E ; J0E49 ; J0E4F ; J0E5E ; J0E64 ; S0E6F ; J0E97 ; J0EA9 ; J0EAD ; J0EBE ; J0EC0 ; J0ECC ; J0ECE ; J0ED5 ; J0EDE ; J0EE0 ; J0EE3 ; S0F1B ; S0F36 ; S0F39 ; S102B ; S104C ; S1061 ; S1078 ; S10B7 ; S10BB ; S10BF ; J1108 ; S11A3 ; S11F6 ; J1219 ; S1234 ; S124F ; S1281 ; S12A1 ; S12A9 ; J12C0 ; S12D7 ; J12EC ; J12F0 ; S131D ; S1321 ; S1367 ; S1383 ; S13A2 ; S152A ; S1545 ; S1547 ; S1549 ; S1552 ; S156F ; S1572 ; S1583 ; S15CD ; S15D7 ; S15FC ; S1608 ; J160C ; S1611 ; S1616 ; S1617 ; J1664 ; S1747 ; S174A ; S17B9 ; S17BF ; S17D5 ; S17D8 ; S17DF ; S17FB ; J180A ; S180F ; J181D ; S1833 ; S184B ; S189B ; J18F0 ; J192E ; S194F ; S1955 ; S1957 ; S195B ; S198B ; S1993 ; S199E ; S19A1 ; S19A9 ; S19AC ; S19AF ; S19C5 ; S19DE ; S19E3 ; J1A06 ; S1AB7 ; S1AC3 ; S1AC9 ; S1AE0 ; J1AE8 ; S1B0D ; S1B17 ; S1B19 ; S1B31 ; S1B64 ; S1B65 ; S1B85 ; S1BA3 ; S1BA6 ; S1E25 ; S1F15 ; S2263 ; S24A8 ; S24B3 ; S24BC ; S24CD ; S24DD ; S24EC ; S2506 ; S2513 ; S25F9 ; S3658 ; Out of range branches or addresses: ; 6101H referenced from 0568H ; ====================================================================== ; PTC-701 BYTECODE INTERPRETER — REGISTER USAGE ; ====================================================================== ; The interpreter uses a SEP-based dispatch mechanism. Registers have ; fixed roles during bytecode execution: ; ; R0 Active PC during some handlers (R0.1 = 0x00 always) ; R1 Unused by interpreter ; R2 Return stack pointer (R2.1 = 0x62, grows downward) ; R3 Handler entry-point selector (jumps to 0x02xx) ; R4 Temporary (used within handlers for workspace addressing) ; R5 Mode/state flag (e.g., R5.0 = 0x04 for wait mode) ; R6 Variable/I/O pointer (R6.1 = 0x60 or 0x3F) ; R7 Hardware register pointer (R7.1 = 0x3F) ; R8 Loop counter / temporary (multi-byte operations) ; R9 Data pointer / temporary (X register target in many handlers) ; RA Address pointer (source/dest for memory operations) ; RB Handler address pointer (points into handler body code) ; RC Bytecode program counter (walks through banked app ROM) ; RD Data stack pointer (RD.1 = 0x61, grows downward, 0x61DA-0x61FF) ; RE Dispatch table index (RE.1 = 0x01 always) ; RF Return-to-interpreter register (RF = 0x610C, SEP RF returns) ; ; Memory layout: ; 0x6000-0x606F System variables (VA,VB at 0x6056-0x6059, VC,VD,VE at 0x605A-0x605F) ; 0x6080-0x60BF Display buffer (2x32 chars) ; 0x6100-0x6119 Interpreter dispatch loop (copied from ROM 0x0500) ; 0x61DA-0x61FF Data stack (16-bit values, RD pointer) ; 0x6200-0x62FF Return stack (R2 pointer, saves RC for CALL/RET) ; ====================================================================== ; Register Definitions: R0 EQU 0 R1 EQU 1 R2 EQU 2 R3 EQU 3 R4 EQU 4 R5 EQU 5 R6 EQU 6 R7 EQU 7 R8 EQU 8 R9 EQU 9 RA EQU 10 RB EQU 11 RC EQU 12 RD EQU 13 RE EQU 14 RF EQU 15 ; Start code segment S0000 DIS ;0000: 71 DB 40H ;0001: 40 LDI 3FH ;0002: F8 3F PHI R7 ;0004: B7 LDI 80H ;0005: F8 80 PLO R7 ;0007: A7 LDI 20H ;0008: F8 20 STR R7 ;000A: 57 LDI 0E2H ;000B: F8 E2 PLO R4 ;000D: A4 LDI 04H ;000E: F8 04 PHI R4 ;0010: B4 LDI 60H ;0011: F8 60 PHI R6 ;0013: B6 GHI R0 ;0014: 90 PLO R5 ;0015: A5 LDXA ;0016: 72 PHI R2 ;0017: B2 LDXA ;0018: 72 PHI RD ;0019: BD LDXA ;001A: 72 PHI R3 ;001B: B3 LDXA ;001C: 72 PLO R6 ;001D: A6 LDXA ;001E: 72 PHI RE ;001F: BE LDXA ;0020: 72 PHI R1 ;0021: B1 LDXA ;0022: 72 PLO R1 ;0023: A1 LDXA ;0024: 72 PHI RC ;0025: BC LDXA ;0026: 72 PLO RC ;0027: AC REQ ;0028: 7A LDA R6 ;0029: 46 SMI 0AAH ;002A: FF AA BZ R0040 ;002C: 32 40 LDXA ;002E: 72 PHI RC ;002F: BC LDXA ;0030: 72 PLO RC ;0031: AC LDI 07H ;0032: F8 07 PLO R6 ;0034: A6 GHI R0 ;0035: 90 R0036 STR R6 ;0036: 56 R0037 LDI 1BH ;0037: F8 1B PLO R6 ;0039: A6 LDXA ;003A: 72 PLO R2 ;003B: A2 LDXA ;003C: 72 PLO RD ;003D: AD BR R006B ;003E: 30 6B R0040 LDI 0A2H ;0040: F8 A2 PLO R7 ;0042: A7 GHI R0 ;0043: 90 STR R7 ;0044: 57 LDI 40H ;0045: F8 40 PHI RA ;0047: BA LDI 10H ;0048: F8 10 PLO RA ;004A: AA LDA RA ;004B: 4A SEX RA ;004C: EA PLO R7 ;004D: A7 ADI 01H ;004E: FC 01 BZ R0067 ;0050: 32 67 LDN R7 ;0052: 07 AND ;0053: F2 BZ R0067 ;0054: 32 67 INC RA ;0056: 1A LDA RA ;0057: 4A PLO R7 ;0058: A7 LDN R7 ;0059: 07 AND ;005A: F2 BZ R0067 ;005B: 32 67 INC R4 ;005D: 14 INC R4 ;005E: 14 LDI 07H ;005F: F8 07 PLO R6 ;0061: A6 LDI 04H ;0062: F8 04 SEX R6 ;0064: E6 BR R0036 ;0065: 30 36 R0067 SEQ ;0067: 7B SEX R6 ;0068: E6 BR R0037 ;0069: 30 37 R006B LDI 07H ;006B: F8 07 PLO R6 ;006D: A6 LDI 0A0H ;006E: F8 A0 PLO R7 ;0070: A7 LDN R7 ;0071: 07 ANI 02H ;0072: FA 02 BZ R007A ;0074: 32 7A LDN R6 ;0076: 06 ORI 02H ;0077: F9 02 STR R6 ;0079: 56 R007A LDI 66H ;007A: F8 66 PLO R6 ;007C: A6 LDI 20H ;007D: F8 20 BQ R0082 ;007F: 31 82 STR R6 ;0081: 56 R0082 SEX R0 ;0082: E0 RET ;0083: 70 DB 60H ;0084: 60 R0085 LDI 0A0H ;0085: F8 A0 PLO R7 ;0087: A7 LDN R7 ;0088: 07 SHR ;0089: F6 BDF R0085 ;008A: 33 85 LDI 0EH ;008C: F8 0E PHI R8 ;008E: B8 LDI 00H ;008F: F8 00 PHI RF ;0091: BF LDI 96H ;0092: F8 96 PLO RF ;0094: AF SEP RF ;0095: DF S0096 LDI 00H ;0096: F8 00 PHI R0 ;0098: B0 LDI 0FBH ;0099: F8 FB PLO R0 ;009B: A0 R009C BN4 R00A1 ;009C: 3F A1 LBR S1967 ;009E: C0 19 67 R00A1 DEC R8 ;00A1: 28 GHI R8 ;00A2: 98 BNZ R009C ;00A3: 3A 9C BQ R00B2 ;00A5: 31 B2 LDI 74H ;00A7: F8 74 PLO R6 ;00A9: A6 SEX R4 ;00AA: E4 R00AB LDXA ;00AB: 72 STR R6 ;00AC: 56 INC R6 ;00AD: 16 BNZ R00AB ;00AE: 3A AB PLO R7 ;00B0: A7 STR R7 ;00B1: 57 R00B2 LDI 33H ;00B2: F8 33 PLO RB ;00B4: AB LDI 18H ;00B5: F8 18 PHI RB ;00B7: BB SEP RB ;00B8: DB S00B9 BQ R00CB ;00B9: 31 CB LDI 22H ;00BB: F8 22 PLO R6 ;00BD: A6 SEX R6 ;00BE: E6 LDI 10H ;00BF: F8 10 STXD ;00C1: 73 LDI 02H ;00C2: F8 02 STXD ;00C4: 73 LDI 75H ;00C5: F8 75 STXD ;00C7: 73 LDI 40H ;00C8: F8 40 STR R6 ;00CA: 56 R00CB LDI 17H ;00CB: F8 17 PHI RB ;00CD: BB LDI 0B6H ;00CE: F8 B6 PLO RB ;00D0: AB SEP R0 ;00D1: D0 S00D2 BQ R00D9 ;00D2: 31 D9 LDI 4EH ;00D4: F8 4E PLO R6 ;00D6: A6 GHI R0 ;00D7: 90 STR R6 ;00D8: 56 R00D9 LDI 19H ;00D9: F8 19 PHI RB ;00DB: BB LDI 55H ;00DC: F8 55 PLO RB ;00DE: AB SEP RB ;00DF: DB S00E0 LDI 4FH ;00E0: F8 4F PLO R6 ;00E2: A6 LDI 0A2H ;00E3: F8 A2 PLO R7 ;00E5: A7 LDN R6 ;00E6: 06 LSQ ;00E7: CD LDI 80H ;00E8: F8 80 STR R6 ;00EA: 56 ANI 7FH ;00EB: FA 7F STR R7 ;00ED: 57 BQ R00F5 ;00EE: 31 F5 GHI R0 ;00F0: 90 PLO R6 ;00F1: A6 STR R6 ;00F2: 56 INC R6 ;00F3: 16 STR R6 ;00F4: 56 R00F5 LBR J0500 ;00F5: C0 05 00 DB 42H ;00F8: 42 DB 00H ;00F9: 00 DB 0FFH ;00FA: FF S00FB LDA RB ;00FB: 4B PLO R3 ;00FC: A3 SEP R3 ;00FD: D3 S00FE BR S00FB ;00FE: 30 FB DW S056B ;0100: 05 6B ; ADD TOS, NOS (opcode 00) DW S0572 ;0102: 05 72 ; SHL TOS (opcode 01) DW S0577 ;0104: 05 77 ; SUB TOS, NOS (opcode 02) DW S057E ;0106: 05 7E ; ADD TOS, 1 (opcode 03) DW S0582 ;0108: 05 82 ; ADD TOS, 2 (opcode 04) DW S058A ;010A: 05 8A ; ADD [TOS], NOS (opcode 05) DW S09F8 ;010C: 09 F8 ; MUL TOS, NOS (opcode 06) DW S0A23 ;010E: 0A 23 ; DIV TOS, NOS (opcode 07) DW S059D ;0110: 05 9D ; JZ aaaa forward (opcode 08) DW S05D5 ;0112: 05 D5 ; JZ aaaa backward (opcode 09) DW S05A5 ;0114: 05 A5 ; JP aaaa forward (opcode 0A) DW S05DD ;0116: 05 DD ; JP aaaa backward (opcode 0B) DW S05AF ;0118: 05 AF ; LOOP aaaa step=1 (opcode 0C) DW S05B1 ;011A: 05 B1 ; LOOP TOS, aaaa (opcode 0D) DW S05E7 ;011C: 05 E7 ; LOOP FRAME (opcode 0E) DW S05F2 ;011E: 05 F2 ; LOOP CLR (opcode 0F) DW S05FE ;0120: 05 FE ; EXEC TOS (opcode 10) DW S060F ;0122: 06 0F ; RET (opcode 11) DW S0615 ;0124: 06 15 ; AND TOS, NOS (opcode 12) DW S0627 ;0126: 06 27 ; ISZ TOS (opcode 13) DW S0635 ;0128: 06 35 ; ISNEG TOS (opcode 14) DW S0661 ;012A: 06 61 ; LD TOS, [TOS] (opcode 15) DW S0676 ;012C: 06 76 ; LD [TOS], NOS (opcode 16) DW S068A ;012E: 06 8A ; LD TOS.0, [TOS] (opcode 17) DB 00H ;0130: 00 DB 00H ;0131: 00 DW S0694 ;0132: 06 94 ; LD [TOS], NOS.0 (opcode 19) DW S0699 ;0134: 06 99 ; MCPY [NOS], [3OS] (opcode 1A) DB 00H ;0136: 00 DB 00H ;0137: 00 DW S06A5 ;0138: 06 A5 ; DROP (opcode 1C) DW S06A9 ;013A: 06 A9 ; OVER (opcode 1D) DW S06AD ;013C: 06 AD ; DUP (opcode 1E) DW S06B3 ;013E: 06 B3 ; DUPNZ (opcode 1F) DW S06BE ;0140: 06 BE ; SWAP (opcode 20) DW S06C6 ;0142: 06 C6 ; ROT (opcode 21) DW S06D0 ;0144: 06 D0 ; PUSH aaaa (opcode 22) DW S06D5 ;0146: 06 D5 ; PUSH kk (opcode 23) DW S06DF ;0148: 06 DF ; PUSH R (opcode 24) DW S06EA ;014A: 06 EA ; POPR (opcode 25) DW S06F1 ;014C: 06 F1 ; PUSHR (opcode 26) DW S0586 ;014E: 05 86 ; SUB TOS, 1 (opcode 27) DB 00H ;0150: 00 DB 00H ;0151: 00 DW S11A0 ;0152: 11 A0 ; NAVBK (opcode 29) DW S1280 ;0154: 12 80 ; LD TOS.0, [RP] (opcode 2A) DW S07F5 ;0156: 07 F5 ; STRCP (opcode 2B) DW S081D ;0158: 08 1D ; NUMCP (opcode 2C) DW S0815 ;015A: 08 15 ; NUMCZ (opcode 2D) DW S0875 ;015C: 08 75 ; LD [TOS], 0 (opcode 2E) DW S0879 ;015E: 08 79 ; LD [TOS], 1 (opcode 2F) DW S087D ;0160: 08 7D ; ADD [TOS], NOS.0 (opcode 30) DW S088B ;0162: 08 8B ; MCPY3 [TOS], [NOS] (opcode 31) DW S089C ;0164: 08 9C ; ADD24 [NOS], [TOS] (opcode 32) DW S0892 ;0166: 08 92 ; OR TOS, NOS (opcode 33) DW S08C8 ;0168: 08 C8 ; COMP (opcode 34) DW S08E2 ;016A: 08 E2 ; ADD TOS, [TOS] (opcode 35) DW S08AE ;016C: 08 AE ; LD24 [TOS], NOS (opcode 36) DW S07E3 ;016E: 07 E3 ; LDVCD [TOS] (opcode 37) DW S08E8 ;0170: 08 E8 ; MCPY [TOS], [NOS] (opcode 38) DW S10BA ;0172: 10 BA ; LDBNK [TOS] (opcode 39) DW S065D ;0174: 06 5D ; LD TOS, [aaaa] (opcode 3A) DW S0673 ;0176: 06 73 ; LD [aaaa], TOS (opcode 3B) DW S0686 ;0178: 06 86 ; LD TOS.0, [aaaa] (opcode 3C) DW S0691 ;017A: 06 91 ; LD [aaaa], TOS.0 (opcode 3D) DW S0B2D ;017C: 0B 2D ; LD TOS, [60bb] (opcode 3E) DW S0B33 ;017E: 0B 33 ; LD [60bb], TOS (opcode 3F) DW S0B2A ;0180: 0B 2A ; LD TOS.0, [60bb] (opcode 40) DW S0B30 ;0182: 0B 30 ; LD [60bb], TOS.0 (opcode 41) DW S0B36 ;0184: 0B 36 ; LD [60BD], kk (opcode 42) DW S072F ;0186: 07 2F ; DISP (opcode 43) DW S1848 ;0188: 18 48 ; LCD (opcode 44) DW S1A9C ;018A: 1A 9C ; DELAY (opcode 45) DW S0884 ;018C: 08 84 ; FILL (opcode 46) DW S08F1 ;018E: 08 F1 ; CKSUM (opcode 47) DW S0907 ;0190: 09 07 ; TOBCD (opcode 48) DW S0959 ;0192: 09 59 ; FMBCD (opcode 49) DB 00H ;0194: 00 DB 00H ;0195: 00 DW S0A72 ;0196: 0A 72 ; FMHEX (opcode 4B) DW S0AC1 ;0198: 0A C1 ; TOHEX (opcode 4C) DW S06F8 ;019A: 06 F8 ; ISLT (opcode 4D) DW S0700 ;019C: 07 00 ; ISGT (opcode 4E) DW S070F ;019E: 07 0F ; ISEQ (opcode 4F) DB 00H ;01A0: 00 DB 00H ;01A1: 00 DB 00H ;01A2: 00 DB 00H ;01A3: 00 DW S0647 ;01A4: 06 47 ; PUSH VE, kk (opcode 52) DW S067D ;01A6: 06 7D ; PUSH [VE].0, kk (opcode 53) DB 00H ;01A8: 00 DB 00H ;01A9: 00 DW S0654 ;01AA: 06 54 ; PUSH [VE], kk (opcode 55) DW S066A ;01AC: 06 6A ; POP [VE], kk (opcode 56) DW S061C ;01AE: 06 1C ; LDAND [aaaa], kk (opcode 57) DW S0888 ;01B0: 08 88 ; MCPY3 [aaaa],[mmmm] (opcode 58) DW S0899 ;01B2: 08 99 ; ADD24 [mmmm],[aaaa] (opcode 59) DW S156E ;01B4: 15 6E ; STBNK [aaaa], mmmm (opcode 5A) DW S15CC ;01B6: 15 CC ; LDBNK aaaa, [mmmm] (opcode 5B) DB 00H ;01B8: 00 DB 00H ;01B9: 00 DW S0B3C ;01BA: 0B 3C ; LD VC, TOS (opcode 5D) DW S0B10 ;01BC: 0B 10 ; LD TOS, VC (opcode 5E) DW S0B41 ;01BE: 0B 41 ; LD VD, TOS (opcode 5F) DW S0B15 ;01C0: 0B 15 ; LD TOS, VD (opcode 60) DW S0B46 ;01C2: 0B 46 ; LD VA, TOS (opcode 61) DW S0B1A ;01C4: 0B 1A ; LD TOS, VA (opcode 62) DW S0B4B ;01C6: 0B 4B ; LD VB, TOS (opcode 63) DW S0B1F ;01C8: 0B 1F ; LD TOS, VB (opcode 64) DB 00H ;01CA: 00 DB 00H ;01CB: 00 DW S05FF ;01CC: 05 FF ; CALLI [aaaa] (opcode 66) DW S12A8 ;01CE: 12 A8 ; LD VE, [RP] (opcode 67) DB 00H ;01D0: 00 DB 00H ;01D1: 00 DB 00H ;01D2: 00 DB 00H ;01D3: 00 DW S12A0 ;01D4: 12 A0 ; LD TOS, [RP] (opcode 6A) DW S11A2 ;01D6: 11 A2 ; SETBK (opcode 6B) DB 00H ;01D8: 00 DB 00H ;01D9: 00 DB 00H ;01DA: 00 DB 00H ;01DB: 00 DW S09B6 ;01DC: 09 B6 ; SUB24 [NOS],[TOS] (opcode 6E) DW S0A4D ;01DE: 0A 4D ; ADD24 [NOS], TOS (opcode 6F) DW S0A63 ;01E0: 0A 63 ; SUB24 [NOS], TOS (opcode 70) DB 0FFH ;01E2: FF DB 0FFH ;01E3: FF DW S212E ;01E4: 21 2E ; PUSH 0000 (opcode 72) DW S2132 ;01E6: 21 32 ; PUSH 0001 (opcode 73) DW S2136 ;01E8: 21 36 ; PUSH 0002 (opcode 74) DW S213A ;01EA: 21 3A ; PUSH 0003 (opcode 75) DW S213E ;01EC: 21 3E ; PUSH FFFF (opcode 76) DB 0FFH ;01EE: FF DB 0FFH ;01EF: FF DB 0FFH ;01F0: FF DB 0FFH ;01F1: FF DB 0FFH ;01F2: FF DB 0FFH ;01F3: FF DB 0FFH ;01F4: FF DB 0FFH ;01F5: FF DB 0FFH ;01F6: FF DB 0FFH ;01F7: FF DB 0FFH ;01F8: FF DB 0FFH ;01F9: FF DB 0FFH ;01FA: FF DB 0FFH ;01FB: FF DB 0FFH ;01FC: FF DB 0FFH ;01FD: FF DW S0BE3 ;01FE: 0B E3 ; NOOP (opcode 7F) ; ====================================================================== ; DISPATCH ENTRY-POINT ROUTINES (Page 0x02) ; ====================================================================== ; These routines are reached via the entry-point selector byte at each ; handler address. The dispatch loop loads the first byte into R3.0 and ; executes SEP R3, jumping to 0x02xx. After setup, each routine returns ; to the handler body via SEP RB. ; ; Via: 1st = first-byte dispatch, 2nd = second-stage via A4/03, ; R0 = SEP R0 trampoline (0x00FE->LDA RB->PLO R3->SEP R3) ; ====================================================================== ; --- Entry 0x00 (via R0) ---------------------------------------------- ; Function: ; SEX R6 trampoline: sets X=R6, reads next handler byte as second ; dispatch (LDA RB->PLO R3) ; Details: ; SEX R6 (E6); LDA RB->PLO R3 (4B A3). Sets X=R6 so subsequent LDXA ; reads from M(R6). Then jumps to second-level entry. Used by entry 0x94 ; to redirect parameter reads to variable area. ; ---------------------------------------------------------------------- SEX R6 ;0200: E6 LDA RB ;0201: 4B PLO R3 ;0202: A3 S0203 ; --- Entry 0x03 (via 1st) --------------------------------------------- ; Function: ; MUL setup: SEX RB, two-level dispatch via LDA RB->PLO R3 to entry 0xB7 ; (pop operand) ; Details: ; SEX RB (EB); LDA RB->PLO R3 (4B A3). Reads one byte from handler body ; as second-level entry selector. X=RB so second-level entry can read ; more params via LDXA. Used by MUL (opcode 06). ; ---------------------------------------------------------------------- SEX RB ;0203: EB LDA RB ;0204: 4B PLO R3 ;0205: A3 S0206 ; --- Entry 0x06 (via 1st) --------------------------------------------- ; Function: ; Pop TOS into R9, set X=RD, return to handler body ; Details: ; LDA RD->PHI R9 (4D B9); LDA RD (4D, D=TOS.low); INC RD (1D); SEX RD ; (ED); SEP RB (DB). Pops 16-bit TOS into R9, leaves X=RD pointing at ; NOS. ; ---------------------------------------------------------------------- LDA RD ;0206: 4D PHI R9 ;0207: B9 LDA RD ;0208: 4D INC RD ;0209: 1D SEX RD ;020A: ED S020B ; --- Entry 0x0B (via 1st) --------------------------------------------- ; Function: ; Direct execute: SEP RB immediately (no setup) ; Details: ; SEP RB (DB). Immediately returns to handler body. No setup performed. ; ---------------------------------------------------------------------- SEP RB ;020B: DB S020C ; --- Entry 0x0C (via 1st) --------------------------------------------- ; Function: ; Add inline 2-byte constant to TOS (reads low,high from handler body ; via LDA RB) ; Details: ; LDA RB (4B, reads constant.low); INC RD; SEX RD; ADD; STXD (adds to ; TOS.low); LDA RB (4B, reads constant.high); ADC; STR RD (adds with ; carry to TOS.high); SEP RB. Reads 2-byte little-endian constant from ; handler body, adds to TOS in place. ; ---------------------------------------------------------------------- LDA RB ;020C: 4B INC RD ;020D: 1D SEX RD ;020E: ED ADD ;020F: F4 STXD ;0210: 73 LDA RB ;0211: 4B ADC ;0212: 74 STR RD ;0213: 5D SEP RB ;0214: DB S0215 ; --- Entry 0x15 (via R0) ---------------------------------------------- ; Function: ; CALL: push RC to return stack (R2), set RC = RB ; Details: ; GLO RC (8C); DEC R2 (22); STR R2 (52); GHI RC (9C); DEC R2; STR R2. ; Pushes RC to return stack. Then GHI RB->PHI RC; GLO RB->PLO RC; SEP RF. ; Sets bytecode PC to handler address (computed CALL). ; ---------------------------------------------------------------------- GLO RC ;0215: 8C DEC R2 ;0216: 22 S0217 STR R2 ;0217: 52 GHI RC ;0218: 9C DEC R2 ;0219: 22 STR R2 ;021A: 52 GHI RB ;021B: 9B PHI RC ;021C: BC GLO RB ;021D: 8B PLO RC ;021E: AC SEP RF ;021F: DF S0220 ; --- Entry 0x20 (via 1st/R0) ------------------------------------------ ; Function: ; Push 2-byte constant from handler body (reads high,low via LDA RB) ; onto data stack ; Details: ; LDA RB->PHI R9 (4B B9, high byte); LDA RB (4B, low byte); DEC RD; STR ; RD; GHI R9; DEC RD; STR RD; SEP RB. Reads 2-byte big-endian constant ; from handler body, pushes to data stack. ; ---------------------------------------------------------------------- LDA RB ;0220: 4B PHI R9 ;0221: B9 LDA RB ;0222: 4B DEC RD ;0223: 2D STR RD ;0224: 5D GHI R9 ;0225: 99 DEC RD ;0226: 2D STR RD ;0227: 5D S0228 ; --- Entry 0x28 (via 1st) --------------------------------------------- ; Function: ; Immediate return: SEP RF (no-op, returns to interpreter) ; Details: ; SEP RF (DF). Returns directly to interpreter loop. Used by NOOP ; (opcode 7F). ; ---------------------------------------------------------------------- SEP RF ;0228: DF S0229 ; --- Entry 0x29 (via 1st/R0) ------------------------------------------ ; Function: ; Push zero (0x0000) onto data stack ; Details: ; GHI R0 (90, =0x00); DEC RD; STR RD; GHI R0; DEC RD; STR RD; SEP RB. ; Pushes 0x0000. ; ---------------------------------------------------------------------- GHI R0 ;0229: 90 SKP ;022A: 38 S022B ; --- Entry 0x2B (via 1st/R0) ------------------------------------------ ; Function: ; Push one (0x0001) onto data stack ; Details: ; GHI RE (9E, =0x01); DEC RD; STR RD; GHI R0 (90, =0x00); DEC RD; STR ; RD; SEP RB. Pushes 0x0001. RE.1 is always 0x01 (dispatch table page). ; ---------------------------------------------------------------------- GHI RE ;022B: 9E DEC RD ;022C: 2D STR RD ;022D: 5D J022E GHI R0 ;022E: 90 DEC RD ;022F: 2D STR RD ;0230: 5D SEP RB ;0231: DB S0232 ; --- Entry 0x32 (via 1st/R0) ------------------------------------------ ; Function: ; Indirect call: pop address from TOS, read entry byte, dispatch to ; handler ; Details: ; LDA RD->PHI RB; LDA RD->PLO RB (pops address from TOS into RB); DEC ; RB; LDA RB->PLO R3 (reads entry byte at target-1, RB advances to ; target); SEP R3->jumps to entry. ; ---------------------------------------------------------------------- LDA RD ;0232: 4D PHI RB ;0233: BB LDA RD ;0234: 4D PLO RB ;0235: AB DEC RB ;0236: 2B LDA RB ;0237: 4B PLO R3 ;0238: A3 S0239 ; --- Entry 0x39 (via R0) ---------------------------------------------- ; Function: ; Byte copy loop: copies R8.0 bytes from M(RA) to M(R9) ; Details: ; DEC R8 (28); LDA RA (4A); STR R9 (59); INC R9 (19); GLO R8 (88); BNZ ; loop (3A). Copies R8.0 bytes from M(RA) to M(R9), both pointers ; advance. ; ---------------------------------------------------------------------- DEC R8 ;0239: 28 LDA RA ;023A: 4A STR R9 ;023B: 59 INC R9 ;023C: 19 S023D ; --- Entry 0x3D (via R0) ---------------------------------------------- ; Function: ; Byte copy loop mid-entry: enters copy at count-check (skips initial ; DEC R8) ; Details: ; GLO R8 (88); BNZ->enters 0239 loop body. Skips initial DEC R8. Used ; when count already correct (no off-by-one needed). ; ---------------------------------------------------------------------- GLO R8 ;023D: 88 BNZ S0239 ;023E: 3A 39 SEP RB ;0240: DB SEX R9 ;0241: E9 BR R0248 ;0242: 30 48 R0244 DEC R8 ;0244: 28 LDN RA ;0245: 0A STXD ;0246: 73 DEC RA ;0247: 2A R0248 GLO R8 ;0248: 88 BNZ R0244 ;0249: 3A 44 SEP RB ;024B: DB R024C DEC R8 ;024C: 28 GLO RA ;024D: 8A STR R9 ;024E: 59 INC R9 ;024F: 19 S0250 ; --- Entry 0x50 (via R0) ---------------------------------------------- ; Function: ; Fill loop: fills R8.0 bytes at M(R9) with RA.0 ; Details: ; GLO R8; BNZ; DEC R8; GLO RA (8A); STR R9 (59); INC R9 (19); loop. ; Fills R8.0 bytes at M(R9) with value in RA.0. ; ---------------------------------------------------------------------- GLO R8 ;0250: 88 BNZ R024C ;0251: 3A 4C SEP RB ;0253: DB S0254 ; --- Entry 0x54 (via R0) ---------------------------------------------- ; Function: ; Store RA to var C (0x6056/57) via X=R6 ; Details: ; LDI 56; PLO R6 (R6=0x6056=VA); SEX R6; GLO RA; STXD; GHI RA; STXD; SEP ; RB. Stores 16-bit RA to variable C address. ; ---------------------------------------------------------------------- LDI 54H ;0254: F8 54 PLO R6 ;0256: A6 SEX R6 ;0257: E6 SKP ;0258: 38 S0259 ; --- Entry 0x59 (via R0) ---------------------------------------------- ; Function: ; Push RA to data stack (SEX RD; STXD x2) ; Details: ; SEX RD (ED); GLO RA (8A); STXD (73); GHI RA (9A); STXD (73); SEP RB ; (DB). Pushes 16-bit RA onto data stack. ; ---------------------------------------------------------------------- SEX RD ;0259: ED S025A ; --- Entry 0x5A (via R0) ---------------------------------------------- ; Function: ; Store RA via STXD x2 (no SEX, uses current X) ; ---------------------------------------------------------------------- GLO RA ;025A: 8A STXD ;025B: 73 GHI RA ;025C: 9A STXD ;025D: 73 SEP RB ;025E: DB S025F ; --- Entry 0x5F (via R0) ---------------------------------------------- ; Function: ; Store R9 via STXD x2 (no SEX, uses current X) ; ---------------------------------------------------------------------- SKP ;025F: 38 S0260 ; --- Entry 0x60 (via R0) ---------------------------------------------- ; Function: ; Push R9 to data stack (SEX RD; STXD x2) ; Details: ; SEX RD (ED); GLO R9 (89); STXD (73); GHI R9 (99); STXD (73); SEP RB ; (DB). Pushes 16-bit R9 onto data stack. ; ---------------------------------------------------------------------- SEX RD ;0260: ED GLO R9 ;0261: 89 STXD ;0262: 73 GHI R9 ;0263: 99 STXD ;0264: 73 SEP RB ;0265: DB S0266 ; --- Entry 0x66 (via 1st/R0) ------------------------------------------ ; Function: ; Pop TOS into R9 (SEX RD; LDXA x2) ; Details: ; SEX RD (ED); LDXA->PHI R9 (72 B9); LDXA->PLO R9 (72 A9); SEP RB (DB). ; Pops 16-bit TOS into R9. ; ---------------------------------------------------------------------- SEX RD ;0266: ED S0267 ; --- Entry 0x67 (via R0) ---------------------------------------------- ; Function: ; Pop TOS into R9 (no SEX, uses current X) ; ---------------------------------------------------------------------- LDXA ;0267: 72 PHI R9 ;0268: B9 LDXA ;0269: 72 PLO R9 ;026A: A9 SEP RB ;026B: DB S026C ; --- Entry 0x6C (via 1st/R0) ------------------------------------------ ; Function: ; Pop TOS into R8 (SEX RD; LDXA x2) ; Details: ; SEX RD (ED); LDXA->PHI R8 (72 B8); LDXA->PLO R8 (72 A8); SEP RB (DB). ; Pops 16-bit TOS into R8. ; ---------------------------------------------------------------------- SEX RD ;026C: ED S026D ; --- Entry 0x6D (via R0) ---------------------------------------------- ; Function: ; Pop TOS into R8 (no SEX, uses current X) ; ---------------------------------------------------------------------- LDXA ;026D: 72 PHI R8 ;026E: B8 LDXA ;026F: 72 PLO R8 ;0270: A8 SEP RB ;0271: DB S0272 ; --- Entry 0x72 (via 1st) --------------------------------------------- ; Function: ; Load R9 from M(6051/52), RA from M(6053/54), set X=R6 ; Details: ; LDI 51; PLO R6; SEX R6. Reads M(6051)->R9.high, M(6052)->R9.low, ; M(6053)->RA.high, M(6054)->RA.low. Restores ROMCPY post-state ; pointers. ; ---------------------------------------------------------------------- LDI 51H ;0272: F8 51 PLO R6 ;0274: A6 SEX R6 ;0275: E6 BR S027F ;0276: 30 7F S0278 ; --- Entry 0x78 (via 1st) --------------------------------------------- ; Function: ; Pop 3 values: TOS->R8, NOS->R9, 3OS->RA; set X=RD ; Details: ; SEX RD; LDXA->PHI R8; LDXA->PLO R8; SKP; (entry 027E body follows). ; Pops TOS->R8, then falls into 027E to pop NOS->R9, 3OS->RA. ; ---------------------------------------------------------------------- SEX RD ;0278: ED LDXA ;0279: 72 PHI R8 ;027A: B8 LDXA ;027B: 72 PLO R8 ;027C: A8 SKP ;027D: 38 S027E ; --- Entry 0x7E (via 1st/R0) ------------------------------------------ ; Function: ; Pop TOS->R9, NOS->RA (SEX RD; LDXA x4) ; Details: ; SEX RD (ED); LDXA->PHI R9; LDXA->PLO R9; SKP; LDXA->PHI RA; LDXA->PLO ; RA; SKP; SEP RB. Pops TOS->R9, NOS->RA. SKP bytes provide alignment. ; ---------------------------------------------------------------------- SEX RD ;027E: ED S027F ; --- Entry 0x7F (via 2nd) --------------------------------------------- ; Function: ; Read R9 and RA from current X (no SEX, LDXA x4) ; ---------------------------------------------------------------------- LDXA ;027F: 72 PHI R9 ;0280: B9 LDXA ;0281: 72 PLO R9 ;0282: A9 SKP ;0283: 38 S0284 ; --- Entry 0x84 (via 1st/R0) ------------------------------------------ ; Function: ; Pop TOS into RA (SEX RD; LDXA x2) ; Details: ; SEX RD (ED); LDXA->PHI RA; LDXA->PLO RA; SKP; SEP RB. Pops TOS into ; RA. ; ---------------------------------------------------------------------- SEX RD ;0284: ED S0285 ; --- Entry 0x85 (via 2nd/R0) ------------------------------------------ ; Function: ; Read 16-bit into RA (no SEX, LDXA x2). Via A4: reads from bytecode ; (X=RC) ; Details: ; LDXA->PHI RA (72 BA); LDXA->PLO RA (72 AA); SKP; SEP RB. Reads 16-bit ; into RA from current X (no SEX). When X=RC (via A4): reads 2 bytecode ; params. ; ---------------------------------------------------------------------- LDXA ;0285: 72 PHI RA ;0286: BA LDXA ;0287: 72 PLO RA ;0288: AA SKP ;0289: 38 S028A ; --- Entry 0x8A (via 1st/R0) ------------------------------------------ ; Function: ; SEX RD: set X=RD (data stack), return to handler body ; Details: ; SEX RD (ED); SEP RB (DB). Sets X to data stack pointer, returns. ; ---------------------------------------------------------------------- SEX RD ;028A: ED S028B ; --- Entry 0x8B (via 1st) --------------------------------------------- ; Function: ; Direct execute: SEP RB immediately (same as 0B) ; Details: ; SEP RB (DB). Same as 0x0B — immediately returns to handler body. ; ---------------------------------------------------------------------- SEP RB ;028B: DB S028C ; --- Entry 0x8C (via 1st) --------------------------------------------- ; Function: ; OVER setup: skip TOS, read NOS into R9.1/D, restore RD ; Details: ; INC RD; INC RD (skip TOS); LDA RD->PHI R9 (NOS.high); LDN RD (NOS.low, ; D=low); DEC RD; DEC RD; DEC RD (restore). SEP RB. Peeks at NOS without ; popping. ; ---------------------------------------------------------------------- INC RD ;028C: 1D INC RD ;028D: 1D S028E ; --- Entry 0x8E (via 1st) --------------------------------------------- ; Function: ; DUP setup: read TOS into R9.1/D, move RD down by 2 ; Details: ; LDA RD->PHI R9; LDN RD (reads TOS into R9.1/D); DEC RD; DEC RD; DEC RD ; (moves RD down by 2 for new TOS slot). SEP RB. ; ---------------------------------------------------------------------- LDA RD ;028E: 4D PHI R9 ;028F: B9 LDN RD ;0290: 0D DEC RD ;0291: 2D DEC RD ;0292: 2D SEP RB ;0293: DB S0294 ; --- Entry 0x94 (via 1st) --------------------------------------------- ; Function: ; Variable indirect: SEX RB, LDXA->R6.0, LDA RB->PLO R3 (3 bytes ; consumed) ; Details: ; SEX RB (EB); LDXA->PLO R6 (72 A6, reads byte 1 from handler); LDA ; RB->PLO R3 (4B A3, reads byte 2 as second dispatch). Byte 2 typically ; 0x00 (which reads byte 3) or 0x0B (direct return). Total: 2-3 bytes ; consumed from handler body. ; ---------------------------------------------------------------------- SEX RB ;0294: EB LDXA ;0295: 72 PLO R6 ;0296: A6 LDA RB ;0297: 4B PLO R3 ;0298: A3 S0299 ; --- Entry 0x99 (via R0) ---------------------------------------------- ; Function: ; Add M(RA) to RA (16-bit): SEX RA; GLO RA; ADD; PLO RA; ADCI 00; PHI RA ; Details: ; SEX RA (EA); GLO RA (8A); ADD (F4); PLO RA (AA); GHI RA (9A); ADCI 00 ; (7C 00); PHI RA (BA); SEP RB (DB). RA = RA + M(RA) with 16-bit carry. ; ---------------------------------------------------------------------- SEX RA ;0299: EA S029A ; --- Entry 0x9A (via R0) ---------------------------------------------- ; Function: ; Add M(X) to RA (16-bit): GLO RA; ADD; PLO RA; ADCI 00; PHI RA ; Details: ; GLO RA (8A); ADD (F4); PLO RA (AA); GHI RA (9A); ADCI 00 (7C 00); PHI ; RA (BA); SEP RB (DB). RA = RA + M(X) with carry. X must be set before ; calling. ; ---------------------------------------------------------------------- GLO RA ;029A: 8A ADD ;029B: F4 PLO RA ;029C: AA GHI RA ;029D: 9A ADCI 00H ;029E: 7C 00 PHI RA ;02A0: BA SEP RB ;02A1: DB BR S029A ;02A2: 30 9A S02A4 ; --- Entry 0xA4 (via 1st) --------------------------------------------- ; Function: ; SEX RC trampoline: sets X=RC, reads next handler byte as second ; dispatch ; Details: ; SEX RC (EC); LDA RB->PLO R3 (4B A3). Sets X=RC (bytecode stream), ; reads 1 byte from handler body as second dispatch selector. ; Second-level entry then reads params from bytecode via LDXA (X=RC). ; ---------------------------------------------------------------------- SEX RC ;02A4: EC LDA RB ;02A5: 4B PLO R3 ;02A6: A3 S02A7 ; --- Entry 0xA7 (via 2nd/R0) ------------------------------------------ ; Function: ; Read 16-bit from M(60xx) and push to data stack ; ---------------------------------------------------------------------- LDXA ;02A7: 72 PLO R6 ;02A8: A6 LDA R6 ;02A9: 46 R02AA PLO RE ;02AA: AE DEC RD ;02AB: 2D LDN R6 ;02AC: 06 STR RD ;02AD: 5D DEC RD ;02AE: 2D GLO RE ;02AF: 8E STR RD ;02B0: 5D SEP RB ;02B1: DB ; --- Entry 0xB2 (via 2nd) --------------------------------------------- ; Function: ; Read byte from M(60xx), zero-extend, push to data stack ; ---------------------------------------------------------------------- LDXA ;02B2: 72 PLO R6 ;02B3: A6 GHI R0 ;02B4: 90 BR R02AA ;02B5: 30 AA S02B7 ; --- Entry 0xB7 (via 2nd/R0) ------------------------------------------ ; Function: ; Pop 16-bit from data stack and store to M(60xx) ; ---------------------------------------------------------------------- LDXA ;02B7: 72 PLO R6 ;02B8: A6 LDA RD ;02B9: 4D STR R6 ;02BA: 56 INC R6 ;02BB: 16 R02BC LDA RD ;02BC: 4D STR R6 ;02BD: 56 J02BE SEP RB ;02BE: DB ; --- Entry 0xBF (via 2nd) --------------------------------------------- ; Function: ; Pop TOS low byte only, store to M(60xx) ; ---------------------------------------------------------------------- LDXA ;02BF: 72 PLO R6 ;02C0: A6 INC RD ;02C1: 1D BR R02BC ;02C2: 30 BC DB 0FFH ;02C4: FF DB 0FFH ;02C5: FF DB 0FFH ;02C6: FF DB 0FFH ;02C7: FF DB 0FFH ;02C8: FF DB 0FFH ;02C9: FF S02CA ; --- Entry 0xCA (via 1st/R0) ------------------------------------------ ; Function: ; Setup: reads 2 bytes from handler body into R6.0 and R7.0 ; Details: ; LDA RB->PLO R6 (4B A6); LDA RB->PLO R7 (4B A7); SEP RB (DB). Reads 2 ; bytes from handler body into R6.0 (RAM shadow addr) and R7.0 (HW ; register addr). ; ---------------------------------------------------------------------- LDA RB ;02CA: 4B PLO R6 ;02CB: A6 LDA RB ;02CC: 4B PLO R7 ;02CD: A7 SEP RB ;02CE: DB S02CF ; --- Entry 0xCF (via R0) ---------------------------------------------- ; Function: ; Set bits in HW register: OR mask with M(R6), store to M(R6) and M(R7) ; Details: ; SEX R6 (E6); LDA RB (4B, mask byte); OR (F1); STR R6 (56); STR R7 ; (57); SEP RB (DB). ORs mask into both RAM shadow M(R6) and HW register ; M(R7). ; ---------------------------------------------------------------------- SEX R6 ;02CF: E6 LDA RB ;02D0: 4B OR ;02D1: F1 R02D2 STR R6 ;02D2: 56 STR R7 ;02D3: 57 J02D4 SEP RB ;02D4: DB S02D5 ; --- Entry 0xD5 (via R0) ---------------------------------------------- ; Function: ; Clear bits in HW register: invert mask, AND with M(R6), store to M(R6) ; and M(R7) ; Details: ; SEX R6 (E6); LDA RB (4B, mask); XRI FF (FB FF); AND (F2); STR R6 (56); ; STR R7 (57); SEP RB. Inverts mask and ANDs — clears specified bits in ; both shadow and HW register. ; ---------------------------------------------------------------------- SEX R6 ;02D5: E6 LDA RB ;02D6: 4B XRI 0FFH ;02D7: FB FF AND ;02D9: F2 BR R02D2 ;02DA: 30 D2 DB 0FFH ;02DC: FF DB 0FFH ;02DD: FF DB 0FFH ;02DE: FF DB 0FFH ;02DF: FF DB 0FFH ;02E0: FF DB 0FFH ;02E1: FF DB 0FFH ;02E2: FF DB 0FFH ;02E3: FF DB 0FFH ;02E4: FF DB 0FFH ;02E5: FF DB 0FFH ;02E6: FF DB 0FFH ;02E7: FF S02E8 ; --- Entry 0xE8 (via R0) ---------------------------------------------- ; Function: ; Jump to 0x03A7: ROM data field decoder ; Details: ; LBR 03A7. Jumps to ROM data field decoder. Processes encoded bytes at ; M(RA), extracts fields via shifts/masks. ; ---------------------------------------------------------------------- LBR J03A7 ;02E8: C0 03 A7 S02EB ; --- Entry 0xEB (via R0) ---------------------------------------------- ; Function: ; Jump to 0x03DA: banked address decoder (3-byte format) ; Details: ; LBR 03DA. Jumps to banked address decoder. Reads 3-byte address format ; from M(RA), sets up bank registers and physical address. ; ---------------------------------------------------------------------- LBR J03DA ;02EB: C0 03 DA LBR J046B ;02EE: C0 04 6B LBR J04AE ;02F1: C0 04 AE S02F4 ; --- Entry 0xF4 (via R0) ---------------------------------------------- ; Function: ; Jump to 0x0451: bank register update (window 2, 0x3FC0-0x3FC3) ; Details: ; LBR 0451. Computes bank register values from M(604E) counter: SHL x2 ; (multiply by 4), writes counter*4+0/1/2/3 to 0x3FC0-3FC3. ; ---------------------------------------------------------------------- LBR J0451 ;02F4: C0 04 51 S02F7 ; --- Entry 0xF7 (via R0) ---------------------------------------------- ; Function: ; Jump to 0x042C: page advance (window 1 or 2 bank increment) ; Details: ; LBR 042C. Checks RA.1: if <0x60 (window 1): increments M(604F), writes ; to M(3FA2), resets RA.1=0x40. If ==0x00 (window 2): increments ; M(604E), updates all 4 bank regs, resets RA.1=0x80. ; ---------------------------------------------------------------------- LBR J042C ;02F7: C0 04 2C S02FA ; --- Entry 0xFA (via R0) ---------------------------------------------- ; Function: ; Jump to 0x0300: MUL loop (shift-and-add multiply) ; Details: ; LBR 0300. MUL shift-and-add loop: shifts product left (SHL+SHLC across ; multi-byte), shifts multiplier left (MSB->DF), if DF=1 adds ; multiplicand to product (ADC chain). Loops R8.0 times. ; ---------------------------------------------------------------------- LBR J0300 ;02FA: C0 03 00 S02FD ; --- Entry 0xFD (via R0) ---------------------------------------------- ; Function: ; Jump to 0x0347: DIV loop (restoring division) ; Details: ; LBR 0347. DIV restoring loop: shifts quotient/dividend left, ; trial-subtracts divisor via SDB chain. If borrow (DF=0): restores by ; adding back. If no borrow: sets quotient bit. Loops R8.0 times. ; ---------------------------------------------------------------------- LBR J0347 ;02FD: C0 03 47 J0300 GHI R6 ;0300: 96 PHI RA ;0301: BA PHI R4 ;0302: B4 PHI R9 ;0303: B9 R0304 LDI 47H ;0304: F8 47 PLO R4 ;0306: A4 SEX R4 ;0307: E4 GHI R8 ;0308: 98 SHL ;0309: FE PLO RE ;030A: AE SHR ;030B: F6 R030C LDN R4 ;030C: 04 SHLC ;030D: 7E STXD ;030E: 73 DEC RE ;030F: 2E S0310 GLO RE ;0310: 8E BNZ R030C ;0311: 3A 0C LDI 2FH ;0313: F8 2F PLO RA ;0315: AA SEX RA ;0316: EA GHI R8 ;0317: 98 PLO RE ;0318: AE GHI R0 ;0319: 90 SHR ;031A: F6 R031B LDN RA ;031B: 0A SHLC ;031C: 7E STXD ;031D: 73 DEC RE ;031E: 2E GLO RE ;031F: 8E BNZ R031B ;0320: 3A 1B BNF R0340 ;0322: 3B 40 LDI 37H ;0324: F8 37 PLO R9 ;0326: A9 LDI 47H ;0327: F8 47 PLO R4 ;0329: A4 GHI R8 ;032A: 98 PLO RE ;032B: AE GHI R0 ;032C: 90 SHR ;032D: F6 SEX R4 ;032E: E4 R032F LDN R9 ;032F: 09 ADC ;0330: 74 STXD ;0331: 73 DEC R9 ;0332: 29 DEC RE ;0333: 2E GLO RE ;0334: 8E BNZ R032F ;0335: 3A 2F GHI R8 ;0337: 98 PLO RE ;0338: AE R0339 GHI R0 ;0339: 90 ADC ;033A: 74 STXD ;033B: 73 DEC RE ;033C: 2E GLO RE ;033D: 8E BNZ R0339 ;033E: 3A 39 R0340 DEC R8 ;0340: 28 GLO R8 ;0341: 88 BNZ R0304 ;0342: 3A 04 LBR S020B ;0344: C0 02 0B J0347 GHI R6 ;0347: 96 PHI RA ;0348: BA PHI R9 ;0349: B9 PHI R4 ;034A: B4 DEC RD ;034B: 2D GHI R8 ;034C: 98 SDI 47H ;034D: FD 47 STR RD ;034F: 5D R0350 GHI R8 ;0350: 98 PLO RE ;0351: AE LDI 2FH ;0352: F8 2F PLO RA ;0354: AA GHI R0 ;0355: 90 SHR ;0356: F6 SEX RA ;0357: EA R0358 LDN RA ;0358: 0A SHLC ;0359: 7E STXD ;035A: 73 DEC RE ;035B: 2E GLO RE ;035C: 8E BNZ R0358 ;035D: 3A 58 GHI R8 ;035F: 98 SHL ;0360: FE PLO RE ;0361: AE LDI 47H ;0362: F8 47 PLO R4 ;0364: A4 SEX R4 ;0365: E4 GHI R0 ;0366: 90 SHR ;0367: F6 R0368 LDN R4 ;0368: 04 SHLC ;0369: 7E STXD ;036A: 73 DEC RE ;036B: 2E GLO RE ;036C: 8E BNZ R0368 ;036D: 3A 68 LDI 37H ;036F: F8 37 PLO R9 ;0371: A9 GHI R8 ;0372: 98 PLO RE ;0373: AE LDN RD ;0374: 0D PLO R4 ;0375: A4 GHI RE ;0376: 9E SHR ;0377: F6 SEX R4 ;0378: E4 R0379 LDN R9 ;0379: 09 SDB ;037A: 75 STXD ;037B: 73 DEC R9 ;037C: 29 DEC RE ;037D: 2E GLO RE ;037E: 8E BNZ R0379 ;037F: 3A 79 LDI 37H ;0381: F8 37 PLO R9 ;0383: A9 LDN RD ;0384: 0D PLO R4 ;0385: A4 GHI R8 ;0386: 98 PLO RE ;0387: AE BNF R0397 ;0388: 3B 97 SEX RA ;038A: EA LDI 2FH ;038B: F8 2F PLO RA ;038D: AA R038E GHI R0 ;038E: 90 ADC ;038F: 74 STXD ;0390: 73 DEC RE ;0391: 2E GLO RE ;0392: 8E BNZ R038E ;0393: 3A 8E BR R039F ;0395: 30 9F R0397 LDN R9 ;0397: 09 ADC ;0398: 74 STXD ;0399: 73 DEC R9 ;039A: 29 DEC RE ;039B: 2E GLO RE ;039C: 8E BNZ R0397 ;039D: 3A 97 R039F DEC R8 ;039F: 28 GLO R8 ;03A0: 88 BNZ R0350 ;03A1: 3A 50 INC RD ;03A3: 1D LBR S020B ;03A4: C0 02 0B J03A7 LDN RA ;03A7: 0A SHL ;03A8: FE BNF R03C4 ;03A9: 3B C4 SEX RA ;03AB: EA LDA RA ;03AC: 4A SHL ;03AD: FE SHL ;03AE: FE SHL ;03AF: FE SHL ;03B0: FE SHL ;03B1: FE ADD ;03B2: F4 SMI 40H ;03B3: FF 40 STXD ;03B5: 73 LDN RA ;03B6: 0A ANI 7FH ;03B7: FA 7F SHR ;03B9: F6 SHR ;03BA: F6 SHR ;03BB: F6 ORI 80H ;03BC: F9 80 STR RA ;03BE: 5A INC RA ;03BF: 1A INC RA ;03C0: 1A LBR J02D4 ;03C1: C0 02 D4 R03C4 LDN RA ;03C4: 0A SHR ;03C5: F6 BNF R03D4 ;03C6: 3B D4 ADI 01H ;03C8: FC 01 STR RA ;03CA: 5A INC RA ;03CB: 1A LDN RA ;03CC: 0A SMI 80H ;03CD: FF 80 STR RA ;03CF: 5A INC RA ;03D0: 1A LBR J02D4 ;03D1: C0 02 D4 R03D4 STR RA ;03D4: 5A INC RA ;03D5: 1A INC RA ;03D6: 1A LBR J02D4 ;03D7: C0 02 D4 J03DA LDN RA ;03DA: 0A SHL ;03DB: FE LBNF J0405 ;03DC: CB 04 05 LDI 4FH ;03DF: F8 4F PLO R6 ;03E1: A6 LDI 0A2H ;03E2: F8 A2 PLO R7 ;03E4: A7 SEX R6 ;03E5: E6 LDA RA ;03E6: 4A SHL ;03E7: FE SHL ;03E8: FE SHL ;03E9: FE ORI 80H ;03EA: F9 80 STR R6 ;03EC: 56 LDN RA ;03ED: 0A SHR ;03EE: F6 SHR ;03EF: F6 SHR ;03F0: F6 SHR ;03F1: F6 SHR ;03F2: F6 ADD ;03F3: F4 STR R6 ;03F4: 56 LDA RA ;03F5: 4A ANI 1FH ;03F6: FA 1F ADI 40H ;03F8: FC 40 DEC RD ;03FA: 2D STR RD ;03FB: 5D LDN RA ;03FC: 0A PLO RA ;03FD: AA LDA RD ;03FE: 4D PHI RA ;03FF: BA LDN R6 ;0400: 06 STR R7 ;0401: 57 LBR J02D4 ;0402: C0 02 D4 J0405 LDI 4EH ;0405: F8 4E PLO R6 ;0407: A6 LDI 0C0H ;0408: F8 C0 PLO R7 ;040A: A7 LDA RA ;040B: 4A SHL ;040C: FE PLO R4 ;040D: A4 BZ R0419 ;040E: 32 19 LDN RA ;0410: 0A SHL ;0411: FE BDF R0415 ;0412: 33 15 DEC R4 ;0414: 24 R0415 LDA RA ;0415: 4A ORI 80H ;0416: F9 80 SKP ;0418: 38 R0419 LDA RA ;0419: 4A DEC RD ;041A: 2D STR RD ;041B: 5D LDN RA ;041C: 0A PLO RA ;041D: AA LDA RD ;041E: 4D PHI RA ;041F: BA SEX R6 ;0420: E6 GLO R4 ;0421: 84 SM ;0422: F7 BNZ R0428 ;0423: 3A 28 LBR J02D4 ;0425: C0 02 D4 R0428 GLO R4 ;0428: 84 STR R6 ;0429: 56 BR R0457 ;042A: 30 57 J042C GHI RA ;042C: 9A BZ R0447 ;042D: 32 47 SMI 60H ;042F: FF 60 LBNZ J02D4 ;0431: CA 02 D4 LDI 4FH ;0434: F8 4F PLO R6 ;0436: A6 LDI 0A2H ;0437: F8 A2 PLO R7 ;0439: A7 LDN R6 ;043A: 06 ADI 01H ;043B: FC 01 STR R6 ;043D: 56 ANI 7FH ;043E: FA 7F STR R7 ;0440: 57 LDI 40H ;0441: F8 40 PHI RA ;0443: BA LBR J02D4 ;0444: C0 02 D4 R0447 LDI 4EH ;0447: F8 4E PLO R6 ;0449: A6 LDN R6 ;044A: 06 ADI 01H ;044B: FC 01 STR R6 ;044D: 56 LDI 80H ;044E: F8 80 PHI RA ;0450: BA J0451 LDI 4EH ;0451: F8 4E PLO R6 ;0453: A6 LDI 0C0H ;0454: F8 C0 PLO R7 ;0456: A7 R0457 LDN R6 ;0457: 06 SHL ;0458: FE SHL ;0459: FE STR R7 ;045A: 57 INC R7 ;045B: 17 ADI 01H ;045C: FC 01 STR R7 ;045E: 57 INC R7 ;045F: 17 ADI 01H ;0460: FC 01 STR R7 ;0462: 57 INC R7 ;0463: 17 ADI 01H ;0464: FC 01 STR R7 ;0466: 57 LBR J02D4 ;0467: C0 02 D4 R046A DEC R4 ;046A: 24 J046B LDI 05H ;046B: F8 05 PLO R6 ;046D: A6 LDI 38H ;046E: F8 38 R0470 STR R6 ;0470: 56 LSNQ ;0471: C5 BN1 R04A3 ;0472: 3C A3 GLO R9 ;0474: 89 ANI 04H ;0475: FA 04 BZ R047B ;0477: 32 7B BN3 R04A8 ;0479: 3E A8 R047B LDN R7 ;047B: 07 SHL ;047C: FE SHL ;047D: FE BDF R048D ;047E: 33 8D LDN R6 ;0480: 06 SMI 01H ;0481: FF 01 BNZ R0470 ;0483: 3A 70 GLO R4 ;0485: 84 BNZ R046A ;0486: 3A 6A GHI R4 ;0488: 94 BNZ R046A ;0489: 3A 6A BR R04A8 ;048B: 30 A8 R048D ANI 0E0H ;048D: FA E0 DEC R6 ;048F: 26 BZ R0496 ;0490: 32 96 GHI R9 ;0492: 99 LSNZ ;0493: C6 GHI RE ;0494: 9E PHI R9 ;0495: B9 R0496 GHI R0 ;0496: 90 PHI R4 ;0497: B4 INC R7 ;0498: 17 NOP ;0499: C4 NOP ;049A: C4 NOP ;049B: C4 NOP ;049C: C4 NOP ;049D: C4 LDN R7 ;049E: 07 STR R6 ;049F: 56 DEC R7 ;04A0: 27 BR R04AB ;04A1: 30 AB R04A3 GHI R9 ;04A3: 99 LSNZ ;04A4: C6 LDI 03H ;04A5: F8 03 PHI R9 ;04A7: B9 R04A8 INC RB ;04A8: 1B INC RB ;04A9: 1B INC RB ;04AA: 1B R04AB LBR J02D4 ;04AB: C0 02 D4 J04AE BNQ R04BF ;04AE: 39 BF BN1 R04B6 ;04B0: 3C B6 B2 R04BF ;04B2: 35 BF BR J04AE ;04B4: 30 AE R04B6 LDI 03H ;04B6: F8 03 PHI R9 ;04B8: B9 INC RB ;04B9: 1B INC RB ;04BA: 1B INC RB ;04BB: 1B R04BC LBR J02D4 ;04BC: C0 02 D4 R04BF LDN R7 ;04BF: 07 ANI 02H ;04C0: FA 02 BZ J04AE ;04C2: 32 AE LDI 0EH ;04C4: F8 0E R04C6 SMI 01H ;04C6: FF 01 BNZ R04C6 ;04C8: 3A C6 LDN R6 ;04CA: 06 INC R7 ;04CB: 17 STR R7 ;04CC: 57 DEC R7 ;04CD: 27 BR R04BC ;04CE: 30 BC DB 0FFH ;04D0: FF DB 0FFH ;04D1: FF DB 0FFH ;04D2: FF DB 0FFH ;04D3: FF DB 0FFH ;04D4: FF DB 0FFH ;04D5: FF DB 0FFH ;04D6: FF DB 0FFH ;04D7: FF DB 0FFH ;04D8: FF DB 0FFH ;04D9: FF DB 0FFH ;04DA: FF DB 0FFH ;04DB: FF DB 0FFH ;04DC: FF DB 0FFH ;04DD: FF DB 0FFH ;04DE: FF DB 0FFH ;04DF: FF DB 0FFH ;04E0: FF DB 0FFH ;04E1: FF ; ; ====================================================================== ; DATA AREA: INITIALIZATION DATA BLOCK ; Range: 0x04E2-0x04FF ; ---------------------------------------------------------------------- ; Read sequentially by the startup code via LDXA (R4 = 0x04E2). ; Contains register init values, HD44780 LCD init commands, ; and memory test patterns. Consumed byte-by-byte during boot. ; ; Layout: ; 04E2-04E8: Register init values (R2.1=62, RD.1=61, R3.1=02, ; R6.0=1A, RE.1=01, R1=0D00, RC=2102) ; 04E9-04EC: Cold boot override: RC.1=21, RC.0=00 (RC=2100) ; Read only on cold boot path (M(601A)!=AA) ; 04ED-04EE: RAM base (R6=60E0) ; 04EF-04F6: HD44780 init: 30 30 38 01 08 06 80 0C ; (Function Set x2, 2-line, Clear, Off, Entry, Home, On) ; 04F7-04FC: Memory test patterns: 00 0F F0 33 55 99 ; 04FD-04FF: Interpreter copy trigger (F8 FF -> LDI FF sentinel) ; ====================================================================== DB 62H ;04E2: 62 DB 61H ;04E3: 61 DB 02H ;04E4: 02 DB 1AH ;04E5: 1A DB 01H ;04E6: 01 DB 0DH ;04E7: 0D DB 00H ;04E8: 00 DB 21H ;04E9: 21 DB 02H ;04EA: 02 DB 21H ;04EB: 21 DB 00H ;04EC: 00 DB 60H ;04ED: 60 DB 0E0H ;04EE: E0 DB 30H ;04EF: 30 DB 30H ;04F0: 30 DB 38H ;04F1: 38 DB 01H ;04F2: 01 DB 08H ;04F3: 08 DB 06H ;04F4: 06 DB 80H ;04F5: 80 DB 0CH ;04F6: 0C DB 00H ;04F7: 00 DB 0FH ;04F8: 0F DB 0F0H ;04F9: F0 DB 33H ;04FA: 33 DB 55H ;04FB: 55 DB 99H ;04FC: 99 DB 00H ;04FD: 00 DB 0F8H ;04FE: F8 DB 0FFH ;04FF: FF J0500 LDA RC ;0500: 4C SHL ;0501: FE BDF R050E ;0502: 33 0E PLO RE ;0504: AE LDA RE ;0505: 4E PHI RB ;0506: BB LDN RE ;0507: 0E PLO RB ;0508: AB LDA RB ;0509: 4B PLO R3 ;050A: A3 SEP R3 ;050B: D3 S050C BR J0500 ;050C: 30 00 R050E PLO RB ;050E: AB LDA RC ;050F: 4C PHI RB ;0510: BB LDA RB ;0511: 4B PLO R3 ;0512: A3 SEP R3 ;0513: D3 S0514 BR J0500 ;0514: 30 00 LBR J051A ;0516: C0 05 1A DB 0FFH ;0519: FF J051A SEX R2 ;051A: E2 DEC R2 ;051B: 22 GLO RC ;051C: 8C STXD ;051D: 73 GHI RC ;051E: 9C STXD ;051F: 73 LDI 0B4H ;0520: F8 B4 STXD ;0522: 73 LDI 1EH ;0523: F8 1E STXD ;0525: 73 LDI 04H ;0526: F8 04 PLO R8 ;0528: A8 LDI 0AH ;0529: F8 0A PLO R6 ;052B: A6 LDI 61H ;052C: F8 61 PHI R4 ;052E: B4 LDI 0DH ;052F: F8 0D PLO R4 ;0531: A4 LDI 00H ;0532: F8 00 STR R4 ;0534: 54 LDI 15H ;0535: F8 15 PLO R4 ;0537: A4 LDI 00H ;0538: F8 00 STR R4 ;053A: 54 R053B ADI 00H ;053B: FC 00 LDA R6 ;053D: 46 PHI RA ;053E: BA BZ R0543 ;053F: 32 43 SMI 00H ;0541: FF 00 R0543 LDN R6 ;0543: 06 PLO RA ;0544: AA BNZ R0549 ;0545: 3A 49 BNF R055E ;0547: 3B 5E R0549 DEC RA ;0549: 2A DEC R6 ;054A: 26 GHI RA ;054B: 9A STR R6 ;054C: 56 GLO RA ;054D: 8A INC R6 ;054E: 16 STR R6 ;054F: 56 BNZ R055E ;0550: 3A 5E BDF R055E ;0552: 33 5E INC R6 ;0554: 16 LDA R6 ;0555: 46 PLO R9 ;0556: A9 LDA R6 ;0557: 46 SEX R2 ;0558: E2 STXD ;0559: 73 GLO R9 ;055A: 89 STXD ;055B: 73 BR R0561 ;055C: 30 61 R055E INC R6 ;055E: 16 INC R6 ;055F: 16 INC R6 ;0560: 16 R0561 DEC R8 ;0561: 28 GLO R8 ;0562: 88 BNZ R053B ;0563: 3A 3B INC R2 ;0565: 12 LDI 11H ;0566: F8 11 LBR 6101H ;0568: C0 61 01 S056B ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD TOS, NOS ; ---------------------------------------------------------------------- ; Opcode: 0x00 ; Handler: 0x056B ; Dispatch: 06->056C ; Definition: TOS = NOS + TOS (16-bit add) ; ; Implementation: ; Entry 0x06 pops TOS into R9, sets X=RD. Handler at 056C: GLO R9 ADD to ; NOS.low via STXD, GHI R9 ADC to NOS.high via STR RD. Pops both, pushes ; result. ; ====================================================================== DB 06H ;056B: 06 S056C ADD ;056C: F4 STXD ;056D: 73 GHI R9 ;056E: 99 ADC ;056F: 74 STR RD ;0570: 5D SEP RF ;0571: DF S0572 ; ; ====================================================================== ; PSEUDO INSTRUCTION: SHL TOS ; ---------------------------------------------------------------------- ; Opcode: 0x01 ; Handler: 0x0572 ; Dispatch: 06->0573 ; Definition: TOS = TOS x 2 (16-bit shift left) ; ; Implementation: ; Entry 0x06 pops TOS into R9. Handler at 0573: DEC RD x2, BR to 056C ; (ADD body) which adds R9 to itself (doubles TOS). ; ====================================================================== DB 06H ;0572: 06 S0573 DEC RD ;0573: 2D DEC RD ;0574: 2D BR S056C ;0575: 30 6C S0577 ; ; ====================================================================== ; PSEUDO INSTRUCTION: SUB TOS, NOS ; ---------------------------------------------------------------------- ; Opcode: 0x02 ; Handler: 0x0577 ; Dispatch: 06->0578 ; Definition: TOS = NOS - TOS (16-bit subtract) ; ; Implementation: ; Entry 0x06 pops TOS into R9. Handler at 0578: SD subtracts R9.low from ; NOS.low, GHI R9 SDB from NOS.high. ; ====================================================================== DB 06H ;0577: 06 S0578 SD ;0578: F5 STXD ;0579: 73 GHI R9 ;057A: 99 SDB ;057B: 75 STR RD ;057C: 5D SEP RF ;057D: DF S057E ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD TOS, 1 ; ---------------------------------------------------------------------- ; Opcode: 0x03 ; Handler: 0x057E ; Dispatch: 0C->0581 ; Definition: TOS = TOS + 1 ; ; Implementation: ; Entry 0x0C reads 2-byte inline constant (01,00) from handler body and ; adds to TOS. RB advances past constant; handler body at 0581 is just ; SEP RF (return). ; ====================================================================== DB 0CH ;057E: 0C DB 01H ;057F: 01 DB 00H ;0580: 00 S0581 SEP RF ;0581: DF S0582 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD TOS, 2 ; ---------------------------------------------------------------------- ; Opcode: 0x04 ; Handler: 0x0582 ; Dispatch: 0C->0585 ; Definition: TOS = TOS + 2 ; ; Implementation: ; Entry 0x0C reads 2-byte inline constant (02,00) from handler body and ; adds to TOS. RB advances past constant; handler body at 0585 is just ; SEP RF (return). ; ====================================================================== DB 0CH ;0582: 0C DB 02H ;0583: 02 DB 00H ;0584: 00 S0585 SEP RF ;0585: DF S0586 ; ; ====================================================================== ; PSEUDO INSTRUCTION: SUB TOS, 1 ; ---------------------------------------------------------------------- ; Opcode: 0x27 ; Handler: 0x0586 ; Dispatch: 0C->0589 ; Definition: TOS = TOS - 1 ; ; Implementation: ; Entry 0x0C reads 2-byte inline constant (FF,FF = -1) from handler body ; and adds to TOS (adding 0xFFFF = subtracting 1). RB advances past ; constant; handler body at 0589 is just SEP RF (return). ; ====================================================================== DB 0CH ;0586: 0C DB 0FFH ;0587: FF DB 0FFH ;0588: FF S0589 SEP RF ;0589: DF S058A ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD [TOS], NOS ; ---------------------------------------------------------------------- ; Opcode: 0x05 ; Handler: 0x058A ; Dispatch: 7E->058B ; Definition: M(TOS) = M(TOS) + NOS (16-bit add in-place). Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 058B: INC R9, SEX R9, GLO ; RA ADD STXD, GHI RA ADC STR R9. Adds NOS value to 16-bit word at ; address TOS. ; ====================================================================== DB 7EH ;058A: 7E S058B INC R9 ;058B: 19 SEX R9 ;058C: E9 ADD ;058D: F4 STXD ;058E: 73 GHI RA ;058F: 9A ADC ;0590: 74 STR R9 ;0591: 59 SEP RF ;0592: DF DB 0FFH ;0593: FF DB 8AH ;0594: 8A LDN RD ;0595: 0D SHR ;0596: F6 STR RD ;0597: 5D INC RD ;0598: 1D LDN RD ;0599: 0D SHRC ;059A: 76 STXD ;059B: 73 SEP RF ;059C: DF S059D ; ; ====================================================================== ; PSEUDO INSTRUCTION: JZ aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x08 ; Handler: 0x059D ; Dispatch: 8A->059E ; Definition: Pop TOS; if TOS == 0, jump forward (aaaa = PC + 1 + bb) ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 059E: LDA RD OR with next byte (tests ; both bytes of TOS). If zero: INC RC, SEP RF (skip offset, no jump). If ; nonzero: falls to 05A6 forward branch calc. ; ====================================================================== DB 8AH ;059D: 8A S059E LDA RD ;059E: 4D OR ;059F: F1 INC RD ;05A0: 1D BZ S05A6 ;05A1: 32 A6 INC RC ;05A3: 1C SEP RF ;05A4: DF S05A5 ; ; ====================================================================== ; PSEUDO INSTRUCTION: JP aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x0A ; Handler: 0x05A5 ; Dispatch: 8B->05A6 ; Definition: Unconditional jump forward (aaaa = PC + 1 + bb) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 05A6: SEX RC, GLO RC ADD PLO RC, ; GHI RC ADCI 00 PHI RC. Adds unsigned offset to RC. ; ====================================================================== DB 8BH ;05A5: 8B S05A6 SEX RC ;05A6: EC GLO RC ;05A7: 8C ADD ;05A8: F4 PLO RC ;05A9: AC GHI RC ;05AA: 9C ADCI 00H ;05AB: 7C 00 PHI RC ;05AD: BC SEP RF ;05AE: DF S05AF ; ; ====================================================================== ; PSEUDO INSTRUCTION: LOOP aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x0C ; Handler: 0x05AF ; Dispatch: 2B->05B0 ; Definition: Increment counter by 1, compare with limit; if counter > limit: branch backward ; ; Implementation: ; Entry 0x2B pushes 0x0001 (fixed step). Handler at 05B0: reads call ; stack via R2->RA. Adds step to counter (SP+0/1). Signed compare ; counter vs limit (SP+2/3) using ANI 80H on subtraction result. If ; counter exceeds limit: INC R2 x4 (pop frame), INC RC (skip offset). ; Otherwise: backward branch. ; ====================================================================== DB 2BH ;05AF: 2B S05B0 SKP ;05B0: 38 S05B1 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LOOP TOS, aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x0D ; Handler: 0x05B1 ; Dispatch: 0B->05B2 ; Definition: Same as LOOP 0x0C but increment by TOS (variable step) ; ; Implementation: ; Entry 0x0B direct execute. Handler at 05B2: reads R2 into RA, pops TOS ; as step (LDA RD -> R9.high, LDA RD as low). Adds step to counter, same ; compare/branch logic as 0x0C. ; ====================================================================== DB 0BH ;05B1: 0B S05B2 GHI R2 ;05B2: 92 PHI RA ;05B3: BA GLO R2 ;05B4: 82 PLO RA ;05B5: AA LDA RD ;05B6: 4D PHI R9 ;05B7: B9 LDA RD ;05B8: 4D INC RA ;05B9: 1A SEX RA ;05BA: EA ADD ;05BB: F4 PLO R9 ;05BC: A9 STXD ;05BD: 73 GHI R9 ;05BE: 99 ADC ;05BF: 74 PHI R9 ;05C0: B9 STR RA ;05C1: 5A INC RA ;05C2: 1A INC RA ;05C3: 1A INC RA ;05C4: 1A GLO R9 ;05C5: 89 SM ;05C6: F7 DEC RA ;05C7: 2A GHI R9 ;05C8: 99 SMB ;05C9: 77 ANI 80H ;05CA: FA 80 LBNZ S05DE ;05CC: CA 05 DE INC R2 ;05CF: 12 INC R2 ;05D0: 12 INC R2 ;05D1: 12 INC R2 ;05D2: 12 INC RC ;05D3: 1C SEP RF ;05D4: DF S05D5 ; ; ====================================================================== ; PSEUDO INSTRUCTION: JZ aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x09 ; Handler: 0x05D5 ; Dispatch: 8A->05D6 ; Definition: Pop TOS; if TOS == 0, jump backward (aaaa = PC + 1 + bb - 256) ; ; Implementation: ; Entry 0x8A sets X=RD. Same TOS==0 test. If nonzero: falls to 05DE ; backward branch (adds offset + ADCI FF to subtract page). ; ====================================================================== DB 8AH ;05D5: 8A S05D6 LDA RD ;05D6: 4D OR ;05D7: F1 INC RD ;05D8: 1D BZ S05DE ;05D9: 32 DE INC RC ;05DB: 1C SEP RF ;05DC: DF S05DD ; ; ====================================================================== ; PSEUDO INSTRUCTION: JP aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x0B ; Handler: 0x05DD ; Dispatch: 8B->05DE ; Definition: Unconditional jump backward (aaaa = PC + 1 + bb - 256) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 05DE: SEX RC, GLO RC ADD PLO RC, ; GHI RC ADCI FF PHI RC. Adds offset then subtracts 256 (page-1). ; ====================================================================== DB 8BH ;05DD: 8B S05DE SEX RC ;05DE: EC GLO RC ;05DF: 8C ADD ;05E0: F4 PLO RC ;05E1: AC GHI RC ;05E2: 9C ADCI 0FFH ;05E3: 7C FF PHI RC ;05E5: BC SEP RF ;05E6: DF S05E7 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LOOP FRAME ; ---------------------------------------------------------------------- ; Opcode: 0x0E ; Handler: 0x05E7 ; Dispatch: 7E->05E8 ; Definition: Push loop frame to return stack: TOS=counter, NOS=limit ; ; Implementation: ; Entry 0x7E pops TOS->R9 (counter), NOS->RA (limit). Handler at 05E8: ; SEX R2, DEC R2, pushes RA.low, RA.high, R9.low, R9.high to return stack. ; Creates 4-byte frame. ; ====================================================================== DB 7EH ;05E7: 7E S05E8 SEX R2 ;05E8: E2 DEC R2 ;05E9: 22 STXD ;05EA: 73 GHI RA ;05EB: 9A STXD ;05EC: 73 GLO R9 ;05ED: 89 STXD ;05EE: 73 GHI R9 ;05EF: 99 STR R2 ;05F0: 52 SEP RF ;05F1: DF S05F2 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LOOP CLR ; ---------------------------------------------------------------------- ; Opcode: 0x0F ; Handler: 0x05F2 ; Dispatch: 0B->05F3 ; Definition: Clear loop frame limit (zeroes SP+2/3) ; ; Implementation: ; Entry 0x0B direct execute. Handler at 05F3: R2->RA, INC RA x2 (skip ; counter), stores GHI R0 (=0) twice (zeroes limit high and low). ; ====================================================================== DB 0BH ;05F2: 0B S05F3 GHI R2 ;05F3: 92 PHI RA ;05F4: BA GLO R2 ;05F5: 82 PLO RA ;05F6: AA INC RA ;05F7: 1A INC RA ;05F8: 1A GHI R0 ;05F9: 90 STR RA ;05FA: 5A INC RA ;05FB: 1A STR RA ;05FC: 5A SEP RF ;05FD: DF S05FE ; ; ====================================================================== ; PSEUDO INSTRUCTION: EXEC TOS ; ---------------------------------------------------------------------- ; Opcode: 0x10 ; Handler: 0x05FE ; Dispatch: 32->05FF ; Definition: Call handler at address in TOS. Pops TOS, dispatches. ; ; Implementation: ; Entry 0x32: indirect call via data stack. Pops address into RB, reads ; entry byte, dispatches to handler. Used for computed calls (CALLI ; targets). ; ====================================================================== DB 32H ;05FE: 32 S05FF ; ; ====================================================================== ; PSEUDO INSTRUCTION: CALLI [aaaa] ; ---------------------------------------------------------------------- ; Opcode: 0x66 ; Handler: 0x05FF ; Dispatch: A4.85->0601 ; Definition: Indirect call: read target from table at aaaa + TOS*2, call handler. Pops TOS. ; ; Implementation: ; Entry 0xA4+0x85 reads table base address into RA. Handler at 0601: SEX ; RD, INC RD (pops TOS index). SEP R0 entry 0x9A (adds TOS*2 to RA for ; table offset). SEP R0 entry 0x67 (reads 16-bit target from table). ; Then entry 0x32 dispatches to that address. ; ====================================================================== DB 0A4H ;05FF: A4 DB 85H ;0600: 85 S0601 SEX RD ;0601: ED INC RD ;0602: 1D J0603 SEP R0 ;0603: D0 J0604 DB 9AH ;0604: 9A S0605 SEP R0 ;0605: D0 DB 9AH ;0606: 9A S0607 SEX RA ;0607: EA SEP R0 ;0608: D0 DB 67H ;0609: 67 S060A SEP R0 ;060A: D0 DB 60H ;060B: 60 S060C INC RD ;060C: 1D SEP R0 ;060D: D0 DB 32H ;060E: 32 S060F ; ; ====================================================================== ; PSEUDO INSTRUCTION: RET ; ---------------------------------------------------------------------- ; Opcode: 0x11 ; Handler: 0x060F ; Dispatch: 8B->0610 ; Definition: Return from subroutine: pop RC from return stack ; ; Implementation: ; Entry 0x8B direct execute. Handler at 0610: LDA R2 -> PHI RC, LDA R2 ; -> PLO RC. Restores bytecode PC from return stack. ; ====================================================================== DB 8BH ;060F: 8B S0610 LDA R2 ;0610: 42 PHI RC ;0611: BC LDA R2 ;0612: 42 PLO RC ;0613: AC SEP RF ;0614: DF S0615 ; ; ====================================================================== ; PSEUDO INSTRUCTION: AND TOS, NOS ; ---------------------------------------------------------------------- ; Opcode: 0x12 ; Handler: 0x0615 ; Dispatch: 06->0616 ; Definition: TOS = NOS AND TOS (16-bit bitwise AND) ; ; Implementation: ; Entry 0x06 pops TOS into R9. Handler at 0616: AND R9.low with NOS.low, ; AND R9.high with NOS.high. Standard bitwise AND. ; ====================================================================== DB 06H ;0615: 06 S0616 AND ;0616: F2 STXD ;0617: 73 GHI R9 ;0618: 99 AND ;0619: F2 STR RD ;061A: 5D SEP RF ;061B: DF S061C ; ; ====================================================================== ; PSEUDO INSTRUCTION: LDAND [aaaa], kk ; ---------------------------------------------------------------------- ; Opcode: 0x57 ; Handler: 0x061C ; Dispatch: A4.85->061E ; Definition: TOS = M(aaaa) AND kk (load byte, mask, push) ; ; Implementation: ; Entry 0xA4+0x85 reads 16-bit address into RA from bytecode. Handler at ; 061E: LDN RA (read byte), AND with next bytecode byte (INC RC reads ; mask). Pushes zero-extended masked result. ; ====================================================================== DB 0A4H ;061C: A4 DB 85H ;061D: 85 S061E LDN RA ;061E: 0A AND ;061F: F2 INC RC ;0620: 1C DEC RD ;0621: 2D STR RD ;0622: 5D GHI R0 ;0623: 90 DEC RD ;0624: 2D S0625 STR RD ;0625: 5D SEP RF ;0626: DF S0627 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ISZ TOS ; ---------------------------------------------------------------------- ; Opcode: 0x13 ; Handler: 0x0627 ; Dispatch: 8A->0628 ; Definition: TOS = (TOS == 0) ? 1 : 0 ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 0628: LDA RD OR next byte (tests ; 16-bit TOS). LBZ to push 1 (via GHI RE + SDI 01). Otherwise pushes 0. ; ====================================================================== DB 8AH ;0627: 8A S0628 LDA RD ;0628: 4D OR ;0629: F1 LBZ J062E ;062A: C2 06 2E GHI RE ;062D: 9E J062E SDI 01H ;062E: FD 01 J0630 STR RD ;0630: 5D GHI R0 ;0631: 90 DEC RD ;0632: 2D STR RD ;0633: 5D SEP RF ;0634: DF S0635 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ISNEG TOS ; ---------------------------------------------------------------------- ; Opcode: 0x14 ; Handler: 0x0635 ; Dispatch: 8B->0636 ; Definition: TOS = (TOS < 0) ? 1 : 0 (tests sign bit) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 0636: LDA RD, ANI 80H. If zero: ; LBZ to push 0 via 0630. If bit 7 set: GHI RE (=0x01), LBR to push 1 ; via 0630. ; ====================================================================== DB 8BH ;0635: 8B S0636 LDA RD ;0636: 4D ANI 80H ;0637: FA 80 LBZ J0630 ;0639: C2 06 30 GHI RE ;063C: 9E LBR J0630 ;063D: C0 06 30 DB 06H ;0640: 06 S0641 XOR ;0641: F3 STXD ;0642: 73 GHI R9 ;0643: 99 XOR ;0644: F3 STR RD ;0645: 5D SEP RF ;0646: DF S0647 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH VE, kk ; ---------------------------------------------------------------------- ; Opcode: 0x52 ; Handler: 0x0647 ; Dispatch: 94->064B ; Definition: TOS = VE + kk. VE unchanged. ; ; Implementation: ; Entry 0x94 multi-dispatch. Reads VE from M(605E/5F), adds 8-bit kk ; (zero-extended with carry to high byte), pushes 16-bit result. ; ====================================================================== DB 94H ;0647: 94 DB 5EH ;0648: 5E DB 00H ;0649: 00 DB 85H ;064A: 85 S064B SEX RC ;064B: EC SEP R0 ;064C: D0 DB 9AH ;064D: 9A S064E INC RC ;064E: 1C J064F DEC RD ;064F: 2D SEP R0 ;0650: D0 DB 59H ;0651: 59 S0652 INC RD ;0652: 1D SEP RF ;0653: DF S0654 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH [VE], kk ; ---------------------------------------------------------------------- ; Opcode: 0x55 ; Handler: 0x0654 ; Dispatch: 94->0658 ; Definition: TOS = M(VE+kk):M(VE+kk+1) (load 16-bit). VE unchanged. ; ; Implementation: ; Entry 0x94 multi-dispatch. Computes address VE+kk, loads 16-bit word ; (big-endian), pushes. ; ====================================================================== DB 94H ;0654: 94 DB 5EH ;0655: 5E DB 00H ;0656: 00 DB 85H ;0657: 85 S0658 SEX RC ;0658: EC SEP R0 ;0659: D0 DB 9AH ;065A: 9A S065B INC RC ;065B: 1C LSKP ;065C: C8 S065D ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, [aaaa] ; ---------------------------------------------------------------------- ; Opcode: 0x3A ; Handler: 0x065D ; Dispatch: A4.85->065F ; Definition: TOS = M(aaaa):M(aaaa+1) (load 16-bit from inline address, push) ; ; Implementation: ; Entry 0xA4 sets X=RC, second dispatch 0x85 reads 2 bytes from bytecode ; into RA. Handler at 065F: SEX RD, SKP into 0661 body (LD TOS,[TOS] ; handler). Loads 16-bit word from RA address. ; ====================================================================== DB 0A4H ;065D: A4 DB 85H ;065E: 85 S065F SEX RD ;065F: ED SKP ;0660: 38 S0661 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, [TOS] ; ---------------------------------------------------------------------- ; Opcode: 0x15 ; Handler: 0x0661 ; Dispatch: 84->0662 ; Definition: TOS = M(TOS):M(TOS+1). Load 16-bit word from address in TOS. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 0662: LDA RA -> PHI R9, LDN RA ; (low byte). DEC RD STXD (push low), GHI R9 STR RD (push high). ; ====================================================================== DB 84H ;0661: 84 S0662 LDA RA ;0662: 4A PHI R9 ;0663: B9 LDN RA ;0664: 0A DEC RD ;0665: 2D STXD ;0666: 73 GHI R9 ;0667: 99 STR RD ;0668: 5D SEP RF ;0669: DF S066A ; ; ====================================================================== ; PSEUDO INSTRUCTION: POP [VE], kk ; ---------------------------------------------------------------------- ; Opcode: 0x56 ; Handler: 0x066A ; Dispatch: 94->066E ; Definition: M(VE+kk) = TOS (pop 16-bit, store). VE unchanged. ; ; Implementation: ; Entry 0x94 multi-dispatch. Computes address VE+kk, pops 16-bit TOS, ; stores big-endian. ; ====================================================================== DB 94H ;066A: 94 DB 5EH ;066B: 5E DB 00H ;066C: 00 DB 85H ;066D: 85 S066E SEX RC ;066E: EC SEP R0 ;066F: D0 DB 9AH ;0670: 9A S0671 INC RC ;0671: 1C LSKP ;0672: C8 S0673 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [aaaa], TOS ; ---------------------------------------------------------------------- ; Opcode: 0x3B ; Handler: 0x0673 ; Dispatch: A4.85->0675 ; Definition: M(aaaa) = TOS (pop 16-bit, store to inline address) ; ; Implementation: ; Entry 0xA4+0x85 reads address into RA. Handler at 0675: SKP into 0676 ; body (LD [TOS],NOS). Stores TOS to address in RA. ; ====================================================================== DB 0A4H ;0673: A4 DB 85H ;0674: 85 S0675 SKP ;0675: 38 S0676 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [TOS], NOS ; ---------------------------------------------------------------------- ; Opcode: 0x16 ; Handler: 0x0676 ; Dispatch: 84->0677 ; Definition: M(TOS) = NOS (store 16-bit). Pops both. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 0677: LDA RD -> STR RA (high), ; INC RA, LDA RD -> STR RA (low). Stores big-endian. ; ====================================================================== DB 84H ;0676: 84 S0677 LDA RD ;0677: 4D STR RA ;0678: 5A INC RA ;0679: 1A LDA RD ;067A: 4D STR RA ;067B: 5A SEP RF ;067C: DF S067D ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH [VE].0, kk ; ---------------------------------------------------------------------- ; Opcode: 0x53 ; Handler: 0x067D ; Dispatch: 94->0681 ; Definition: TOS = M(VE + kk) (load byte). VE unchanged. ; ; Implementation: ; Entry 0x94 multi-dispatch. Computes address VE+kk, loads single byte ; from that address, zero-extends to 16-bit, pushes. ; ====================================================================== DB 94H ;067D: 94 DB 5EH ;067E: 5E DB 00H ;067F: 00 DB 85H ;0680: 85 S0681 SEX RC ;0681: EC SEP R0 ;0682: D0 DB 9AH ;0683: 9A S0684 INC RC ;0684: 1C LSKP ;0685: C8 S0686 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS.0, [aaaa] ; ---------------------------------------------------------------------- ; Opcode: 0x3C ; Handler: 0x0686 ; Dispatch: A4.85->0688 ; Definition: Load byte from inline address, zero-extend, push. ; ; Implementation: ; Entry 0xA4+0x85 reads address into RA. Handler at 0688: SEX RD, SKP ; into 068A body (LD TOS.0,[TOS]). Loads single byte from RA. ; ====================================================================== DB 0A4H ;0686: A4 DB 85H ;0687: 85 S0688 SEX RD ;0688: ED SKP ;0689: 38 S068A ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS.0, [TOS] ; ---------------------------------------------------------------------- ; Opcode: 0x17 ; Handler: 0x068A ; Dispatch: 84->068B ; Definition: Load single byte from M(TOS), zero-extend to 16-bit, push. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 068B: LDN RA, DEC RD, STXD ; (push byte), GHI R0 (=0) STR RD (high byte = 0). ; ====================================================================== DB 84H ;068A: 84 S068B LDN RA ;068B: 0A DEC RD ;068C: 2D STXD ;068D: 73 GHI R0 ;068E: 90 STR RD ;068F: 5D SEP RF ;0690: DF S0691 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [aaaa], TOS.0 ; ---------------------------------------------------------------------- ; Opcode: 0x3D ; Handler: 0x0691 ; Dispatch: A4.85->0693 ; Definition: Store low byte of TOS to inline address. Pop TOS. ; ; Implementation: ; Entry 0xA4+0x85 reads address into RA. Handler at 0693: SKP into 0694 ; body. Stores TOS.low to M(RA). ; ====================================================================== DB 0A4H ;0691: A4 DB 85H ;0692: 85 S0693 SKP ;0693: 38 S0694 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [TOS], NOS.0 ; ---------------------------------------------------------------------- ; Opcode: 0x19 ; Handler: 0x0694 ; Dispatch: 84->0695 ; Definition: Store low byte of NOS to M(TOS). Pops both. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 0695: INC RD (skip NOS.high), ; LDA RD (read NOS.low), STR RA. ; ====================================================================== DB 84H ;0694: 84 S0695 INC RD ;0695: 1D LDA RD ;0696: 4D STR RA ;0697: 5A SEP RF ;0698: DF S0699 ; ; ====================================================================== ; PSEUDO INSTRUCTION: MCPY [NOS], [3OS] ; ---------------------------------------------------------------------- ; Opcode: 0x1A ; Handler: 0x0699 ; Dispatch: 78->069A ; Definition: Memory copy: TOS=count, NOS=dest, 3OS=source. Copies count bytes. ; ; Implementation: ; Entry 0x78 pops 3 values: TOS->R8, NOS->R9, 3OS->RA. Handler: SEP R0 ; entry 0x3D first pass (R8.0 bytes). If R8.1!=0: loops R8.1 passes of ; 256 bytes each via entry 0x39. Full 16-bit count. ; ====================================================================== DB 78H ;0699: 78 S069A SEP R0 ;069A: D0 DB 3DH ;069B: 3D S069C LSKP ;069C: C8 R069D SEP R0 ;069D: D0 DB 39H ;069E: 39 GHI R8 ;069F: 98 BZ R06A4 ;06A0: 32 A4 BR R069D ;06A2: 30 9D R06A4 SEP RF ;06A4: DF S06A5 ; ; ====================================================================== ; PSEUDO INSTRUCTION: DROP ; ---------------------------------------------------------------------- ; Opcode: 0x1C ; Handler: 0x06A5 ; Dispatch: 8B->06A6 ; Definition: Drop TOS (discard top of stack, RD += 2) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 06A6: INC RD, INC RD. Simply ; advances stack pointer. ; ====================================================================== DB 8BH ;06A5: 8B S06A6 INC RD ;06A6: 1D INC RD ;06A7: 1D SEP RF ;06A8: DF S06A9 ; ; ====================================================================== ; PSEUDO INSTRUCTION: OVER ; ---------------------------------------------------------------------- ; Opcode: 0x1D ; Handler: 0x06A9 ; Dispatch: 8C->06AA ; Definition: Copy NOS to TOS (push copy of second value on top) ; ; Implementation: ; Entry 0x8C: INC RD x2 (skip TOS), reads NOS into R9.1/D, DEC RD x2. ; Handler at 06AA: DEC RD x2, stores as new TOS. ; ====================================================================== DB 8CH ;06A9: 8C S06AA DEC RD ;06AA: 2D DEC RD ;06AB: 2D SKP ;06AC: 38 S06AD ; ; ====================================================================== ; PSEUDO INSTRUCTION: DUP ; ---------------------------------------------------------------------- ; Opcode: 0x1E ; Handler: 0x06AD ; Dispatch: 8E->06AE ; Definition: Duplicate TOS (push copy of top value) ; ; Implementation: ; Entry 0x8E: reads TOS into R9.1/D, moves RD down by 2. Handler at ; 06AE: STR RD (low), GHI R9 DEC RD STR RD (high). ; ====================================================================== DB 8EH ;06AD: 8E S06AE STR RD ;06AE: 5D GHI R9 ;06AF: 99 DEC RD ;06B0: 2D STR RD ;06B1: 5D SEP RF ;06B2: DF S06B3 ; ; ====================================================================== ; PSEUDO INSTRUCTION: DUPNZ ; ---------------------------------------------------------------------- ; Opcode: 0x1F ; Handler: 0x06B3 ; Dispatch: 8A->06B4 ; Definition: Duplicate TOS if nonzero; if TOS == 0, no change ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 06B4: LDA RD PHI R9, OR (test both ; bytes). If zero: DEC RD, SEP RF (exit). If nonzero: LDN RD, BR to 06AA ; (DUP body). ; ====================================================================== DB 8AH ;06B3: 8A S06B4 LDA RD ;06B4: 4D PHI R9 ;06B5: B9 OR ;06B6: F1 BNZ R06BB ;06B7: 3A BB DEC RD ;06B9: 2D SEP RF ;06BA: DF R06BB LDN RD ;06BB: 0D BR S06AA ;06BC: 30 AA S06BE ; ; ====================================================================== ; PSEUDO INSTRUCTION: SWAP ; ---------------------------------------------------------------------- ; Opcode: 0x20 ; Handler: 0x06BE ; Dispatch: 7E->06BF ; Definition: Exchange TOS and NOS (swap top two 16-bit values) ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 06BF: DEC RD, SEP R0 ; entry 0x60 (push R9 first), then entry 0x59 (push RA). Reverses order. ; ====================================================================== DB 7EH ;06BE: 7E S06BF DEC RD ;06BF: 2D J06C0 SEP R0 ;06C0: D0 DB 60H ;06C1: 60 S06C2 SEP R0 ;06C2: D0 DB 59H ;06C3: 59 S06C4 INC RD ;06C4: 1D SEP RF ;06C5: DF S06C6 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ROT ; ---------------------------------------------------------------------- ; Opcode: 0x21 ; Handler: 0x06C6 ; Dispatch: 78->06C7 ; Definition: Rotate 3OS to TOS. Before: A,B,C -> After: C,A,B (Forth ROT) ; ; Implementation: ; Entry 0x78 pops TOS->R8, NOS->R9, 3OS->RA. Handler at 06C7: pushes R9 ; (entry 0x60), pushes R8 via STXD, then R9 (entry 0x59 via 06C2). ; Reorders stack. ; ====================================================================== DB 78H ;06C6: 78 S06C7 DEC RD ;06C7: 2D SEP R0 ;06C8: D0 DB 60H ;06C9: 60 S06CA GLO R8 ;06CA: 88 STXD ;06CB: 73 GHI R8 ;06CC: 98 STXD ;06CD: 73 BR S06C2 ;06CE: 30 C2 S06D0 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH aaaa ; ---------------------------------------------------------------------- ; Opcode: 0x22 ; Handler: 0x06D0 ; Dispatch: 8B->06D1 ; Definition: Push 16-bit immediate value aaaa onto data stack ; ; Implementation: ; Entry 0x8B direct execute. Handler at 06D1: LDA RC -> PHI R9 (high ; byte from bytecode stream), then falls to 06D8: LDA RC (low), DEC RD, ; STR RD, GHI R9, DEC RD, STR RD. ; ====================================================================== DB 8BH ;06D0: 8B S06D1 LDA RC ;06D1: 4C PHI R9 ;06D2: B9 BR R06D8 ;06D3: 30 D8 S06D5 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH kk ; ---------------------------------------------------------------------- ; Opcode: 0x23 ; Handler: 0x06D5 ; Dispatch: 8B->06D6 ; Definition: Push 8-bit constant kk (zero-extended) onto data stack ; ; Implementation: ; Entry 0x8B direct execute. Handler at 06D6: GHI R0 (=0x00) -> PHI R9, ; LDA RC reads kk. Falls to 06D8 push sequence. Result: 0x00:kk. ; ====================================================================== DB 8BH ;06D5: 8B S06D6 GHI R0 ;06D6: 90 PHI R9 ;06D7: B9 R06D8 LDA RC ;06D8: 4C J06D9 DEC RD ;06D9: 2D STR RD ;06DA: 5D GHI R9 ;06DB: 99 DEC RD ;06DC: 2D STR RD ;06DD: 5D J06DE SEP RF ;06DE: DF S06DF ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH R ; ---------------------------------------------------------------------- ; Opcode: 0x24 ; Handler: 0x06DF ; Dispatch: 0B->06E0 ; Definition: Read 16-bit from top of return stack, push to eval (stack unchanged) ; ; Implementation: ; Entry 0x0B direct execute. Handler at 06E0: R2->RA, LDA RA (peek ; high), LDN RA (peek low). Pushes copy via 06D9. Return stack unmodified. ; ====================================================================== DB 0BH ;06DF: 0B S06E0 GHI R2 ;06E0: 92 PHI RA ;06E1: BA GLO R2 ;06E2: 82 PLO RA ;06E3: AA LDA RA ;06E4: 4A PHI R9 ;06E5: B9 LDN RA ;06E6: 0A LBR J06D9 ;06E7: C0 06 D9 S06EA ; ; ====================================================================== ; PSEUDO INSTRUCTION: POPR ; ---------------------------------------------------------------------- ; Opcode: 0x25 ; Handler: 0x06EA ; Dispatch: 8B->06EB ; Definition: Pop 16-bit from return stack, push to data stack ; ; Implementation: ; Entry 0x8B direct execute. Handler at 06EB: LDA R2 (pops high from ; return stack), falls to 06EC: PHI R9, LDA R2 (pops low), pushes to eval ; stack via 06D9. ; ====================================================================== DB 8BH ;06EA: 8B S06EB LDA R2 ;06EB: 42 J06EC PHI R9 ;06EC: B9 LDA R2 ;06ED: 42 LBR J06D9 ;06EE: C0 06 D9 S06F1 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSHR ; ---------------------------------------------------------------------- ; Opcode: 0x26 ; Handler: 0x06F1 ; Dispatch: 84->06F2 ; Definition: Pop TOS from data stack, push to return stack ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 06F2: SEX R2, DEC R2, STXD ; (RA.low), GHI RA STR R2 (RA.high). Transfers value from eval to call ; stack. ; ====================================================================== DB 84H ;06F1: 84 S06F2 SEX R2 ;06F2: E2 DEC R2 ;06F3: 22 STXD ;06F4: 73 GHI RA ;06F5: 9A STR R2 ;06F6: 52 SEP RF ;06F7: DF S06F8 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ISLT ; ---------------------------------------------------------------------- ; Opcode: 0x4D ; Handler: 0x06F8 ; Dispatch: 7E->06F9 ; Definition: TOS = (TOS < NOS) ? 1 : 0 (16-bit unsigned compare) ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 06F9: DEC RD, pushes R9 ; back (entry 0x60), pushes RA (entry 0x59), pops into R9. Then SD/SDB ; (NOS - TOS). If DF=0 (borrow = TOS > NOS): pushes 1 (entry 0x2B). If ; DF=1: pushes 0 (entry 0x29). ; ====================================================================== DB 7EH ;06F8: 7E S06F9 DEC RD ;06F9: 2D SEP R0 ;06FA: D0 DB 60H ;06FB: 60 S06FC SEP R0 ;06FC: D0 DB 59H ;06FD: 59 S06FE INC RD ;06FE: 1D SEP R0 ;06FF: D0 S0700 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ISGT ; ---------------------------------------------------------------------- ; Opcode: 0x4E ; Handler: 0x0700 ; Dispatch: 06->0701 ; Definition: TOS = (TOS > NOS) ? 1 : 0 (16-bit unsigned compare) ; ; Implementation: ; Entry 0x06 pops TOS into R9, X=RD (NOS on stack). Handler at 0701: ; SD/SDB (TOS.low - NOS.low, TOS.high - NOS.high). If DF=0 (NOS < TOS, ; ie TOS > NOS): pushes 1. If DF=1: pushes 0. ; ====================================================================== DB 06H ;0700: 06 S0701 SD ;0701: F5 DEC RD ;0702: 2D GHI R9 ;0703: 99 SDB ;0704: 75 INC RD ;0705: 1D INC RD ;0706: 1D BDF J070C ;0707: 33 0C J0709 SEP R0 ;0709: D0 DB 2BH ;070A: 2B S070B SEP RF ;070B: DF J070C SEP R0 ;070C: D0 DB 29H ;070D: 29 S070E SEP RF ;070E: DF S070F ; ; ====================================================================== ; PSEUDO INSTRUCTION: ISEQ ; ---------------------------------------------------------------------- ; Opcode: 0x4F ; Handler: 0x070F ; Dispatch: 06->0710 ; Definition: TOS = (TOS == NOS) ? 1 : 0 (16-bit compare) ; ; Implementation: ; Entry 0x06 pops TOS into R9 (D=TOS.low). Handler at 0710: SM (NOS.low ; - TOS.low). If nonzero: LBNZ to push 0. If zero: DEC RD x2, GHI R9, SM ; (NOS.high - TOS.high). If nonzero: push 0. If both equal: LBR to push ; 1 (entry 0x2B). ; ====================================================================== DB 06H ;070F: 06 S0710 SM ;0710: F7 INC RD ;0711: 1D LBNZ J070C ;0712: CA 07 0C DEC RD ;0715: 2D DEC RD ;0716: 2D GHI R9 ;0717: 99 SM ;0718: F7 INC RD ;0719: 1D INC RD ;071A: 1D LBNZ J070C ;071B: CA 07 0C LBR J0709 ;071E: C0 07 09 DB 0FFH ;0721: FF DB 84H ;0722: 84 INC RD ;0723: 1D ADD ;0724: F4 STXD ;0725: 73 GHI RA ;0726: 9A ADC ;0727: 74 SHR ;0728: F6 STR RD ;0729: 5D INC RD ;072A: 1D LDN RD ;072B: 0D SHRC ;072C: 76 STXD ;072D: 73 J072E SEP RF ;072E: DF S072F ; ; ====================================================================== ; PSEUDO INSTRUCTION: DISP ; ---------------------------------------------------------------------- ; Opcode: 0x43 ; Handler: 0x072F ; Dispatch: 66->0730 ; Definition: Character insertion into display buffer ; ; Implementation: ; Entry 0x66 pops TOS->R9 (dest position). Handler at 0730: sets ; R6=0x6056 (VA), dispatches 0x85 (reads source params), dispatches 0x6D ; (pops count to R8). Copies VB bytes from VA to dest. Then ; right-to-left inserts chars from VC into cursor positions (0x5F with ; bit 7) in buffer. Complex display formatting routine. ; ====================================================================== DB 66H ;072F: 66 S0730 LDI 56H ;0730: F8 56 PLO R6 ;0732: A6 SEX R6 ;0733: E6 SEP R0 ;0734: D0 DB 85H ;0735: 85 S0736 SEP R0 ;0736: D0 DB 6DH ;0737: 6D S0738 GLO R8 ;0738: 88 PLO R4 ;0739: A4 SEP R0 ;073A: D0 DB 54H ;073B: 54 S073C SEP R3 ;073C: D3 S073D SEP R0 ;073D: D0 DB 3DH ;073E: 3D S073F DEC R9 ;073F: 29 LDI 5AH ;0740: F8 5A PLO R6 ;0742: A6 SEX R6 ;0743: E6 SEP R0 ;0744: D0 DB 85H ;0745: 85 S0746 INC R6 ;0746: 16 SEP R0 ;0747: D0 DB 9AH ;0748: 9A S0749 DEC RA ;0749: 2A DEC R6 ;074A: 26 SEP R0 ;074B: D0 DB 6DH ;074C: 6D S074D BNZ R0753 ;074D: 3A 53 INC RA ;074F: 1A LDI 30H ;0750: F8 30 STR RA ;0752: 5A R0753 LDN R9 ;0753: 09 XRI 2DH ;0754: FB 2D BZ R0769 ;0756: 32 69 XRI 06H ;0758: FB 06 BZ R0775 ;075A: 32 75 R075C LDN RA ;075C: 0A XRI 2DH ;075D: FB 2D BZ R0765 ;075F: 32 65 XRI 06H ;0761: FB 06 BNZ R0782 ;0763: 3A 82 R0765 DEC RA ;0765: 2A DEC R8 ;0766: 28 BR R0782 ;0767: 30 82 R0769 LDN RA ;0769: 0A XRI 2DH ;076A: FB 2D BZ R077E ;076C: 32 7E R076E LDI 20H ;076E: F8 20 STR R9 ;0770: 59 R0771 DEC R9 ;0771: 29 DEC R4 ;0772: 24 BR R075C ;0773: 30 5C R0775 LDN RA ;0775: 0A XRI 2DH ;0776: FB 2D BZ R077E ;0778: 32 7E XRI 06H ;077A: FB 06 BNZ R076E ;077C: 3A 6E R077E LDN RA ;077E: 0A STR R9 ;077F: 59 BR R0771 ;0780: 30 71 R0782 GLO R8 ;0782: 88 BZ R0797 ;0783: 32 97 GLO R4 ;0785: 84 BZ R0797 ;0786: 32 97 LDN R9 ;0788: 09 ANI 7FH ;0789: FA 7F XRI 5FH ;078B: FB 5F BNZ R0793 ;078D: 3A 93 LDN RA ;078F: 0A STR R9 ;0790: 59 DEC RA ;0791: 2A DEC R8 ;0792: 28 R0793 DEC R9 ;0793: 29 DEC R4 ;0794: 24 BR R0782 ;0795: 30 82 R0797 SEP RF ;0797: DF DB 8BH ;0798: 8B LDI 5DH ;0799: F8 5D PLO R6 ;079B: A6 LDN R6 ;079C: 06 PLO R8 ;079D: A8 DEC R6 ;079E: 26 DEC R6 ;079F: 26 SEX R6 ;07A0: E6 ADD ;07A1: F4 PLO RA ;07A2: AA DEC R6 ;07A3: 26 GHI R0 ;07A4: 90 ADC ;07A5: 74 PHI RA ;07A6: BA INC R6 ;07A7: 16 INC R6 ;07A8: 16 INC R6 ;07A9: 16 BR R07B2 ;07AA: 30 B2 R07AC LDN RA ;07AC: 0A J07AD SMI 20H ;07AD: FF 20 BNZ R07B6 ;07AF: 3A B6 DEC R8 ;07B1: 28 R07B2 DEC RA ;07B2: 2A GLO R8 ;07B3: 88 BNZ R07AC ;07B4: 3A AC R07B6 GLO R8 ;07B6: 88 STR R6 ;07B7: 56 SEP RF ;07B8: DF DB 0FFH ;07B9: FF DB 72H ;07BA: 72 S07BB LDI 56H ;07BB: F8 56 PLO R6 ;07BD: A6 SEX R6 ;07BE: E6 SEP R0 ;07BF: D0 J07C0 DB 85H ;07C0: 85 S07C1 SEP R0 ;07C1: D0 DB 6DH ;07C2: 6D S07C3 GLO R8 ;07C3: 88 BZ R07E2 ;07C4: 32 E2 LDN R9 ;07C6: 09 ANI 7FH ;07C7: FA 7F SMI 31H ;07C9: FF 31 BDF R07D9 ;07CB: 33 D9 LDN RA ;07CD: 0A J07CE SHL ;07CE: FE BNF R07E2 ;07CF: 3B E2 LDI 20H ;07D1: F8 20 STR R9 ;07D3: 59 DEC R8 ;07D4: 28 INC RA ;07D5: 1A INC R9 ;07D6: 19 BR S07C3 ;07D7: 30 C3 R07D9 LDN R9 ;07D9: 09 ANI 7FH ;07DA: FA 7F STR R9 ;07DC: 59 INC R9 ;07DD: 19 J07DE DEC R8 ;07DE: 28 GLO R8 ;07DF: 88 J07E0 BNZ R07D9 ;07E0: 3A D9 R07E2 SEP RF ;07E2: DF S07E3 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LDVCD [TOS] ; ---------------------------------------------------------------------- ; Opcode: 0x37 ; Handler: 0x07E3 ; Dispatch: 84->07E4 ; Definition: VD = M(TOS) (byte), VC = TOS+1 (address). Pops TOS. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 07E4: reads M(RA) as count -> ; stores to VD (0x605C/5D). Then RA+1 -> stores to VC (0x605A/5B) via ; entry 0x5A. Sets up source length and address for string operations. ; ====================================================================== DB 84H ;07E3: 84 S07E4 LDI 5DH ;07E4: F8 5D R07E6 PLO R6 ;07E6: A6 SEX R6 ;07E7: E6 LDA RA ;07E8: 4A STXD ;07E9: 73 GHI R0 ;07EA: 90 STXD ;07EB: 73 J07EC SEP R0 ;07EC: D0 DB 5AH ;07ED: 5A S07EE SEP RF ;07EE: DF DB 0FFH ;07EF: FF DB 84H ;07F0: 84 LDI 59H ;07F1: F8 59 BR R07E6 ;07F3: 30 E6 S07F5 ; ; ====================================================================== ; PSEUDO INSTRUCTION: STRCP ; ---------------------------------------------------------------------- ; Opcode: 0x2B ; Handler: 0x07F5 ; Dispatch: 94->07F9 ; Definition: String copy with space padding using vars VC-VB ; ; Implementation: ; Entry 0x94 (variable indirect): SEX RB, reads R6.0 from handler, ; multi-dispatch. Copies VD bytes from M(VC) to M(VA), then pads (VB-VD) ; spaces (0x20) to fill field width VB. ; ====================================================================== DB 94H ;07F5: 94 S07F6 DB 56H ;07F6: 56 DB 00H ;07F7: 00 DB 67H ;07F8: 67 S07F9 INC R6 ;07F9: 16 LDA R6 ;07FA: 46 PLO RE ;07FB: AE SEP R0 ;07FC: D0 DB 85H ;07FD: 85 S07FE GLO RE ;07FE: 8E INC R6 ;07FF: 16 SM ;0800: F7 BDF R0808 ;0801: 33 08 GLO RE ;0803: 8E PLO R8 ;0804: A8 SEP R0 ;0805: D0 DB 3DH ;0806: 3D SEP RF ;0807: DF R0808 PLO RE ;0808: AE LDA R6 ;0809: 46 PLO R8 ;080A: A8 SEP R0 ;080B: D0 DB 3DH ;080C: 3D S080D LDI 20H ;080D: F8 20 PLO RA ;080F: AA GLO RE ;0810: 8E PLO R8 ;0811: A8 SEP R0 ;0812: D0 DB 50H ;0813: 50 S0814 SEP RF ;0814: DF S0815 ; ; ====================================================================== ; PSEUDO INSTRUCTION: NUMCZ ; ---------------------------------------------------------------------- ; Opcode: 0x2D ; Handler: 0x0815 ; Dispatch: 94->0819 ; Definition: Numeric copy with '0' padding using vars VC-VB ; ; Implementation: ; Entry 0x94 (variable indirect). Same as NUMCP but pads with ASCII '0' ; (0x30) instead of 0x00. Right-aligns in field width VB. ; ====================================================================== DB 94H ;0815: 94 S0816 DB 56H ;0816: 56 DB 00H ;0817: 00 DB 67H ;0818: 67 S0819 LDI 30H ;0819: F8 30 BR R0822 ;081B: 30 22 S081D ; ; ====================================================================== ; PSEUDO INSTRUCTION: NUMCP ; ---------------------------------------------------------------------- ; Opcode: 0x2C ; Handler: 0x081D ; Dispatch: 94->0821 ; Definition: Numeric copy with zero padding using vars VC-VB ; ; Implementation: ; Entry 0x94 (variable indirect). Pads (VB-VD) zero bytes at M(VA), then ; copies VD bytes from M(VC). Right-aligns data in field width VB. ; Checks bit 7 of first source byte for variant. ; ====================================================================== DB 94H ;081D: 94 S081E DB 56H ;081E: 56 DB 00H ;081F: 00 DB 67H ;0820: 67 S0821 GHI R0 ;0821: 90 R0822 PLO RE ;0822: AE INC R6 ;0823: 16 LDA R6 ;0824: 46 PLO R8 ;0825: A8 SEP R0 ;0826: D0 DB 85H ;0827: 85 S0828 GLO R8 ;0828: 88 INC R6 ;0829: 16 SM ;082A: F7 LBZ J084F ;082B: C2 08 4F DEC R6 ;082E: 26 DEC R6 ;082F: 26 LBDF J083E ;0830: C3 08 3E SDI 00H ;0833: FD 00 ADD ;0835: F4 PLO RA ;0836: AA GHI RA ;0837: 9A ADCI 00H ;0838: 7C 00 PHI RA ;083A: BA LBR J084F ;083B: C0 08 4F J083E PLO R8 ;083E: A8 LDN RA ;083F: 0A SHL ;0840: FE BNF R0846 ;0841: 3B 46 LDI 0FFH ;0843: F8 FF SKP ;0845: 38 R0846 GLO RE ;0846: 8E PLO RA ;0847: AA SEP R0 ;0848: D0 DB 50H ;0849: 50 S084A LDA R6 ;084A: 46 PLO RA ;084B: AA INC R6 ;084C: 16 LDN R6 ;084D: 06 PLO R8 ;084E: A8 J084F SEP R0 ;084F: D0 DB 3DH ;0850: 3D S0851 SEP RF ;0851: DF DB 94H ;0852: 94 S0853 DB 56H ;0853: 56 DB 00H ;0854: 00 DB 67H ;0855: 67 GHI R0 ;0856: 90 PLO RE ;0857: AE INC R6 ;0858: 16 LDA R6 ;0859: 46 PLO R8 ;085A: A8 SEP R0 ;085B: D0 DB 85H ;085C: 85 GLO R8 ;085D: 88 INC R6 ;085E: 16 SM ;085F: F7 LBZ J084F ;0860: C2 08 4F DEC R6 ;0863: 26 DEC R6 ;0864: 26 BNF R086A ;0865: 3B 6A PLO R8 ;0867: A8 BR R0846 ;0868: 30 46 R086A SDI 00H ;086A: FD 00 ADD ;086C: F4 PLO RA ;086D: AA GHI RA ;086E: 9A ADCI 00H ;086F: 7C 00 PHI RA ;0871: BA LBR J084F ;0872: C0 08 4F S0875 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [TOS], 0 ; ---------------------------------------------------------------------- ; Opcode: 0x2E ; Handler: 0x0875 ; Dispatch: 84->0876 ; Definition: M(TOS) = 0x00. Pops TOS. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 0876: GHI R0 (=0x00), STR RA. ; Stores zero byte at address. ; ====================================================================== DB 84H ;0875: 84 S0876 GHI R0 ;0876: 90 STR RA ;0877: 5A SEP RF ;0878: DF S0879 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [TOS], 1 ; ---------------------------------------------------------------------- ; Opcode: 0x2F ; Handler: 0x0879 ; Dispatch: 84->087A ; Definition: M(TOS) = 0x01. Pops TOS. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 087A: GHI RE (=0x01), STR RA. ; Stores 1 byte at address. ; ====================================================================== DB 84H ;0879: 84 S087A GHI RE ;087A: 9E STR RA ;087B: 5A SEP RF ;087C: DF S087D ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD [TOS], NOS.0 ; ---------------------------------------------------------------------- ; Opcode: 0x30 ; Handler: 0x087D ; Dispatch: 84->087E ; Definition: M(TOS) = M(TOS) + NOS.low (byte add). Pops both. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 087E: INC RD (skip NOS.high), ; SEX RD, LDN RA ADD (adds NOS.low to M(RA)), STR RA. ; ====================================================================== DB 84H ;087D: 84 S087E INC RD ;087E: 1D LDN RA ;087F: 0A ADD ;0880: F4 STR RA ;0881: 5A INC RD ;0882: 1D SEP RF ;0883: DF S0884 ; ; ====================================================================== ; PSEUDO INSTRUCTION: FILL ; ---------------------------------------------------------------------- ; Opcode: 0x46 ; Handler: 0x0884 ; Dispatch: 78->0885 ; Definition: Fill memory: TOS=count, NOS=dest, 3OS=fill byte ; ; Implementation: ; Entry 0x78 pops 3 values: TOS->R8 (count), NOS->R9 (dest), 3OS->RA ; (fill). Handler at 0885: dispatches entry 0x50 (fill loop): fills R8.0 ; bytes at M(R9) with RA.0 value. ; ====================================================================== DB 78H ;0884: 78 S0885 SEP R0 ;0885: D0 DB 50H ;0886: 50 S0887 SEP RF ;0887: DF S0888 ; ; ====================================================================== ; PSEUDO INSTRUCTION: MCPY3 [aaaa], [mmmm] ; ---------------------------------------------------------------------- ; Opcode: 0x58 ; Handler: 0x0888 ; Dispatch: A4.7F->088A ; Definition: Copy 3 bytes from [mmmm] to [aaaa]. Fixed count. ; ; Implementation: ; Entry 0xA4 sets X=RC, second dispatch 0x7F reads two 16-bit addresses: ; R9=aaaa (dest), RA=mmmm (source). Handler: fixed R8.0=3, enters copy ; loop via entry 0x39. ; ====================================================================== DB 0A4H ;0888: A4 DB 7FH ;0889: 7F S088A SKP ;088A: 38 S088B ; ; ====================================================================== ; PSEUDO INSTRUCTION: MCPY3 [TOS], [NOS] ; ---------------------------------------------------------------------- ; Opcode: 0x31 ; Handler: 0x088B ; Dispatch: 7E->088C ; Definition: Copy 3 bytes from NOS address to TOS address. Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9 (dest), NOS->RA (src). Handler: hardcoded ; count=3 in R8.0, enters copy loop via entry 0x39 (DEC R8; LDA RA; STR ; R9; INC R9; loop). ; ====================================================================== DB 7EH ;088B: 7E S088C LDI 03H ;088C: F8 03 PLO R8 ;088E: A8 SEP R0 ;088F: D0 DB 39H ;0890: 39 S0891 SEP RF ;0891: DF S0892 ; ; ====================================================================== ; PSEUDO INSTRUCTION: OR TOS, NOS ; ---------------------------------------------------------------------- ; Opcode: 0x33 ; Handler: 0x0892 ; Dispatch: 06->0893 ; Definition: TOS = NOS OR TOS (16-bit bitwise OR) ; ; Implementation: ; Entry 0x06 pops TOS into R9. Handler at 0893: XOR... wait, actually ; OR: GLO R9 OR with NOS.low, GHI R9 OR with NOS.high. Standard 16-bit ; OR. ; ====================================================================== DB 06H ;0892: 06 S0893 OR ;0893: F1 STXD ;0894: 73 GHI R9 ;0895: 99 OR ;0896: F1 STR RD ;0897: 5D SEP RF ;0898: DF S0899 ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD24 [mmmm], [aaaa] ; ---------------------------------------------------------------------- ; Opcode: 0x59 ; Handler: 0x0899 ; Dispatch: A4.7F->089B ; Definition: M(mmmm) += M(aaaa) - 24-bit (3-byte) big-endian add. ; ; Implementation: ; Entry 0xA4+0x7F reads R9=aaaa (source), RA=mmmm (dest). Handler at ; 089B: 3-byte add LSB-first with ADC chain. Adds value at aaaa to value ; at mmmm, result at mmmm. ; ====================================================================== DB 0A4H ;0899: A4 DB 7FH ;089A: 7F S089B SKP ;089B: 38 S089C ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD24 [NOS], [TOS] ; ---------------------------------------------------------------------- ; Opcode: 0x32 ; Handler: 0x089C ; Dispatch: 7E->089D ; Definition: 24-bit (3-byte) add: M(NOS) += M(TOS), big-endian. Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 089D: processes 3 bytes ; LSB-first with ADD/ADC chain. Adds 3-byte value at R9 to 3-byte value ; at RA, stores result at RA. ; ====================================================================== DB 7EH ;089C: 7E S089D INC RA ;089D: 1A INC RA ;089E: 1A INC R9 ;089F: 19 INC R9 ;08A0: 19 SEX RA ;08A1: EA LDN R9 ;08A2: 09 ADD ;08A3: F4 STXD ;08A4: 73 DEC R9 ;08A5: 29 LDN R9 ;08A6: 09 ADC ;08A7: 74 STXD ;08A8: 73 DEC R9 ;08A9: 29 LDN R9 ;08AA: 09 ADC ;08AB: 74 STR RA ;08AC: 5A SEP RF ;08AD: DF S08AE ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD24 [TOS], NOS ; ---------------------------------------------------------------------- ; Opcode: 0x36 ; Handler: 0x08AE ; Dispatch: 84->08AF ; Definition: Store NOS as 24-bit at M(TOS): M(TOS)=0, M+1=NOS.1, M+2=NOS.0. Pops both. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 08AF: stores 0x00 at M(RA), ; NOS.high at M(RA+1), NOS.low at M(RA+2). Zero-extends 16-bit to 24-bit ; big-endian. ; ====================================================================== DB 84H ;08AE: 84 S08AF GHI R0 ;08AF: 90 STR RA ;08B0: 5A INC RA ;08B1: 1A LDA RD ;08B2: 4D STR RA ;08B3: 5A LDA RD ;08B4: 4D INC RA ;08B5: 1A STR RA ;08B6: 5A SEP RF ;08B7: DF DB 7EH ;08B8: 7E S08B9 LDI 03H ;08B9: F8 03 PLO R8 ;08BB: A8 BR S08C9 ;08BC: 30 C9 DB 94H ;08BE: 94 DB 56H ;08BF: 56 DB 00H ;08C0: 00 DB 67H ;08C1: 67 SEP R0 ;08C2: D0 DB 6DH ;08C3: 6D SEP R0 ;08C4: D0 DB 85H ;08C5: 85 BR S08C9 ;08C6: 30 C9 S08C8 ; ; ====================================================================== ; PSEUDO INSTRUCTION: COMP ; ---------------------------------------------------------------------- ; Opcode: 0x34 ; Handler: 0x08C8 ; Dispatch: 78->08C9 ; Definition: Multi-byte compare: TOS.0 bytes at NOS vs 3OS. Returns 0/1/FFFF. ; ; Implementation: ; Entry 0x78 pops TOS->R8 (count), NOS->R9 (addr1), 3OS->RA (addr2). ; Handler at 08C9: compares byte-by-byte MSB first. Returns TOS=0 ; (equal), 1 (R9>RA), or FFFF (R908E3 ; Definition: TOS = TOS + M(TOS) (16-bit add byte at address to address itself) ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler: dispatches to entry 0x99 (SEX ; RA; GLO RA; ADD; PLO RA; GHI RA; ADCI 00; PHI RA). Adds byte at M(RA) ; to RA as 16-bit. Pushes result. ; ====================================================================== DB 84H ;08E2: 84 S08E3 SEP R0 ;08E3: D0 DB 99H ;08E4: 99 S08E5 LBR J0902 ;08E5: C0 09 02 S08E8 ; ; ====================================================================== ; PSEUDO INSTRUCTION: MCPY [TOS], [NOS] ; ---------------------------------------------------------------------- ; Opcode: 0x38 ; Handler: 0x08E8 ; Dispatch: 7E->08E9 ; Definition: Copy M(NOS) bytes from NOS+1 to TOS. Count = first byte at source. Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9 (dest), NOS->RA (source). Handler at 08E9: ; reads M(RA) as count -> R8.0, then dispatches entry 0x39 copy loop ; (LDA RA; STR R9; INC R9; DEC R8; loop). ; ====================================================================== DB 7EH ;08E8: 7E S08E9 LDA RA ;08E9: 4A BNZ R08ED ;08EA: 3A ED SEP RF ;08EC: DF R08ED PLO R8 ;08ED: A8 SEP R0 ;08EE: D0 DB 39H ;08EF: 39 S08F0 SEP RF ;08F0: DF S08F1 ; ; ====================================================================== ; PSEUDO INSTRUCTION: CKSUM ; ---------------------------------------------------------------------- ; Opcode: 0x47 ; Handler: 0x08F1 ; Dispatch: 84->08F2 ; Definition: Checksum: pops start addr (TOS) and count (NOS). Loops: addr += M(addr), advance. Push final addr. ; ; Implementation: ; Entry 0x84 pops TOS into RA (start address). Handler at 08F2: pops NOS ; into R9 (count). If count==0: pushes RA unchanged. Otherwise: SEP R0 ; entry 0xA1 sets up R3 for repeated call, loops R9 times: SEX RA, SEP ; R3 (adds M(RA) to RA with carry), INC RA. Pushes final RA. ; ====================================================================== DB 84H ;08F1: 84 S08F2 SEP R0 ;08F2: D0 DB 66H ;08F3: 66 S08F4 LBZ J0902 ;08F4: C2 09 02 SEP R0 ;08F7: D0 DB 0A1H ;08F8: A1 SEX RA ;08F9: EA LSKP ;08FA: C8 J08FB SEP R3 ;08FB: D3 INC RA ;08FC: 1A DEC R9 ;08FD: 29 GLO R9 ;08FE: 89 LBNZ J08FB ;08FF: CA 08 FB J0902 DEC RD ;0902: 2D SEP R0 ;0903: D0 DB 59H ;0904: 59 S0905 INC RD ;0905: 1D SEP RF ;0906: DF S0907 ; ; ====================================================================== ; PSEUDO INSTRUCTION: TOBCD ; ---------------------------------------------------------------------- ; Opcode: 0x48 ; Handler: 0x0907 ; Dispatch: 6C->0908 ; Definition: Binary to packed BCD (double-dabble). Pops TOS = byte count N. ; ; Implementation: ; Entry 0x6C pops TOS into R8 (count N). Handler at 0908: BCD output at ; M(60(37-N))..M(6037). Binary input at M(6038)..M(6037+N). Shifts N*8 ; bits with add-3 correction on each nibble >= 5. Standard double-dabble ; algorithm. No stack result. ; ====================================================================== DB 6CH ;0907: 6C S0908 BNZ R090B ;0908: 3A 0B SEP RF ;090A: DF R090B PHI R8 ;090B: B8 SDI 37H ;090C: FD 37 INC R8 ;090E: 18 DEC RD ;090F: 2D STR RD ;0910: 5D PLO R9 ;0911: A9 GHI R6 ;0912: 96 PHI R9 ;0913: B9 PHI RA ;0914: BA GHI R0 ;0915: 90 PLO RA ;0916: AA SEP R0 ;0917: D0 DB 50H ;0918: 50 S0919 GHI R8 ;0919: 98 SHL ;091A: FE SHL ;091B: FE SHL ;091C: FE PLO R8 ;091D: A8 J091E GHI R8 ;091E: 98 PLO R4 ;091F: A4 INC R4 ;0920: 14 LDN RD ;0921: 0D PLO RA ;0922: AA J0923 LDN RA ;0923: 0A ANI 0F0H ;0924: FA F0 SMI 50H ;0926: FF 50 BNF R092E ;0928: 3B 2E LDN RA ;092A: 0A ADI 30H ;092B: FC 30 STR RA ;092D: 5A R092E LDN RA ;092E: 0A ANI 0FH ;092F: FA 0F SMI 05H ;0931: FF 05 BNF R0939 ;0933: 3B 39 LDN RA ;0935: 0A ADI 03H ;0936: FC 03 STR RA ;0938: 5A R0939 INC RA ;0939: 1A DEC R4 ;093A: 24 GLO R4 ;093B: 84 LBNZ J0923 ;093C: CA 09 23 GHI R8 ;093F: 98 ADI 37H ;0940: FC 37 PLO RA ;0942: AA GHI R8 ;0943: 98 SHL ;0944: FE PLO R4 ;0945: A4 INC R4 ;0946: 14 ADI 00H ;0947: FC 00 J0949 LDN RA ;0949: 0A SHLC ;094A: 7E STR RA ;094B: 5A DEC RA ;094C: 2A DEC R4 ;094D: 24 GLO R4 ;094E: 84 LBNZ J0949 ;094F: CA 09 49 DEC R8 ;0952: 28 GLO R8 ;0953: 88 LBNZ J091E ;0954: CA 09 1E INC RD ;0957: 1D SEP RF ;0958: DF S0959 ; ; ====================================================================== ; PSEUDO INSTRUCTION: FMBCD ; ---------------------------------------------------------------------- ; Opcode: 0x49 ; Handler: 0x0959 ; Dispatch: 6C->095A ; Definition: Packed BCD to binary (reverse double-dabble). Pops TOS = byte count N. ; ; Implementation: ; Entry 0x6C pops TOS into R8. Handler at 095A: BCD source at ; M(60(38-N))..M(6037). Binary output at M(6038)..M(6037+N). Shifts ; right with subtract-3 correction (nibble >= 8: sub 0x30 high, sub 0x03 ; low). Inverse of TOBCD. No stack result. ; ====================================================================== DB 6CH ;0959: 6C S095A BNZ R095D ;095A: 3A 5D SEP RF ;095C: DF R095D PHI R8 ;095D: B8 SDI 38H ;095E: FD 38 DEC RD ;0960: 2D STR RD ;0961: 5D LDI 38H ;0962: F8 38 PLO R9 ;0964: A9 GHI R0 ;0965: 90 PLO RA ;0966: AA GHI R6 ;0967: 96 PHI R9 ;0968: B9 PHI RA ;0969: BA SEP R0 ;096A: D0 DB 50H ;096B: 50 S096C GHI R8 ;096C: 98 SHL ;096D: FE SHL ;096E: FE SHL ;096F: FE PLO R8 ;0970: A8 J0971 GHI R8 ;0971: 98 SHL ;0972: FE PLO R4 ;0973: A4 INC R4 ;0974: 14 LDN RD ;0975: 0D PLO RA ;0976: AA J0977 LDN RA ;0977: 0A SHRC ;0978: 76 STR RA ;0979: 5A DEC R4 ;097A: 24 INC RA ;097B: 1A GLO R4 ;097C: 84 LBNZ J0977 ;097D: CA 09 77 GHI R8 ;0980: 98 PLO R4 ;0981: A4 LDN RD ;0982: 0D PLO RA ;0983: AA J0984 LDN RA ;0984: 0A ANI 80H ;0985: FA 80 LBZ J098E ;0987: C2 09 8E LDN RA ;098A: 0A SMI 30H ;098B: FF 30 STR RA ;098D: 5A J098E LDN RA ;098E: 0A ANI 08H ;098F: FA 08 LBZ J0998 ;0991: C2 09 98 LDN RA ;0994: 0A SMI 03H ;0995: FF 03 STR RA ;0997: 5A J0998 INC RA ;0998: 1A DEC R4 ;0999: 24 GLO R4 ;099A: 84 LBNZ J0984 ;099B: CA 09 84 DEC R8 ;099E: 28 GLO R8 ;099F: 88 LBNZ J0971 ;09A0: CA 09 71 INC RD ;09A3: 1D SEP RF ;09A4: DF DB 0FFH ;09A5: FF DB 78H ;09A6: 78 GLO R8 ;09A7: 88 BZ R09B5 ;09A8: 32 B5 SEX RA ;09AA: EA ADCI 00H ;09AB: 7C 00 R09AD LDN R9 ;09AD: 09 ADC ;09AE: 74 STXD ;09AF: 73 DEC R9 ;09B0: 29 DEC R8 ;09B1: 28 GLO R8 ;09B2: 88 BNZ R09AD ;09B3: 3A AD R09B5 SEP RF ;09B5: DF S09B6 ; ; ====================================================================== ; PSEUDO INSTRUCTION: SUB24 [NOS], [TOS] ; ---------------------------------------------------------------------- ; Opcode: 0x6E ; Handler: 0x09B6 ; Dispatch: 7E->09B7 ; Definition: 24-bit subtract: M(NOS) -= M(TOS), big-endian (3 bytes). Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 09B7: INC R9 x2, INC RA ; x2, R8=3. Loop: LDN R9 SDB STXD, DEC R9, DEC R8, BNZ. Subtracts 3 ; bytes LSB-first with borrow chain. ; ====================================================================== DB 7EH ;09B6: 7E S09B7 INC R9 ;09B7: 19 INC R9 ;09B8: 19 INC RA ;09B9: 1A INC RA ;09BA: 1A LDI 03H ;09BB: F8 03 PLO R8 ;09BD: A8 BR R09C1 ;09BE: 30 C1 DB 78H ;09C0: 78 R09C1 GLO R8 ;09C1: 88 BZ R09CF ;09C2: 32 CF SEX RA ;09C4: EA SMI 00H ;09C5: FF 00 R09C7 LDN R9 ;09C7: 09 SDB ;09C8: 75 STXD ;09C9: 73 DEC R9 ;09CA: 29 DEC R8 ;09CB: 28 GLO R8 ;09CC: 88 BNZ R09C7 ;09CD: 3A C7 R09CF SEP RF ;09CF: DF DB 6CH ;09D0: 6C SEP R0 ;09D1: D0 DB 84H ;09D2: 84 GLO R8 ;09D3: 88 BZ R09E0 ;09D4: 32 E0 SEX RA ;09D6: EA SMI 00H ;09D7: FF 00 R09D9 GHI R0 ;09D9: 90 SMB ;09DA: 77 STXD ;09DB: 73 DEC R8 ;09DC: 28 GLO R8 ;09DD: 88 BNZ R09D9 ;09DE: 3A D9 R09E0 SEP RF ;09E0: DF DB 0FFH ;09E1: FF DB 6CH ;09E2: 6C LBZ J09F7 ;09E3: C2 09 F7 PHI R8 ;09E6: B8 SDI 48H ;09E7: FD 48 PLO R9 ;09E9: A9 GHI R6 ;09EA: 96 PHI R9 ;09EB: B9 GHI R0 ;09EC: 90 PLO RA ;09ED: AA SEP R0 ;09EE: D0 DB 50H ;09EF: 50 GHI R8 ;09F0: 98 SHL ;09F1: FE SHL ;09F2: FE SHL ;09F3: FE PLO R8 ;09F4: A8 SEP R0 ;09F5: D0 DB 0FAH ;09F6: FA J09F7 SEP RF ;09F7: DF S09F8 ; ; ====================================================================== ; PSEUDO INSTRUCTION: MUL TOS, NOS ; ---------------------------------------------------------------------- ; Opcode: 0x06 ; Handler: 0x09F8 ; Dispatch: 03.B7->09FB ; Definition: TOS = NOS x TOS (16-bit multiply, overflow discarded) ; ; Implementation: ; Entry 0x03 sets X=RB, reads second dispatch byte B7 (LDA RB->PLO R3). ; Entry 0xB7 reads variable address 0x2E via LDXA (X=RB), pops TOS to ; M(602E/2F). SEP RB returns to 09FB. Handler body at 09FB does second ; B7 dispatch (via SEP R0) to pop NOS to M(6036/37). Then clears ; accumulator, R8=0x10 (16 iterations), enters multiply loop at 0x0300 ; via entry 0xFA: shift-and-add algorithm. ; ====================================================================== DB 03H ;09F8: 03 DB 0B7H ;09F9: B7 DB 2EH ;09FA: 2E S09FB SEP R0 ;09FB: D0 DB 0B7H ;09FC: B7 DB 36H ;09FD: 36 S09FE LDI 46H ;09FE: F8 46 PLO R6 ;0A00: A6 GHI R0 ;0A01: 90 STR R6 ;0A02: 56 J0A03 INC R6 ;0A03: 16 STR R6 ;0A04: 56 J0A05 LDI 02H ;0A05: F8 02 PHI R8 ;0A07: B8 LDI 10H ;0A08: F8 10 PLO R8 ;0A0A: A8 SEP R0 ;0A0B: D0 DB 0FAH ;0A0C: FA S0A0D SEX RB ;0A0D: EB SEP R0 ;0A0E: D0 DB 0A7H ;0A0F: A7 DB 46H ;0A10: 46 S0A11 SEP RF ;0A11: DF DB 6CH ;0A12: 6C BZ R0A22 ;0A13: 32 22 PHI R8 ;0A15: B8 LDI 2FH ;0A16: F8 2F PLO R6 ;0A18: A6 GHI R0 ;0A19: 90 STR R6 ;0A1A: 56 GHI R8 ;0A1B: 98 SHL ;0A1C: FE SHL ;0A1D: FE SHL ;0A1E: FE PLO R8 ;0A1F: A8 SEP R0 ;0A20: D0 DB 0FDH ;0A21: FD R0A22 SEP RF ;0A22: DF S0A23 ; ; ====================================================================== ; PSEUDO INSTRUCTION: DIV TOS, NOS ; ---------------------------------------------------------------------- ; Opcode: 0x07 ; Handler: 0x0A23 ; Dispatch: 29->0A24 ; Definition: TOS = NOS / TOS (quotient), NOS = remainder. 16-bit unsigned. ; ; Implementation: ; Entry 0x29 pushes zero. Handler at 0A24: dispatches 0xB7 to pop ; operands. R8=0x10 (16 iterations). Enters divide loop at 0x0347 via ; entry 0xFD: restoring division. Pushes remainder then quotient. ; ====================================================================== DB 29H ;0A23: 29 S0A24 SEX RB ;0A24: EB SEP R0 ;0A25: D0 DB 0B7H ;0A26: B7 DB 44H ;0A27: 44 S0A28 SEP R0 ;0A28: D0 DB 0B7H ;0A29: B7 DB 36H ;0A2A: 36 S0A2B SEP R0 ;0A2B: D0 DB 0B7H ;0A2C: B7 DB 46H ;0A2D: 46 S0A2E LDI 2EH ;0A2E: F8 2E PLO R6 ;0A30: A6 GHI R0 ;0A31: 90 STR R6 ;0A32: 56 INC R6 ;0A33: 16 STR R6 ;0A34: 56 LDI 02H ;0A35: F8 02 PHI R8 ;0A37: B8 LDI 10H ;0A38: F8 10 PLO R8 ;0A3A: A8 SEP R0 ;0A3B: D0 DB 0FDH ;0A3C: FD S0A3D SEX RB ;0A3D: EB SEP R0 ;0A3E: D0 DB 0A7H ;0A3F: A7 DB 44H ;0A40: 44 S0A41 SEP R0 ;0A41: D0 DB 0A7H ;0A42: A7 DB 2EH ;0A43: 2E S0A44 SEP RF ;0A44: DF DB 0FFH ;0A45: FF DB 84H ;0A46: 84 GHI RE ;0A47: 9E PLO R9 ;0A48: A9 GHI R0 ;0A49: 90 PHI R9 ;0A4A: B9 BR S0A4E ;0A4B: 30 4E S0A4D ; ; ====================================================================== ; PSEUDO INSTRUCTION: ADD24 [NOS], TOS ; ---------------------------------------------------------------------- ; Opcode: 0x6F ; Handler: 0x0A4D ; Dispatch: 7E->0A4E ; Definition: M(NOS) += TOS - add 16-bit TOS to 24-bit at NOS, big-endian. Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 0A4E: INC RA x2, SEX RA. ; Adds R9.low to M(RA+2), R9.high ADC to M(RA+1), SMBI 00 to M(RA+0). ; 16-bit value added to 24-bit with carry propagation. ; ====================================================================== DB 7EH ;0A4D: 7E S0A4E INC RA ;0A4E: 1A INC RA ;0A4F: 1A SEX RA ;0A50: EA GLO R9 ;0A51: 89 ADD ;0A52: F4 STXD ;0A53: 73 GHI R9 ;0A54: 99 ADC ;0A55: 74 STXD ;0A56: 73 LDN RA ;0A57: 0A ADCI 00H ;0A58: 7C 00 STR RA ;0A5A: 5A SEP RF ;0A5B: DF DB 84H ;0A5C: 84 S0A5D GHI RE ;0A5D: 9E PLO R9 ;0A5E: A9 GHI R0 ;0A5F: 90 PHI R9 ;0A60: B9 BR S0A64 ;0A61: 30 64 S0A63 ; ; ====================================================================== ; PSEUDO INSTRUCTION: SUB24 [NOS], TOS ; ---------------------------------------------------------------------- ; Opcode: 0x70 ; Handler: 0x0A63 ; Dispatch: 7E->0A64 ; Definition: M(NOS) -= TOS - subtract 16-bit TOS from 24-bit at NOS. Pops both. ; ; Implementation: ; Entry 0x7E pops TOS->R9, NOS->RA. Handler at 0A64: INC RA x2, SEX RA. ; SD R9.low from M(RA+2), GHI R9 SDB from M(RA+1), SMBI 00 from M(RA+0). ; 16-bit sub from 24-bit with borrow. ; ====================================================================== DB 7EH ;0A63: 7E S0A64 INC RA ;0A64: 1A INC RA ;0A65: 1A SEX RA ;0A66: EA GLO R9 ;0A67: 89 SD ;0A68: F5 STXD ;0A69: 73 GHI R9 ;0A6A: 99 SDB ;0A6B: 75 STXD ;0A6C: 73 LDN RA ;0A6D: 0A SMBI 00H ;0A6E: 7F 00 STR RA ;0A70: 5A SEP RF ;0A71: DF S0A72 ; ; ====================================================================== ; PSEUDO INSTRUCTION: FMHEX ; ---------------------------------------------------------------------- ; Opcode: 0x4B ; Handler: 0x0A72 ; Dispatch: 94->0A76 ; Definition: ASCII hex to nibble conversion using vars VC-VB ; ; Implementation: ; Entry 0x94 (variable indirect). Reads dest from VA, count from VB, ; source from VC, source len from VD. Loop right-to-left: SMI 3A tests ; if char >= ':' (hex A-F), if so ADI 09. ANI 0F extracts nibble. Two ; chars per output byte (high nibble shifted left x4). Zero-pads ; remaining. ; ====================================================================== DB 94H ;0A72: 94 S0A73 DB 56H ;0A73: 56 DB 00H ;0A74: 00 DB 85H ;0A75: 85 S0A76 INC R6 ;0A76: 16 LDN R6 ;0A77: 06 LBNZ J0A7C ;0A78: CA 0A 7C DB 0DFH ;0A7B: DF J0A7C PLO R8 ;0A7C: A8 SEP R0 ;0A7D: D0 DB 9AH ;0A7E: 9A S0A7F INC R6 ;0A7F: 16 GHI RA ;0A80: 9A PHI R9 ;0A81: B9 GLO RA ;0A82: 8A PLO R9 ;0A83: A9 SEP R0 ;0A84: D0 DB 85H ;0A85: 85 S0A86 INC R6 ;0A86: 16 SEP R0 ;0A87: D0 DB 9AH ;0A88: 9A S0A89 LDN R6 ;0A89: 06 PLO R4 ;0A8A: A4 BZ R0ABB ;0A8B: 32 BB J0A8D DEC RA ;0A8D: 2A SEX R9 ;0A8E: E9 DEC R9 ;0A8F: 29 LDN RA ;0A90: 0A SMI 3AH ;0A91: FF 3A LDN RA ;0A93: 0A LSNF ;0A94: C7 ADI 09H ;0A95: FC 09 ANI 0FH ;0A97: FA 0F STR R9 ;0A99: 59 DEC R4 ;0A9A: 24 GLO R4 ;0A9B: 84 BZ J0AB6 ;0A9C: 32 B6 DEC RA ;0A9E: 2A LDN RA ;0A9F: 0A SMI 3AH ;0AA0: FF 3A LDN RA ;0AA2: 0A LSNF ;0AA3: C7 ADI 09H ;0AA4: FC 09 SHL ;0AA6: FE SHL ;0AA7: FE SHL ;0AA8: FE SHL ;0AA9: FE OR ;0AAA: F1 STR R9 ;0AAB: 59 DEC R4 ;0AAC: 24 GLO R4 ;0AAD: 84 BZ J0AB6 ;0AAE: 32 B6 DEC R8 ;0AB0: 28 GLO R8 ;0AB1: 88 LBNZ J0A8D ;0AB2: CA 0A 8D SEP RF ;0AB5: DF J0AB6 DEC R8 ;0AB6: 28 GLO R8 ;0AB7: 88 BNZ R0ABB ;0AB8: 3A BB SEP RF ;0ABA: DF R0ABB DEC R9 ;0ABB: 29 GHI R0 ;0ABC: 90 STR R9 ;0ABD: 59 LBR J0AB6 ;0ABE: C0 0A B6 S0AC1 ; ; ====================================================================== ; PSEUDO INSTRUCTION: TOHEX ; ---------------------------------------------------------------------- ; Opcode: 0x4C ; Handler: 0x0AC1 ; Dispatch: 94->0AC5 ; Definition: Binary to ASCII hex conversion using vars VC-VB ; ; Implementation: ; Entry 0x94 (variable indirect). Same var setup as FMHEX. Loop ; right-to-left: extract low nibble (ANI 0F), SMI 0A, if >=10 ADI 07, ; ADI 3A -> ASCII hex char. Then high nibble (SHR x4), same conversion. ; 2 chars per source byte. Inverse of FMHEX. ; ====================================================================== DB 94H ;0AC1: 94 S0AC2 DB 56H ;0AC2: 56 DB 00H ;0AC3: 00 DB 85H ;0AC4: 85 S0AC5 INC R6 ;0AC5: 16 LDN R6 ;0AC6: 06 BNZ R0ACA ;0AC7: 3A CA DB 0DFH ;0AC9: DF R0ACA PLO R8 ;0ACA: A8 SEP R0 ;0ACB: D0 DB 9AH ;0ACC: 9A S0ACD INC R6 ;0ACD: 16 GHI RA ;0ACE: 9A PHI R9 ;0ACF: B9 GLO RA ;0AD0: 8A PLO R9 ;0AD1: A9 SEP R0 ;0AD2: D0 DB 85H ;0AD3: 85 S0AD4 INC R6 ;0AD4: 16 SEP R0 ;0AD5: D0 DB 9AH ;0AD6: 9A S0AD7 LDN R6 ;0AD7: 06 PLO R4 ;0AD8: A4 LBZ J0B03 ;0AD9: C2 0B 03 J0ADC DEC RA ;0ADC: 2A DEC R9 ;0ADD: 29 SEX R9 ;0ADE: E9 LDN RA ;0ADF: 0A ANI 0FH ;0AE0: FA 0F SMI 0AH ;0AE2: FF 0A LSNF ;0AE4: C7 ADI 07H ;0AE5: FC 07 ADI 3AH ;0AE7: FC 3A STR R9 ;0AE9: 59 DEC R8 ;0AEA: 28 GLO R8 ;0AEB: 88 BNZ R0AEF ;0AEC: 3A EF SEP RF ;0AEE: DF R0AEF DEC R9 ;0AEF: 29 LDN RA ;0AF0: 0A SHR ;0AF1: F6 SHR ;0AF2: F6 SHR ;0AF3: F6 SHR ;0AF4: F6 SMI 0AH ;0AF5: FF 0A LSNF ;0AF7: C7 ADI 07H ;0AF8: FC 07 ADI 3AH ;0AFA: FC 3A STR R9 ;0AFC: 59 DEC R8 ;0AFD: 28 GLO R8 ;0AFE: 88 LBNZ J0B05 ;0AFF: CA 0B 05 SEP RF ;0B02: DF J0B03 INC R4 ;0B03: 14 DEC RA ;0B04: 2A J0B05 DEC R4 ;0B05: 24 GLO R4 ;0B06: 84 LBNZ J0ADC ;0B07: CA 0A DC INC R4 ;0B0A: 14 STR RA ;0B0B: 5A INC RA ;0B0C: 1A LBR J0ADC ;0B0D: C0 0A DC S0B10 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, VC ; ---------------------------------------------------------------------- ; Opcode: 0x5E ; Handler: 0x0B10 ; Dispatch: 8A->0B11 ; Definition: Load 16-bit from VC, push to stack ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 0B11: LDI 5BH (VC low addr), BR to ; 0B22: PLO R6, DEC RD, LDN R6 STXD (push low), DEC R6, LDN R6 STR RD ; (push high). ; ====================================================================== DB 8AH ;0B10: 8A S0B11 LDI 5BH ;0B11: F8 5B BR R0B22 ;0B13: 30 22 S0B15 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, VD ; ---------------------------------------------------------------------- ; Opcode: 0x60 ; Handler: 0x0B15 ; Dispatch: 8A->0B16 ; Definition: Load 16-bit from VD, push to stack ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 0B16: LDI 5DH, BR to 0B22 common ; load. ; ====================================================================== DB 8AH ;0B15: 8A S0B16 LDI 5DH ;0B16: F8 5D BR R0B22 ;0B18: 30 22 S0B1A ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, VA ; ---------------------------------------------------------------------- ; Opcode: 0x62 ; Handler: 0x0B1A ; Dispatch: 8A->0B1B ; Definition: Load 16-bit from VA, push to stack ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 0B1B: LDI 57H, BR to 0B22 common ; load. ; ====================================================================== DB 8AH ;0B1A: 8A S0B1B LDI 57H ;0B1B: F8 57 BR R0B22 ;0B1D: 30 22 S0B1F ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, VB ; ---------------------------------------------------------------------- ; Opcode: 0x64 ; Handler: 0x0B1F ; Dispatch: 8A->0B20 ; Definition: Load 16-bit from VB, push to stack ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 0B20: LDI 59H, BR to 0B22 common ; load. ; ====================================================================== DB 8AH ;0B1F: 8A S0B20 LDI 59H ;0B20: F8 59 R0B22 PLO R6 ;0B22: A6 DEC RD ;0B23: 2D LDN R6 ;0B24: 06 STXD ;0B25: 73 DEC R6 ;0B26: 26 LDN R6 ;0B27: 06 STR RD ;0B28: 5D SEP RF ;0B29: DF S0B2A ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS.0, [60bb] ; ---------------------------------------------------------------------- ; Opcode: 0x40 ; Handler: 0x0B2A ; Dispatch: A4.B2->0B2C ; Definition: Load 1 byte from variable at 0x60bb, zero-extend, push ; ; Implementation: ; Entry 0xA4+0xB2: reads byte variable address, loads single byte, ; zero-extends to 16-bit, pushes. ; ====================================================================== DB 0A4H ;0B2A: A4 DB 0B2H ;0B2B: B2 S0B2C SEP RF ;0B2C: DF S0B2D ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, [60bb] ; ---------------------------------------------------------------------- ; Opcode: 0x3E ; Handler: 0x0B2D ; Dispatch: A4.A7->0B2F ; Definition: Load 16-bit from variable at 0x60bb, push to stack ; ; Implementation: ; Entry 0xA4 sets X=RC, second dispatch 0xA7 reads byte bb, forms ; address 0x60bb, loads 16-bit word, pushes to data stack. ; ====================================================================== DB 0A4H ;0B2D: A4 DB 0A7H ;0B2E: A7 S0B2F SEP RF ;0B2F: DF S0B30 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [60bb], TOS.0 ; ---------------------------------------------------------------------- ; Opcode: 0x41 ; Handler: 0x0B30 ; Dispatch: A4.BF->0B32 ; Definition: Pop TOS, store low byte to variable at 0x60bb ; ; Implementation: ; Entry 0xA4+0xBF: reads variable address, pops TOS low byte only, ; stores to 0x60bb. ; ====================================================================== DB 0A4H ;0B30: A4 DB 0BFH ;0B31: BF S0B32 SEP RF ;0B32: DF S0B33 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [60bb], TOS ; ---------------------------------------------------------------------- ; Opcode: 0x3F ; Handler: 0x0B33 ; Dispatch: A4.B7->0B35 ; Definition: Pop TOS (16-bit), store to variable at 0x60bb ; ; Implementation: ; Entry 0xA4 sets X=RC, second dispatch 0xB7 reads byte bb, forms ; address 0x60bb, pops TOS and stores 16-bit to that address. ; ====================================================================== DB 0A4H ;0B33: A4 DB 0B7H ;0B34: B7 S0B35 SEP RF ;0B35: DF S0B36 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD [60BD], kk ; ---------------------------------------------------------------------- ; Opcode: 0x42 ; Handler: 0x0B36 ; Dispatch: 94->0B39 ; Definition: Store immediate byte kk to fixed address 0x60BD ; ; Implementation: ; Entry 0x94: reads inline params. Handler at 0B37: sets R6.0=0xBD, ; reads kk from bytecode via LDA RC, STR R6. Direct byte store. ; ====================================================================== DB 94H ;0B36: 94 DB 0BDH ;0B37: BD DB 0BH ;0B38: 0B S0B39 LDA RC ;0B39: 4C STR R6 ;0B3A: 56 SEP RF ;0B3B: DF S0B3C ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD VC, TOS ; ---------------------------------------------------------------------- ; Opcode: 0x5D ; Handler: 0x0B3C ; Dispatch: 8B->0B3D ; Definition: Pop TOS, store to VC (0x605A/5B) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 0B3D: LDI 5AH, BR to 0B4E ; (common store routine): PLO R6, LDA RD STR R6, INC R6, LDA RD STR R6. ; ====================================================================== DB 8BH ;0B3C: 8B S0B3D LDI 5AH ;0B3D: F8 5A BR R0B4E ;0B3F: 30 4E S0B41 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD VD, TOS ; ---------------------------------------------------------------------- ; Opcode: 0x5F ; Handler: 0x0B41 ; Dispatch: 8B->0B42 ; Definition: Pop TOS, store to VD (0x605C/5D) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 0B42: LDI 5CH, BR to 0B4E common ; store. ; ====================================================================== DB 8BH ;0B41: 8B S0B42 LDI 5CH ;0B42: F8 5C BR R0B4E ;0B44: 30 4E S0B46 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD VA, TOS ; ---------------------------------------------------------------------- ; Opcode: 0x61 ; Handler: 0x0B46 ; Dispatch: 8B->0B47 ; Definition: Pop TOS, store to VA (0x6056/57) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 0B47: LDI 56H, BR to 0B4E common ; store. ; ====================================================================== DB 8BH ;0B46: 8B S0B47 LDI 56H ;0B47: F8 56 BR R0B4E ;0B49: 30 4E S0B4B ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD VB, TOS ; ---------------------------------------------------------------------- ; Opcode: 0x63 ; Handler: 0x0B4B ; Dispatch: 8B->0B4C ; Definition: Pop TOS, store to VB (0x6058/59) ; ; Implementation: ; Entry 0x8B direct execute. Handler at 0B4C: LDI 58H, BR to 0B4E common ; store. ; ====================================================================== DB 8BH ;0B4B: 8B S0B4C LDI 58H ;0B4C: F8 58 R0B4E PLO R6 ;0B4E: A6 LDA RD ;0B4F: 4D STR R6 ;0B50: 56 INC R6 ;0B51: 16 LDA RD ;0B52: 4D STR R6 ;0B53: 56 SEP RF ;0B54: DF DB 0FFH ;0B55: FF DB 66H ;0B56: 66 LDI 5AH ;0B57: F8 5A PLO R6 ;0B59: A6 SEX R9 ;0B5A: E9 GLO R9 ;0B5B: 89 ADD ;0B5C: F4 PLO R4 ;0B5D: A4 GHI R9 ;0B5E: 99 ADCI 00H ;0B5F: 7C 00 PHI R4 ;0B61: B4 SEX R6 ;0B62: E6 SEP R0 ;0B63: D0 DB 85H ;0B64: 85 INC R6 ;0B65: 16 GLO R4 ;0B66: 84 SM ;0B67: F7 PLO R4 ;0B68: A4 GHI R4 ;0B69: 94 SMBI 00H ;0B6A: 7F 00 PHI R4 ;0B6C: B4 INC R4 ;0B6D: 14 INC R9 ;0B6E: 19 INC R9 ;0B6F: 19 LDA R9 ;0B70: 49 PLO RE ;0B71: AE LDA R9 ;0B72: 49 DEC RD ;0B73: 2D STR RD ;0B74: 5D J0B75 PLO R8 ;0B75: A8 LDA R4 ;0B76: 44 LBZ J0BA2 ;0B77: C2 0B A2 PLO R6 ;0B7A: A6 GHI R0 ;0B7B: 90 PHI R5 ;0B7C: B5 SEX RA ;0B7D: EA J0B7E GHI R5 ;0B7E: 95 ADD ;0B7F: F4 SMI 30H ;0B80: FF 30 PHI R5 ;0B82: B5 DEC R6 ;0B83: 26 GLO R6 ;0B84: 86 LBNZ J0B7E ;0B85: CA 0B 7E SEX R9 ;0B88: E9 R0B89 GHI R5 ;0B89: 95 SM ;0B8A: F7 PHI R5 ;0B8B: B5 BNF R0B94 ;0B8C: 3B 94 GLO RE ;0B8E: 8E BZ R0B89 ;0B8F: 32 89 INC R8 ;0B91: 18 BR R0B89 ;0B92: 30 89 R0B94 ADD ;0B94: F4 STR RD ;0B95: 5D GLO R8 ;0B96: 88 SEX RD ;0B97: ED ADD ;0B98: F4 SEX R9 ;0B99: E9 INC RA ;0B9A: 1A R0B9B SM ;0B9B: F7 BDF R0B9B ;0B9C: 33 9B ADD ;0B9E: F4 LBR J0B75 ;0B9F: C0 0B 75 J0BA2 INC R9 ;0BA2: 19 LDN R9 ;0BA3: 09 BNZ R0BAD ;0BA4: 3A AD GLO R8 ;0BA6: 88 BZ R0BAD ;0BA7: 32 AD DEC R9 ;0BA9: 29 SD ;0BAA: F5 INC R9 ;0BAB: 19 PLO R8 ;0BAC: A8 R0BAD INC R9 ;0BAD: 19 LDN R9 ;0BAE: 09 BZ R0BC2 ;0BAF: 32 C2 GLO R8 ;0BB1: 88 BZ R0BBB ;0BB2: 32 BB SMI 0AH ;0BB4: FF 0A BNZ R0BC2 ;0BB6: 3A C2 LDN R9 ;0BB8: 09 BR R0BBD ;0BB9: 30 BD R0BBB LDN R9 ;0BBB: 09 SHR ;0BBC: F6 R0BBD XRI 01H ;0BBD: FB 01 ANI 01H ;0BBF: FA 01 PLO R8 ;0BC1: A8 R0BC2 SEX RA ;0BC2: EA GLO R8 ;0BC3: 88 ORI 30H ;0BC4: F9 30 SM ;0BC6: F7 LSZ ;0BC7: CE ORI 30H ;0BC8: F9 30 STR RD ;0BCA: 5D DEC RD ;0BCB: 2D GHI R0 ;0BCC: 90 STR RD ;0BCD: 5D SEP RF ;0BCE: DF DB 0FFH ;0BCF: FF DB 7EH ;0BD0: 7E DEC RD ;0BD1: 2D GHI R0 ;0BD2: 90 STR RD ;0BD3: 5D SHR ;0BD4: F6 GLO R9 ;0BD5: 89 BZ R0BDF ;0BD6: 32 DF R0BD8 LDA RA ;0BD8: 4A ADC ;0BD9: 74 STR RD ;0BDA: 5D DEC R9 ;0BDB: 29 GLO R9 ;0BDC: 89 BNZ R0BD8 ;0BDD: 3A D8 R0BDF DEC RD ;0BDF: 2D GHI R0 ;0BE0: 90 STR RD ;0BE1: 5D SEP RF ;0BE2: DF S0BE3 ; ; ====================================================================== ; PSEUDO INSTRUCTION: NOOP ; ---------------------------------------------------------------------- ; Opcode: 0x7F ; Handler: 0x0BE3 ; Dispatch: 28->0BE4 ; Definition: No operation ; ; Implementation: ; Entry 0x28 jumps to 0x0228 (SEP RF) which returns immediately to ; interpreter loop. No side effects. ; ====================================================================== DB 28H ;0BE3: 28 S0BE4 DB 8BH ;0BE4: 8B LDI 5EH ;0BE5: F8 5E PLO R6 ;0BE7: A6 LDA R6 ;0BE8: 46 PHI R9 ;0BE9: B9 PHI RA ;0BEA: BA PHI R8 ;0BEB: B8 LDN R6 ;0BEC: 06 PLO R9 ;0BED: A9 PLO RA ;0BEE: AA PLO R8 ;0BEF: A8 INC RA ;0BF0: 1A INC RA ;0BF1: 1A INC RA ;0BF2: 1A INC RA ;0BF3: 1A INC RA ;0BF4: 1A INC RA ;0BF5: 1A INC R8 ;0BF6: 18 INC R8 ;0BF7: 18 INC R8 ;0BF8: 18 SEX RA ;0BF9: EA LDA R9 ;0BFA: 49 SM ;0BFB: F7 LBNF J0C10 ;0BFC: CB 0C 10 LBNZ J0C25 ;0BFF: CA 0C 25 IRX ;0C02: 60 LDA R9 ;0C03: 49 SM ;0C04: F7 BNF R0C0F ;0C05: 3B 0F BNZ J0C25 ;0C07: 3A 25 IRX ;0C09: 60 LDN R9 ;0C0A: 09 SD ;0C0B: F5 BNF J0C25 ;0C0C: 3B 25 DEC RA ;0C0E: 2A R0C0F DEC RA ;0C0F: 2A J0C10 LDA R8 ;0C10: 48 SD ;0C11: F5 BNF R0C1E ;0C12: 3B 1E IRX ;0C14: 60 LDA R8 ;0C15: 48 SD ;0C16: F5 BNF R0C1E ;0C17: 3B 1E IRX ;0C19: 60 LDN R8 ;0C1A: 08 SD ;0C1B: F5 BDF J0C25 ;0C1C: 33 25 R0C1E GHI RE ;0C1E: 9E DEC RD ;0C1F: 2D STR RD ;0C20: 5D DEC RD ;0C21: 2D GHI R0 ;0C22: 90 STR RD ;0C23: 5D SEP RF ;0C24: DF J0C25 DEC RD ;0C25: 2D GHI R0 ;0C26: 90 STR RD ;0C27: 5D DEC RD ;0C28: 2D STR RD ;0C29: 5D SEP RF ;0C2A: DF DB 0FFH ;0C2B: FF DB 84H ;0C2C: 84 LDI 62H ;0C2D: F8 62 PHI R8 ;0C2F: B8 LDI 62H ;0C30: F8 62 PHI R4 ;0C32: B4 LDI 0BDH ;0C33: F8 BD PLO R6 ;0C35: A6 PLO R9 ;0C36: A9 LDI 0B1H ;0C37: F8 B1 PLO R8 ;0C39: A8 LDI 0AAH ;0C3A: F8 AA PLO R4 ;0C3C: A4 SEX R4 ;0C3D: E4 DEC RD ;0C3E: 2D LDA R4 ;0C3F: 44 BNZ R0C52 ;0C40: 3A 52 INC R4 ;0C42: 14 GLO RA ;0C43: 8A SD ;0C44: F5 DEC R4 ;0C45: 24 GHI RA ;0C46: 9A SDB ;0C47: 75 BDF R0C52 ;0C48: 33 52 GHI RE ;0C4A: 9E STR RD ;0C4B: 5D DEC RD ;0C4C: 2D STR RD ;0C4D: 5D LDI 61H ;0C4E: F8 61 STR R6 ;0C50: 56 SEP RF ;0C51: DF R0C52 INC R4 ;0C52: 14 GHI R0 ;0C53: 90 STR RD ;0C54: 5D DEC RD ;0C55: 2D STR RD ;0C56: 5D DEC R6 ;0C57: 26 GLO RA ;0C58: 8A SD ;0C59: F5 STR R6 ;0C5A: 56 DEC R6 ;0C5B: 26 DEC R4 ;0C5C: 24 GHI RA ;0C5D: 9A SDB ;0C5E: 75 STR R6 ;0C5F: 56 DEC R6 ;0C60: 26 DEC R4 ;0C61: 24 LDN R4 ;0C62: 04 SMBI 00H ;0C63: 7F 00 STR R6 ;0C65: 56 BNF R0C77 ;0C66: 3B 77 INC R6 ;0C68: 16 INC R6 ;0C69: 16 SEX R8 ;0C6A: E8 LDN R6 ;0C6B: 06 SM ;0C6C: F7 DEC R8 ;0C6D: 28 DEC R6 ;0C6E: 26 LDN R6 ;0C6F: 06 SMB ;0C70: 77 DEC R6 ;0C71: 26 LDN R6 ;0C72: 06 SMBI 00H ;0C73: 7F 00 BDF R0C7D ;0C75: 33 7D R0C77 GLO R9 ;0C77: 89 PLO R6 ;0C78: A6 LDI 62H ;0C79: F8 62 STR R6 ;0C7B: 56 SEP RF ;0C7C: DF R0C7D GLO R9 ;0C7D: 89 PLO R6 ;0C7E: A6 LDI 60H ;0C7F: F8 60 STR R6 ;0C81: 56 SEP RF ;0C82: DF DB 0FFH ;0C83: FF DB 7EH ;0C84: 7E S0C85 GHI R9 ;0C85: 99 PHI R4 ;0C86: B4 GLO R9 ;0C87: 89 PLO R4 ;0C88: A4 INC R9 ;0C89: 19 SEX R4 ;0C8A: E4 GLO R9 ;0C8B: 89 ADD ;0C8C: F4 PLO R9 ;0C8D: A9 GHI R9 ;0C8E: 99 ADCI 00H ;0C8F: 7C 00 PHI R9 ;0C91: B9 GLO RA ;0C92: 8A STR R9 ;0C93: 59 LDN R4 ;0C94: 04 ADI 01H ;0C95: FC 01 STR R4 ;0C97: 54 SEP RF ;0C98: DF DB 0FFH ;0C99: FF DB 0FFH ;0C9A: FF DB 0FFH ;0C9B: FF DB 0FFH ;0C9C: FF DB 0FFH ;0C9D: FF DB 0FFH ;0C9E: FF DB 0FFH ;0C9F: FF DB 0FFH ;0CA0: FF DB 0FFH ;0CA1: FF DB 0FFH ;0CA2: FF DB 0FFH ;0CA3: FF DB 0FFH ;0CA4: FF DB 0FFH ;0CA5: FF DB 0FFH ;0CA6: FF DB 0FFH ;0CA7: FF DB 0FFH ;0CA8: FF DB 0FFH ;0CA9: FF DB 0FFH ;0CAA: FF DB 0FFH ;0CAB: FF DB 0FFH ;0CAC: FF DB 0FFH ;0CAD: FF DB 0FFH ;0CAE: FF DB 0FFH ;0CAF: FF DB 0FFH ;0CB0: FF DB 0FFH ;0CB1: FF DB 0FFH ;0CB2: FF DB 0FFH ;0CB3: FF DB 0FFH ;0CB4: FF DB 0FFH ;0CB5: FF DB 0FFH ;0CB6: FF DB 0FFH ;0CB7: FF DB 0FFH ;0CB8: FF DB 0FFH ;0CB9: FF DB 0FFH ;0CBA: FF DB 0FFH ;0CBB: FF DB 0FFH ;0CBC: FF DB 0FFH ;0CBD: FF DB 0FFH ;0CBE: FF DB 0FFH ;0CBF: FF DB 0FFH ;0CC0: FF DB 0FFH ;0CC1: FF DB 0FFH ;0CC2: FF DB 0FFH ;0CC3: FF DB 0FFH ;0CC4: FF DB 0FFH ;0CC5: FF DB 0FFH ;0CC6: FF DB 0FFH ;0CC7: FF DB 0FFH ;0CC8: FF DB 0FFH ;0CC9: FF DB 0FFH ;0CCA: FF DB 0FFH ;0CCB: FF DB 0FFH ;0CCC: FF DB 0FFH ;0CCD: FF DB 0FFH ;0CCE: FF DB 0FFH ;0CCF: FF DB 0FFH ;0CD0: FF DB 0FFH ;0CD1: FF DB 0FFH ;0CD2: FF DB 0FFH ;0CD3: FF DB 0FFH ;0CD4: FF DB 0FFH ;0CD5: FF DB 0FFH ;0CD6: FF DB 0FFH ;0CD7: FF DB 0FFH ;0CD8: FF DB 0FFH ;0CD9: FF DB 0FFH ;0CDA: FF DB 0FFH ;0CDB: FF DB 0FFH ;0CDC: FF DB 0FFH ;0CDD: FF DB 0FFH ;0CDE: FF DB 0FFH ;0CDF: FF DB 0FFH ;0CE0: FF DB 0FFH ;0CE1: FF DB 0FFH ;0CE2: FF DB 0FFH ;0CE3: FF DB 0FFH ;0CE4: FF DB 0FFH ;0CE5: FF DB 0FFH ;0CE6: FF DB 0FFH ;0CE7: FF DB 0FFH ;0CE8: FF DB 0FFH ;0CE9: FF DB 0FFH ;0CEA: FF DB 0FFH ;0CEB: FF DB 0FFH ;0CEC: FF DB 0FFH ;0CED: FF DB 0FFH ;0CEE: FF DB 0FFH ;0CEF: FF DB 0FFH ;0CF0: FF DB 0FFH ;0CF1: FF DB 0FFH ;0CF2: FF DB 0FFH ;0CF3: FF DB 0FFH ;0CF4: FF DB 0FFH ;0CF5: FF DB 0FFH ;0CF6: FF DB 0FFH ;0CF7: FF DB 0FFH ;0CF8: FF DB 0FFH ;0CF9: FF DB 0FFH ;0CFA: FF DB 0FFH ;0CFB: FF DB 0FFH ;0CFC: FF DB 0FFH ;0CFD: FF DB 0FFH ;0CFE: FF DB 0FFH ;0CFF: FF J0D00 DEC R2 ;0D00: 22 SAV ;0D01: 78 DEC R2 ;0D02: 22 STXD ;0D03: 73 LDI 00H ;0D04: F8 00 SHLC ;0D06: 7E LSNQ ;0D07: C5 ORI 20H ;0D08: F9 20 STXD ;0D0A: 73 GHI R6 ;0D0B: 96 STXD ;0D0C: 73 GLO R6 ;0D0D: 86 STXD ;0D0E: 73 GHI R7 ;0D0F: 97 STXD ;0D10: 73 GLO R7 ;0D11: 87 STXD ;0D12: 73 LDI 07H ;0D13: F8 07 PLO R6 ;0D15: A6 LDI 81H ;0D16: F8 81 PLO R7 ;0D18: A7 LDN R7 ;0D19: 07 ADI 1DH ;0D1A: FC 1D PLO R1 ;0D1C: A1 LBR J0D9E ;0D1D: C0 0D 9E DB 0C4H ;0D20: C4 LBR J0D82 ;0D21: C0 0D 82 DB 0C4H ;0D24: C4 LBR J0DA1 ;0D25: C0 0D A1 DB 0C4H ;0D28: C4 LBR J0DA7 ;0D29: C0 0D A7 DB 0C4H ;0D2C: C4 LBR J0E14 ;0D2D: C0 0E 14 DB 0C4H ;0D30: C4 LDI 20H ;0D31: F8 20 STXD ;0D33: 73 LDI 0A0H ;0D34: F8 A0 PLO R7 ;0D36: A7 LDI 00H ;0D37: F8 00 STR R7 ;0D39: 57 INC R7 ;0D3A: 17 STR R7 ;0D3B: 57 LDN R6 ;0D3C: 06 ANI 80H ;0D3D: FA 80 BNZ R0D7F ;0D3F: 3A 7F LDN R6 ;0D41: 06 ORI 80H ;0D42: F9 80 STR R6 ;0D44: 56 GHI R0 ;0D45: 90 STXD ;0D46: 73 GLO R0 ;0D47: 80 STXD ;0D48: 73 GHI RF ;0D49: 9F STXD ;0D4A: 73 GLO RF ;0D4B: 8F STXD ;0D4C: 73 GHI RE ;0D4D: 9E STXD ;0D4E: 73 GLO RE ;0D4F: 8E STXD ;0D50: 73 GHI RD ;0D51: 9D STXD ;0D52: 73 GLO RD ;0D53: 8D STXD ;0D54: 73 GHI RC ;0D55: 9C STXD ;0D56: 73 GLO RC ;0D57: 8C STXD ;0D58: 73 GHI RB ;0D59: 9B STXD ;0D5A: 73 GLO RB ;0D5B: 8B STXD ;0D5C: 73 GHI RA ;0D5D: 9A STXD ;0D5E: 73 GLO RA ;0D5F: 8A STXD ;0D60: 73 GHI R9 ;0D61: 99 STXD ;0D62: 73 GLO R9 ;0D63: 89 STXD ;0D64: 73 GHI R8 ;0D65: 98 STXD ;0D66: 73 GLO R8 ;0D67: 88 STXD ;0D68: 73 GHI R5 ;0D69: 95 STXD ;0D6A: 73 GLO R5 ;0D6B: 85 STXD ;0D6C: 73 GHI R4 ;0D6D: 94 STXD ;0D6E: 73 GLO R4 ;0D6F: 84 STXD ;0D70: 73 GHI R3 ;0D71: 93 STXD ;0D72: 73 GLO R3 ;0D73: 83 STR R2 ;0D74: 52 LDI 1BH ;0D75: F8 1B PLO R6 ;0D77: A6 GLO R2 ;0D78: 82 STR R6 ;0D79: 56 INC R6 ;0D7A: 16 GLO RD ;0D7B: 8D SMI 06H ;0D7C: FF 06 STR R6 ;0D7E: 56 R0D7F LBR S1967 ;0D7F: C0 19 67 J0D82 LDI 02H ;0D82: F8 02 STXD ;0D84: 73 GLO R5 ;0D85: 85 BZ R0D9B ;0D86: 32 9B DEC R5 ;0D88: 25 GLO R5 ;0D89: 85 BNZ R0D9B ;0D8A: 3A 9B LDI 61H ;0D8C: F8 61 PHI R6 ;0D8E: B6 LDI 0DH ;0D8F: F8 0D PLO R6 ;0D91: A6 LDI 16H ;0D92: F8 16 STR R6 ;0D94: 56 LDI 15H ;0D95: F8 15 PLO R6 ;0D97: A6 LDI 16H ;0D98: F8 16 STR R6 ;0D9A: 56 R0D9B LBR J0E55 ;0D9B: C0 0E 55 J0D9E LDI 01H ;0D9E: F8 01 LSKP ;0DA0: C8 J0DA1 LDI 04H ;0DA1: F8 04 STXD ;0DA3: 73 LBR J0E55 ;0DA4: C0 0E 55 J0DA7 GLO RA ;0DA7: 8A STXD ;0DA8: 73 GHI RA ;0DA9: 9A STXD ;0DAA: 73 LDI 81H ;0DAB: F8 81 PLO R7 ;0DAD: A7 LDI 08H ;0DAE: F8 08 STR R7 ;0DB0: 57 LDI 08H ;0DB1: F8 08 PLO R6 ;0DB3: A6 LDN R6 ;0DB4: 06 SHL ;0DB5: FE BDF R0DD9 ;0DB6: 33 D9 B1 R0DC5 ;0DB8: 34 C5 LDI 0B2H ;0DBA: F8 B2 PLO R6 ;0DBC: A6 LDN R6 ;0DBD: 06 BNZ R0DC3 ;0DBE: 3A C3 LDI 03H ;0DC0: F8 03 STR R6 ;0DC2: 56 R0DC3 BR R0DF6 ;0DC3: 30 F6 R0DC5 B2 R0DD9 ;0DC5: 35 D9 LDI 0A1H ;0DC7: F8 A1 PLO R7 ;0DC9: A7 LDI 01H ;0DCA: F8 01 PLO R6 ;0DCC: A6 LDN R6 ;0DCD: 06 ANI 0FDH ;0DCE: FA FD STR R6 ;0DD0: 56 STR R7 ;0DD1: 57 ORI 02H ;0DD2: F9 02 STR R6 ;0DD4: 56 STR R7 ;0DD5: 57 LBR J0E0C ;0DD6: C0 0E 0C R0DD9 LDI 0B0H ;0DD9: F8 B0 PLO R6 ;0DDB: A6 LDA R6 ;0DDC: 46 STR R2 ;0DDD: 52 PLO RA ;0DDE: AA LDN R6 ;0DDF: 06 DEC R6 ;0DE0: 26 XOR ;0DE1: F3 LBZ J0E0C ;0DE2: C2 0E 0C LDI 66H ;0DE5: F8 66 PHI RA ;0DE7: BA LDI 61H ;0DE8: F8 61 PLO R7 ;0DEA: A7 LDA RA ;0DEB: 4A STR R7 ;0DEC: 57 GLO RA ;0DED: 8A STR R6 ;0DEE: 56 STR R2 ;0DEF: 52 INC R6 ;0DF0: 16 LDN R6 ;0DF1: 06 SD ;0DF2: F5 LBNZ J0E0C ;0DF3: CA 0E 0C R0DF6 LDI 0A1H ;0DF6: F8 A1 PLO R7 ;0DF8: A7 LDI 01H ;0DF9: F8 01 PLO R6 ;0DFB: A6 LDN R6 ;0DFC: 06 ANI 0FDH ;0DFD: FA FD STR R6 ;0DFF: 56 STR R7 ;0E00: 57 LDI 80H ;0E01: F8 80 J0E03 PLO R7 ;0E03: A7 J0E04 LDI 66H ;0E04: F8 66 PLO R6 ;0E06: A6 LDN R6 ;0E07: 06 ANI 0F7H ;0E08: FA F7 J0E0A STR R6 ;0E0A: 56 STR R7 ;0E0B: 57 J0E0C INC R2 ;0E0C: 12 LDA R2 ;0E0D: 42 PHI RA ;0E0E: BA LDA R2 ;0E0F: 42 PLO RA ;0E10: AA LBR J0E5B ;0E11: C0 0E 5B J0E14 LDI 10H ;0E14: F8 10 STXD ;0E16: 73 GLO RA ;0E17: 8A STXD ;0E18: 73 GHI RA ;0E19: 9A STXD ;0E1A: 73 LDI 01H ;0E1B: F8 01 J0E1D PLO R6 ;0E1D: A6 LDN R6 ;0E1E: 06 ANI 04H ;0E1F: FA 04 BNZ J0E34 ;0E21: 3A 34 LDI 60H ;0E23: F8 60 PLO R7 ;0E25: A7 LDA R7 ;0E26: 47 ANI 38H ;0E27: FA 38 BZ R0E37 ;0E29: 32 37 LDN R7 ;0E2B: 07 R0E2C LDI 0B5H ;0E2C: F8 B5 J0E2E PLO R6 ;0E2E: A6 LDN R6 ;0E2F: 06 BNZ J0E34 ;0E30: 3A 34 GHI RE ;0E32: 9E STR R6 ;0E33: 56 J0E34 INC R2 ;0E34: 12 BR R0E4D ;0E35: 30 4D R0E37 LDN R7 ;0E37: 07 STR R2 ;0E38: 52 LDI 0B3H ;0E39: F8 B3 PLO R6 ;0E3B: A6 LDA R6 ;0E3C: 46 PLO RA ;0E3D: AA ADI 01H ;0E3E: FC 01 SEX R6 ;0E40: E6 SM ;0E41: F7 BZ R0E2C ;0E42: 32 2C LDI 67H ;0E44: F8 67 PHI RA ;0E46: BA LDA R2 ;0E47: 42 STR RA ;0E48: 5A J0E49 INC RA ;0E49: 1A GLO RA ;0E4A: 8A DEC R6 ;0E4B: 26 STR R6 ;0E4C: 56 R0E4D SEX R2 ;0E4D: E2 LDXA ;0E4E: 72 J0E4F PHI RA ;0E4F: BA LDN R2 ;0E50: 02 PLO RA ;0E51: AA LBR J0E55 ;0E52: C0 0E 55 J0E55 LDI 81H ;0E55: F8 81 PLO R7 ;0E57: A7 INC R2 ;0E58: 12 LDA R2 ;0E59: 42 STR R7 ;0E5A: 57 J0E5B LDXA ;0E5B: 72 PLO R7 ;0E5C: A7 LDXA ;0E5D: 72 J0E5E PHI R7 ;0E5E: B7 LDXA ;0E5F: 72 PLO R6 ;0E60: A6 LDXA ;0E61: 72 PHI R6 ;0E62: B6 LDXA ;0E63: 72 J0E64 SHR ;0E64: F6 LSNZ ;0E65: C6 REQ ;0E66: 7A SKP ;0E67: 38 SEQ ;0E68: 7B LDXA ;0E69: 72 RET ;0E6A: 70 LBR J0D00 ;0E6B: C0 0D 00 DB 8BH ;0E6E: 8B S0E6F LDI 07H ;0E6F: F8 07 PLO R6 ;0E71: A6 LDN R6 ;0E72: 06 ORI 20H ;0E73: F9 20 R0E75 STR R6 ;0E75: 56 LDI 1EH ;0E76: F8 1E PLO R6 ;0E78: A6 SEX R6 ;0E79: E6 GLO RC ;0E7A: 8C STXD ;0E7B: 73 GHI RC ;0E7C: 9C STXD ;0E7D: 73 GLO RD ;0E7E: 8D STXD ;0E7F: 73 GLO R2 ;0E80: 82 STXD ;0E81: 73 LBR J1965 ;0E82: C0 19 65 DB 0FFH ;0E85: FF DB 8BH ;0E86: 8B LDI 07H ;0E87: F8 07 PLO R6 ;0E89: A6 LDN R6 ;0E8A: 06 ORI 40H ;0E8B: F9 40 BR R0E75 ;0E8D: 30 75 DB 0FFH ;0E8F: FF DB 8BH ;0E90: 8B LDI 07H ;0E91: F8 07 PLO R6 ;0E93: A6 LDN R6 ;0E94: 06 ORI 10H ;0E95: F9 10 J0E97 BR R0E75 ;0E97: 30 75 DB 0FFH ;0E99: FF DB 8AH ;0E9A: 8A LDI 0EH ;0E9B: F8 0E PHI R0 ;0E9D: B0 LDI 0A2H ;0E9E: F8 A2 PLO R0 ;0EA0: A0 SEP R0 ;0EA1: D0 LDI 1BH ;0EA2: F8 1B PLO R6 ;0EA4: A6 LDN R6 ;0EA5: 06 PLO R6 ;0EA6: A6 GHI R2 ;0EA7: 92 SEX R0 ;0EA8: E0 J0EA9 DIS ;0EA9: 71 DB 20H ;0EAA: 20 PHI R6 ;0EAB: B6 SEX R6 ;0EAC: E6 J0EAD LDXA ;0EAD: 72 PLO R3 ;0EAE: A3 LDXA ;0EAF: 72 PHI R3 ;0EB0: B3 LDXA ;0EB1: 72 PLO R4 ;0EB2: A4 LDXA ;0EB3: 72 PHI R4 ;0EB4: B4 LDXA ;0EB5: 72 PLO R5 ;0EB6: A5 LDXA ;0EB7: 72 PHI R5 ;0EB8: B5 LDXA ;0EB9: 72 PLO R8 ;0EBA: A8 LDXA ;0EBB: 72 PHI R8 ;0EBC: B8 LDXA ;0EBD: 72 J0EBE PLO R9 ;0EBE: A9 LDXA ;0EBF: 72 J0EC0 PHI R9 ;0EC0: B9 LDXA ;0EC1: 72 PLO RA ;0EC2: AA LDXA ;0EC3: 72 PHI RA ;0EC4: BA LDXA ;0EC5: 72 PLO RB ;0EC6: AB LDXA ;0EC7: 72 PHI RB ;0EC8: BB LDXA ;0EC9: 72 PLO RC ;0ECA: AC LDXA ;0ECB: 72 J0ECC PHI RC ;0ECC: BC LDXA ;0ECD: 72 J0ECE PLO RD ;0ECE: AD LDXA ;0ECF: 72 PHI RD ;0ED0: BD LDXA ;0ED1: 72 PLO RE ;0ED2: AE LDXA ;0ED3: 72 PHI RE ;0ED4: BE J0ED5 LDXA ;0ED5: 72 PLO RF ;0ED6: AF LDXA ;0ED7: 72 PHI RF ;0ED8: BF GLO R6 ;0ED9: 86 PLO R2 ;0EDA: A2 LDI 60H ;0EDB: F8 60 PHI R6 ;0EDD: B6 J0EDE LDI 1CH ;0EDE: F8 1C J0EE0 PLO R6 ;0EE0: A6 GLO RD ;0EE1: 8D STR R6 ;0EE2: 56 J0EE3 DEC R6 ;0EE3: 26 GLO R2 ;0EE4: 82 ADI 0AH ;0EE5: FC 0A STR R6 ;0EE7: 56 LDI 0EH ;0EE8: F8 0E PHI R1 ;0EEA: B1 LDI 0F0H ;0EEB: F8 F0 PLO R1 ;0EED: A1 SEX R2 ;0EEE: E2 SEP R1 ;0EEF: D1 LDXA ;0EF0: 72 PLO R0 ;0EF1: A0 LDXA ;0EF2: 72 PHI R0 ;0EF3: B0 LDI 80H ;0EF4: F8 80 PLO R7 ;0EF6: A7 LDI 66H ;0EF7: F8 66 PLO R6 ;0EF9: A6 LDN R6 ;0EFA: 06 STR R7 ;0EFB: 57 LDI 67H ;0EFC: F8 67 PLO R6 ;0EFE: A6 LDI 63H ;0EFF: F8 63 PLO R7 ;0F01: A7 LDN R6 ;0F02: 06 STR R7 ;0F03: 57 LDI 00H ;0F04: F8 00 PLO R6 ;0F06: A6 LDI 0A0H ;0F07: F8 A0 PLO R7 ;0F09: A7 LDA R6 ;0F0A: 46 STR R7 ;0F0B: 57 LDN R6 ;0F0C: 06 INC R7 ;0F0D: 17 STR R7 ;0F0E: 57 LDI 07H ;0F0F: F8 07 PLO R6 ;0F11: A6 LDN R6 ;0F12: 06 ANI 7FH ;0F13: FA 7F STR R6 ;0F15: 56 DEC R2 ;0F16: 22 LBR J0E55 ;0F17: C0 0E 55 DB 84H ;0F1A: 84 S0F1B LDI 50H ;0F1B: F8 50 PLO R6 ;0F1D: A6 LDA R6 ;0F1E: 46 STR RA ;0F1F: 5A J0F20 LDA R6 ;0F20: 46 INC RA ;0F21: 1A STR RA ;0F22: 5A INC RA ;0F23: 1A LDN R6 ;0F24: 06 STR RA ;0F25: 5A DEC RA ;0F26: 2A LDN RA ;0F27: 0A DEC RA ;0F28: 2A SHL ;0F29: FE BDF R0F34 ;0F2A: 33 34 SHL ;0F2C: FE BNF R0F32 ;0F2D: 3B 32 SHL ;0F2F: FE BNF R0F34 ;0F30: 3B 34 R0F32 GHI R0 ;0F32: 90 STR RA ;0F33: 5A R0F34 SEP R0 ;0F34: D0 DB 0E8H ;0F35: E8 S0F36 SEP RF ;0F36: DF DB 0FFH ;0F37: FF DB 84H ;0F38: 84 S0F39 LDI 50H ;0F39: F8 50 PLO R6 ;0F3B: A6 LDA R6 ;0F3C: 46 STR RA ;0F3D: 5A INC R6 ;0F3E: 16 INC R6 ;0F3F: 16 LBR J0F20 ;0F40: C0 0F 20 DB 0FFH ;0F43: FF DB 8BH ;0F44: 8B S0F45 LDI 0C9H ;0F45: F8 C9 PLO R9 ;0F47: A9 GHI R6 ;0F48: 96 PHI R9 ;0F49: B9 LDA R9 ;0F4A: 49 PLO RE ;0F4B: AE LDA R9 ;0F4C: 49 PHI R8 ;0F4D: B8 PHI RA ;0F4E: BA LDN R9 ;0F4F: 09 PLO R8 ;0F50: A8 PLO RA ;0F51: AA LDA RA ;0F52: 4A PHI R4 ;0F53: B4 GLO RA ;0F54: 8A BNZ R0F59 ;0F55: 3A 59 SEP R0 ;0F57: D0 DB 0F7H ;0F58: F7 R0F59 LDN RA ;0F59: 0A PLO R4 ;0F5A: A4 LDI 0BCH ;0F5B: F8 BC PLO RA ;0F5D: AA GHI R6 ;0F5E: 96 PHI RA ;0F5F: BA SEX RA ;0F60: EA GLO R8 ;0F61: 88 STXD ;0F62: 73 GHI R8 ;0F63: 98 STXD ;0F64: 73 GLO RE ;0F65: 8E STR RA ;0F66: 5A SEP R0 ;0F67: D0 DB 0E8H ;0F68: E8 LDI 0B9H ;0F69: F8 B9 PLO R6 ;0F6B: A6 SEX RA ;0F6C: EA LDN R6 ;0F6D: 06 SD ;0F6E: F5 DEC RD ;0F6F: 2D STR RD ;0F70: 5D DEC RD ;0F71: 2D DEC R6 ;0F72: 26 DEC RA ;0F73: 2A LDN R6 ;0F74: 06 SDB ;0F75: 75 STR RD ;0F76: 5D SEX RD ;0F77: ED INC RD ;0F78: 1D LDN RD ;0F79: 0D ADI 02H ;0F7A: FC 02 STXD ;0F7C: 73 LDN RD ;0F7D: 0D ADCI 00H ;0F7E: 7C 00 STXD ;0F80: 73 J0F81 LDI 0C5H ;0F81: F8 C5 PLO R6 ;0F83: A6 LDN R6 ;0F84: 06 STXD ;0F85: 73 DEC R6 ;0F86: 26 LDN R6 ;0F87: 06 STR RD ;0F88: 5D GHI R4 ;0F89: 94 STR R6 ;0F8A: 56 INC R6 ;0F8B: 16 GLO R4 ;0F8C: 84 STR R6 ;0F8D: 56 LBR S100B ;0F8E: C0 10 0B DB 0FFH ;0F91: FF DB 8BH ;0F92: 8B LDA RD ;0F93: 4D PHI R4 ;0F94: B4 LDN RD ;0F95: 0D PLO R4 ;0F96: A4 LDI 0CBH ;0F97: F8 CB PLO R9 ;0F99: A9 LDI 0BCH ;0F9A: F8 BC PLO RA ;0F9C: AA GHI R6 ;0F9D: 96 PHI R9 ;0F9E: B9 PHI RA ;0F9F: BA SEX RA ;0FA0: EA LDN R9 ;0FA1: 09 STXD ;0FA2: 73 DEC R9 ;0FA3: 29 LDN R9 ;0FA4: 09 STXD ;0FA5: 73 DEC R9 ;0FA6: 29 LDN R9 ;0FA7: 09 STR RA ;0FA8: 5A SEP R0 ;0FA9: D0 DB 0E8H ;0FAA: E8 LDI 0B9H ;0FAB: F8 B9 PLO R6 ;0FAD: A6 LDN R6 ;0FAE: 06 SD ;0FAF: F5 STR RD ;0FB0: 5D DEC RD ;0FB1: 2D DEC R6 ;0FB2: 26 DEC RA ;0FB3: 2A LDN R6 ;0FB4: 06 SDB ;0FB5: 75 SEX RD ;0FB6: ED STXD ;0FB7: 73 LBR J0F81 ;0FB8: C0 0F 81 DB 0FFH ;0FBB: FF DB 8BH ;0FBC: 8B S0FBD LDI 0C4H ;0FBD: F8 C4 PLO R6 ;0FBF: A6 LDA RD ;0FC0: 4D STR R6 ;0FC1: 56 INC R6 ;0FC2: 16 LDA RD ;0FC3: 4D STR R6 ;0FC4: 56 LDI 0BAH ;0FC5: F8 BA PLO RA ;0FC7: AA GHI R6 ;0FC8: 96 PHI RA ;0FC9: BA LDI 0B7H ;0FCA: F8 B7 PLO R6 ;0FCC: A6 SEX RA ;0FCD: EA LDA R6 ;0FCE: 46 STR RA ;0FCF: 5A INC RA ;0FD0: 1A LDA R6 ;0FD1: 46 STR RA ;0FD2: 5A INC RA ;0FD3: 1A LDN R6 ;0FD4: 06 STR RA ;0FD5: 5A LDA RD ;0FD6: 4D PLO R8 ;0FD7: A8 LDA RD ;0FD8: 4D ADD ;0FD9: F4 STXD ;0FDA: 73 GLO R8 ;0FDB: 88 ADC ;0FDC: 74 STXD ;0FDD: 73 GHI R0 ;0FDE: 90 ADC ;0FDF: 74 STR RA ;0FE0: 5A SEP R0 ;0FE1: D0 DB 0EBH ;0FE2: EB LDI 0CBH ;0FE3: F8 CB PLO R9 ;0FE5: A9 GHI R6 ;0FE6: 96 PHI R9 ;0FE7: B9 GLO RA ;0FE8: 8A SEX R9 ;0FE9: E9 STXD ;0FEA: 73 GHI RA ;0FEB: 9A STXD ;0FEC: 73 LDN R6 ;0FED: 06 STR R9 ;0FEE: 59 SEP RF ;0FEF: DF DB 8BH ;0FF0: 8B S0FF1 LDI 0CAH ;0FF1: F8 CA PLO R9 ;0FF3: A9 GHI R6 ;0FF4: 96 PHI R9 ;0FF5: B9 LDA R9 ;0FF6: 49 PHI RA ;0FF7: BA LDN R9 ;0FF8: 09 PLO RA ;0FF9: AA J0FFA LDI 0C4H ;0FFA: F8 C4 PLO R9 ;0FFC: A9 LDA RA ;0FFD: 4A STR R9 ;0FFE: 59 INC R9 ;0FFF: 19 GLO RA ;1000: 8A BNZ R1005 ;1001: 3A 05 SEP R0 ;1003: D0 DB 0F7H ;1004: F7 R1005 LDN RA ;1005: 0A STR R9 ;1006: 59 BR S100B ;1007: 30 0B DB 0FFH ;1009: FF DB 8BH ;100A: 8B S100B LDI 0B7H ;100B: F8 B7 PLO R6 ;100D: A6 LDI 0BAH ;100E: F8 BA PLO RA ;1010: AA GHI R6 ;1011: 96 PHI RA ;1012: BA LDA R6 ;1013: 46 STR RA ;1014: 5A INC RA ;1015: 1A LDA R6 ;1016: 46 STR RA ;1017: 5A INC RA ;1018: 1A LDN R6 ;1019: 06 STR RA ;101A: 5A LDI 0C5H ;101B: F8 C5 PLO R6 ;101D: A6 SEX RA ;101E: EA LDN R6 ;101F: 06 ADD ;1020: F4 STXD ;1021: 73 DEC R6 ;1022: 26 LDN R6 ;1023: 06 ADC ;1024: 74 STXD ;1025: 73 GHI R0 ;1026: 90 ADC ;1027: 74 STR RA ;1028: 5A SEP R0 ;1029: D0 DB 0EBH ;102A: EB S102B LDI 0CBH ;102B: F8 CB PLO R9 ;102D: A9 GHI R6 ;102E: 96 PHI R9 ;102F: B9 SEX R9 ;1030: E9 GLO RA ;1031: 8A STXD ;1032: 73 GHI RA ;1033: 9A STXD ;1034: 73 LDN R6 ;1035: 06 STR R9 ;1036: 59 SEP RF ;1037: DF DB 8BH ;1038: 8B S1039 LDI 0BCH ;1039: F8 BC PLO RA ;103B: AA LDI 0CBH ;103C: F8 CB PLO R6 ;103E: A6 GHI R6 ;103F: 96 PHI RA ;1040: BA SEX RA ;1041: EA LDN R6 ;1042: 06 STXD ;1043: 73 DEC R6 ;1044: 26 LDN R6 ;1045: 06 STXD ;1046: 73 DEC R6 ;1047: 26 LDN R6 ;1048: 06 STR RA ;1049: 5A SEP R0 ;104A: D0 DB 0E8H ;104B: E8 S104C LDI 0B9H ;104C: F8 B9 PLO R6 ;104E: A6 SEX RA ;104F: EA LDN R6 ;1050: 06 SD ;1051: F5 STXD ;1052: 73 DEC R6 ;1053: 26 LDN R6 ;1054: 06 SDB ;1055: 75 STR RA ;1056: 5A LDI 0C4H ;1057: F8 C4 PLO R6 ;1059: A6 LDA RA ;105A: 4A STR R6 ;105B: 56 INC R6 ;105C: 16 LDN RA ;105D: 0A STR R6 ;105E: 56 SEP RF ;105F: DF DB 8BH ;1060: 8B S1061 LDI 0CBH ;1061: F8 CB PLO R6 ;1063: A6 LDI 0BCH ;1064: F8 BC PLO RA ;1066: AA GHI R6 ;1067: 96 PHI R8 ;1068: B8 PHI RA ;1069: BA LDI 6BH ;106A: F8 6B PLO R8 ;106C: A8 SEX RA ;106D: EA LDN R6 ;106E: 06 STXD ;106F: 73 DEC R6 ;1070: 26 LDN R6 ;1071: 06 STXD ;1072: 73 DEC R6 ;1073: 26 LDN R6 ;1074: 06 STR RA ;1075: 5A SEP R0 ;1076: D0 DB 0E8H ;1077: E8 S1078 LDI 0B9H ;1078: F8 B9 PLO R6 ;107A: A6 LDN R6 ;107B: 06 DEC R6 ;107C: 26 SD ;107D: F5 STR R8 ;107E: 58 DEC R8 ;107F: 28 DEC RA ;1080: 2A LDN R6 ;1081: 06 SDB ;1082: 75 STR R8 ;1083: 58 SEP RF ;1084: DF DB 0FFH ;1085: FF DB 8BH ;1086: 8B LDI 0B7H ;1087: F8 B7 PLO R6 ;1089: A6 LDI 0BAH ;108A: F8 BA PLO RA ;108C: AA GHI R6 ;108D: 96 PHI RA ;108E: BA PHI R8 ;108F: B8 LDI 6AH ;1090: F8 6A PLO R8 ;1092: A8 SEX RA ;1093: EA LDA R6 ;1094: 46 STR RA ;1095: 5A INC RA ;1096: 1A LDA R6 ;1097: 46 STR RA ;1098: 5A INC RA ;1099: 1A LDN R6 ;109A: 06 STR RA ;109B: 5A LDA R8 ;109C: 48 PLO R9 ;109D: A9 LDN R8 ;109E: 08 ADD ;109F: F4 STXD ;10A0: 73 GLO R9 ;10A1: 89 ADC ;10A2: 74 STXD ;10A3: 73 GHI R0 ;10A4: 90 ADC ;10A5: 74 STR RA ;10A6: 5A SEP R0 ;10A7: D0 DB 0EBH ;10A8: EB LDI 0CBH ;10A9: F8 CB PLO R9 ;10AB: A9 GHI R6 ;10AC: 96 PHI R9 ;10AD: B9 SEX R9 ;10AE: E9 GLO RA ;10AF: 8A STXD ;10B0: 73 GHI RA ;10B1: 9A STXD ;10B2: 73 LDN R6 ;10B3: 06 STR R9 ;10B4: 59 SEP RF ;10B5: DF DB 84H ;10B6: 84 S10B7 GHI RE ;10B7: 9E BR R10BC ;10B8: 30 BC S10BA ; ; ====================================================================== ; PSEUDO INSTRUCTION: LDBNK [TOS] ; ---------------------------------------------------------------------- ; Opcode: 0x39 ; Handler: 0x10BA ; Dispatch: 84->10BB ; Definition: Read 1 byte from banked ROM/RAM at 3-byte encoded address in TOS. Push byte. ; ; Implementation: ; Entry 0x84 pops TOS into RA. Handler at 10BB: reads 3-byte bank ; address from M(RA). Bit 7 of byte 0 selects window. Window 1: ; bank=((b0<<3)|0x80)+(b1>>5)->M(604F)->M(3FA2), addr=(b1&0x1F)+0x40,b2. ; Window 2: raw=(b0<<1)|(b1>>7), bank regs. Reads 1 byte, pushes ; zero-extended. Restores home bank on exit. ; ====================================================================== DB 84H ;10BA: 84 S10BB GHI R0 ;10BB: 90 R10BC PHI R5 ;10BC: B5 SEP R0 ;10BD: D0 DB 0EBH ;10BE: EB S10BF DEC RD ;10BF: 2D GHI R5 ;10C0: 95 BZ R10CA ;10C1: 32 CA LDA RA ;10C3: 4A PHI R5 ;10C4: B5 GLO RA ;10C5: 8A BNZ R10CA ;10C6: 3A CA DB 0D0H ;10C8: D0 DB 0F7H ;10C9: F7 R10CA LDN RA ;10CA: 0A STR RD ;10CB: 5D GHI R5 ;10CC: 95 DEC RD ;10CD: 2D STR RD ;10CE: 5D LBR J1619 ;10CF: C0 16 19 DB 8BH ;10D2: 8B DEC RD ;10D3: 2D LDI 0CAH ;10D4: F8 CA PLO R9 ;10D6: A9 GHI R6 ;10D7: 96 PHI R4 ;10D8: B4 PHI R9 ;10D9: B9 LDA R9 ;10DA: 49 PHI RA ;10DB: BA LDN R9 ;10DC: 09 PLO RA ;10DD: AA LBR J1113 ;10DE: C0 11 13 DB 0FFH ;10E1: FF DB 8BH ;10E2: 8B S10E3 LDI 0CAH ;10E3: F8 CA PLO R9 ;10E5: A9 GHI R6 ;10E6: 96 PHI R9 ;10E7: B9 LDA R9 ;10E8: 49 PHI RA ;10E9: BA LDN R9 ;10EA: 09 PLO RA ;10EB: AA DEC RD ;10EC: 2D DEC RD ;10ED: 2D LDA RA ;10EE: 4A STR RD ;10EF: 5D GLO RA ;10F0: 8A LSNZ ;10F1: C6 SEP R0 ;10F2: D0 DB 0F7H ;10F3: F7 LDI 5AH ;10F4: F8 5A PLO R4 ;10F6: A4 GHI R6 ;10F7: 96 PHI R4 ;10F8: B4 GHI RD ;10F9: 9D STR R4 ;10FA: 54 INC R4 ;10FB: 14 GLO RD ;10FC: 8D STR R4 ;10FD: 54 INC RD ;10FE: 1D LDI 56H ;10FF: F8 56 PLO R4 ;1101: A4 LDA RA ;1102: 4A STR R4 ;1103: 54 INC R4 ;1104: 14 GLO RA ;1105: 8A LSNZ ;1106: C6 SEP R0 ;1107: D0 J1108 DB 0F7H ;1108: F7 LDA RA ;1109: 4A STR R4 ;110A: 54 INC R4 ;110B: 14 INC R4 ;110C: 14 GHI RE ;110D: 9E STR R4 ;110E: 54 GLO RA ;110F: 8A LSNZ ;1110: C6 SEP R0 ;1111: D0 DB 0F7H ;1112: F7 J1113 LDA RA ;1113: 4A STR RD ;1114: 5D GLO RA ;1115: 8A LSNZ ;1116: C6 SEP R0 ;1117: D0 DB 0F7H ;1118: F7 LDI 56H ;1119: F8 56 PLO R4 ;111B: A4 LDA R4 ;111C: 44 PHI R9 ;111D: B9 LDA R4 ;111E: 44 PLO R9 ;111F: A9 INC R4 ;1120: 14 LDA R4 ;1121: 44 PLO R8 ;1122: A8 LDA R4 ;1123: 44 PLO RE ;1124: AE LDN R4 ;1125: 04 PLO R4 ;1126: A4 GLO RE ;1127: 8E PHI R4 ;1128: B4 SEX R4 ;1129: E4 LDN RD ;112A: 0D SHL ;112B: FE BNF R1144 ;112C: 3B 44 LDN R9 ;112E: 09 SHL ;112F: FE LDN R4 ;1130: 04 ANI 80H ;1131: FA 80 SHRC ;1133: 76 BZ R1144 ;1134: 32 44 SMI 0C0H ;1136: FF C0 BZ R1144 ;1138: 32 44 ADI 0C0H ;113A: FC C0 SHL ;113C: FE LDI 04H ;113D: F8 04 LSDF ;113F: CF LDI 01H ;1140: F8 01 BR R1159 ;1142: 30 59 R1144 LDA R9 ;1144: 49 SD ;1145: F5 INC R4 ;1146: 14 BDF R114D ;1147: 33 4D LDI 01H ;1149: F8 01 BR R1159 ;114B: 30 59 R114D BZ R1153 ;114D: 32 53 LDI 04H ;114F: F8 04 BR R1159 ;1151: 30 59 R1153 DEC R8 ;1153: 28 GLO R8 ;1154: 88 BNZ R1144 ;1155: 3A 44 LDI 02H ;1157: F8 02 R1159 PHI R8 ;1159: B8 LDI 0CBH ;115A: F8 CB PLO R9 ;115C: A9 GHI R6 ;115D: 96 PHI R9 ;115E: B9 GHI R8 ;115F: 98 SEX RD ;1160: ED AND ;1161: F2 INC RD ;1162: 1D BZ R116D ;1163: 32 6D INC RA ;1165: 1A GLO RA ;1166: 8A LSNZ ;1167: C6 SEP R0 ;1168: D0 DB 0F7H ;1169: F7 LBR J1243 ;116A: C0 12 43 R116D SEX RA ;116D: EA GLO RA ;116E: 8A ADD ;116F: F4 PLO RA ;1170: AA GHI RA ;1171: 9A ADCI 00H ;1172: 7C 00 PHI RA ;1174: BA BZ R117A ;1175: 32 7A SMI 60H ;1177: FF 60 LSNZ ;1179: C6 R117A SEP R0 ;117A: D0 DB 0F7H ;117B: F7 LBR J1243 ;117C: C0 12 43 DB 0FFH ;117F: FF DB 2BH ;1180: 2B S1181 INC RD ;1181: 1D LDI 0CAH ;1182: F8 CA PLO R9 ;1184: A9 GHI R6 ;1185: 96 PHI R9 ;1186: B9 PHI R8 ;1187: B8 LDI 0BDH ;1188: F8 BD PLO R8 ;118A: A8 LDA R9 ;118B: 49 PHI RA ;118C: BA LDN R9 ;118D: 09 PLO RA ;118E: AA LDA RA ;118F: 4A PHI R4 ;1190: B4 GLO RA ;1191: 8A LSNZ ;1192: C6 SEP R0 ;1193: D0 DB 0F7H ;1194: F7 LDA RA ;1195: 4A PLO R4 ;1196: A4 GLO RA ;1197: 8A LSNZ ;1198: C6 SEP R0 ;1199: D0 DB 0F7H ;119A: F7 LDN R4 ;119B: 04 STR R8 ;119C: 58 LBR J11B4 ;119D: C0 11 B4 S11A0 ; ; ====================================================================== ; PSEUDO INSTRUCTION: NAVBK ; ---------------------------------------------------------------------- ; Opcode: 0x29 ; Handler: 0x11A0 ; Dispatch: 2B->11A1 ; Definition: Conditional bank navigate (phase 1 only) ; ; Implementation: ; Entry 0x2B pushes one. Handler at 11A1: reads byte at M(60CA/CB). If ; bit 7=1: already at target, returns. If bit 7=0: follows linked-list ; (lower 7 bits = offset) until bit 7=1 found. Updates M(60CA/CB). No ; phase 2, no bank select write. ; ====================================================================== DB 2BH ;11A0: 2B S11A1 SKP ;11A1: 38 S11A2 ; ; ====================================================================== ; PSEUDO INSTRUCTION: SETBK ; ---------------------------------------------------------------------- ; Opcode: 0x6B ; Handler: 0x11A2 ; Dispatch: 29->11A3 ; Definition: Full bank navigate (two phases) ; ; Implementation: ; Entry 0x29 pushes zero. Handler at 11A3: Phase 1 - reads M(60CA/CB), ; follows linked list (bit 7=0 entries, 7 bits = offset) until bit 7=1 ; found. Phase 2 - reads M(60C0/C1/C2), follows second linked list in ; banked ROM. Restores home bank. No data transfer. ; ====================================================================== DB 29H ;11A2: 29 S11A3 LDI 0BDH ;11A3: F8 BD PLO R4 ;11A5: A4 INC RD ;11A6: 1D GHI R6 ;11A7: 96 PHI R9 ;11A8: B9 PHI R4 ;11A9: B4 LDI 0CAH ;11AA: F8 CA PLO R9 ;11AC: A9 LDI 0C9H ;11AD: F8 C9 PLO R6 ;11AF: A6 LDA R9 ;11B0: 49 PHI RA ;11B1: BA LDN R9 ;11B2: 09 PLO RA ;11B3: AA J11B4 LDN RA ;11B4: 0A SHL ;11B5: FE LBDF J11E0 ;11B6: C3 11 E0 SHR ;11B9: F6 PLO RE ;11BA: AE INC RA ;11BB: 1A GLO RA ;11BC: 8A LSNZ ;11BD: C6 SEP R0 ;11BE: D0 DB 0F7H ;11BF: F7 SEX R4 ;11C0: E4 GLO RE ;11C1: 8E XOR ;11C2: F3 LBNZ J11CE ;11C3: CA 11 CE INC RA ;11C6: 1A GLO RA ;11C7: 8A LSNZ ;11C8: C6 SEP R0 ;11C9: D0 DB 0F7H ;11CA: F7 LBR J1242 ;11CB: C0 12 42 J11CE SEX RA ;11CE: EA GLO RA ;11CF: 8A ADD ;11D0: F4 PLO RA ;11D1: AA GHI RA ;11D2: 9A ADCI 00H ;11D3: 7C 00 PHI RA ;11D5: BA BZ R11DB ;11D6: 32 DB SMI 60H ;11D8: FF 60 LSNZ ;11DA: C6 R11DB SEP R0 ;11DB: D0 DB 0F7H ;11DC: F7 LBR J11B4 ;11DD: C0 11 B4 J11E0 SEX R9 ;11E0: E9 GLO RA ;11E1: 8A STXD ;11E2: 73 GHI RA ;11E3: 9A SM ;11E4: F7 GHI RA ;11E5: 9A STXD ;11E6: 73 BDF R11EB ;11E7: 33 EB LDN R6 ;11E9: 06 STR R9 ;11EA: 59 R11EB LDA RD ;11EB: 4D BZ R11EF ;11EC: 32 EF SEP RF ;11EE: DF R11EF LDI 0C0H ;11EF: F8 C0 PLO R9 ;11F1: A9 SEP R0 ;11F2: D0 DB 0CAH ;11F3: CA DB 4EH ;11F4: 4E DB 0C0H ;11F5: C0 S11F6 LDN R9 ;11F6: 09 SHL ;11F7: FE LDA R9 ;11F8: 49 LBNF J1208 ;11F9: CB 12 08 INC R6 ;11FC: 16 STR R6 ;11FD: 56 LDI 0A2H ;11FE: F8 A2 PLO R7 ;1200: A7 LDN R6 ;1201: 06 ANI 7FH ;1202: FA 7F STR R7 ;1204: 57 LBR J120B ;1205: C0 12 0B J1208 STR R6 ;1208: 56 SEP R0 ;1209: D0 DB 0F4H ;120A: F4 J120B LDA R9 ;120B: 49 PHI RA ;120C: BA LDN R9 ;120D: 09 PLO RA ;120E: AA J120F LDA RA ;120F: 4A SHL ;1210: FE LBDF J1619 ;1211: C3 16 19 SHR ;1214: F6 PLO RE ;1215: AE GLO RA ;1216: 8A LSNZ ;1217: C6 SEP R0 ;1218: D0 J1219 DB 0F7H ;1219: F7 GLO RE ;121A: 8E SEX R4 ;121B: E4 XOR ;121C: F3 LBNZ J1231 ;121D: CA 12 31 INC RA ;1220: 1A GLO RA ;1221: 8A LSNZ ;1222: C6 SEP R0 ;1223: D0 DB 0F7H ;1224: F7 LDI 0C9H ;1225: F8 C9 PLO R9 ;1227: A9 LDN R6 ;1228: 06 STR R9 ;1229: 59 INC R9 ;122A: 19 GHI RA ;122B: 9A STR R9 ;122C: 59 INC R9 ;122D: 19 LBR J1243 ;122E: C0 12 43 J1231 SEX RA ;1231: EA GLO RA ;1232: 8A ADD ;1233: F4 S1234 PLO RA ;1234: AA GHI RA ;1235: 9A ADCI 00H ;1236: 7C 00 PHI RA ;1238: BA LSZ ;1239: CE SMI 60H ;123A: FF 60 LSNZ ;123C: C6 SEP R0 ;123D: D0 DB 0F7H ;123E: F7 LBR J120F ;123F: C0 12 0F J1242 INC RD ;1242: 1D J1243 LDN RA ;1243: 0A SHL ;1244: FE LDA RA ;1245: 4A LBDF J125C ;1246: C3 12 5C DEC RA ;1249: 2A LBR J0FFA ;124A: C0 0F FA DB 0FFH ;124D: FF DB 8BH ;124E: 8B S124F SEX R9 ;124F: E9 DEC RC ;1250: 2C DEC RC ;1251: 2C LDI 0CAH ;1252: F8 CA PLO R9 ;1254: A9 GHI R6 ;1255: 96 PHI R9 ;1256: B9 LDA R9 ;1257: 49 PHI RA ;1258: BA LDN R9 ;1259: 09 PLO RA ;125A: AA J125B LDA RA ;125B: 4A J125C PLO RE ;125C: AE GLO RA ;125D: 8A LSNZ ;125E: C6 DB 0D0H ;125F: D0 DB 0F7H ;1260: F7 GLO RE ;1261: 8E SHL ;1262: FE BDF R1267 ;1263: 33 67 LDI 0FEH ;1265: F8 FE R1267 PLO R8 ;1267: A8 GLO RA ;1268: 8A SEX R9 ;1269: E9 STXD ;126A: 73 GHI RA ;126B: 9A SM ;126C: F7 GHI RA ;126D: 9A STXD ;126E: 73 BDF R1273 ;126F: 33 73 LDN R6 ;1271: 06 STR R9 ;1272: 59 R1273 LDI 20H ;1273: F8 20 PHI R8 ;1275: B8 LDA R8 ;1276: 48 PLO RA ;1277: AA DEC RD ;1278: 2D LDN R8 ;1279: 08 STR RD ;127A: 5D DEC RD ;127B: 2D GLO RA ;127C: 8A STR RD ;127D: 5D SEP R0 ;127E: D0 DB 32H ;127F: 32 S1280 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS.0, [RP] ; ---------------------------------------------------------------------- ; Opcode: 0x2A ; Handler: 0x1280 ; Dispatch: 8A->1281 ; Definition: Load byte from app ROM via ROM pointer, push to data stack ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 1281: reads M(60CA/CB) into RA (ROM ; pointer). LDN RA gets byte. Advances pointer by 1 with page-crossing ; detection (INC RA, check RA.0 for wrap). Pushes zero-extended byte to ; TOS. ; ====================================================================== DB 8AH ;1280: 8A S1281 LDI 0CAH ;1281: F8 CA PLO R9 ;1283: A9 GHI R6 ;1284: 96 PHI R9 ;1285: B9 LDA R9 ;1286: 49 PHI RA ;1287: BA LDN R9 ;1288: 09 PLO RA ;1289: AA LDA RA ;128A: 4A DEC RD ;128B: 2D STXD ;128C: 73 GHI R0 ;128D: 90 STR RD ;128E: 5D GLO RA ;128F: 8A STR R9 ;1290: 59 BZ R1294 ;1291: 32 94 SEP RF ;1293: DF R1294 LDI 0C9H ;1294: F8 C9 PLO R6 ;1296: A6 SEP R0 ;1297: D0 SM ;1298: F7 GHI RA ;1299: 9A DEC R9 ;129A: 29 STR R9 ;129B: 59 DEC R9 ;129C: 29 LDN R6 ;129D: 06 STR R9 ;129E: 59 SEP RF ;129F: DF S12A0 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD TOS, [RP] ; ---------------------------------------------------------------------- ; Opcode: 0x6A ; Handler: 0x12A0 ; Dispatch: 8A->12A1 ; Definition: Load 16-bit word from app ROM via RP, push to stack, advance by 2 ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 12A1: reads ROM pointer, loads 2 ; bytes from banked ROM, pushes to data stack. Advances pointer by 2 ; with page detection. ; ====================================================================== DB 8AH ;12A0: 8A S12A1 DEC RD ;12A1: 2D DEC RD ;12A2: 2D GLO RD ;12A3: 8D PLO R4 ;12A4: A4 GHI RD ;12A5: 9D BR J12AD ;12A6: 30 AD S12A8 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LD VE, [RP] ; ---------------------------------------------------------------------- ; Opcode: 0x67 ; Handler: 0x12A8 ; Dispatch: 8A->12A9 ; Definition: VE = M(RP):M(RP+1) - load 16-bit from app ROM pointer, store to VE ; ; Implementation: ; Entry 0x8A sets X=RD. Handler at 12A9: reads ROM pointer from ; M(60CA/CB), loads 2 bytes from banked ROM, stores to VE (0x605E/5F). ; Advances pointer by 2 with page-crossing detection. ; ====================================================================== DB 8AH ;12A8: 8A S12A9 LDI 5EH ;12A9: F8 5E PLO R4 ;12AB: A4 GHI R6 ;12AC: 96 J12AD PHI R4 ;12AD: B4 LDI 0CAH ;12AE: F8 CA PLO R9 ;12B0: A9 GHI R6 ;12B1: 96 PHI R9 ;12B2: B9 LDA R9 ;12B3: 49 PHI RA ;12B4: BA LDN R9 ;12B5: 09 PLO RA ;12B6: AA LDA RA ;12B7: 4A STR R4 ;12B8: 54 INC R4 ;12B9: 14 GLO RA ;12BA: 8A LSNZ ;12BB: C6 SEP R0 ;12BC: D0 DB 0F7H ;12BD: F7 LDA RA ;12BE: 4A STR R4 ;12BF: 54 J12C0 GLO RA ;12C0: 8A LSNZ ;12C1: C6 SEP R0 ;12C2: D0 DB 0F7H ;12C3: F7 GLO RA ;12C4: 8A SEX R9 ;12C5: E9 STXD ;12C6: 73 GHI RA ;12C7: 9A SM ;12C8: F7 BNZ R12CC ;12C9: 3A CC SEP RF ;12CB: DF R12CC GHI RA ;12CC: 9A STXD ;12CD: 73 LBNF J12D2 ;12CE: CB 12 D2 SEP RF ;12D1: DF J12D2 LDN R6 ;12D2: 06 STR R9 ;12D3: 59 SEP RF ;12D4: DF DB 0FFH ;12D5: FF DB 8BH ;12D6: 8B S12D7 LDI 0B7H ;12D7: F8 B7 PLO R6 ;12D9: A6 LDI 0BAH ;12DA: F8 BA PLO RA ;12DC: AA GHI R6 ;12DD: 96 PHI RA ;12DE: BA LDA R6 ;12DF: 46 STR RA ;12E0: 5A INC RA ;12E1: 1A LDA R6 ;12E2: 46 STR RA ;12E3: 5A INC RA ;12E4: 1A LDN R6 ;12E5: 06 STR RA ;12E6: 5A SEX RA ;12E7: EA LDI 0C8H ;12E8: F8 C8 PLO R6 ;12EA: A6 LDN R6 ;12EB: 06 J12EC ADD ;12EC: F4 STXD ;12ED: 73 DEC R6 ;12EE: 26 LDN R6 ;12EF: 06 J12F0 ADC ;12F0: 74 STXD ;12F1: 73 GHI R0 ;12F2: 90 ADC ;12F3: 74 STR RA ;12F4: 5A INC RA ;12F5: 1A INC RA ;12F6: 1A INC RD ;12F7: 1D LDA RD ;12F8: 4D SMI 01H ;12F9: FF 01 PLO RE ;12FB: AE SHR ;12FC: F6 SHR ;12FD: F6 SHR ;12FE: F6 SHR ;12FF: F6 PLO R9 ;1300: A9 GLO RE ;1301: 8E SHL ;1302: FE SHL ;1303: FE SHL ;1304: FE SHL ;1305: FE ADD ;1306: F4 STXD ;1307: 73 GLO R9 ;1308: 89 ADC ;1309: 74 STXD ;130A: 73 GHI R0 ;130B: 90 ADC ;130C: 74 STR RA ;130D: 5A LDI 10H ;130E: F8 10 PLO R8 ;1310: A8 GHI R0 ;1311: 90 PHI R8 ;1312: B8 LDI 80H ;1313: F8 80 PLO R9 ;1315: A9 LDI 62H ;1316: F8 62 PHI R9 ;1318: B9 LBR S15D5 ;1319: C0 15 D5 DB 66H ;131C: 66 S131D LBR J1349 ;131D: C0 13 49 DB 8BH ;1320: 8B S1321 LDI 60H ;1321: F8 60 PLO R9 ;1323: A9 LDI 62H ;1324: F8 62 PHI R9 ;1326: B9 LDI 0CAH ;1327: F8 CA PLO R4 ;1329: A4 GHI R6 ;132A: 96 PHI R4 ;132B: B4 LDA R4 ;132C: 44 PHI RA ;132D: BA LDN R4 ;132E: 04 PLO RA ;132F: AA LDA RA ;1330: 4A PHI R5 ;1331: B5 GLO RA ;1332: 8A LSNZ ;1333: C6 SEP R0 ;1334: D0 DB 0F7H ;1335: F7 LDA RA ;1336: 4A DEC RD ;1337: 2D STR RD ;1338: 5D DEC RD ;1339: 2D GHI R5 ;133A: 95 STR RD ;133B: 5D GLO RA ;133C: 8A SEX R4 ;133D: E4 STXD ;133E: 73 LSNZ ;133F: C6 SEP R0 ;1340: D0 DB 0F7H ;1341: F7 GHI RA ;1342: 9A SM ;1343: F7 GHI RA ;1344: 9A STXD ;1345: 73 LSDF ;1346: CF LDN R6 ;1347: 06 STR R4 ;1348: 54 J1349 LDI 0B7H ;1349: F8 B7 PLO R6 ;134B: A6 LDI 0BAH ;134C: F8 BA PLO RA ;134E: AA GHI R6 ;134F: 96 PHI RA ;1350: BA LDA R6 ;1351: 46 STR RA ;1352: 5A INC RA ;1353: 1A LDA R6 ;1354: 46 STR RA ;1355: 5A INC RA ;1356: 1A LDA R6 ;1357: 46 STR RA ;1358: 5A SEX RA ;1359: EA INC RD ;135A: 1D LDN RD ;135B: 0D ADD ;135C: F4 STXD ;135D: 73 DEC RD ;135E: 2D LDA RD ;135F: 4D ADC ;1360: 74 STXD ;1361: 73 GHI R0 ;1362: 90 ADC ;1363: 74 STR RA ;1364: 5A SEP R0 ;1365: D0 DB 0EBH ;1366: EB S1367 LDA RA ;1367: 4A PLO R8 ;1368: A8 GLO RA ;1369: 8A LSNZ ;136A: C6 SEP R0 ;136B: D0 DB 0F7H ;136C: F7 GHI R0 ;136D: 90 PHI R8 ;136E: B8 LDI 5DH ;136F: F8 5D PLO R4 ;1371: A4 SEX R4 ;1372: E4 GHI R6 ;1373: 96 PHI R4 ;1374: B4 GLO R8 ;1375: 88 STXD ;1376: 73 GHI R8 ;1377: 98 STXD ;1378: 73 GLO R9 ;1379: 89 STXD ;137A: 73 GHI R9 ;137B: 99 STR R4 ;137C: 54 GLO RA ;137D: 8A STR RD ;137E: 5D LBR J15DA ;137F: C0 15 DA DB 8BH ;1382: 8B S1383 LDI 0B7H ;1383: F8 B7 PLO R6 ;1385: A6 LDI 0BAH ;1386: F8 BA PLO RA ;1388: AA GHI R6 ;1389: 96 PHI R9 ;138A: B9 PHI RA ;138B: BA LDA R6 ;138C: 46 STR RA ;138D: 5A INC RA ;138E: 1A LDA R6 ;138F: 46 STR RA ;1390: 5A INC RA ;1391: 1A LDN R6 ;1392: 06 STR RA ;1393: 5A SEX RA ;1394: EA LDA RD ;1395: 4D PLO R9 ;1396: A9 LDA RD ;1397: 4D ADD ;1398: F4 STXD ;1399: 73 GLO R9 ;139A: 89 ADC ;139B: 74 STXD ;139C: 73 GHI R0 ;139D: 90 ADC ;139E: 74 STR RA ;139F: 5A SEP R0 ;13A0: D0 DB 0EBH ;13A1: EB S13A2 LDI 0C2H ;13A2: F8 C2 PLO R9 ;13A4: A9 SEX R9 ;13A5: E9 GLO RA ;13A6: 8A STXD ;13A7: 73 GHI RA ;13A8: 9A STXD ;13A9: 73 LDN R6 ;13AA: 06 STR R9 ;13AB: 59 LBR J1619 ;13AC: C0 16 19 DB 0FFH ;13AF: FF DB 8BH ;13B0: 8B SEQ ;13B1: 7B BR R13B6 ;13B2: 30 B6 DB 8BH ;13B4: 8B S13B5 REQ ;13B5: 7A R13B6 LDI 73H ;13B6: F8 73 PHI R5 ;13B8: B5 LDI 5AH ;13B9: F8 5A BR R13C5 ;13BB: 30 C5 DB 0FFH ;13BD: FF DB 8BH ;13BE: 8B S13BF REQ ;13BF: 7A LDI 71H ;13C0: F8 71 PHI R5 ;13C2: B5 LDI 56H ;13C3: F8 56 R13C5 PLO R4 ;13C5: A4 GHI R6 ;13C6: 96 PHI R4 ;13C7: B4 LDI 0CAH ;13C8: F8 CA PLO R9 ;13CA: A9 GHI R6 ;13CB: 96 PHI R9 ;13CC: B9 LDA R9 ;13CD: 49 PHI RA ;13CE: BA LDN R9 ;13CF: 09 PLO RA ;13D0: AA LDA RA ;13D1: 4A STR R4 ;13D2: 54 GLO RA ;13D3: 8A LSNZ ;13D4: C6 SEP R0 ;13D5: D0 DB 0F7H ;13D6: F7 LDA RA ;13D7: 4A INC R4 ;13D8: 14 STR R4 ;13D9: 54 GLO RA ;13DA: 8A LBNZ J13E0 ;13DB: CA 13 E0 SEP R0 ;13DE: D0 DB 0F7H ;13DF: F7 J13E0 INC R4 ;13E0: 14 GHI R0 ;13E1: 90 STR R4 ;13E2: 54 LDA RA ;13E3: 4A INC R4 ;13E4: 14 STR R4 ;13E5: 54 GLO RA ;13E6: 8A LSNZ ;13E7: C6 SEP R0 ;13E8: D0 DB 0F7H ;13E9: F7 SEX R9 ;13EA: E9 GLO RA ;13EB: 8A STXD ;13EC: 73 SMI 03H ;13ED: FF 03 BDF R13FD ;13EF: 33 FD GHI RA ;13F1: 9A STXD ;13F2: 73 SHL ;13F3: FE BZ R13FB ;13F4: 32 FB BDF R13FD ;13F6: 33 FD SHL ;13F8: FE BNZ R13FD ;13F9: 3A FD R13FB LDN R6 ;13FB: 06 STR R9 ;13FC: 59 R13FD LDN R4 ;13FD: 04 LBNZ J142B ;13FE: CA 14 2B LDI 2FH ;1401: F8 2F PLO R9 ;1403: A9 GHI R5 ;1404: 95 PLO R6 ;1405: A6 LDN R6 ;1406: 06 STR R4 ;1407: 54 DEC R4 ;1408: 24 DEC R4 ;1409: 24 DEC R6 ;140A: 26 SHR ;140B: F6 LBZ J1421 ;140C: C2 14 21 LBDF J1430 ;140F: C3 14 30 SHRC ;1412: 76 LBNZ J142F ;1413: CA 14 2F LDN R6 ;1416: 06 SHL ;1417: FE GHI R0 ;1418: 90 SHLC ;1419: 7E PHI R5 ;141A: B5 LDN R6 ;141B: 06 SMI 01H ;141C: FF 01 SHL ;141E: FE BR J1425 ;141F: 30 25 J1421 PHI R5 ;1421: B5 LDN R6 ;1422: 06 SMI 01H ;1423: FF 01 J1425 SEX R4 ;1425: E4 ADD ;1426: F4 STXD ;1427: 73 GHI R5 ;1428: 95 ADC ;1429: 74 STR R4 ;142A: 54 J142B LBQ S13BF ;142B: C1 13 BF SEP RF ;142E: DF J142F SHLC ;142F: 7E J1430 SHLC ;1430: 7E STR R9 ;1431: 59 LDI 37H ;1432: F8 37 PLO R9 ;1434: A9 LDN R6 ;1435: 06 SMI 01H ;1436: FF 01 STR R9 ;1438: 59 LDI 47H ;1439: F8 47 PLO R9 ;143B: A9 GHI R0 ;143C: 90 STR R9 ;143D: 59 GHI RE ;143E: 9E PHI R8 ;143F: B8 LDI 08H ;1440: F8 08 PLO R8 ;1442: A8 GLO R4 ;1443: 84 PHI R5 ;1444: B5 SEP R0 ;1445: D0 DB 0FAH ;1446: FA GHI R5 ;1447: 95 PLO R4 ;1448: A4 LDI 46H ;1449: F8 46 PLO R6 ;144B: A6 LDA R6 ;144C: 46 PHI R5 ;144D: B5 LDN R6 ;144E: 06 LBR J1425 ;144F: C0 14 25 DB 8BH ;1452: 8B S1453 SEQ ;1453: 7B LDI 02H ;1454: F8 02 PLO R8 ;1456: A8 GHI RE ;1457: 9E PHI R8 ;1458: B8 LBR J1475 ;1459: C0 14 75 DB 8BH ;145C: 8B S145D REQ ;145D: 7A GHI RE ;145E: 9E PLO R8 ;145F: A8 PHI R8 ;1460: B8 BR J1475 ;1461: 30 75 DB 0FFH ;1463: FF DB 8BH ;1464: 8B S1465 REQ ;1465: 7A LDI 02H ;1466: F8 02 PLO R8 ;1468: A8 PHI R8 ;1469: B8 BR J1475 ;146A: 30 75 DB 8BH ;146C: 8B S146D SEQ ;146D: 7B LDI 02H ;146E: F8 02 PLO R8 ;1470: A8 GHI R0 ;1471: 90 PHI R8 ;1472: B8 BR J1475 ;1473: 30 75 J1475 LDI 0CBH ;1475: F8 CB PLO R6 ;1477: A6 LDN R6 ;1478: 06 PLO RA ;1479: AA DEC R6 ;147A: 26 LDN R6 ;147B: 06 PHI RA ;147C: BA DEC R6 ;147D: 26 LDA RA ;147E: 4A PHI R4 ;147F: B4 DEC R8 ;1480: 28 GLO RA ;1481: 8A LSNZ ;1482: C6 SEP R0 ;1483: D0 DB 0F7H ;1484: F7 GLO R8 ;1485: 88 BZ R148E ;1486: 32 8E LDA RA ;1488: 4A PLO R4 ;1489: A4 GLO RA ;148A: 8A LSNZ ;148B: C6 SEP R0 ;148C: D0 DB 0F7H ;148D: F7 R148E GHI R8 ;148E: 98 PLO R8 ;148F: A8 LDA RA ;1490: 4A PHI R9 ;1491: B9 GLO RA ;1492: 8A LSNZ ;1493: C6 SEP R0 ;1494: D0 DB 0F7H ;1495: F7 LDA RA ;1496: 4A PLO R9 ;1497: A9 GLO RA ;1498: 8A LSNZ ;1499: C6 SEP R0 ;149A: D0 DB 0F7H ;149B: F7 GLO R8 ;149C: 88 BNZ R14A5 ;149D: 3A A5 LDA RA ;149F: 4A PLO R8 ;14A0: A8 GLO RA ;14A1: 8A LSNZ ;14A2: C6 SEP R0 ;14A3: D0 DB 0F7H ;14A4: F7 R14A5 LBQ J14BE ;14A5: C1 14 BE GHI R4 ;14A8: 94 STR R9 ;14A9: 59 DEC R8 ;14AA: 28 GLO R8 ;14AB: 88 BZ J14B1 ;14AC: 32 B1 INC R9 ;14AE: 19 GLO R4 ;14AF: 84 STR R9 ;14B0: 59 J14B1 LDI 0CBH ;14B1: F8 CB PLO R9 ;14B3: A9 GHI R6 ;14B4: 96 PHI R9 ;14B5: B9 SEX R9 ;14B6: E9 GLO RA ;14B7: 8A STXD ;14B8: 73 GHI RA ;14B9: 9A STXD ;14BA: 73 LDN R6 ;14BB: 06 STR R9 ;14BC: 59 SEP RF ;14BD: DF J14BE SEX R4 ;14BE: E4 J14BF GLO R8 ;14BF: 88 LBZ J14B1 ;14C0: C2 14 B1 LDXA ;14C3: 72 STR R9 ;14C4: 59 INC R9 ;14C5: 19 DEC R8 ;14C6: 28 BR J14BF ;14C7: 30 BF DB 0FFH ;14C9: FF DB 8BH ;14CA: 8B S14CB SEX RA ;14CB: EA GHI R6 ;14CC: 96 PHI R9 ;14CD: B9 LDI 0CAH ;14CE: F8 CA PLO R9 ;14D0: A9 LDA R9 ;14D1: 49 PHI RA ;14D2: BA LDN R9 ;14D3: 09 PLO RA ;14D4: AA ADD ;14D5: F4 PLO RA ;14D6: AA GHI RA ;14D7: 9A ADCI 00H ;14D8: 7C 00 PHI RA ;14DA: BA BZ R14E1 ;14DB: 32 E1 SMI 60H ;14DD: FF 60 BNZ R14E3 ;14DF: 3A E3 R14E1 SEP R0 ;14E1: D0 DB 0F7H ;14E2: F7 R14E3 LBR J125B ;14E3: C0 12 5B DB 8BH ;14E6: 8B S14E7 LDI 0C9H ;14E7: F8 C9 PLO R6 ;14E9: A6 SEX RA ;14EA: EA GHI R6 ;14EB: 96 PHI R9 ;14EC: B9 LDI 0CAH ;14ED: F8 CA PLO R9 ;14EF: A9 LDA R9 ;14F0: 49 PHI RA ;14F1: BA LDN R9 ;14F2: 09 PLO RA ;14F3: AA SM ;14F4: F7 PLO RA ;14F5: AA GHI RA ;14F6: 9A SMBI 00H ;14F7: 7F 00 PHI RA ;14F9: BA SMI 3FH ;14FA: FF 3F LBNZ J1510 ;14FC: CA 15 10 SEP R0 ;14FF: D0 DB 0CAH ;1500: CA DB 4FH ;1501: 4F DB 0A2H ;1502: A2 LDN R6 ;1503: 06 SMI 01H ;1504: FF 01 STR R6 ;1506: 56 ANI 7FH ;1507: FA 7F STR R7 ;1509: 57 LDI 5FH ;150A: F8 5F PHI RA ;150C: BA LBR S1522 ;150D: C0 15 22 J1510 SMI 40H ;1510: FF 40 LBNZ J125B ;1512: CA 12 5B SEP R0 ;1515: D0 DB 0CAH ;1516: CA DB 4EH ;1517: 4E DB 0C0H ;1518: C0 LDN R6 ;1519: 06 SMI 01H ;151A: FF 01 STR R6 ;151C: 56 SEP R0 ;151D: D0 DB 0F4H ;151E: F4 LDI 0FFH ;151F: F8 FF PHI RA ;1521: BA S1522 SEX R9 ;1522: E9 GLO RA ;1523: 8A STXD ;1524: 73 GHI RA ;1525: 9A STXD ;1526: 73 LDN R6 ;1527: 06 STR R9 ;1528: 59 INC R9 ;1529: 19 S152A INC R9 ;152A: 19 LBR J125B ;152B: C0 12 5B GLO R4 ;152E: 84 SEP R0 ;152F: D0 DB 0EBH ;1530: EB GHI RA ;1531: 9A PHI R9 ;1532: B9 GLO RA ;1533: 8A PLO R9 ;1534: A9 LDI 5AH ;1535: F8 5A PLO R6 ;1537: A6 SEP R0 ;1538: D0 DB 00H ;1539: 00 DB 85H ;153A: 85 SEP R0 ;153B: D0 DB 6DH ;153C: 6D LDI 4EH ;153D: F8 4E PLO R6 ;153F: A6 LBR S1589 ;1540: C0 15 89 DB 0FFH ;1543: FF DB 72H ;1544: 72 S1545 SEP R0 ;1545: D0 DB 6CH ;1546: 6C S1547 SEP R0 ;1547: D0 DB 84H ;1548: 84 S1549 LDI 50H ;1549: F8 50 PLO R6 ;154B: A6 LDN R6 ;154C: 06 PLO RE ;154D: AE SEP R0 ;154E: D0 DB 0CAH ;154F: CA DB 4EH ;1550: 4E DB 0C0H ;1551: C0 S1552 SEX R6 ;1552: E6 GLO RE ;1553: 8E SHL ;1554: FE LBDF J1564 ;1555: C3 15 64 SHR ;1558: F6 SM ;1559: F7 LBZ S1589 ;155A: C2 15 89 GLO RE ;155D: 8E STR R6 ;155E: 56 SEP R0 ;155F: D0 DB 0F4H ;1560: F4 LBR S1589 ;1561: C0 15 89 J1564 INC R6 ;1564: 16 LDI 0A2H ;1565: F8 A2 PLO R7 ;1567: A7 GLO RE ;1568: 8E STR R6 ;1569: 56 STR R7 ;156A: 57 LBR S1589 ;156B: C0 15 89 S156E ; ; ====================================================================== ; PSEUDO INSTRUCTION: STBNK [aaaa], mmmm ; ---------------------------------------------------------------------- ; Opcode: 0x5A ; Handler: 0x156E ; Dispatch: 6C->156F ; Definition: Banked write: copy TOS bytes from RAM at mmmm to banked addr at [aaaa]. Pops TOS. ; ; Implementation: ; Entry 0x6C pops TOS->R8 (count). Handler: reads bank pointer from ; [aaaa], decodes bank (entry 0xEB), copies R8 bytes from mmmm to banked ; address. Saves/restores state via M(6050-54). Restores home bank on ; exit. ; ====================================================================== DB 6CH ;156E: 6C S156F SEX RC ;156F: EC SEP R0 ;1570: D0 DB 85H ;1571: 85 S1572 LDA RC ;1572: 4C PLO R9 ;1573: A9 LDA RC ;1574: 4C DEC RD ;1575: 2D STR RD ;1576: 5D GLO R9 ;1577: 89 DEC RD ;1578: 2D STR RD ;1579: 5D LBR J1581 ;157A: C0 15 81 DB 0FFH ;157D: FF DB 6CH ;157E: 6C SEP R0 ;157F: D0 DB 85H ;1580: 85 J1581 SEP R0 ;1581: D0 DB 0EBH ;1582: EB S1583 GHI RA ;1583: 9A PHI R9 ;1584: B9 GLO RA ;1585: 8A PLO R9 ;1586: A9 SEP R0 ;1587: D0 DB 84H ;1588: 84 S1589 DEC RD ;1589: 2D GLO R9 ;158A: 89 STR RD ;158B: 5D REQ ;158C: 7A LBR J15DC ;158D: C0 15 DC DB 84H ;1590: 84 SEP R0 ;1591: D0 DB 0EBH ;1592: EB GHI R6 ;1593: 96 PHI R4 ;1594: B4 LDI 5AH ;1595: F8 5A PLO R4 ;1597: A4 SEX R4 ;1598: E4 SEP R0 ;1599: D0 DB 67H ;159A: 67 SEP R0 ;159B: D0 DB 6DH ;159C: 6D LBR J15C5 ;159D: C0 15 C5 DB 72H ;15A0: 72 SEP R0 ;15A1: D0 DB 6CH ;15A2: 6C SEP R0 ;15A3: D0 DB 66H ;15A4: 66 LDI 50H ;15A5: F8 50 PLO R6 ;15A7: A6 LDN R6 ;15A8: 06 PLO RE ;15A9: AE SEP R0 ;15AA: D0 DB 0CAH ;15AB: CA DB 4EH ;15AC: 4E DB 0C0H ;15AD: C0 SEX R6 ;15AE: E6 GLO RE ;15AF: 8E SHL ;15B0: FE LBDF J15BE ;15B1: C3 15 BE SHR ;15B4: F6 SM ;15B5: F7 BZ J15C5 ;15B6: 32 C5 GLO RE ;15B8: 8E STR R6 ;15B9: 56 SEP R0 ;15BA: D0 DB 0F4H ;15BB: F4 BR J15C5 ;15BC: 30 C5 J15BE INC R6 ;15BE: 16 LDI 0A2H ;15BF: F8 A2 PLO R7 ;15C1: A7 GLO RE ;15C2: 8E STR R6 ;15C3: 56 STR R7 ;15C4: 57 J15C5 DEC RD ;15C5: 2D GLO RA ;15C6: 8A STR RD ;15C7: 5D SEQ ;15C8: 7B LBR J15DE ;15C9: C0 15 DE S15CC ; ; ====================================================================== ; PSEUDO INSTRUCTION: LDBNK aaaa, [mmmm] ; ---------------------------------------------------------------------- ; Opcode: 0x5B ; Handler: 0x15CC ; Dispatch: 6C->15CD ; Definition: Banked read: copy TOS bytes from banked addr at [mmmm] to RAM at aaaa. Pops TOS. ; ; Implementation: ; Entry 0x6C pops TOS->R8 (count). Handler: reads R9=aaaa (dest), ; RA=mmmm (bank pointer). Decodes bank (entry 0xEB), SEQ, copies R8 ; bytes via entry 0x3D. Saves/restores state. Restores home bank. ; ====================================================================== DB 6CH ;15CC: 6C S15CD SEX RC ;15CD: EC LBR S15D3 ;15CE: C0 15 D3 DB 0FFH ;15D1: FF DB 6CH ;15D2: 6C S15D3 SEP R0 ;15D3: D0 DB 7FH ;15D4: 7F S15D5 SEP R0 ;15D5: D0 DB 0EBH ;15D6: EB S15D7 DEC RD ;15D7: 2D GLO RA ;15D8: 8A STR RD ;15D9: 5D J15DA SEQ ;15DA: 7B LSQ ;15DB: CD J15DC GHI R9 ;15DC: 99 SKP ;15DD: 38 J15DE GHI RA ;15DE: 9A SMI 0FFH ;15DF: FF FF LBZ J15E9 ;15E1: C2 15 E9 ADI 0A0H ;15E4: FC A0 LBNZ J160F ;15E6: CA 16 0F J15E9 SEX RD ;15E9: ED SM ;15EA: F7 LBZ J160F ;15EB: C2 16 0F STR RD ;15EE: 5D GLO R8 ;15EF: 88 SM ;15F0: F7 LBZ J15F7 ;15F1: C2 15 F7 LBNF J160F ;15F4: CB 16 0F J15F7 PLO R4 ;15F7: A4 LDN RD ;15F8: 0D PLO R8 ;15F9: A8 SEP R0 ;15FA: D0 DB 3DH ;15FB: 3D S15FC LBQ J160B ;15FC: C1 16 0B LDI 80H ;15FF: F8 80 PHI R9 ;1601: B9 LDN R6 ;1602: 06 ADI 01H ;1603: FC 01 STR R6 ;1605: 56 SEP R0 ;1606: D0 DB 0F4H ;1607: F4 S1608 LBR S160D ;1608: C0 16 0D J160B SEP R0 ;160B: D0 J160C DB 0F7H ;160C: F7 S160D GLO R4 ;160D: 84 PLO R8 ;160E: A8 J160F SEP R0 ;160F: D0 DB 3DH ;1610: 3D S1611 LDN R6 ;1611: 06 PLO RE ;1612: AE INC RD ;1613: 1D SEP R0 ;1614: D0 DB 54H ;1615: 54 S1616 SEP R3 ;1616: D3 S1617 GLO RE ;1617: 8E STXD ;1618: 73 J1619 SEX R6 ;1619: E6 LDI 4EH ;161A: F8 4E PLO R6 ;161C: A6 LDI 0C9H ;161D: F8 C9 PLO R9 ;161F: A9 GHI R6 ;1620: 96 PHI R9 ;1621: B9 LDN R9 ;1622: 09 SHL ;1623: FE BDF R162F ;1624: 33 2F LDN R9 ;1626: 09 SM ;1627: F7 BZ S162E ;1628: 32 2E LDN R9 ;162A: 09 STR R6 ;162B: 56 SEP R0 ;162C: D0 DB 0F4H ;162D: F4 S162E SEP RF ;162E: DF R162F INC R6 ;162F: 16 LDI 0A2H ;1630: F8 A2 PLO R7 ;1632: A7 LDN R9 ;1633: 09 STR R6 ;1634: 56 ANI 7FH ;1635: FA 7F STR R7 ;1637: 57 SEP RF ;1638: DF DB 0FFH ;1639: FF DB 94H ;163A: 94 DB 5AH ;163B: 5A DB 00H ;163C: 00 DB 67H ;163D: 67 SEP R0 ;163E: D0 DB 6DH ;163F: 6D SEP R0 ;1640: D0 DB 84H ;1641: 84 SEP R0 ;1642: D0 DB 0EBH ;1643: EB SEX R9 ;1644: E9 BR R164D ;1645: 30 4D J1647 INC R9 ;1647: 19 INC RA ;1648: 1A GLO RA ;1649: 8A LSNZ ;164A: C6 SEP R0 ;164B: D0 DB 0F7H ;164C: F7 R164D GLO R8 ;164D: 88 LBZ J1663 ;164E: C2 16 63 DEC R8 ;1651: 28 LDN RA ;1652: 0A SM ;1653: F7 LBZ J1647 ;1654: C2 16 47 BDF R1660 ;1657: 33 60 LDI 0FFH ;1659: F8 FF DEC RD ;165B: 2D STR RD ;165C: 5D DEC RD ;165D: 2D STR RD ;165E: 5D LSKP ;165F: C8 R1660 SEP R0 ;1660: D0 DB 2BH ;1661: 2B LSKP ;1662: C8 J1663 SEP R0 ;1663: D0 J1664 DB 29H ;1664: 29 LBR J1619 ;1665: C0 16 19 DB 6CH ;1668: 6C LBNZ J1670 ;1669: CA 16 70 GHI R8 ;166C: 98 LBZ J16CA ;166D: C2 16 CA J1670 SEP R0 ;1670: D0 DB 85H ;1671: 85 GHI R6 ;1672: 96 PHI R4 ;1673: B4 SEP R0 ;1674: D0 DB 0EBH ;1675: EB SEX RD ;1676: ED DEC RD ;1677: 2D GLO RA ;1678: 8A STXD ;1679: 73 GHI RA ;167A: 9A STXD ;167B: 73 LDN R6 ;167C: 06 STR RD ;167D: 5D LBR J1697 ;167E: C0 16 97 J1681 LDA RD ;1681: 4D STR R6 ;1682: 56 LDA RD ;1683: 4D PHI RA ;1684: BA LDN RD ;1685: 0D PLO RA ;1686: AA LDI 59H ;1687: F8 59 PLO R4 ;1689: A4 SEX R4 ;168A: E4 SEP R0 ;168B: D0 DB 9AH ;168C: 9A SEP R0 ;168D: D0 DB 0F7H ;168E: F7 GLO RA ;168F: 8A STR RD ;1690: 5D DEC RD ;1691: 2D GHI RA ;1692: 9A STR RD ;1693: 5D DEC RD ;1694: 2D LDN R6 ;1695: 06 STR RD ;1696: 5D J1697 LDI 5AH ;1697: F8 5A PLO R4 ;1699: A4 LDA R4 ;169A: 44 PHI R9 ;169B: B9 LDA R4 ;169C: 44 PLO R9 ;169D: A9 INC R4 ;169E: 14 LDN R4 ;169F: 04 PLO RE ;16A0: AE J16A1 SEX RA ;16A1: EA LDA R9 ;16A2: 49 XOR ;16A3: F3 LBNZ J16C0 ;16A4: CA 16 C0 INC RA ;16A7: 1A GLO RA ;16A8: 8A LSNZ ;16A9: C6 SEP R0 ;16AA: D0 DB 0F7H ;16AB: F7 DEC RE ;16AC: 2E GLO RE ;16AD: 8E LBNZ J16A1 ;16AE: CA 16 A1 LDA RD ;16B1: 4D PLO R9 ;16B2: A9 SEP R0 ;16B3: D0 DB 84H ;16B4: 84 SEP R0 ;16B5: D0 DB 54H ;16B6: 54 SEP R0 ;16B7: D0 DB 2BH ;16B8: 2B DEC R6 ;16B9: 26 DEC R6 ;16BA: 26 GLO R9 ;16BB: 89 STR R6 ;16BC: 56 LBR J1619 ;16BD: C0 16 19 J16C0 DEC R8 ;16C0: 28 GLO R8 ;16C1: 88 LBNZ J1681 ;16C2: CA 16 81 GHI R8 ;16C5: 98 LBNZ J1681 ;16C6: CA 16 81 INC RD ;16C9: 1D J16CA INC RD ;16CA: 1D STR RD ;16CB: 5D DEC RD ;16CC: 2D STR RD ;16CD: 5D LBR J1619 ;16CE: C0 16 19 DB 0FFH ;16D1: FF DB 84H ;16D2: 84 SEP R0 ;16D3: D0 DB 0EBH ;16D4: EB DEC RD ;16D5: 2D GLO RA ;16D6: 8A STR RD ;16D7: 5D GHI R6 ;16D8: 96 PHI R4 ;16D9: B4 INC RA ;16DA: 1A GLO RA ;16DB: 8A LSNZ ;16DC: C6 SEP R0 ;16DD: D0 DB 0F7H ;16DE: F7 INC RA ;16DF: 1A GLO RA ;16E0: 8A LSNZ ;16E1: C6 SEP R0 ;16E2: D0 DB 0F7H ;16E3: F7 LDN RA ;16E4: 0A LBZ J171B ;16E5: C2 17 1B STR RD ;16E8: 5D PLO RE ;16E9: AE INC RA ;16EA: 1A GLO RA ;16EB: 8A LSNZ ;16EC: C6 SEP R0 ;16ED: D0 DB 0F7H ;16EE: F7 LDN RA ;16EF: 0A LBZ J171B ;16F0: C2 17 1B PLO R8 ;16F3: A8 PHI R8 ;16F4: B8 LDI 5AH ;16F5: F8 5A PLO R4 ;16F7: A4 LDA R4 ;16F8: 44 PHI R9 ;16F9: B9 LDA R4 ;16FA: 44 PLO R9 ;16FB: A9 GHI R0 ;16FC: 90 PHI R5 ;16FD: B5 INC RA ;16FE: 1A GLO RA ;16FF: 8A LSNZ ;1700: C6 SEP R0 ;1701: D0 DB 0F7H ;1702: F7 J1703 SEX RA ;1703: EA J1704 LDA R9 ;1704: 49 SM ;1705: F7 LBNZ J1727 ;1706: CA 17 27 GHI R5 ;1709: 95 ADI 01H ;170A: FC 01 PHI R5 ;170C: B5 INC RA ;170D: 1A GLO RA ;170E: 8A LSNZ ;170F: C6 SEP R0 ;1710: D0 DB 0F7H ;1711: F7 DEC R8 ;1712: 28 GLO R8 ;1713: 88 LBNZ J1704 ;1714: CA 17 04 SEX RD ;1717: ED DEC RE ;1718: 2E GLO RE ;1719: 8E SD ;171A: F5 J171B PLO RE ;171B: AE LDN RA ;171C: 0A STXD ;171D: 73 GHI R0 ;171E: 90 STXD ;171F: 73 GLO RE ;1720: 8E STXD ;1721: 73 GHI R0 ;1722: 90 STR RD ;1723: 5D LBR J1619 ;1724: C0 16 19 J1727 DEC RE ;1727: 2E GLO RE ;1728: 8E SEX RD ;1729: ED BZ J171B ;172A: 32 1B SKP ;172C: 38 J172D DEC R8 ;172D: 28 INC RA ;172E: 1A GLO RA ;172F: 8A LSNZ ;1730: C6 SEP R0 ;1731: D0 DB 0F7H ;1732: F7 GLO R8 ;1733: 88 LBNZ J172D ;1734: CA 17 2D GHI R8 ;1737: 98 PLO R8 ;1738: A8 GHI R5 ;1739: 95 LSKP ;173A: C8 R173B SMI 01H ;173B: FF 01 DEC R9 ;173D: 29 BNZ R173B ;173E: 3A 3B PHI R5 ;1740: B5 LBR J1703 ;1741: C0 17 03 DB 0CAH ;1744: CA S1745 DB 01H ;1745: 01 DB 0A1H ;1746: A1 S1747 SEP R0 ;1747: D0 DB 0CFH ;1748: CF DB 80H ;1749: 80 S174A SEP RF ;174A: DF DB 0FFH ;174B: FF DB 0CAH ;174C: CA S174D DB 01H ;174D: 01 DB 0A1H ;174E: A1 SEP R0 ;174F: D0 DB 0D5H ;1750: D5 DB 80H ;1751: 80 SEP RF ;1752: DF DB 0FFH ;1753: FF DB 0CAH ;1754: CA S1755 DB 01H ;1755: 01 DB 0A1H ;1756: A1 SEP R0 ;1757: D0 DB 0CFH ;1758: CF DB 40H ;1759: 40 SEP RF ;175A: DF DB 0FFH ;175B: FF DB 0CAH ;175C: CA S175D DB 01H ;175D: 01 DB 0A1H ;175E: A1 SEP R0 ;175F: D0 DB 0D5H ;1760: D5 DB 40H ;1761: 40 SEP RF ;1762: DF DB 0FFH ;1763: FF DB 0CAH ;1764: CA S1765 DB 22H ;1765: 22 DB 60H ;1766: 60 LDN R6 ;1767: 06 ANI 7FH ;1768: FA 7F STR R6 ;176A: 56 STR R7 ;176B: 57 SEP RF ;176C: DF DB 0FFH ;176D: FF DB 8AH ;176E: 8A LDI 60H ;176F: F8 60 PLO R7 ;1771: A7 LDN R7 ;1772: 07 ANI 03H ;1773: FA 03 XRI 03H ;1775: FB 03 LBZ J177D ;1777: C2 17 7D SEP R0 ;177A: D0 DB 29H ;177B: 29 SEP RF ;177C: DF J177D SEP R0 ;177D: D0 DB 2BH ;177E: 2B SEP RF ;177F: DF DB 8AH ;1780: 8A S1781 B2 R1786 ;1781: 35 86 LBR J179D ;1783: C0 17 9D R1786 LBR J179A ;1786: C0 17 9A DB 0FFH ;1789: FF DB 0CAH ;178A: CA S178B DB 22H ;178B: 22 DB 60H ;178C: 60 LDN R6 ;178D: 06 ORI 80H ;178E: F9 80 STR R6 ;1790: 56 STR R7 ;1791: 57 SEP RF ;1792: DF DB 0FFH ;1793: FF DB 8AH ;1794: 8A S1795 B1 J179A ;1795: 34 9A LBR J179D ;1797: C0 17 9D J179A SEP R0 ;179A: D0 DB 2BH ;179B: 2B SEP RF ;179C: DF J179D SEP R0 ;179D: D0 DB 29H ;179E: 29 SEP RF ;179F: DF DB 0CAH ;17A0: CA S17A1 DB 22H ;17A1: 22 DB 60H ;17A2: 60 LDN R7 ;17A3: 07 SHL ;17A4: FE LBDF J179A ;17A5: C3 17 9A LBR J179D ;17A8: C0 17 9D DB 0FFH ;17AB: FF DB 8AH ;17AC: 8A S17AD B3 R17B2 ;17AD: 36 B2 LBR J179D ;17AF: C0 17 9D R17B2 LBR J179A ;17B2: C0 17 9A DB 0FFH ;17B5: FF DB 0CAH ;17B6: CA DB 22H ;17B7: 22 DB 60H ;17B8: 60 S17B9 LDN R6 ;17B9: 06 STR R7 ;17BA: 57 SEP R0 ;17BB: D0 DB 0CAH ;17BC: CA DB 21H ;17BD: 21 DB 62H ;17BE: 62 S17BF LDN R6 ;17BF: 06 STR R7 ;17C0: 57 SEP RF ;17C1: DF DB 0CAH ;17C2: CA S17C3 DB 1FH ;17C3: 1F DB 82H ;17C4: 82 LDA R6 ;17C5: 46 STR R7 ;17C6: 57 INC R7 ;17C7: 17 LDN R6 ;17C8: 06 STR R7 ;17C9: 57 SEP R0 ;17CA: D0 DB 0CAH ;17CB: CA DB 01H ;17CC: 01 DB 0A1H ;17CD: A1 SEP R0 ;17CE: D0 DB 0CFH ;17CF: CF DB 09H ;17D0: 09 SEP RF ;17D1: DF DB 0CAH ;17D2: CA S17D3 DB 01H ;17D3: 01 DB 0A1H ;17D4: A1 S17D5 SEP R0 ;17D5: D0 DB 0D5H ;17D6: D5 DB 09H ;17D7: 09 S17D8 SEP RF ;17D8: DF DB 0FFH ;17D9: FF DB 0C4H ;17DA: C4 J17DB SEP R0 ;17DB: D0 DB 0CAH ;17DC: CA DB 01H ;17DD: 01 DB 82H ;17DE: 82 S17DF LDN R6 ;17DF: 06 SHR ;17E0: F6 LBDF J17F0 ;17E1: C3 17 F0 LDI 0FFH ;17E4: F8 FF STR R7 ;17E6: 57 INC R7 ;17E7: 17 STR R7 ;17E8: 57 LDI 0A1H ;17E9: F8 A1 PLO R7 ;17EB: A7 LDN R6 ;17EC: 06 ORI 09H ;17ED: F9 09 STR R7 ;17EF: 57 J17F0 SEP RF ;17F0: DF DB 0C4H ;17F1: C4 DB 0C4H ;17F2: C4 DB 0C4H ;17F3: C4 DB 0C4H ;17F4: C4 DB 0C4H ;17F5: C4 DB 0C4H ;17F6: C4 DB 0C4H ;17F7: C4 DB 0CAH ;17F8: CA DB 01H ;17F9: 01 DB 0A1H ;17FA: A1 S17FB LDN R6 ;17FB: 06 SHR ;17FC: F6 LBDF J1804 ;17FD: C3 18 04 SHL ;1800: FE ANI 0F7H ;1801: FA F7 STR R7 ;1803: 57 J1804 SEP RF ;1804: DF DB 0C4H ;1805: C4 DB 0C4H ;1806: C4 DB 0C4H ;1807: C4 DB 0C4H ;1808: C4 DB 0C4H ;1809: C4 J180A DB 0C4H ;180A: C4 DB 0C4H ;180B: C4 DB 0CAH ;180C: CA DB 00H ;180D: 00 DB 0A0H ;180E: A0 S180F INC RD ;180F: 1D LDN RD ;1810: 0D SHL ;1811: FE SHL ;1812: FE SHL ;1813: FE SHL ;1814: FE SHL ;1815: FE STR RD ;1816: 5D LDN R6 ;1817: 06 ANI 9FH ;1818: FA 9F SEX RD ;181A: ED OR ;181B: F1 STR R6 ;181C: 56 J181D STR R7 ;181D: 57 INC RD ;181E: 1D SEP RF ;181F: DF DB 0CAH ;1820: CA DB 64H ;1821: 64 DB 0F0H ;1822: F0 SEP R0 ;1823: D0 DB 0CFH ;1824: CF DB 80H ;1825: 80 SEP RF ;1826: DF DB 0FFH ;1827: FF DB 0CAH ;1828: CA DB 64H ;1829: 64 DB 0F0H ;182A: F0 SEP R0 ;182B: D0 DB 0D5H ;182C: D5 DB 80H ;182D: 80 SEP RF ;182E: DF DB 0FFH ;182F: FF DB 28H ;1830: 28 J1831 SEP RF ;1831: DF DB 0C4H ;1832: C4 S1833 SEP R0 ;1833: D0 DB 0CAH ;1834: CA DB 74H ;1835: 74 DB 4FH ;1836: 4F S1837 LDN R6 ;1837: 06 LBZ J1831 ;1838: C2 18 31 GHI R0 ;183B: 90 J183C SMI 01H ;183C: FF 01 LBNZ J183C ;183E: CA 18 3C LDA R6 ;1841: 46 STR R7 ;1842: 57 LBR S1837 ;1843: C0 18 37 DB 0C4H ;1846: C4 SEP R0 ;1847: D0 S1848 ; ; ====================================================================== ; PSEUDO INSTRUCTION: LCD ; ---------------------------------------------------------------------- ; Opcode: 0x44 ; Handler: 0x1848 ; Dispatch: CA->184B ; Definition: Full HD44780 display refresh from RAM buffer 0x6080-0x60BF ; ; Implementation: ; Entry 0xCA reads R6.0=0x68, R7.0=0xA0 from handler body. Handler at ; 1849: writes 2x32 chars to LCD. Line 1: 0x6080-0x608F + 0x60A0-0x60AF. ; Line 2: 0x6090-0x609F + 0x60B0-0x60BF. Each byte translated through ; lookup table at RAM 0x68xx before sending to HD44780. ; ====================================================================== DB 0CAH ;1848: CA DB 80H ;1849: 80 DB 4FH ;184A: 4F S184B LDI 80H ;184B: F8 80 STR R7 ;184D: 57 GLO R6 ;184E: 86 PLO RA ;184F: AA LDI 60H ;1850: F8 60 PHI RA ;1852: BA J1853 LDI 09H ;1853: F8 09 R1855 SMI 01H ;1855: FF 01 BNZ R1855 ;1857: 3A 55 LDI 68H ;1859: F8 68 PHI R8 ;185B: B8 LDA RA ;185C: 4A ANI 7FH ;185D: FA 7F PLO R8 ;185F: A8 LDN R8 ;1860: 08 INC R7 ;1861: 17 STR R7 ;1862: 57 DEC R7 ;1863: 27 GLO RA ;1864: 8A SMI 90H ;1865: FF 90 LBNZ J1870 ;1867: CA 18 70 LDI 0A0H ;186A: F8 A0 PLO RA ;186C: AA LBR J1853 ;186D: C0 18 53 J1870 SMI 10H ;1870: FF 10 LBNZ J187B ;1872: CA 18 7B LDI 0B0H ;1875: F8 B0 PLO RA ;1877: AA LBR J1853 ;1878: C0 18 53 J187B SMI 10H ;187B: FF 10 LBNZ J1890 ;187D: CA 18 90 LDI 90H ;1880: F8 90 PLO RA ;1882: AA LDI 10H ;1883: F8 10 J1885 SMI 01H ;1885: FF 01 LBNZ J1885 ;1887: CA 18 85 LDI 0C0H ;188A: F8 C0 STR R7 ;188C: 57 LBR J1853 ;188D: C0 18 53 J1890 SMI 10H ;1890: FF 10 LBNZ J1853 ;1892: CA 18 53 SEP RF ;1895: DF DB 0C4H ;1896: C4 J1897 SEP R0 ;1897: D0 DB 0CAH ;1898: CA DB 68H ;1899: 68 DB 0A0H ;189A: A0 S189B DEC RD ;189B: 2D SEX RD ;189C: ED LDN R7 ;189D: 07 SHR ;189E: F6 LDI 20H ;189F: F8 20 PLO R7 ;18A1: A7 GHI RE ;18A2: 9E LBDF J18EC ;18A3: C3 18 EC LDI 19H ;18A6: F8 19 PHI R4 ;18A8: B4 J18A9 LDI 43H ;18A9: F8 43 PLO R4 ;18AB: A4 LDA R7 ;18AC: 47 J18AD SHL ;18AD: FE LBDF J18C0 ;18AE: C3 18 C0 INC R4 ;18B1: 14 LBNZ J18AD ;18B2: CA 18 AD GLO R7 ;18B5: 87 SMI 26H ;18B6: FF 26 LBNZ J18A9 ;18B8: CA 18 A9 LDI 0FFH ;18BB: F8 FF LBR J18EC ;18BD: C0 18 EC J18C0 LBNZ J191D ;18C0: CA 19 1D GLO R7 ;18C3: 87 SDI 26H ;18C4: FD 26 STR RD ;18C6: 5D LDN R4 ;18C7: 04 ADD ;18C8: F4 ADI 14H ;18C9: FC 14 PLO R4 ;18CB: A4 LDI 40H ;18CC: F8 40 ADCI 00H ;18CE: 7C 00 PHI R4 ;18D0: B4 GLO R7 ;18D1: 87 STXD ;18D2: 73 GLO R6 ;18D3: 86 STXD ;18D4: 73 LDI 4FH ;18D5: F8 4F PLO R6 ;18D7: A6 LDI 0A2H ;18D8: F8 A2 PLO R7 ;18DA: A7 LDN R6 ;18DB: 06 STR RD ;18DC: 5D GHI R0 ;18DD: 90 STR R6 ;18DE: 56 STR R7 ;18DF: 57 LDN R4 ;18E0: 04 PLO R4 ;18E1: A4 LDA RD ;18E2: 4D STR R6 ;18E3: 56 ANI 7FH ;18E4: FA 7F STR R7 ;18E6: 57 LDA RD ;18E7: 4D PLO R6 ;18E8: A6 LDN RD ;18E9: 0D PLO R7 ;18EA: A7 GLO R4 ;18EB: 84 J18EC STR RD ;18EC: 5D J18ED GLO R7 ;18ED: 87 SMI 26H ;18EE: FF 26 J18F0 LBZ J18FA ;18F0: C2 18 FA LDA R7 ;18F3: 47 LBNZ J191D ;18F4: CA 19 1D LBR J18ED ;18F7: C0 18 ED J18FA LDN RD ;18FA: 0D SMI 0FFH ;18FB: FF FF LBNZ J190A ;18FD: CA 19 0A LDN R6 ;1900: 06 SM ;1901: F7 LBZ J190A ;1902: C2 19 0A LDN RD ;1905: 0D STR R6 ;1906: 56 LBR J191D ;1907: C0 19 1D J190A INC R6 ;190A: 16 LDN R6 ;190B: 06 SM ;190C: F7 LBZ J191D ;190D: C2 19 1D LDN RD ;1910: 0D STR R6 ;1911: 56 ADI 01H ;1912: FC 01 LBZ J191D ;1914: C2 19 1D DEC RD ;1917: 2D GHI R0 ;1918: 90 STR RD ;1919: 5D LBR J17DB ;191A: C0 17 DB J191D GLO R5 ;191D: 85 LBZ J193F ;191E: C2 19 3F STR RD ;1921: 5D GHI R7 ;1922: 97 PHI R0 ;1923: B0 LDI 64H ;1924: F8 64 PLO R0 ;1926: A0 IDL ;1927: 00 LDI 00H ;1928: F8 00 PHI R0 ;192A: B0 LDI 0FBH ;192B: F8 FB PLO R0 ;192D: A0 J192E GLO R5 ;192E: 85 LBZ J193F ;192F: C2 19 3F BN1 R1938 ;1932: 3C 38 GHI R0 ;1934: 90 LBR J193F ;1935: C0 19 3F R1938 SEX RD ;1938: ED SD ;1939: F5 INC RD ;193A: 1D LBNZ J1897 ;193B: CA 18 97 DEC RD ;193E: 2D J193F STR RD ;193F: 5D DEC RD ;1940: 2D STR RD ;1941: 5D SEP RF ;1942: DF ; ; ====================================================================== ; DATA AREA: KEY SCAN OFFSET TABLE ; Range: 0x1943-0x194A ; ---------------------------------------------------------------------- ; 8 bytes used by the keyboard scan routine at 0x189D. ; Each byte is a column offset (multiples of 6) into the app ROM ; key matrix at ptcmcd.bin offset 0x0013. ; ; Values: 00 06 0C 12 18 1E 24 2A ; Maps bit position (0-7) to matrix column offset for key code lookup. ; The scan reads 6 bytes (0x3F20-0x3F25), 8 bits each, MSB first. ; R4 points here during scan to provide the column base offset. ; ====================================================================== DB 00H ;1943: 00 DB 06H ;1944: 06 DB 0CH ;1945: 0C DB 12H ;1946: 12 DB 18H ;1947: 18 DB 1EH ;1948: 1E DB 24H ;1949: 24 DB 2AH ;194A: 2A DB 0FFH ;194B: FF DB 29H ;194C: 29 DB 0DFH ;194D: DF DB 8AH ;194E: 8A S194F LDI 4EH ;194F: F8 4E PLO R6 ;1951: A6 INC RD ;1952: 1D LDA RD ;1953: 4D STR R6 ;1954: 56 S1955 SEP R0 ;1955: D0 DB 0F4H ;1956: F4 S1957 SEP RF ;1957: DF DB 0CAH ;1958: CA DB 4FH ;1959: 4F DB 0A2H ;195A: A2 S195B INC RD ;195B: 1D LDA RD ;195C: 4D ORI 80H ;195D: F9 80 STR R6 ;195F: 56 ANI 7FH ;1960: FA 7F STR R7 ;1962: 57 SEP RF ;1963: DF DB 8BH ;1964: 8B J1965 SEP R0 ;1965: D0 DB 8AH ;1966: 8A S1967 LDI 0A0H ;1967: F8 A0 PLO R7 ;1969: A7 LDI 10H ;196A: F8 10 STR R7 ;196C: 57 LDI 00H ;196D: F8 00 PHI R0 ;196F: B0 PLO R0 ;1970: A0 R1971 DEC R0 ;1971: 20 GHI R0 ;1972: 90 BNZ R1971 ;1973: 3A 71 PLO R0 ;1975: A0 SEX R0 ;1976: E0 SEP R0 ;1977: D0 DB 0CAH ;1978: CA DB 00H ;1979: 00 DB 0A0H ;197A: A0 SEP R0 ;197B: D0 DB 0D5H ;197C: D5 DB 04H ;197D: 04 GHI R0 ;197E: 90 PLO R5 ;197F: A5 INC RF ;1980: 1F LDI 00H ;1981: F8 00 STR RF ;1983: 5F DEC RF ;1984: 2F SEP RF ;1985: DF DB 0C4H ;1986: C4 J1987 SEP R0 ;1987: D0 DB 0CAH ;1988: CA DB 67H ;1989: 67 DB 63H ;198A: 63 S198B LDI 02H ;198B: F8 02 STR R6 ;198D: 56 STR R7 ;198E: 57 SEP R0 ;198F: D0 DB 0CAH ;1990: CA DB 00H ;1991: 00 DB 0A0H ;1992: A0 S1993 LDI 61H ;1993: F8 61 PHI RF ;1995: BF INC RF ;1996: 1F LDI 16H ;1997: F8 16 STR RF ;1999: 5F DEC RF ;199A: 2F SEP R0 ;199B: D0 DB 0D5H ;199C: D5 DB 10H ;199D: 10 S199E SEP R0 ;199E: D0 DB 0CFH ;199F: CF DB 04H ;19A0: 04 S19A1 INC R6 ;19A1: 16 INC R7 ;19A2: 17 LDN R6 ;19A3: 06 STR R7 ;19A4: 57 SEP R0 ;19A5: D0 DB 0CAH ;19A6: CA DB 66H ;19A7: 66 DB 80H ;19A8: 80 S19A9 SEP R0 ;19A9: D0 DB 0CFH ;19AA: CF DB 02H ;19AB: 02 S19AC SEP RF ;19AC: DF DB 0FFH ;19AD: FF DB 8AH ;19AE: 8A S19AF LDI 1BH ;19AF: F8 1B PLO R6 ;19B1: A6 SEX R6 ;19B2: E6 LDXA ;19B3: 72 PLO R2 ;19B4: A2 LDXA ;19B5: 72 PLO RD ;19B6: AD LDXA ;19B7: 72 PHI RC ;19B8: BC LDXA ;19B9: 72 PLO RC ;19BA: AC LDI 07H ;19BB: F8 07 PLO R6 ;19BD: A6 GHI R0 ;19BE: 90 STR R6 ;19BF: 56 LBR J1987 ;19C0: C0 19 87 DB 0FFH ;19C3: FF DB 8AH ;19C4: 8A S19C5 B4 R19CA ;19C5: 37 CA LBR J19DC ;19C7: C0 19 DC R19CA SEP R0 ;19CA: D0 DB 2BH ;19CB: 2B SEP R0 ;19CC: D0 DB 0CAH ;19CD: CA DB 1FH ;19CE: 1F DB 82H ;19CF: 82 GHI R0 ;19D0: 90 STR R6 ;19D1: 56 STR R7 ;19D2: 57 SEP R0 ;19D3: D0 DB 0CAH ;19D4: CA DB 01H ;19D5: 01 DB 0A1H ;19D6: A1 LDN R6 ;19D7: 06 ANI 3FH ;19D8: FA 3F STR R7 ;19DA: 57 SEP RF ;19DB: DF J19DC SEP R0 ;19DC: D0 DB 29H ;19DD: 29 S19DE SEP RF ;19DE: DF DB 0FFH ;19DF: FF DB 0CAH ;19E0: CA S19E1 DB 0A7H ;19E1: A7 DB 0EH ;19E2: 0E S19E3 GHI R0 ;19E3: 90 STR R7 ;19E4: 57 LDI 04H ;19E5: F8 04 PLO R7 ;19E7: A7 J19E8 LDN R6 ;19E8: 06 ANI 0FH ;19E9: FA 0F STR R7 ;19EB: 57 INC R7 ;19EC: 17 LDN R6 ;19ED: 06 SHR ;19EE: F6 SHR ;19EF: F6 SHR ;19F0: F6 SHR ;19F1: F6 STR R7 ;19F2: 57 INC R7 ;19F3: 17 DEC R6 ;19F4: 26 GLO R6 ;19F5: 86 SMI 0A2H ;19F6: FF A2 LBZ J1A13 ;19F8: C2 1A 13 SMI 01H ;19FB: FF 01 LBNZ J1A04 ;19FD: CA 1A 04 INC R7 ;1A00: 17 LBR J19E8 ;1A01: C0 19 E8 J1A04 SMI 02H ;1A04: FF 02 J1A06 LBNZ J19E8 ;1A06: CA 19 E8 INC R7 ;1A09: 17 INC R7 ;1A0A: 17 LDN R6 ;1A0B: 06 STR R7 ;1A0C: 57 DEC R7 ;1A0D: 27 DEC R7 ;1A0E: 27 DEC R6 ;1A0F: 26 LBR J19E8 ;1A10: C0 19 E8 J1A13 LDN R6 ;1A13: 06 ANI 10H ;1A14: FA 10 LBNZ J1A1C ;1A16: CA 1A 1C LDN R6 ;1A19: 06 BR R1A1F ;1A1A: 30 1F J1A1C LDN R6 ;1A1C: 06 SMI 02H ;1A1D: FF 02 R1A1F ANI 03H ;1A1F: FA 03 SHR ;1A21: F6 LSZ ;1A22: CE ADCI 00H ;1A23: 7C 00 SHL ;1A25: FE LSNZ ;1A26: C6 LDI 08H ;1A27: F8 08 STR R7 ;1A29: 57 INC R7 ;1A2A: 17 GHI RE ;1A2B: 9E STR R7 ;1A2C: 57 SEP RF ;1A2D: DF DB 0C4H ;1A2E: C4 J1A2F SEP R0 ;1A2F: D0 DB 0CAH ;1A30: CA S1A31 DB 0A9H ;1A31: A9 DB 01H ;1A32: 01 GHI R0 ;1A33: 90 STR R6 ;1A34: 56 SEX R6 ;1A35: E6 LBR J1A44 ;1A36: C0 1A 44 J1A39 LDA R7 ;1A39: 47 ANI 0FH ;1A3A: FA 0F SMI 0AH ;1A3C: FF 0A LBDF J1A2F ;1A3E: C3 1A 2F ADI 0AH ;1A41: FC 0A STR R6 ;1A43: 56 J1A44 LDA R7 ;1A44: 47 ANI 0FH ;1A45: FA 0F SMI 0AH ;1A47: FF 0A LBDF J1A2F ;1A49: C3 1A 2F ADI 0AH ;1A4C: FC 0A SHL ;1A4E: FE SHL ;1A4F: FE SHL ;1A50: FE SHL ;1A51: FE OR ;1A52: F1 STXD ;1A53: 73 GLO R6 ;1A54: 86 SMI 0A3H ;1A55: FF A3 LBNF J1A79 ;1A57: CB 1A 79 BNZ R1A62 ;1A5A: 3A 62 LDN R6 ;1A5C: 06 PLO RA ;1A5D: AA INC R7 ;1A5E: 17 LBR J1A39 ;1A5F: C0 1A 39 R1A62 SMI 02H ;1A62: FF 02 LBNZ J1A39 ;1A64: CA 1A 39 INC R7 ;1A67: 17 INC R7 ;1A68: 17 LDN R7 ;1A69: 07 ANI 0FH ;1A6A: FA 0F SMI 08H ;1A6C: FF 08 LBDF J1A2F ;1A6E: C3 1A 2F ADI 08H ;1A71: FC 08 STXD ;1A73: 73 DEC R7 ;1A74: 27 DEC R7 ;1A75: 27 LBR J1A39 ;1A76: C0 1A 39 J1A79 INC R6 ;1A79: 16 GLO RA ;1A7A: 8A SD ;1A7B: F5 LBDF J1A96 ;1A7C: C3 1A 96 DEC R6 ;1A7F: 26 LDN R6 ;1A80: 06 ANI 0FH ;1A81: FA 0F SMI 09H ;1A83: FF 09 LBZ J1A8D ;1A85: C2 1A 8D LDN R6 ;1A88: 06 ADI 01H ;1A89: FC 01 STR R6 ;1A8B: 56 SEP RF ;1A8C: DF J1A8D LDN R6 ;1A8D: 06 ANI 0F0H ;1A8E: FA F0 SMI 90H ;1A90: FF 90 LSZ ;1A92: CE ADI 0A0H ;1A93: FC A0 STR R6 ;1A95: 56 J1A96 SEP RF ;1A96: DF DB 0FFH ;1A97: FF DB 28H ;1A98: 28 DB 0FFH ;1A99: FF DB 28H ;1A9A: 28 DB 0FFH ;1A9B: FF S1A9C ; ; ====================================================================== ; PSEUDO INSTRUCTION: DELAY ; ---------------------------------------------------------------------- ; Opcode: 0x45 ; Handler: 0x1A9C ; Dispatch: CA->1A9F ; Definition: Software delay loop. Duration from M(6009). ; ; Implementation: ; Entry 0xCA reads R6.0/R7.0. Handler at 1A9D: if M(6009)==0 exits ; immediately. Otherwise: R8=M(6009):00, inner loop = 6xNOP + DEC R8 + ; GLO R8 + LBNZ (256 iterations per unit). Pure timing, no I/O. ; ====================================================================== DB 0CAH ;1A9C: CA DB 09H ;1A9D: 09 DB 00H ;1A9E: 00 LDN R6 ;1A9F: 06 PHI R8 ;1AA0: B8 LBZ J1AB5 ;1AA1: C2 1A B5 GHI R0 ;1AA4: 90 PLO R8 ;1AA5: A8 J1AA6 NOP ;1AA6: C4 NOP ;1AA7: C4 NOP ;1AA8: C4 NOP ;1AA9: C4 NOP ;1AAA: C4 NOP ;1AAB: C4 DEC R8 ;1AAC: 28 GLO R8 ;1AAD: 88 LBNZ J1AA6 ;1AAE: CA 1A A6 GHI R8 ;1AB1: 98 LBNZ J1AA6 ;1AB2: CA 1A A6 J1AB5 SEP RF ;1AB5: DF DB 6CH ;1AB6: 6C S1AB7 SEQ ;1AB7: 7B LBR J1ABE ;1AB8: C0 1A BE DB 0FFH ;1ABB: FF DB 6CH ;1ABC: 6C REQ ;1ABD: 7A J1ABE INC RD ;1ABE: 1D LDA RD ;1ABF: 4D PLO RE ;1AC0: AE SEP R0 ;1AC1: D0 DB 7EH ;1AC2: 7E S1AC3 GLO RD ;1AC3: 8D SMI 08H ;1AC4: FF 08 PLO RD ;1AC6: AD SEP R0 ;1AC7: D0 DB 0EBH ;1AC8: EB S1AC9 LBR J1AF9 ;1AC9: C0 1A F9 J1ACC LDA R9 ;1ACC: 49 LBNZ J1AD5 ;1ACD: CA 1A D5 LDN R9 ;1AD0: 09 PLO R9 ;1AD1: A9 LBR J1ACC ;1AD2: C0 1A CC J1AD5 STR RA ;1AD5: 5A LBNQ J1AE3 ;1AD6: C9 1A E3 INC RA ;1AD9: 1A GHI RA ;1ADA: 9A LBNZ J1AF8 ;1ADB: CA 1A F8 SEP R0 ;1ADE: D0 DB 0F7H ;1ADF: F7 S1AE0 LBR J1AF8 ;1AE0: C0 1A F8 J1AE3 GHI RA ;1AE3: 9A SHL ;1AE4: FE BDF R1AEA ;1AE5: 33 EA DEC RA ;1AE7: 2A J1AE8 BR J1AF8 ;1AE8: 30 F8 R1AEA DEC RA ;1AEA: 2A GHI RA ;1AEB: 9A SHL ;1AEC: FE BDF J1AF8 ;1AED: 33 F8 LDI 0FFH ;1AEF: F8 FF PHI RA ;1AF1: BA LDN R6 ;1AF2: 06 SMI 01H ;1AF3: FF 01 STR R6 ;1AF5: 56 SEP R0 ;1AF6: D0 DB 0F4H ;1AF7: F4 J1AF8 DEC R8 ;1AF8: 28 J1AF9 GLO R8 ;1AF9: 88 LBNZ J1ACC ;1AFA: CA 1A CC GHI R8 ;1AFD: 98 LBNZ J1ACC ;1AFE: CA 1A CC GLO RE ;1B01: 8E LBNZ J1B06 ;1B02: CA 1B 06 SEP RF ;1B05: DF J1B06 SMI 01H ;1B06: FF 01 PLO RE ;1B08: AE LBR J1ACC ;1B09: C0 1A CC DB 6CH ;1B0C: 6C S1B0D SEQ ;1B0D: 7B BR R1B12 ;1B0E: 30 12 DB 6CH ;1B10: 6C REQ ;1B11: 7A R1B12 INC RD ;1B12: 1D LDA RD ;1B13: 4D PLO RE ;1B14: AE SEP R0 ;1B15: D0 DB 7EH ;1B16: 7E S1B17 SEP R0 ;1B17: D0 DB 0EBH ;1B18: EB S1B19 SEX RA ;1B19: EA LBR J1B4C ;1B1A: C0 1B 4C J1B1D LDA R9 ;1B1D: 49 BNZ R1B25 ;1B1E: 3A 25 LDN R9 ;1B20: 09 PLO R9 ;1B21: A9 LBR J1B1D ;1B22: C0 1B 1D R1B25 SM ;1B25: F7 LBNZ J1B5E ;1B26: CA 1B 5E LBNQ J1B34 ;1B29: C9 1B 34 INC RA ;1B2C: 1A GLO RA ;1B2D: 8A LSNZ ;1B2E: C6 SEP R0 ;1B2F: D0 DB 0F7H ;1B30: F7 S1B31 LBR J1B4B ;1B31: C0 1B 4B J1B34 GHI RA ;1B34: 9A SHL ;1B35: FE LBDF J1B3D ;1B36: C3 1B 3D DEC RA ;1B39: 2A LBR J1B4B ;1B3A: C0 1B 4B J1B3D DEC RA ;1B3D: 2A GHI RA ;1B3E: 9A SHL ;1B3F: FE BDF J1B4B ;1B40: 33 4B LDI 0FFH ;1B42: F8 FF PHI RA ;1B44: BA LDN R6 ;1B45: 06 SMI 01H ;1B46: FF 01 STR R6 ;1B48: 56 SEP R0 ;1B49: D0 DB 0F4H ;1B4A: F4 J1B4B DEC R8 ;1B4B: 28 J1B4C GLO R8 ;1B4C: 88 LBNZ J1B1D ;1B4D: CA 1B 1D GHI R8 ;1B50: 98 LBNZ J1B1D ;1B51: CA 1B 1D GLO RE ;1B54: 8E LBZ J1B5E ;1B55: C2 1B 5E SMI 01H ;1B58: FF 01 PLO RE ;1B5A: AE LBR J1B1D ;1B5B: C0 1B 1D J1B5E DEC RD ;1B5E: 2D LDN R6 ;1B5F: 06 STR RD ;1B60: 5D DEC R9 ;1B61: 29 SEP R0 ;1B62: D0 DB 54H ;1B63: 54 S1B64 SEP R3 ;1B64: D3 S1B65 LDN RD ;1B65: 0D STR R6 ;1B66: 56 SEX RD ;1B67: ED GLO RE ;1B68: 8E STXD ;1B69: 73 GHI R0 ;1B6A: 90 STXD ;1B6B: 73 GLO R8 ;1B6C: 88 STXD ;1B6D: 73 GHI R8 ;1B6E: 98 STR RD ;1B6F: 5D LBR J1619 ;1B70: C0 16 19 DB 0FFH ;1B73: FF DB 8AH ;1B74: 8A LDI 80H ;1B75: F8 80 PHI R6 ;1B77: B6 LDI 81H ;1B78: F8 81 PHI R2 ;1B7A: B2 LDI 82H ;1B7B: F8 82 PHI RD ;1B7D: BD LDI 05H ;1B7E: F8 05 PHI RF ;1B80: BF SEP RF ;1B81: DF DB 0CAH ;1B82: CA DB 64H ;1B83: 64 DB 0F0H ;1B84: F0 S1B85 LDN R6 ;1B85: 06 ANI 0FCH ;1B86: FA FC INC RD ;1B88: 1D SEX RD ;1B89: ED OR ;1B8A: F1 STR R6 ;1B8B: 56 STR R7 ;1B8C: 57 INC RD ;1B8D: 1D SEP RF ;1B8E: DF DB 0FFH ;1B8F: FF DB 0CAH ;1B90: CA DB 65H ;1B91: 65 DB 0F1H ;1B92: F1 SEP R0 ;1B93: D0 DB 0D5H ;1B94: D5 DB 02H ;1B95: 02 SEP RF ;1B96: DF DB 0FFH ;1B97: FF DB 0CAH ;1B98: CA DB 65H ;1B99: 65 DB 0F1H ;1B9A: F1 SEP R0 ;1B9B: D0 DB 0CFH ;1B9C: CF DB 02H ;1B9D: 02 SEP RF ;1B9E: DF DB 0FFH ;1B9F: FF DB 0CAH ;1BA0: CA DB 65H ;1BA1: 65 DB 0F1H ;1BA2: F1 S1BA3 SEP R0 ;1BA3: D0 DB 0D5H ;1BA4: D5 DB 01H ;1BA5: 01 S1BA6 SEP RF ;1BA6: DF DB 0FFH ;1BA7: FF DB 0CAH ;1BA8: CA DB 65H ;1BA9: 65 DB 0F1H ;1BAA: F1 SEP R0 ;1BAB: D0 DB 0CFH ;1BAC: CF DB 01H ;1BAD: 01 SEP RF ;1BAE: DF DB 0FFH ;1BAF: FF DB 0CAH ;1BB0: CA DB 64H ;1BB1: 64 DB 0F0H ;1BB2: F0 SEP R0 ;1BB3: D0 DB 0D5H ;1BB4: D5 DB 04H ;1BB5: 04 SEP RF ;1BB6: DF DB 0FFH ;1BB7: FF DB 0CAH ;1BB8: CA DB 64H ;1BB9: 64 DB 0F0H ;1BBA: F0 SEP R0 ;1BBB: D0 DB 0CFH ;1BBC: CF DB 04H ;1BBD: 04 SEP RF ;1BBE: DF DB 0FFH ;1BBF: FF DB 6CH ;1BC0: 6C SEP R0 ;1BC1: D0 DB 85H ;1BC2: 85 INC RD ;1BC3: 1D GLO R8 ;1BC4: 88 LBZ J1C20 ;1BC5: C2 1C 20 LDI 68H ;1BC8: F8 68 PHI R4 ;1BCA: B4 J1BCB LDI 08H ;1BCB: F8 08 PLO R6 ;1BCD: A6 LDN R6 ;1BCE: 06 SHL ;1BCF: FE BDF R1BE1 ;1BD0: 33 E1 B1 R1BE1 ;1BD2: 34 E1 LDI 0B2H ;1BD4: F8 B2 PLO R6 ;1BD6: A6 LDN R6 ;1BD7: 06 LBNZ J1C20 ;1BD8: CA 1C 20 LDI 03H ;1BDB: F8 03 STR R6 ;1BDD: 56 LBR J1C20 ;1BDE: C0 1C 20 R1BE1 SEX R6 ;1BE1: E6 LDI 0B0H ;1BE2: F8 B0 PLO R6 ;1BE4: A6 LDA R6 ;1BE5: 46 SM ;1BE6: F7 SMI 01H ;1BE7: FF 01 LBZ J1BCB ;1BE9: C2 1B CB LDN R6 ;1BEC: 06 PLO R9 ;1BED: A9 LDI 66H ;1BEE: F8 66 PHI R9 ;1BF0: B9 LDA RA ;1BF1: 4A SHL ;1BF2: FE BDF R1BFA ;1BF3: 33 FA SHR ;1BF5: F6 ORI 80H ;1BF6: F9 80 PLO R4 ;1BF8: A4 LDN R4 ;1BF9: 04 R1BFA STR R9 ;1BFA: 59 SEX RD ;1BFB: ED XOR ;1BFC: F3 STR RD ;1BFD: 5D INC R9 ;1BFE: 19 GLO R9 ;1BFF: 89 STR R6 ;1C00: 56 DEC R8 ;1C01: 28 GLO R8 ;1C02: 88 LBNZ J1BCB ;1C03: CA 1B CB LDI 66H ;1C06: F8 66 PLO R6 ;1C08: A6 LDI 80H ;1C09: F8 80 PLO R7 ;1C0B: A7 LDN R6 ;1C0C: 06 ORI 08H ;1C0D: F9 08 STR R6 ;1C0F: 56 STR R7 ;1C10: 57 LDI 0A1H ;1C11: F8 A1 PLO R7 ;1C13: A7 LDI 01H ;1C14: F8 01 PLO R6 ;1C16: A6 LDN R6 ;1C17: 06 ANI 0FDH ;1C18: FA FD STR R6 ;1C1A: 56 STR R7 ;1C1B: 57 ORI 02H ;1C1C: F9 02 STR R6 ;1C1E: 56 STR R7 ;1C1F: 57 J1C20 LDI 0B2H ;1C20: F8 B2 PLO R6 ;1C22: A6 LDN R6 ;1C23: 06 LBZ J1C29 ;1C24: C2 1C 29 GHI R0 ;1C27: 90 SKP ;1C28: 38 J1C29 GHI RE ;1C29: 9E DEC RD ;1C2A: 2D DEC RD ;1C2B: 2D STR RD ;1C2C: 5D GHI R0 ;1C2D: 90 DEC RD ;1C2E: 2D STR RD ;1C2F: 5D SEP RF ;1C30: DF DB 0FFH ;1C31: FF DB 8AH ;1C32: 8A SEX R6 ;1C33: E6 LDI 0B3H ;1C34: F8 B3 PLO R6 ;1C36: A6 LDA R6 ;1C37: 46 SM ;1C38: F7 LBZ J1C50 ;1C39: C2 1C 50 LDI 67H ;1C3C: F8 67 PHI R4 ;1C3E: B4 LDN R6 ;1C3F: 06 PLO R4 ;1C40: A4 LDA R4 ;1C41: 44 DEC RD ;1C42: 2D STR RD ;1C43: 5D GLO R4 ;1C44: 84 STR R6 ;1C45: 56 DEC RD ;1C46: 2D GHI R0 ;1C47: 90 STR RD ;1C48: 5D GHI RE ;1C49: 9E R1C4A DEC RD ;1C4A: 2D STR RD ;1C4B: 5D DEC RD ;1C4C: 2D GHI R0 ;1C4D: 90 STR RD ;1C4E: 5D SEP RF ;1C4F: DF J1C50 LDI 08H ;1C50: F8 08 PLO R6 ;1C52: A6 LDN R6 ;1C53: 06 ANI 80H ;1C54: FA 80 BNZ R1C60 ;1C56: 3A 60 B1 R1C60 ;1C58: 34 60 LDI 0B5H ;1C5A: F8 B5 PLO R6 ;1C5C: A6 LDI 03H ;1C5D: F8 03 STR R6 ;1C5F: 56 R1C60 DEC RD ;1C60: 2D DEC RD ;1C61: 2D GHI R0 ;1C62: 90 BR R1C4A ;1C63: 30 4A DB 0FFH ;1C65: FF DB 0CAH ;1C66: CA DB 66H ;1C67: 66 DB 80H ;1C68: 80 LDN R6 ;1C69: 06 ORI 10H ;1C6A: F9 10 STR R6 ;1C6C: 56 STR R7 ;1C6D: 57 SEP RF ;1C6E: DF DB 0FFH ;1C6F: FF DB 0CAH ;1C70: CA DB 66H ;1C71: 66 DB 80H ;1C72: 80 LDN R6 ;1C73: 06 ANI 0EFH ;1C74: FA EF STR R6 ;1C76: 56 STR R7 ;1C77: 57 SEP RF ;1C78: DF DB 0FFH ;1C79: FF DB 6CH ;1C7A: 6C GHI R0 ;1C7B: 90 J1C7C PLO RE ;1C7C: AE SEP R0 ;1C7D: D0 DB 66H ;1C7E: 66 LDI 60H ;1C7F: F8 60 PLO RA ;1C81: AA GHI R6 ;1C82: 96 PHI RA ;1C83: BA SEP R0 ;1C84: D0 DB 0EBH ;1C85: EB J1C86 LDI 60H ;1C86: F8 60 PLO R7 ;1C88: A7 REQ ;1C89: 7A LDI 08H ;1C8A: F8 08 PLO R6 ;1C8C: A6 LDN R6 ;1C8D: 06 SHL ;1C8E: FE LSDF ;1C8F: CF SEQ ;1C90: 7B NOP ;1C91: C4 SHL ;1C92: FE GLO R9 ;1C93: 89 ANI 0FBH ;1C94: FA FB LSNF ;1C96: C7 ORI 04H ;1C97: F9 04 PLO R9 ;1C99: A9 DEC R2 ;1C9A: 22 SEX R2 ;1C9B: E2 GHI RC ;1C9C: 9C STXD ;1C9D: 73 GLO RC ;1C9E: 8C STXD ;1C9F: 73 GHI R0 ;1CA0: 90 STR R2 ;1CA1: 52 PHI R9 ;1CA2: B9 GLO R9 ;1CA3: 89 ANI 0BFH ;1CA4: FA BF PLO R9 ;1CA6: A9 GLO RE ;1CA7: 8E BZ R1CB2 ;1CA8: 32 B2 SMI 01H ;1CAA: FF 01 LBZ J1DCD ;1CAC: C2 1D CD LBR J1E8D ;1CAF: C0 1E 8D R1CB2 DEC R8 ;1CB2: 28 GLO R9 ;1CB3: 89 ORI 01H ;1CB4: F9 01 PLO R9 ;1CB6: A9 ANI 02H ;1CB7: FA 02 LBZ J1CBD ;1CB9: C2 1C BD DEC RD ;1CBC: 2D J1CBD LDI 23H ;1CBD: F8 23 PLO R6 ;1CBF: A6 LDA R6 ;1CC0: 46 PHI R4 ;1CC1: B4 LDA R6 ;1CC2: 46 DEC RD ;1CC3: 2D STR RD ;1CC4: 5D J1CC5 LDN RD ;1CC5: 0D PLO R4 ;1CC6: A4 LDI 60H ;1CC7: F8 60 PLO R7 ;1CC9: A7 SEP R0 ;1CCA: D0 DB 0EEH ;1CCB: EE LBR J1CD3 ;1CCC: C0 1C D3 DB 0C4H ;1CCF: C4 LBR J1D61 ;1CD0: C0 1D 61 J1CD3 STR RA ;1CD3: 5A GLO R9 ;1CD4: 89 SHR ;1CD5: F6 LBNF J1CFF ;1CD6: CB 1C FF GHI R9 ;1CD9: 99 BZ R1CE1 ;1CDA: 32 E1 GHI R0 ;1CDC: 90 PHI R9 ;1CDD: B9 R1CDE INC RD ;1CDE: 1D BR J1CBD ;1CDF: 30 BD R1CE1 GLO R9 ;1CE1: 89 ANI 02H ;1CE2: FA 02 BNZ R1CED ;1CE4: 3A ED GLO R9 ;1CE6: 89 ANI 0FEH ;1CE7: FA FE PLO R9 ;1CE9: A9 LBR J1CFF ;1CEA: C0 1C FF R1CED LDN RA ;1CED: 0A BZ R1CDE ;1CEE: 32 DE SMI 06H ;1CF0: FF 06 BDF R1CDE ;1CF2: 33 DE LDN RA ;1CF4: 0A INC RD ;1CF5: 1D STR RD ;1CF6: 5D DEC RD ;1CF7: 2D GLO R9 ;1CF8: 89 ANI 0FEH ;1CF9: FA FE PLO R9 ;1CFB: A9 LBR J1CC5 ;1CFC: C0 1C C5 J1CFF GLO R9 ;1CFF: 89 SHL ;1D00: FE LBNF J1D1F ;1D01: CB 1D 1F SHL ;1D04: FE GLO R9 ;1D05: 89 ORI 20H ;1D06: F9 20 LBDF J1D1C ;1D08: C3 1D 1C ANI 0DFH ;1D0B: FA DF PLO R9 ;1D0D: A9 LDN RA ;1D0E: 0A XRI 10H ;1D0F: FB 10 LBNZ J1D1B ;1D11: CA 1D 1B GLO R9 ;1D14: 89 ORI 40H ;1D15: F9 40 PLO R9 ;1D17: A9 LBR J1CC5 ;1D18: C0 1C C5 J1D1B GLO R9 ;1D1B: 89 J1D1C ANI 0BFH ;1D1C: FA BF PLO R9 ;1D1E: A9 J1D1F SEX RA ;1D1F: EA LDN R2 ;1D20: 02 XOR ;1D21: F3 STR R2 ;1D22: 52 GLO R9 ;1D23: 89 ANI 02H ;1D24: FA 02 LBZ J1D4B ;1D26: C2 1D 4B GLO R9 ;1D29: 89 ANI 10H ;1D2A: FA 10 LBNZ J1D91 ;1D2C: CA 1D 91 LDN RA ;1D2F: 0A SMI 03H ;1D30: FF 03 LBZ J1D3A ;1D32: C2 1D 3A SMI 14H ;1D35: FF 14 LBNZ J1D4B ;1D37: CA 1D 4B J1D3A GLO R9 ;1D3A: 89 SHL ;1D3B: FE LBNF J1D44 ;1D3C: CB 1D 44 SHL ;1D3F: FE SHL ;1D40: FE LBNF J1D4B ;1D41: CB 1D 4B J1D44 GLO R9 ;1D44: 89 ORI 10H ;1D45: F9 10 PLO R9 ;1D47: A9 LBR J1D58 ;1D48: C0 1D 58 J1D4B GHI R8 ;1D4B: 98 SHL ;1D4C: FE LBNF J1D58 ;1D4D: CB 1D 58 GHI R9 ;1D50: 99 LSNZ ;1D51: C6 LDI 02H ;1D52: F8 02 PHI R9 ;1D54: B9 LBR J1CC5 ;1D55: C0 1C C5 J1D58 INC RA ;1D58: 1A GLO RA ;1D59: 8A LSNZ ;1D5A: C6 SEP R0 ;1D5B: D0 DB 0F7H ;1D5C: F7 DEC R8 ;1D5D: 28 LBR J1CC5 ;1D5E: C0 1C C5 J1D61 GHI R9 ;1D61: 99 LBNZ J1D96 ;1D62: CA 1D 96 GLO R9 ;1D65: 89 SHR ;1D66: F6 LBNF J1D70 ;1D67: CB 1D 70 LDI 05H ;1D6A: F8 05 PHI R9 ;1D6C: B9 LBR J1D96 ;1D6D: C0 1D 96 J1D70 SHR ;1D70: F6 LBNF J1D7F ;1D71: CB 1D 7F ANI 04H ;1D74: FA 04 LBNZ J1D7F ;1D76: CA 1D 7F J1D79 LDI 06H ;1D79: F8 06 PHI R9 ;1D7B: B9 LBR J1D96 ;1D7C: C0 1D 96 J1D7F GLO R9 ;1D7F: 89 SHL ;1D80: FE SHL ;1D81: FE LBDF J1D8D ;1D82: C3 1D 8D ANI 08H ;1D85: FA 08 LBNZ J1D79 ;1D87: CA 1D 79 LBR J1D96 ;1D8A: C0 1D 96 J1D8D SEX RA ;1D8D: EA LDN R2 ;1D8E: 02 XOR ;1D8F: F3 STR R2 ;1D90: 52 J1D91 INC RA ;1D91: 1A GLO RA ;1D92: 8A LSNZ ;1D93: C6 SEP R0 ;1D94: D0 DB 0F7H ;1D95: F7 J1D96 SEX RD ;1D96: ED GLO R9 ;1D97: 89 ANI 02H ;1D98: FA 02 LSZ ;1D9A: CE GHI R0 ;1D9B: 90 STXD ;1D9C: 73 GHI R9 ;1D9D: 99 STXD ;1D9E: 73 LDA R2 ;1D9F: 42 STR RD ;1DA0: 5D J1DA1 GHI R6 ;1DA1: 96 PHI R9 ;1DA2: B9 LDI 62H ;1DA3: F8 62 PLO R6 ;1DA5: A6 LDI 4EH ;1DA6: F8 4E PLO R9 ;1DA8: A9 SEX R6 ;1DA9: E6 GLO RA ;1DAA: 8A STXD ;1DAB: 73 GHI RA ;1DAC: 9A STXD ;1DAD: 73 SHL ;1DAE: FE BDF R1DB8 ;1DAF: 33 B8 SHL ;1DB1: FE BNF R1DB8 ;1DB2: 3B B8 SHL ;1DB4: FE BDF R1DB8 ;1DB5: 33 B8 INC R9 ;1DB7: 19 R1DB8 LDN R9 ;1DB8: 09 STR R6 ;1DB9: 56 GHI R6 ;1DBA: 96 PHI RA ;1DBB: BA GLO R6 ;1DBC: 86 PLO RA ;1DBD: AA SEP R0 ;1DBE: D0 DB 0E8H ;1DBF: E8 J1DC0 SEX R2 ;1DC0: E2 LDXA ;1DC1: 72 PLO RC ;1DC2: AC LDXA ;1DC3: 72 PHI RC ;1DC4: BC LBR J1619 ;1DC5: C0 16 19 INP 4 ;1DC8: 6C GHI RE ;1DC9: 9E LBR J1C7C ;1DCA: C0 1C 7C J1DCD LDI 25H ;1DCD: F8 25 PLO R6 ;1DCF: A6 LDA R6 ;1DD0: 46 PHI R5 ;1DD1: B5 LDA R6 ;1DD2: 46 PHI RC ;1DD3: BC LDA R6 ;1DD4: 46 PLO RC ;1DD5: AC INC RD ;1DD6: 1D LDN RD ;1DD7: 0D STR R2 ;1DD8: 52 LDI 04H ;1DD9: F8 04 PLO R6 ;1DDB: A6 LDI 68H ;1DDC: F8 68 PHI R4 ;1DDE: B4 LBR J1E5E ;1DDF: C0 1E 5E J1DE2 LDN RA ;1DE2: 0A STR RD ;1DE3: 5D STR R6 ;1DE4: 56 GLO R9 ;1DE5: 89 SHL ;1DE6: FE LBDF J1E1A ;1DE7: C3 1E 1A SHL ;1DEA: FE SHLC ;1DEB: 7E LBNF J1E24 ;1DEC: CB 1E 24 SHRC ;1DEF: 76 LBDF J1E08 ;1DF0: C3 1E 08 LDN R6 ;1DF3: 06 SHR ;1DF4: F6 SHR ;1DF5: F6 SHR ;1DF6: F6 SHR ;1DF7: F6 SMI 0AH ;1DF8: FF 0A LSNF ;1DFA: C7 ADI 07H ;1DFB: FC 07 ADI 3AH ;1DFD: FC 3A STR R6 ;1DFF: 56 STR RD ;1E00: 5D GLO R9 ;1E01: 89 ORI 40H ;1E02: F9 40 PLO R9 ;1E04: A9 LBR J1E2D ;1E05: C0 1E 2D J1E08 SHR ;1E08: F6 SHR ;1E09: F6 PLO R9 ;1E0A: A9 LDN R6 ;1E0B: 06 ANI 0FH ;1E0C: FA 0F SMI 0AH ;1E0E: FF 0A LSNF ;1E10: C7 ADI 07H ;1E11: FC 07 ADI 3AH ;1E13: FC 3A STR R6 ;1E15: 56 STR RD ;1E16: 5D LBR J1E24 ;1E17: C0 1E 24 J1E1A LDN RD ;1E1A: 0D XRI 10H ;1E1B: FB 10 LBNZ J1E24 ;1E1D: CA 1E 24 GLO R9 ;1E20: 89 ORI 40H ;1E21: F9 40 PLO R9 ;1E23: A9 J1E24 INC RA ;1E24: 1A S1E25 GLO RA ;1E25: 8A BNZ J1E2D ;1E26: 3A 2D SEP R0 ;1E28: D0 DB 0F7H ;1E29: F7 LDI 04H ;1E2A: F8 04 PLO R6 ;1E2C: A6 J1E2D SEX RD ;1E2D: ED LDN R2 ;1E2E: 02 XOR ;1E2F: F3 STR R2 ;1E30: 52 LDN R6 ;1E31: 06 SHL ;1E32: FE LBDF J1E3C ;1E33: C3 1E 3C LDN R6 ;1E36: 06 ORI 80H ;1E37: F9 80 PLO R4 ;1E39: A4 LDN R4 ;1E3A: 04 STR R6 ;1E3B: 56 J1E3C LDI 60H ;1E3C: F8 60 PLO R7 ;1E3E: A7 LDI 04H ;1E3F: F8 04 PLO R6 ;1E41: A6 SEP R0 ;1E42: D0 DB 0F1H ;1E43: F1 LBR J1E4B ;1E44: C0 1E 4B DB 0C4H ;1E47: C4 LBR J1E77 ;1E48: C0 1E 77 J1E4B GLO R9 ;1E4B: 89 SHL ;1E4C: FE LBNF J1E5E ;1E4D: CB 1E 5E SHLC ;1E50: 7E LBNF J1E5E ;1E51: CB 1E 5E SHR ;1E54: F6 SHRC ;1E55: 76 PLO R9 ;1E56: A9 LDN RD ;1E57: 0D STR R6 ;1E58: 56 NOP ;1E59: C4 NOP ;1E5A: C4 LBR J1E3C ;1E5B: C0 1E 3C J1E5E DEC R8 ;1E5E: 28 DEC RC ;1E5F: 2C GHI R8 ;1E60: 98 SHL ;1E61: FE LBNF J1DE2 ;1E62: CB 1D E2 GHI RC ;1E65: 9C SHL ;1E66: FE LBDF J1E77 ;1E67: C3 1E 77 GLO R9 ;1E6A: 89 ANI 10H ;1E6B: FA 10 LBZ J1E77 ;1E6D: C2 1E 77 GHI R5 ;1E70: 95 STR RD ;1E71: 5D STR R6 ;1E72: 56 INC R8 ;1E73: 18 LBR J1E2D ;1E74: C0 1E 2D J1E77 LDA R2 ;1E77: 42 STR RD ;1E78: 5D DEC RD ;1E79: 2D GHI R0 ;1E7A: 90 STR RD ;1E7B: 5D DEC RD ;1E7C: 2D GHI R9 ;1E7D: 99 STR RD ;1E7E: 5D DEC RD ;1E7F: 2D GHI R0 ;1E80: 90 STR RD ;1E81: 5D LBR J1DA1 ;1E82: C0 1D A1 DB 0FFH ;1E85: FF DB 8AH ;1E86: 8A LDI 02H ;1E87: F8 02 PLO RE ;1E89: AE LBR J1C86 ;1E8A: C0 1C 86 J1E8D LDI 04H ;1E8D: F8 04 PLO R6 ;1E8F: A6 GHI RE ;1E90: 9E PLO R8 ;1E91: A8 LDN RD ;1E92: 0D LSNZ ;1E93: C6 DEC R8 ;1E94: 28 INC RD ;1E95: 1D J1E96 LDA RD ;1E96: 4D STR R6 ;1E97: 56 SEP R0 ;1E98: D0 DB 0F1H ;1E99: F1 LBR J1EA5 ;1E9A: C0 1E A5 DB 0C4H ;1E9D: C4 DB 88H ;1E9E: 88 LSZ ;1E9F: CE INC RD ;1EA0: 1D NOP ;1EA1: C4 LBR J1EAA ;1EA2: C0 1E AA J1EA5 GLO R8 ;1EA5: 88 DEC R8 ;1EA6: 28 LBNZ J1E96 ;1EA7: CA 1E 96 J1EAA DEC RD ;1EAA: 2D GHI R9 ;1EAB: 99 STR RD ;1EAC: 5D DEC RD ;1EAD: 2D GHI R0 ;1EAE: 90 STR RD ;1EAF: 5D INC R2 ;1EB0: 12 LBR J1DC0 ;1EB1: C0 1D C0 DB 57H, 60H, 07H, 40H ;1EB4: 740 LDAND 6007, 40 DB 13H ;1EB8: ISZ TOS DB 08H, 4BH ;1EB9: JZ 1F05 DB 0E2H, 19H ;1EBB: SYS 19C4 DB 08H, 47H ;1EBD: JZ 1F05 DB 22H, 60H, 80H ;1EBF: 0 PUSH 6080 DB 22H, 61H, 0E0H ;1EC2: 0 PUSH 61E0 DB 23H, 20H ;1EC5: PUSH 20 DB 1AH ;1EC7: MCPY [NOS], [3OS] DB 23H, 20H ;1EC8: PUSH 20 DB 22H, 60H, 80H ;1ECA: 0 PUSH 6080 DB 23H, 20H ;1ECD: PUSH 20 DB 46H ;1ECF: FILL DB 22H, 1FH, 08H ;1ED0: 8 PUSH 1F08 DB 22H, 60H, 80H ;1ED3: 0 PUSH 6080 DB 23H, 0BH ;1ED6: PUSH 0B DB 1AH ;1ED8: MCPY [NOS], [3OS] DB 0A4H, 18H ;1ED9: SYS 1848 DB 22H, 61H, 0E0H ;1EDB: 0 PUSH 61E0 DB 22H, 60H, 80H ;1EDE: 0 PUSH 6080 DB 23H, 20H ;1EE1: PUSH 20 DB 1AH ;1EE3: MCPY [NOS], [3OS] DB 23H, 02H ;1EE4: PUSH 02 DB 41H, 09H ;1EE6: LD [6009], TOS.0 DB 23H, 05H ;1EE8: PUSH 05 DB 23H, 00H ;1EEA: PUSH 00 DB 0EH ;1EEC: LOOP FRAME DB 0EEH, 17H ;1EED: SYS 17DC DB 45H ;1EEF: DELAY DB 0FCH, 17H ;1EF0: SYS 17F8 DB 45H ;1EF2: DELAY DB 45H ;1EF3: DELAY DB 45H ;1EF4: DELAY DB 0CH, 0F7H ;1EF5: LOOP 1EED DB 40H, 07H ;1EF7: LD TOS.0, [6007] DB 23H, 40H ;1EF9: PUSH 40 DB 00H ;1EFB: ADD TOS, NOS DB 41H, 07H ;1EFC: LD [6007], TOS.0 DB 23H, 0AAH ;1EFE: PUSH AA DB 41H, 09H ;1F00: LD [6009], TOS.0 DB 45H ;1F02: DELAY DB 0A4H, 18H ;1F03: SYS 1848 DB 8AH, 1FH ;1F05: SYS 1F14 DB 11H ;1F07: RET ; ; ====================================================================== ; DATA AREA: STRING: LOW BATTERY ; Range: 0x1F08-0x1F13 ; ---------------------------------------------------------------------- ; ASCII text string: "LOW BATTERY" (11 bytes) + 0xFF terminator. ; Displayed when battery voltage drops below threshold. ; Referenced by the low-battery display routine. ; Bytes: 4C 4F 57 20 42 41 54 54 45 52 59 FF ; ====================================================================== DB 'LOW BATTERY' ;1F08: 4C ;1F09: 4F ;1F0A: 57 ;1F0B: 20 ;1F0C: 42 ;1F0D: 41 ;1F0E: 54 ;1F0F: 54 ;1F10: 45 ;1F11: 52 ;1F12: 59 DB 0FFH ;1F13: FF DB 8AH ;1F14: 8A S1F15 LDI 04H ;1F15: F8 04 PLO R5 ;1F17: A5 SEP RF ;1F18: DF DB 0FFH ;1F19: FF DB 0FFH ;1F1A: FF DB 0FFH ;1F1B: FF DB 0FFH ;1F1C: FF DB 0FFH ;1F1D: FF DB 0FFH ;1F1E: FF DB 0FFH ;1F1F: FF DB 0FFH ;1F20: FF DB 0FFH ;1F21: FF DB 0FFH ;1F22: FF DB 0FFH ;1F23: FF DB 0FFH ;1F24: FF DB 0FFH ;1F25: FF DB 0FFH ;1F26: FF DB 0FFH ;1F27: FF DB 0FFH ;1F28: FF DB 0FFH ;1F29: FF DB 0FFH ;1F2A: FF DB 0FFH ;1F2B: FF DB 0FFH ;1F2C: FF DB 0FFH ;1F2D: FF DB 0FFH ;1F2E: FF DB 0FFH ;1F2F: FF DB 0FFH ;1F30: FF DB 0FFH ;1F31: FF DB 0FFH ;1F32: FF DB 0FFH ;1F33: FF DB 0FFH ;1F34: FF DB 0FFH ;1F35: FF DB 0FFH ;1F36: FF DB 0FFH ;1F37: FF DB 0FFH ;1F38: FF DB 0FFH ;1F39: FF DB 0FFH ;1F3A: FF DB 0FFH ;1F3B: FF DB 0FFH ;1F3C: FF DB 0FFH ;1F3D: FF DB 0FFH ;1F3E: FF DB 0FFH ;1F3F: FF DB 0FFH ;1F40: FF DB 0FFH ;1F41: FF DB 0FFH ;1F42: FF DB 0FFH ;1F43: FF DB 0FFH ;1F44: FF DB 0FFH ;1F45: FF DB 0FFH ;1F46: FF DB 0FFH ;1F47: FF DB 0FFH ;1F48: FF DB 0FFH ;1F49: FF DB 0FFH ;1F4A: FF DB 0FFH ;1F4B: FF DB 0FFH ;1F4C: FF DB 0FFH ;1F4D: FF DB 0FFH ;1F4E: FF DB 0FFH ;1F4F: FF DB 0FFH ;1F50: FF DB 0FFH ;1F51: FF DB 0FFH ;1F52: FF DB 0FFH ;1F53: FF DB 0FFH ;1F54: FF DB 0FFH ;1F55: FF DB 0FFH ;1F56: FF DB 0FFH ;1F57: FF DB 0FFH ;1F58: FF DB 0FFH ;1F59: FF DB 0FFH ;1F5A: FF DB 0FFH ;1F5B: FF DB 0FFH ;1F5C: FF DB 0FFH ;1F5D: FF DB 0FFH ;1F5E: FF DB 0FFH ;1F5F: FF DB 0FFH ;1F60: FF DB 0FFH ;1F61: FF DB 0FFH ;1F62: FF DB 0FFH ;1F63: FF DB 0FFH ;1F64: FF DB 0FFH ;1F65: FF DB 0FFH ;1F66: FF DB 0FFH ;1F67: FF DB 0FFH ;1F68: FF DB 0FFH ;1F69: FF DB 0FFH ;1F6A: FF DB 0FFH ;1F6B: FF DB 0FFH ;1F6C: FF DB 0FFH ;1F6D: FF DB 0FFH ;1F6E: FF DB 0FFH ;1F6F: FF DB 0FFH ;1F70: FF DB 0FFH ;1F71: FF DB 0FFH ;1F72: FF DB 0FFH ;1F73: FF DB 0FFH ;1F74: FF DB 0FFH ;1F75: FF DB 0FFH ;1F76: FF DB 0FFH ;1F77: FF DB 0FFH ;1F78: FF DB 0FFH ;1F79: FF DB 0FFH ;1F7A: FF DB 0FFH ;1F7B: FF DB 0FFH ;1F7C: FF DB 0FFH ;1F7D: FF DB 0FFH ;1F7E: FF DB 0FFH ;1F7F: FF DB 0FFH ;1F80: FF DB 0FFH ;1F81: FF DB 0FFH ;1F82: FF DB 0FFH ;1F83: FF DB 0FFH ;1F84: FF DB 0FFH ;1F85: FF DB 0FFH ;1F86: FF DB 0FFH ;1F87: FF DB 0FFH ;1F88: FF DB 0FFH ;1F89: FF DB 0FFH ;1F8A: FF DB 0FFH ;1F8B: FF DB 0FFH ;1F8C: FF DB 0FFH ;1F8D: FF DB 0FFH ;1F8E: FF DB 0FFH ;1F8F: FF DB 0FFH ;1F90: FF DB 0FFH ;1F91: FF DB 0FFH ;1F92: FF DB 0FFH ;1F93: FF DB 0FFH ;1F94: FF DB 0FFH ;1F95: FF DB 0FFH ;1F96: FF DB 0FFH ;1F97: FF DB 0FFH ;1F98: FF DB 0FFH ;1F99: FF DB 0FFH ;1F9A: FF DB 0FFH ;1F9B: FF DB 0FFH ;1F9C: FF DB 0FFH ;1F9D: FF DB 0FFH ;1F9E: FF DB 0FFH ;1F9F: FF DB 0FFH ;1FA0: FF DB 0FFH ;1FA1: FF DB 0FFH ;1FA2: FF DB 0FFH ;1FA3: FF DB 0FFH ;1FA4: FF DB 0FFH ;1FA5: FF DB 0FFH ;1FA6: FF DB 0FFH ;1FA7: FF DB 0FFH ;1FA8: FF DB 0FFH ;1FA9: FF DB 0FFH ;1FAA: FF DB 0FFH ;1FAB: FF DB 0FFH ;1FAC: FF DB 0FFH ;1FAD: FF DB 0FFH ;1FAE: FF DB 0FFH ;1FAF: FF DB 0FFH ;1FB0: FF DB 0FFH ;1FB1: FF DB 0FFH ;1FB2: FF DB 0FFH ;1FB3: FF DB 0FFH ;1FB4: FF DB 0FFH ;1FB5: FF DB 0FFH ;1FB6: FF DB 0FFH ;1FB7: FF DB 0FFH ;1FB8: FF DB 0FFH ;1FB9: FF DB 0FFH ;1FBA: FF DB 0FFH ;1FBB: FF DB 0FFH ;1FBC: FF DB 0FFH ;1FBD: FF DB 0FFH ;1FBE: FF DB 0FFH ;1FBF: FF DB 0FFH ;1FC0: FF DB 0FFH ;1FC1: FF DB 0FFH ;1FC2: FF DB 0FFH ;1FC3: FF DB 0FFH ;1FC4: FF DB 0FFH ;1FC5: FF DB 0FFH ;1FC6: FF DB 0FFH ;1FC7: FF DB 0FFH ;1FC8: FF DB 0FFH ;1FC9: FF DB 0FFH ;1FCA: FF DB 0FFH ;1FCB: FF DB 0FFH ;1FCC: FF DB 0FFH ;1FCD: FF DB 0FFH ;1FCE: FF DB 0FFH ;1FCF: FF DB 0FFH ;1FD0: FF DB 0FFH ;1FD1: FF DB 0FFH ;1FD2: FF DB 0FFH ;1FD3: FF DB 0FFH ;1FD4: FF DB 0FFH ;1FD5: FF DB 0FFH ;1FD6: FF DB 0FFH ;1FD7: FF DB 0FFH ;1FD8: FF DB 0FFH ;1FD9: FF DB 0FFH ;1FDA: FF DB 0FFH ;1FDB: FF DB 0FFH ;1FDC: FF DB 0FFH ;1FDD: FF DB 0FFH ;1FDE: FF DB 0FFH ;1FDF: FF DB 0FFH ;1FE0: FF DB 0FFH ;1FE1: FF DB 0FFH ;1FE2: FF DB 0FFH ;1FE3: FF DB 0FFH ;1FE4: FF DB 0FFH ;1FE5: FF DB 0FFH ;1FE6: FF DB 0FFH ;1FE7: FF DB 0FFH ;1FE8: FF DB 0FFH ;1FE9: FF DB 0FFH ;1FEA: FF DB 0FFH ;1FEB: FF DB 0FFH ;1FEC: FF DB 0FFH ;1FED: FF DB 0FFH ;1FEE: FF DB 0FFH ;1FEF: FF DB 0FFH ;1FF0: FF DB 0FFH ;1FF1: FF DB 0FFH ;1FF2: FF DB 0FFH ;1FF3: FF DB 0FFH ;1FF4: FF DB 0FFH ;1FF5: FF DB 0FFH ;1FF6: FF DB 0FFH ;1FF7: FF DB 0FFH ;1FF8: FF DB 0FFH ;1FF9: FF DB 0FFH ;1FFA: FF DB 0FFH ;1FFB: FF DB 0FFH ;1FFC: FF DB 0FFH ;1FFD: FF DB 0FFH ;1FFE: FF DB 0FFH ;1FFF: FF ; ; ====================================================================== ; DATA AREA: RECORD INTERPRETER DISPATCH TABLE ; Range: 0x2000-0x20FF ; ---------------------------------------------------------------------- ; 128 two-byte handler addresses for the record interpreter (SYS 124E). ; Maps record byte values (with bit 7 set) to sub-handler addresses. ; The record byte is SHL'd (drops bit 7), result x2 = table index. ; ; Entry convention: target address points to handler body; ; entry byte at target-1 determines dispatch (0x8B=native, 0x15=CALL). ; Many entries point to 0x2589 (default/no-op handler). ; ; Used by the third-level interpretation layer that processes ; structured data records from the banked app ROM. ; ====================================================================== DW S100B ;2000: 10 0B DW S0FF1 ;2002: 0F F1 DW S1039 ;2004: 10 39 DW S14CB ;2006: 14 CB DW S0F45 ;2008: 0F 45 DW S0FBD ;200A: 0F BD DW S2BFD ;200C: 2B FD DW S38B9 ;200E: 38 B9 DW S14E7 ;2010: 14 E7 DW S2589 ;2012: 25 89 DW S11A1 ;2014: 11 A1 DW S3935 ;2016: 39 35 DW S393F ;2018: 39 3F DW S248F ;201A: 24 8F DW S2575 ;201C: 25 75 DW S3D91 ;201E: 3D 91 DW S237F ;2020: 23 7F DW S286D ;2022: 28 6D DW S2865 ;2024: 28 65 DW S1465 ;2026: 14 65 DW S145D ;2028: 14 5D DW S2889 ;202A: 28 89 DW S1181 ;202C: 11 81 DW S2883 ;202E: 28 83 DW S2875 ;2030: 28 75 DW S2369 ;2032: 23 69 DW S287B ;2034: 28 7B DW S285D ;2036: 28 5D DW S146D ;2038: 14 6D DW S288F ;203A: 28 8F DW S1453 ;203C: 14 53 DW S399D ;203E: 39 9D DW S3D83 ;2040: 3D 83 DW S3D4D ;2042: 3D 4D DW S3D0B ;2044: 3D 0B DW S384B ;2046: 38 4B DW S23E5 ;2048: 23 E5 DW S2427 ;204A: 24 27 DW S3857 ;204C: 38 57 DW S249F ;204E: 24 9F DW S3D75 ;2050: 3D 75 DW S3863 ;2052: 38 63 DW S3875 ;2054: 38 75 DW S3845 ;2056: 38 45 DW S2E23 ;2058: 2E 23 DW S2589 ;205A: 25 89 DW S2EA5 ;205C: 2E A5 DW S2EED ;205E: 2E ED DW S2FFF ;2060: 2F FF DW S2589 ;2062: 25 89 DW S2CFB ;2064: 2C FB DW S2589 ;2066: 25 89 DW S2589 ;2068: 25 89 DW S2E3D ;206A: 2E 3D DW S2E85 ;206C: 2E 85 DW S2E99 ;206E: 2E 99 DW S2589 ;2070: 25 89 DW S2589 ;2072: 25 89 DW S2589 ;2074: 25 89 DW S2589 ;2076: 25 89 DW S2589 ;2078: 25 89 DW S2589 ;207A: 25 89 DW S2589 ;207C: 25 89 DW S2BF7 ;207E: 2B F7 DW S2B89 ;2080: 2B 89 DW S2AAF ;2082: 2A AF DW S2589 ;2084: 25 89 DW S2B4B ;2086: 2B 4B DW S2BD3 ;2088: 2B D3 DW S2C21 ;208A: 2C 21 DW S2C39 ;208C: 2C 39 DW S2C61 ;208E: 2C 61 DW S2725 ;2090: 27 25 DW S271B ;2092: 27 1B DW S2737 ;2094: 27 37 DW S272D ;2096: 27 2D DW S274D ;2098: 27 4D DW S2753 ;209A: 27 53 DW S273F ;209C: 27 3F DW S2745 ;209E: 27 45 DW S275B ;20A0: 27 5B DW S2761 ;20A2: 27 61 DW S10E3 ;20A4: 10 E3 DW S261F ;20A6: 26 1F DW S2589 ;20A8: 25 89 DW S3987 ;20AA: 39 87 DW S3D03 ;20AC: 3D 03 DW S383D ;20AE: 38 3D DW S3A23 ;20B0: 3A 23 DW S2589 ;20B2: 25 89 DW S2589 ;20B4: 25 89 DW S2589 ;20B6: 25 89 DW S2589 ;20B8: 25 89 DW S2589 ;20BA: 25 89 DW S2589 ;20BC: 25 89 DW S2589 ;20BE: 25 89 DW S2431 ;20C0: 24 31 DW S2589 ;20C2: 25 89 DW S1A31 ;20C4: 1A 31 DW S19E1 ;20C6: 19 E1 DW S2439 ;20C8: 24 39 DW S0BE4 ;20CA: 0B E4 DW S258F ;20CC: 25 8F DW S38C3 ;20CE: 38 C3 DW S3A3F ;20D0: 3A 3F DW S3A47 ;20D2: 3A 47 DW S3AA9 ;20D4: 3A A9 DW S3A59 ;20D6: 3A 59 DW S3A8F ;20D8: 3A 8F DW S3AA9 ;20DA: 3A A9 DW S3AB9 ;20DC: 3A B9 DW S245B ;20DE: 24 5B DW S3A2B ;20E0: 3A 2B DW S3ADF ;20E2: 3A DF DW S33F9 ;20E4: 33 F9 DW S3419 ;20E6: 34 19 DW S3AEB ;20E8: 3A EB DW S3759 ;20EA: 37 59 DW S34CB ;20EC: 34 CB DW S36D1 ;20EE: 36 D1 DW S350B ;20F0: 35 0B DW S3707 ;20F2: 37 07 DW S35F3 ;20F4: 35 F3 DW S35B3 ;20F6: 35 B3 DW S377F ;20F8: 37 7F DW S356D ;20FA: 35 6D DW S34FF ;20FC: 34 FF DW S2589 ;20FE: 25 89 ; ; ====================================================================== ; DATA AREA: BOOT ENTRY POINT & CONSTANT-PUSH SYS HANDLERS ; Range: 0x2100-0x214A ; ---------------------------------------------------------------------- ; Bytecode interpreter boot entry point. RC is set here during init: ; Cold boot (M(601A) != AA): RC=0x2100 -> SYS 0x3E22 (full init) ; Warm boot (M(601A) == AA): RC=0x2102 -> SYS 0x3E58 (resume) ; ; 2100-2103: Boot entry bytecodes ; 2100: 91 3E SYS 0x3E22 (cold boot CALL - full system init) ; 2102: AC 3E SYS 0x3E58 (warm boot CALL - enters main loop, never returns) ; ; 2104-212D: Constant-push SYS handler stubs (entry 0x20) ; Format: 20 HH LL FF (entry=0x20 reads 2 bytes, pushes 16-bit constant) ; Each pushes a RAM address for 24-bit BCD inventory accumulators: ; SYS 2104 -> push 0x6290 (inventory accumulator 1) ; SYS 2108 -> push 0x6293 (inventory accumulator 2) ; SYS 210C -> push 0x6296 (inventory accumulator 3) ; SYS 2110 -> push 0x62A1 (inventory accumulator 4) ; SYS 2114 -> push 0x62A4 (inventory accumulator 5) ; SYS 2118 -> push 0x62AA (inventory accumulator 6) ; SYS 211C -> push 0x62AD (inventory accumulator 7) ; SYS 2120 -> push 0x62BC (inventory accumulator 8) ; SYS 2124 -> push 0x62BF (inventory accumulator 9) ; SYS 2128 -> push 0x62C2 (inventory accumulator 10) ; Addresses go in 3-byte increments: 24-bit packed BCD values. ; ; 212E-2141: Fixed constant push handlers (referenced by opcodes 0x72-0x76) ; S212E: push 0x0000 (opcode 0x72) ; S2132: push 0x0001 (opcode 0x73) ; S2136: push 0x0002 (opcode 0x74) ; S213A: push 0x0003 (opcode 0x75) ; S213E: push 0xFFFF (opcode 0x76) ; ; 2142-214A: Additional handlers ; SYS 2142: push 0xA5A5 (app ROM header validation constant) ; ; NOTE: This region is NOT part of the record interpreter table at ; 0x2000-0x20FF. That table's max index is 0x20FE (byte 0x7F x 2). ; ====================================================================== DB 91H ;2100: 91 DB 3EH ;2101: 3E DB 0ACH ;2102: AC DB 3EH ;2103: 3E DB 20H ;2104: 20 DB 62H ;2105: 62 DB 90H ;2106: 90 DB 0FFH ;2107: FF DB 20H ;2108: 20 DB 62H ;2109: 62 DB 93H ;210A: 93 DB 0FFH ;210B: FF DB 20H ;210C: 20 DB 62H ;210D: 62 DB 96H ;210E: 96 DB 0FFH ;210F: FF DB 20H ;2110: 20 DB 62H ;2111: 62 DB 0A1H ;2112: A1 DB 0FFH ;2113: FF DB 20H ;2114: 20 DB 62H ;2115: 62 DB 0A4H ;2116: A4 DB 0FFH ;2117: FF DB 20H ;2118: 20 DB 62H ;2119: 62 DB 0AAH ;211A: AA DB 0FFH ;211B: FF DB 20H ;211C: 20 DB 62H ;211D: 62 DB 0ADH ;211E: AD DB 0FFH ;211F: FF DB 20H ;2120: 20 DB 62H ;2121: 62 DB 0BCH ;2122: BC DB 0FFH ;2123: FF DB 20H ;2124: 20 DB 62H ;2125: 62 DB 0BFH ;2126: BF DB 0FFH ;2127: FF DB 20H ;2128: 20 DB 62H ;2129: 62 DB 0C2H ;212A: C2 DB 00H ;212B: 00 DB 00H ;212C: 00 DB 0FFH ;212D: FF S212E ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH 0000 ; ---------------------------------------------------------------------- ; Opcode: 0x72 ; Handler: 0x212E ; Dispatch: 20 ; Definition: Push 16-bit constant 0x0000 onto data stack ; ; Implementation: ; Entry 0x20 reads 2-byte constant (high=0x00, low=0x00) from handler ; body via LDA RB, pushes to data stack. No target address — the handler ; body IS the constant data (00 00) followed by 0xFF separator. ; ====================================================================== DB 20H ;212E: 20 DB 00H ;212F: 00 DB 00H ;2130: 00 DB 0FFH ;2131: FF S2132 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH 0001 ; ---------------------------------------------------------------------- ; Opcode: 0x73 ; Handler: 0x2132 ; Dispatch: 20 ; Definition: Push 16-bit constant 0x0001 onto data stack ; ; Implementation: ; Entry 0x20 reads 2-byte constant (high=0x00, low=0x01) from handler ; body via LDA RB, pushes to data stack. No target address — the handler ; body IS the constant data (00 01) followed by 0xFF separator. ; ====================================================================== DB 20H ;2132: 20 DB 00H ;2133: 00 DB 01H ;2134: 01 DB 0FFH ;2135: FF S2136 ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH 0002 ; ---------------------------------------------------------------------- ; Opcode: 0x74 ; Handler: 0x2136 ; Dispatch: 20 ; Definition: Push 16-bit constant 0x0002 onto data stack ; ; Implementation: ; Entry 0x20 reads 2-byte constant (high=0x00, low=0x02) from handler ; body via LDA RB, pushes to data stack. No target address — the handler ; body IS the constant data (00 02) followed by 0xFF separator. ; ====================================================================== DB 20H ;2136: 20 DB 00H ;2137: 00 DB 02H ;2138: 02 DB 0FFH ;2139: FF S213A ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH 0003 ; ---------------------------------------------------------------------- ; Opcode: 0x75 ; Handler: 0x213A ; Dispatch: 20 ; Definition: Push 16-bit constant 0x0003 onto data stack ; ; Implementation: ; Entry 0x20 reads 2-byte constant (high=0x00, low=0x03) from handler ; body via LDA RB, pushes to data stack. No target address — the handler ; body IS the constant data (00 03) followed by 0xFF separator. ; ====================================================================== DB 20H ;213A: 20 DB 00H ;213B: 00 DB 03H ;213C: 03 DB 0FFH ;213D: FF S213E ; ; ====================================================================== ; PSEUDO INSTRUCTION: PUSH FFFF ; ---------------------------------------------------------------------- ; Opcode: 0x76 ; Handler: 0x213E ; Dispatch: 20 ; Definition: Push 16-bit constant 0xFFFF (-1) onto data stack ; ; Implementation: ; Entry 0x20 reads 2-byte constant (high=0xFF, low=0xFF) from handler ; body via LDA RB, pushes to data stack. No target address — the handler ; body IS the constant data (FF FF) followed by 0xFF separator. ; ====================================================================== DB 20H ;213E: 20 DB 0FFH ;213F: FF DB 0FFH ;2140: FF DB 0FFH ;2141: FF DB 20H ;2142: 20 DB 0A5H ;2143: A5 DB 0A5H ;2144: A5 DB 00H ;2145: 00 DB 00H ;2146: 00 DB 00H ;2147: 00 DB 01H ;2148: 01 DB 0FFH ;2149: FF DB 01H ;214A: 01 DB 'YZSYS-MODEYSYS-MODE';214B: 59 ;214C: 5A ;214D: 53 ;214E: 59 ;214F: 53 ;2150: 2D ;2151: 4D ;2152: 4F ;2153: 44 ;2154: 45 ;2155: 59 ;2156: 53 ;2157: 59 ;2158: 53 ;2159: 2D ;215A: 4D ;215B: 4F ;215C: 44 ;215D: 45 DB 15H ;215E: 15 DB 52H, 03H ;215F: PUSH VE, 03 DB 8EH, 21H ;2161: SYS 211C DB 31H ;2163: MCPY3 [TOS], [NOS] DB 8EH, 21H ;2164: SYS 211C DB 52H, 06H ;2166: PUSH VE, 06 DB 6EH ;2168: SUB24 [NOS], [TOS] DB 11H ;2169: RET DB 15H ;216A: 15 DB 76H ;216B: PUSH FFFF DB 22H, 60H, 5CH ;216C: C PUSH 605C DB 05H ;216F: ADD [TOS], NOS DB 11H ;2170: RET DB 0FFH ;2171: FF DB 15H ;2172: 15 DB 76H ;2173: PUSH FFFF DB 22H, 60H, 58H ;2174: 8 PUSH 6058 DB 05H ;2177: ADD [TOS], NOS DB 11H ;2178: RET DB 0FFH ;2179: FF DB 15H ;217A: 15 DB 26H ;217B: PUSHR DB 1DH ;217C: OVER DB 4DH ;217D: ISLT DB 20H ;217E: SWAP DB 25H ;217F: POPR DB 4DH ;2180: ISLT DB 33H ;2181: OR TOS, NOS DB 13H ;2182: ISZ TOS DB 11H ;2183: RET DB 80H ;2184: 80 DB 00H ;2185: 00 DB 00H ;2186: 00 DB 80H ;2187: 80 DB 00H ;2188: 00 DB 02H ;2189: 02 DB 90H ;218A: 90 DB 00H ;218B: 00 DB 00H ;218C: 00 DB 80H ;218D: 80 DB 00H ;218E: 00 DB 44H ;218F: 44 DB 15H ;2190: 15 DB 23H, 0FH ;2191: PUSH 0F DB 23H, 10H ;2193: PUSH 10 DB 72H ;2195: PUSH 0000 DB 0EH ;2196: LOOP FRAME DB 22H, 0A5H, 00H ;2197: 0 PUSH A500 DB 24H ;219A: PUSH CS DB 00H ;219B: ADD TOS, NOS DB 24H ;219C: PUSH CS DB 0A7H, 19H ;219D: SYS 194E DB 22H, 80H, 00H ;219F: 0 PUSH 8000 DB 16H ;21A2: LD [TOS], NOS DB 72H ;21A3: PUSH 0000 DB 24H ;21A4: PUSH CS DB 03H ;21A5: ADD TOS, 1 DB 72H ;21A6: PUSH 0000 DB 0EH ;21A7: LOOP FRAME DB 24H ;21A8: PUSH CS DB 0A7H, 19H ;21A9: SYS 194E DB 22H, 80H, 00H ;21AB: 0 PUSH 8000 DB 15H ;21AE: LD TOS, [TOS] DB 22H, 0A5H, 00H ;21AF: 0 PUSH A500 DB 24H ;21B2: PUSH CS DB 00H ;21B3: ADD TOS, NOS DB 4FH ;21B4: ISEQ DB 13H ;21B5: ISZ TOS DB 08H, 04H ;21B6: JZ 21BB DB 1CH ;21B8: DROP DB 73H ;21B9: PUSH 0001 DB 0FH ;21BA: LOOP CLR DB 0CH, 0ECH ;21BB: LOOP 21A8 DB 08H, 05H ;21BD: JZ 21C3 DB 1CH ;21BF: DROP DB 24H ;21C0: PUSH CS DB 27H ;21C1: SUB TOS, 1 DB 0FH ;21C2: LOOP CLR DB 0CH, 0D3H ;21C3: LOOP 2197 DB 11H ;21C5: RET DB 15H ;21C6: 15 DB 22H, 80H, 00H ;21C7: 0 PUSH 8000 DB 22H, 60H, 4BH ;21CA: B PUSH 604B DB 36H ;21CD: LD24 [TOS], NOS DB 0C8H, 21H ;21CE: SYS 2190 DB 03H ;21D0: ADD TOS, 1 DB 22H, 80H, 00H ;21D1: 0 PUSH 8000 DB 06H ;21D4: MUL TOS, NOS DB 1CH ;21D5: DROP DB 22H, 60H, 4BH ;21D6: B PUSH 604B DB 22H, 04H, 0F8H ;21D9: 8 PUSH 04F8 DB 40H, 45H ;21DC: LD TOS.0, [6045] DB 3EH, 46H ;21DE: LD TOS, [6046] DB 0DBH, 1AH ;21E0: SYS 1AB6 DB 86H, 1BH ;21E2: SYS 1B0C DB 22H, 60H, 48H ;21E4: 8 PUSH 6048 DB 9CH, 0FH ;21E7: SYS 0F38 DB 1CH ;21E9: DROP DB 1CH ;21EA: DROP DB 22H, 60H, 48H ;21EB: 8 PUSH 6048 DB 0AEH, 0AH ;21EE: SYS 0A5C DB 11H ;21F0: RET DB 0FFH ;21F1: FF DB 15H ;21F2: 15 DB 22H, 60H, 48H ;21F3: 8 PUSH 6048 DB 22H, 60H, 2DH ;21F6: D PUSH 602D DB 31H ;21F9: MCPY3 [TOS], [NOS] DB 22H, 60H, 2DH ;21FA: D PUSH 602D DB 22H, 60H, 4BH ;21FD: B PUSH 604B DB 6EH ;2200: SUB24 [NOS], [TOS] DB 11H ;2201: RET DB 15H ;2202: 15 DB 22H, 60H, 00H ;2203: 0 PUSH 6000 DB 22H, 60H, 4BH ;2206: B PUSH 604B DB 36H ;2209: LD24 [TOS], NOS DB 22H, 7FH, 0FFH ;220A: F PUSH 7FFF DB 22H, 60H, 48H ;220D: 8 PUSH 6048 DB 36H ;2210: LD24 [TOS], NOS DB 22H, 20H, 00H ;2211: 0 PUSH 2000 DB 22H, 60H, 2DH ;2214: D PUSH 602D DB 36H ;2217: LD24 [TOS], NOS DB 11H ;2218: RET DB 0FFH ;2219: FF DB 15H ;221A: 15 DB 72H ;221B: PUSH 0000 DB 41H, 65H ;221C: LD [6065], TOS.0 DB 72H ;221E: PUSH 0000 DB 41H, 64H ;221F: LD [6064], TOS.0 DB 72H ;2221: PUSH 0000 DB 41H, 63H ;2222: LD [6063], TOS.0 DB 72H ;2224: PUSH 0000 DB 41H, 0E3H ;2225: LD [60E3], TOS.0 DB 11H ;2227: RET DB 15H ;2228: 15 DB 8DH, 22H ;2229: SYS 221A DB 40H, 0E0H ;222B: LD TOS.0, [60E0] DB 3DH, 3FH, 0F2H ;222D: 2 LD [3FF2], TOS.0 DB 57H, 60H, 07H, 0BFH ;2230: 7BF LDAND 6007, BF DB 41H, 07H ;2234: LD [6007], TOS.0 DB 72H ;2236: PUSH 0000 DB 3DH, 3FH, 0A2H ;2237: 2 LD [3FA2], TOS.0 DB 22H, 40H, 00H ;223A: 0 PUSH 4000 DB 15H ;223D: LD TOS, [TOS] DB 0A1H, 21H ;223E: SYS 2142 DB 4FH ;2240: ISEQ DB 08H, 07H ;2241: JZ 2249 DB 40H, 4FH ;2243: LD TOS.0, [604F] DB 0ACH, 19H ;2245: SYS 1958 DB 0AH, 10H ;2247: JP 2258 DB 23H, 09H ;2249: PUSH 09 DB 3DH, 3FH, 0A1H ;224B: 1 LD [3FA1], TOS.0 DB 22H, 03H, 0E8H ;224E: 8 PUSH 03E8 DB 72H ;2251: PUSH 0000 DB 0EH ;2252: LOOP FRAME DB 7FH ;2253: NOOP DB 0CH, 0FEH ;2254: LOOP 2253 DB 0B2H, 19H ;2256: SYS 1964 DB 11H ;2258: RET DB 0FFH ;2259: FF DB 15H ;225A: 15 DB 22H, 68H, 00H ;225B: 0 PUSH 6800 DB 22H, 01H, 00H ;225E: 0 PUSH 0100 DB 72H ;2261: PUSH 0000 DB 0EH ;2262: LOOP FRAME S2263 DB 1EH ;2263: DUP DB 1EH ;2264: DUP DB 23H, 7FH ;2265: PUSH 7F DB 12H ;2267: AND TOS, NOS DB 20H ;2268: SWAP DB 19H ;2269: LD [TOS], NOS.0 DB 03H ;226A: ADD TOS, 1 DB 0CH, 0F7H ;226B: LOOP 2263 DB 1CH ;226D: DROP DB 11H ;226E: RET DB 0FFH ;226F: FF DB 15H ;2270: 15 DB 8DH, 22H ;2271: SYS 221A DB 72H ;2273: PUSH 0000 DB 41H, 0E0H ;2274: LD [60E0], TOS.0 DB 72H ;2276: PUSH 0000 DB 41H, 07H ;2277: LD [6007], TOS.0 DB 72H ;2279: PUSH 0000 DB 86H, 18H ;227A: SYS 180C DB 72H ;227C: PUSH 0000 DB 0C1H, 1BH ;227D: SYS 1B82 DB 0ADH, 22H ;227F: SYS 225A DB 11H ;2281: RET DB 15H ;2282: 15 DB 22H, 3FH, 0FH ;2283: F PUSH 3F0F DB 2EH ;2286: LD [TOS], 0 DB 73H ;2287: PUSH 0001 DB 22H, 60H, 0A2H ;2288: 2 PUSH 60A2 DB 23H, 08H ;228B: PUSH 08 DB 46H ;228D: FILL DB 0F0H, 19H ;228E: SYS 19E0 DB 11H ;2290: RET DB 0FFH ;2291: FF DB 15H ;2292: 15 DB 22H, 64H, 0A1H ;2293: 1 PUSH 64A1 DB 8EH, 13H ;2296: SYS 131C DB 22H, 64H, 0A0H ;2298: 0 PUSH 64A0 DB 3BH, 63H, 92H ;229B: 2 LD [6392], TOS DB 60H ;229E: LD TOS, VD DB 3DH, 64H, 0A0H ;229F: 0 LD [64A0], TOS.0 DB 11H ;22A2: RET DB 0FFH ;22A3: FF DB 15H ;22A4: 15 DB 52H, 00H ;22A5: PUSH VE, 00 DB 22H, 74H, 00H ;22A7: 0 PUSH 7400 DB 3AH, 62H, 0AEH ;22AA: E LD TOS, [62AE] DB 23H, 0FFH ;22AD: PUSH FF DB 07H ;22AF: DIV TOS, NOS DB 26H ;22B0: PUSHR DB 0E9H, 15H ;22B1: SYS 15D2 DB 25H ;22B3: POPR DB 1FH ;22B4: DUPNZ DB 08H, 0BH ;22B5: JZ 22C1 DB 72H ;22B7: PUSH 0000 DB 0EH ;22B8: LOOP FRAME DB 3EH, 51H ;22B9: LD TOS, [6051] DB 23H, 0FFH ;22BB: PUSH FF DB 0D0H, 15H ;22BD: SYS 15A0 DB 0CH, 0F9H ;22BF: LOOP 22B9 DB 11H ;22C1: RET DB 15H ;22C2: 15 DB 3EH, 43H ;22C3: LD TOS, [6043] DB 3EH, 2EH ;22C5: LD TOS, [602E] DB 03H ;22C7: ADD TOS, 1 DB 72H ;22C8: PUSH 0000 DB 0EH ;22C9: LOOP FRAME DB 1FH ;22CA: DUPNZ DB 08H, 25H ;22CB: JZ 22F1 DB 94H, 21H ;22CD: SYS 2128 DB 1DH ;22CF: OVER DB 27H ;22D0: SUB TOS, 1 DB 70H ;22D1: SUB24 [NOS], TOS DB 90H, 21H ;22D2: SYS 2120 DB 1DH ;22D4: OVER DB 27H ;22D5: SUB TOS, 1 DB 70H ;22D6: SUB24 [NOS], TOS DB 1EH ;22D7: DUP DB 26H ;22D8: PUSHR DB 94H, 21H ;22D9: SYS 2128 DB 22H, 64H, 00H ;22DB: 0 PUSH 6400 DB 25H ;22DE: POPR DB 0E9H, 15H ;22DF: SYS 15D2 DB 22H, 64H, 00H ;22E1: 0 PUSH 6400 DB 90H, 21H ;22E4: SYS 2120 DB 21H ;22E6: ROT DB 0BFH, 15H ;22E7: SYS 157E DB 94H, 21H ;22E9: SYS 2128 DB 0AEH, 0AH ;22EB: SYS 0A5C DB 90H, 21H ;22ED: SYS 2120 DB 0AEH, 0AH ;22EF: SYS 0A5C DB 23H, 0FFH ;22F1: PUSH FF DB 0CH, 0D6H ;22F3: LOOP 22CA DB 1CH ;22F5: DROP DB 11H ;22F6: RET DB 0FFH ;22F7: FF DB 15H ;22F8: 15 DB 3EH, 43H ;22F9: LD TOS, [6043] DB 3EH, 2EH ;22FB: LD TOS, [602E] DB 03H ;22FD: ADD TOS, 1 DB 72H ;22FE: PUSH 0000 DB 0EH ;22FF: LOOP FRAME DB 1EH ;2300: DUP DB 5BH, 64H, 00H, 62H, 0BFH;2301: 0 LDBNK 6400, [62BF] DB 92H, 21H ;2306: SYS 2124 DB 9CH, 0FH ;2308: SYS 0F38 DB 5AH, 62H, 0BCH, 64H, 00H;230A: C STBNK [62BC], 6400 DB 90H, 21H ;230F: SYS 2120 DB 8DH, 0FH ;2311: SYS 0F1A DB 23H, 0FFH ;2313: PUSH FF DB 0CH, 0EAH ;2315: LOOP 2300 DB 1CH ;2317: DROP DB 11H ;2318: RET DB 0FFH ;2319: FF DB 15H ;231A: 15 DB 90H, 21H ;231B: SYS 2120 DB 22H, 62H, 0C8H ;231D: 8 PUSH 62C8 DB 23H, 09H ;2320: PUSH 09 DB 1AH ;2322: MCPY [NOS], [3OS] DB 94H, 21H ;2323: SYS 2128 DB 22H, 62H, 0C5H ;2325: 5 PUSH 62C5 DB 31H ;2328: MCPY3 [TOS], [NOS] DB 22H, 62H, 0C5H ;2329: 5 PUSH 62C5 DB 92H, 21H ;232C: SYS 2124 DB 6EH ;232E: SUB24 [NOS], [TOS] DB 22H, 62H, 0C5H ;232F: 5 PUSH 62C5 DB 0A3H, 0AH ;2332: SYS 0A46 DB 72H ;2334: PUSH 0000 DB 22H, 60H, 42H ;2335: 2 PUSH 6042 DB 75H ;2338: PUSH 0003 DB 46H ;2339: FILL DB 58H, 60H, 45H, 62H, 0C5H;233A: 5 MCPY3 [6045],[62C5] DB 58H, 60H, 35H, 21H, 2BH;233F: 5 MCPY3 [6035],[212B] DB 75H ;2344: PUSH 0003 DB 89H, 0AH ;2345: SYS 0A12 DB 22H, 62H, 0C8H ;2347: 8 PUSH 62C8 DB 90H, 21H ;234A: SYS 2120 DB 92H, 21H ;234C: SYS 2124 DB 0DCH, 08H ;234E: SYS 08B8 DB 03H ;2350: ADD TOS, 1 DB 08H, 08H ;2351: JZ 235A DB 94H, 21H ;2353: SYS 2128 DB 6EH ;2355: SUB24 [NOS], [TOS] DB 0E1H, 22H ;2356: SYS 22C2 DB 0AH, 06H ;2358: JP 235F DB 92H, 21H ;235A: SYS 2124 DB 6EH ;235C: SUB24 [NOS], [TOS] DB 0FCH, 22H ;235D: SYS 22F8 DB 11H ;235F: RET DB 15H ;2360: 15 DB 3AH, 63H, 0C4H ;2361: 4 LD TOS, [63C4] DB 0C1H, 13H ;2364: SYS 1382 DB 11H ;2366: RET DB 0FFH ;2367: FF DB 15H ;2368: 15 S2369 DB 6AH ;2369: LD TOS, [RP] DB 3BH, 63H, 0C4H ;236A: 4 LD [63C4], TOS DB 0B0H, 23H ;236D: SYS 2360 DB 11H ;236F: RET DB 15H ;2370: 15 DB 3AH, 63H, 0C2H ;2371: 2 LD TOS, [63C2] DB 1FH ;2374: DUPNZ DB 08H, 06H ;2375: JZ 237C DB 22H, 62H, 0DAH ;2377: A PUSH 62DA DB 8EH, 13H ;237A: SYS 131C DB 11H ;237C: RET DB 0FFH ;237D: FF DB 15H ;237E: 15 S237F DB 6AH ;237F: LD TOS, [RP] DB 3BH, 63H, 0C2H ;2380: 2 LD [63C2], TOS DB 0B8H, 23H ;2383: SYS 2370 DB 11H ;2385: RET DB 15H ;2386: 15 DB 60H ;2387: LD TOS, VD DB 5BH, 64H, 00H, 62H, 0ADH;2388: 0 LDBNK 6400, [62AD] DB 8EH, 21H ;238D: SYS 211C DB 9CH, 0FH ;238F: SYS 0F38 DB 4BH ;2391: FMHEX DB 22H, 64H, 00H ;2392: 0 PUSH 6400 DB 60H ;2395: LD TOS, VD DB 0CAH, 05H ;2396: SYS 0594 DB 00H ;2398: ADD TOS, NOS DB 22H, 60H, 3BH ;2399: B PUSH 603B DB 60H ;239C: LD TOS, VD DB 0CAH, 05H ;239D: SYS 0594 DB 0BFH, 15H ;239F: SYS 157E DB 22H, 60H, 3BH ;23A1: B PUSH 603B DB 8DH, 0FH ;23A4: SYS 0F1A DB 11H ;23A6: RET DB 0FFH ;23A7: FF DB 15H ;23A8: 15 DB 22H, 64H, 00H ;23A9: 0 PUSH 6400 DB 1EH ;23AC: DUP DB 5DH ;23AD: LD VC, TOS DB 61H ;23AE: LD VA, TOS DB 22H, 60H, 3BH ;23AF: B PUSH 603B DB 8EH, 21H ;23B2: SYS 211C DB 31H ;23B4: MCPY3 [TOS], [NOS] DB 8EH, 21H ;23B5: SYS 211C DB 8AH, 21H ;23B7: SYS 2114 DB 6EH ;23B9: SUB24 [NOS], [TOS] DB 3AH, 62H, 0AEH ;23BA: E LD TOS, [62AE] DB 23H, 0FEH ;23BD: PUSH FE DB 07H ;23BF: DIV TOS, NOS DB 20H ;23C0: SWAP DB 1EH ;23C1: DUP DB 5FH ;23C2: LD VD, TOS DB 63H ;23C3: LD VB, TOS DB 8AH, 21H ;23C4: SYS 2114 DB 8EH, 21H ;23C6: SYS 211C DB 31H ;23C8: MCPY3 [TOS], [NOS] DB 58H, 60H, 3BH, 62H, 0A4H;23C9: B MCPY3 [603B],[62A4] DB 0C3H, 23H ;23CE: SYS 2386 DB 23H, 0FEH ;23D0: PUSH FE DB 1EH ;23D2: DUP DB 5FH ;23D3: LD VD, TOS DB 63H ;23D4: LD VB, TOS DB 1FH ;23D5: DUPNZ DB 08H, 07H ;23D6: JZ 23DE DB 72H ;23D8: PUSH 0000 DB 0EH ;23D9: LOOP FRAME DB 0C3H, 23H ;23DA: SYS 2386 DB 0CH, 0FDH ;23DC: LOOP 23DA DB 11H ;23DE: RET DB 0FFH ;23DF: FF DB 15H ;23E0: 15 DB 0D7H, 19H ;23E1: SYS 19AE DB 11H ;23E3: RET DB 15H ;23E4: 15 S23E5 DB 0EEH, 17H ;23E5: SYS 17DC DB 23H, 04H ;23E7: PUSH 04 DB 3FH, 0AH ;23E9: LD [600A], TOS DB 11H ;23EB: RET DB 15H ;23EC: 15 DB 0CCH, 18H ;23ED: SYS 1898 DB 1EH ;23EF: DUP DB 08H, 15H ;23F0: JZ 2406 DB 27H ;23F2: SUB TOS, 1 DB 3AH, 62H, 0D7H ;23F3: 7 LD TOS, [62D7] DB 00H ;23F6: ADD TOS, NOS DB 17H ;23F7: LD TOS.0, [TOS] DB 1EH ;23F8: DUP DB 23H, 20H ;23F9: PUSH 20 DB 23H, 5FH ;23FB: PUSH 5F DB 0BDH, 21H ;23FD: SYS 217A DB 08H, 06H ;23FF: JZ 2406 DB 3DH, 63H, 8DH ;2401: D LD [638D], TOS.0 DB 23H, 74H ;2404: PUSH 74 DB 11H ;2406: RET DB 0FFH ;2407: FF DB 15H ;2408: 15 DB 23H, 4BH ;2409: PUSH 4B DB 3DH, 63H, 0AAH ;240B: A LD [63AA], TOS.0 DB 3AH, 62H, 0D1H ;240E: 1 LD TOS, [62D1] DB 3FH, 12H ;2411: LD [6012], TOS DB 3AH, 62H, 0D3H ;2413: 3 LD TOS, [62D3] DB 10H ;2416: EXEC TOS DB 1FH ;2417: DUPNZ DB 13H ;2418: ISZ TOS DB 08H, 08H ;2419: JZ 2422 DB 3EH, 12H ;241B: LD TOS, [6012] DB 13H ;241D: ISZ TOS DB 09H, 0F4H ;241E: JZ 2413 DB 23H, 64H ;2420: PUSH 64 DB 0FCH, 17H ;2422: SYS 17F8 DB 11H ;2424: RET DB 0FFH ;2425: FF DB 15H ;2426: 15 S2427 DB 2AH ;2427: LD TOS.0, [RP] DB 3FH, 16H ;2428: LD [6016], TOS DB 3EH, 16H ;242A: LD TOS, [6016] DB 13H ;242C: ISZ TOS DB 09H, 0FCH ;242D: JZ 242A DB 11H ;242F: RET DB 15H ;2430: 15 S2431 DB 2AH ;2431: LD TOS.0, [RP] DB 3FH, 0EH ;2432: LD [600E], TOS DB 90H, 18H ;2434: SYS 1820 DB 11H ;2436: RET DB 0FFH ;2437: FF DB 15H ;2438: 15 S2439 DB 0A6H, 19H ;2439: SYS 194C DB 41H, 0BDH ;243B: LD [60BD], TOS.0 DB 29H ;243D: NAVBK DB 11H ;243E: 11 DB 0FFH ;243F: FF DB 15H ;2440: 15 DB 0FCH, 17H ;2441: SYS 17F8 DB 11H ;2443: RET DB 15H ;2444: 15 DB 94H, 18H ;2445: SYS 1828 DB 11H ;2447: RET DB 15H ;2448: 15 DB 11H ;2449: RET DB 00H ;244A: 00 DB 00H ;244B: 00 DB 24H ;244C: 24 DB 41H ;244D: 41 DB 00H ;244E: 00 DB 00H ;244F: 00 DB 24H ;2450: 24 DB 45H ;2451: 45 DB 00H ;2452: 00 DB 00H ;2453: 00 DB 24H ;2454: 24 DB 49H ;2455: 49 DB 00H ;2456: 00 DB 00H ;2457: 00 DB 24H ;2458: 24 DB 49H ;2459: 49 DB 15H ;245A: 15 S245B DB 3CH, 60H, 69H ;245B: 9 LD TOS.0, [6069] DB 75H ;245E: PUSH 0003 DB 72H ;245F: PUSH 0000 DB 0EH ;2460: LOOP FRAME DB 23H, 0FFH ;2461: PUSH FF DB 3DH, 60H, 69H ;2463: 9 LD [6069], TOS.0 DB 23H, 10H ;2466: PUSH 10 DB 41H, 09H ;2468: LD [6009], TOS.0 DB 45H ;246A: DELAY DB 1EH ;246B: DUP DB 0CCH, 18H ;246C: SYS 1898 DB 1CH ;246E: DROP DB 3CH, 60H, 69H ;246F: 9 LD TOS.0, [6069] DB 4FH ;2472: ISEQ DB 08H, 08H ;2473: JZ 247C DB 23H, 10H ;2475: PUSH 10 DB 41H, 09H ;2477: LD [6009], TOS.0 DB 45H ;2479: DELAY DB 0AH, 04H ;247A: JP 247F DB 1CH ;247C: DROP DB 76H ;247D: PUSH FFFF DB 0FH ;247E: LOOP CLR DB 0FCH, 17H ;247F: SYS 17F8 DB 0CH, 0DFH ;2481: LOOP 2461 DB 14H ;2483: ISNEG TOS DB 08H, 05H ;2484: JZ 248A DB 42H, 61H ;2486: LD [60BD], 61 DB 0AH, 03H ;2488: JP 248C DB 42H, 60H ;248A: LD [60BD], 60 DB 29H ;248C: NAVBK DB 11H ;248D: RET DB 15H ;248E: 15 S248F DB 0CCH, 18H ;248F: SYS 1898 DB 1CH ;2491: DROP DB 3CH, 60H, 69H ;2492: 9 LD TOS.0, [6069] DB 23H, 0FFH ;2495: PUSH FF DB 4FH ;2497: ISEQ DB 09H, 0F6H ;2498: JZ 248F DB 0B7H, 0EH ;249A: SYS 0E6E DB 11H ;249C: RET DB 0FFH ;249D: FF DB 15H ;249E: 15 S249F DB 0EEH, 17H ;249F: SYS 17DC DB 74H ;24A1: PUSH 0002 DB 41H, 09H ;24A2: LD [6009], TOS.0 DB 45H ;24A4: DELAY DB 0FCH, 17H ;24A5: SYS 17F8 DB 11H ;24A7: RET S24A8 ; ; ====================================================================== ; DATA AREA: ERROR/STATUS MESSAGE STRINGS ; Range: 0x24A8-0x252C ; ---------------------------------------------------------------------- ; Length-prefixed ASCII text strings for system error messages. ; Each string starts with a length byte followed by the ASCII text. ; ; Messages: ; 24A8: 0A "SPAD ERROR" ; 24B3: 08 " MEM OK" ; 24BC: 10 "INVALID FUNCTION" ; 24CD: 0F "INVALID COMMAND" ; 24DD: 0E "FILE NOT FOUND" ; 24EC: 0C "INV PWR LOSS" ; 24F9: 0C " MEMORY FULL" ; 2506: 0C "HEADER ERROR" ; 2513: 0A "DATA ERROR" ; 251E: 0E "NO SYSMODE PGM" ; ====================================================================== DB 0AH ;24A8: 0A DB 53H ;24A9: 53 DB 'PAD ERROR' ;24AA: 50 ;24AB: 41 ;24AC: 44 ;24AD: 20 ;24AE: 45 ;24AF: 52 ;24B0: 52 ;24B1: 4F ;24B2: 52 S24B3 DB 08H ;24B3: 08 DB ' MEM OK' ;24B4: 20 ;24B5: 20 ;24B6: 4D ;24B7: 45 ;24B8: 4D ;24B9: 20 ;24BA: 4F ;24BB: 4B S24BC DB 10H ;24BC: 10 DB 'INVALID FUNCTION' ;24BD: 49 ;24BE: 4E ;24BF: 56 ;24C0: 41 ;24C1: 4C ;24C2: 49 ;24C3: 44 ;24C4: 20 ;24C5: 46 ;24C6: 55 ;24C7: 4E ;24C8: 43 ;24C9: 54 ;24CA: 49 ;24CB: 4F ;24CC: 4E S24CD DB 0FH ;24CD: 0F DB 'INVALID COMMAND' ;24CE: 49 ;24CF: 4E ;24D0: 56 ;24D1: 41 ;24D2: 4C ;24D3: 49 ;24D4: 44 ;24D5: 20 ;24D6: 43 ;24D7: 4F ;24D8: 4D ;24D9: 4D ;24DA: 41 ;24DB: 4E ;24DC: 44 S24DD DB 0EH ;24DD: 0E DB 'FILE NOT FOUND' ;24DE: 46 ;24DF: 49 ;24E0: 4C ;24E1: 45 ;24E2: 20 ;24E3: 4E ;24E4: 4F ;24E5: 54 ;24E6: 20 ;24E7: 46 ;24E8: 4F ;24E9: 55 ;24EA: 4E ;24EB: 44 S24EC DB 0CH ;24EC: 0C DB 'INV PWR LOSS' ;24ED: 49 ;24EE: 4E ;24EF: 56 ;24F0: 20 ;24F1: 50 ;24F2: 57 ;24F3: 52 ;24F4: 20 ;24F5: 4C ;24F6: 4F ;24F7: 53 ;24F8: 53 DB 0CH ;24F9: 0C DB ' MEMORY FULL' ;24FA: 20 ;24FB: 4D ;24FC: 45 ;24FD: 4D ;24FE: 4F ;24FF: 52 ;2500: 59 ;2501: 20 ;2502: 46 ;2503: 55 ;2504: 4C ;2505: 4C S2506 DB 0CH ;2506: 0C DB 'HEADER ERROR' ;2507: 48 ;2508: 45 ;2509: 41 ;250A: 44 ;250B: 45 ;250C: 52 ;250D: 20 ;250E: 45 ;250F: 52 ;2510: 52 ;2511: 4F ;2512: 52 S2513 DB 0AH ;2513: 0A DB 'DATA ERROR' ;2514: 44 ;2515: 41 ;2516: 54 ;2517: 41 ;2518: 20 ;2519: 45 ;251A: 52 ;251B: 52 ;251C: 4F ;251D: 52 DB 0EH ;251E: 0E DB 'NO SYSMODE PGM' ;251F: 4E ;2520: 4F ;2521: 20 ;2522: 53 ;2523: 59 ;2524: 53 ;2525: 4D ;2526: 4F ;2527: 44 ;2528: 45 ;2529: 20 ;252A: 50 ;252B: 47 ;252C: 4D ; ; ====================================================================== ; DATA AREA: ERROR MESSAGE POINTER TABLE ; Range: 0x252D-0x2541 ; ---------------------------------------------------------------------- ; Table of 16-bit addresses pointing to each error message string. ; Used for indexed error display: error_code -> table[code] -> string. ; Normal byte order (high byte first). ; ; Entries (10 pointers): ; 252D: 24A8 (SPAD ERROR) ; 252F: 24B3 (MEM OK) ; 2531: 24BC (INVALID FUNCTION) ; 2533: 24CD (INVALID COMMAND) ; 2535: 24DD (FILE NOT FOUND) ; 2537: 24EC (INV PWR LOSS) ; 2539: 24F9 (MEMORY FULL) ; 253B: 2506 (HEADER ERROR) ; 253D: 2513 (DATA ERROR) ; 253F: 251E (NO SYSMODE PGM) ; ====================================================================== DB 24H ;252D: 24 DW LOW S24A8 ;252E: A8 DW HIGH S24A8 ;252E: 24 DW LOW S24B3 ;2530: B3 DW HIGH S24B3 ;2530: 24 DW LOW S24BC ;2532: BC DW HIGH S24BC ;2532: 24 DW LOW S24CD ;2534: CD DW HIGH S24CD ;2534: 24 DW LOW S24DD ;2536: DD DW HIGH S24DD ;2536: 24 DW LOW S24EC ;2538: EC DW HIGH S24EC ;2538: 24 DW LOW S25F9 ;253A: F9 DW HIGH S25F9 ;253A: 25 DW LOW S2506 ;253C: 06 DW HIGH S2506 ;253C: 25 DW LOW S2513 ;253E: 13 DW HIGH S2513 ;253E: 25 DB 1EH ;2540: 1E DB 0FFH ;2541: FF ; ; ====================================================================== ; DATA AREA: DISPLAY ERROR MESSAGE AND WAIT (SYS 2542) ; Range: 0x2542-0x2561 ; ---------------------------------------------------------------------- ; Handler entry byte 0x15 (CALL mechanism) at 0x2542. ; Displays an error message on LCD and waits for keypress/timeout, ; then jumps to main loop via SYS 0E90 (never returns to caller). ; ; Bytecode body (0x2543-0x2561): ; 2543: SYS 225A ; setup (VC/VD already set by caller via LDVCD) ; 2545: PUSH 6080 ; display buffer address ; 2548: LD VA, TOS ; VA = 6080 (copy destination) ; 2549: PUSH 20 ; field width = 32 (full 2x16 LCD) ; 254B: LD VB, TOS ; VB = 32 ; 254C: STRCP ; copy string to buffer, space-pad to 32 ; 254D: LCD ; write buffer to LCD ; 254E: SYS 23E4 ; display update ; 2550: PUSH 23ED ; key wait handler address ; 2553: LD [62D3], TOS ; store handler address ; 2556: PUSH 0258 ; timeout value (600 = ~2 sec?) ; 2559: LD [62D1], TOS ; store timeout ; 255C: SYS 2408 ; key wait routine (loops until key/timeout) ; 255E: DROP ; discard key result ; 255F: SYS 0E90 ; jump to main loop (never returns) ; 2561: FF ; dead byte / separator ; ; Called from: ; 2570: SYS 2542 (error display dispatcher at S2562) ; 257E: SYS 2542 (SPAD ERROR display at S2575) ; ====================================================================== DB 15H ;2542: 15 DB 0ADH, 22H ;2543: SYS 225A DB 22H, 60H, 80H ;2545: 0 PUSH 6080 DB 61H ;2548: LD VA, TOS DB 23H, 20H ;2549: PUSH 20 DB 63H ;254B: LD VB, TOS DB 2BH ;254C: STRCP DB 44H ;254D: LCD DB 0F2H, 23H ;254E: SYS 23E4 DB 22H, 23H, 0EDH ;2550: D PUSH 23ED DB 3BH, 62H, 0D3H ;2553: 3 LD [62D3], TOS DB 22H, 02H, 58H ;2556: 8 PUSH 0258 DB 3BH, 62H, 0D1H ;2559: 1 LD [62D1], TOS DB 84H, 24H ;255C: SYS 2408 DB 1CH ;255E: DROP DB 0C8H, 0EH ;255F: SYS 0E90 DB 0FFH ;2561: FF DB 15H ;2562: 15 DB 1EH ;2563: DUP DB 23H, 80H ;2564: PUSH 80 DB 33H ;2566: OR TOS, NOS DB 41H, 55H ;2567: LD [6055], TOS.0 DB 01H ;2569: SHL TOS DB 22H, 25H, 2DH ;256A: D PUSH 252D DB 00H ;256D: ADD TOS, NOS DB 15H ;256E: LD TOS, [TOS] DB 37H ;256F: LDVCD [TOS] DB 0A1H, 25H ;2570: SYS 2542 DB 11H ;2572: RET DB 0FFH ;2573: FF DB 15H ;2574: 15 S2575 DB 23H, 0AH ;2575: PUSH 0A DB 23H, 80H ;2577: PUSH 80 DB 33H ;2579: OR TOS, NOS DB 41H, 55H ;257A: LD [6055], TOS.0 DB 90H, 13H ;257C: SYS 1320 DB 0A1H, 25H ;257E: SYS 2542 DB 11H ;2580: RET DB 0FFH ;2581: FF DB 15H ;2582: 15 S2583 DB 23H, 02H ;2583: PUSH 02 DB 0B1H, 25H ;2585: SYS 2562 DB 11H ;2587: RET DB 15H ;2588: 15 S2589 DB 23H, 03H ;2589: PUSH 03 DB 0B1H, 25H ;258B: SYS 2562 DB 11H ;258D: RET DB 15H ;258E: 15 S258F DB 72H ;258F: PUSH 0000 DB 41H, 1AH ;2590: LD [601A], TOS.0 DB 0BCH, 19H ;2592: SYS 1978 DB 0F9H, 21H ;2594: SYS 21F2 DB 23H, 05H ;2596: PUSH 05 DB 72H ;2598: PUSH 0000 DB 0EH ;2599: LOOP FRAME DB 22H, 60H, 4BH ;259A: B PUSH 604B DB 22H, 04H, 0F8H ;259D: 8 PUSH 04F8 DB 24H ;25A0: PUSH CS DB 00H ;25A1: ADD TOS, NOS DB 40H, 2DH ;25A2: LD TOS.0, [602D] DB 3EH, 2EH ;25A4: LD TOS, [602E] DB 0DBH, 1AH ;25A6: SYS 1AB6 DB 86H, 1BH ;25A8: SYS 1B0C DB 33H ;25AA: OR TOS, NOS DB 08H, 05H ;25AB: JZ 25B1 DB 23H, 08H ;25AD: PUSH 08 DB 0B1H, 25H ;25AF: SYS 2562 DB 0CH, 0E8H ;25B1: LOOP 259A DB 22H, 60H, 48H ;25B3: 8 PUSH 6048 DB 22H, 04H, 0F8H ;25B6: 8 PUSH 04F8 DB 40H, 2DH ;25B9: LD TOS.0, [602D] DB 3EH, 2EH ;25BB: LD TOS, [602E] DB 0DEH, 1AH ;25BD: SYS 1ABC DB 88H, 1BH ;25BF: SYS 1B10 DB 33H ;25C1: OR TOS, NOS DB 08H, 05H ;25C2: JZ 25C8 DB 23H, 08H ;25C4: PUSH 08 DB 0B1H, 25H ;25C6: SYS 2562 DB 81H, 22H ;25C8: SYS 2202 DB 22H, 60H, 00H ;25CA: 0 PUSH 6000 DB 22H, 80H, 00H ;25CD: 0 PUSH 8000 DB 22H, 02H, 00H ;25D0: 0 PUSH 0200 DB 1AH ;25D3: MCPY [NOS], [3OS] DB 0BAH, 1BH ;25D4: SYS 1B74 DB 23H, 05H ;25D6: PUSH 05 DB 72H ;25D8: PUSH 0000 DB 0EH ;25D9: LOOP FRAME DB 22H, 80H, 4BH ;25DA: B PUSH 804B DB 22H, 04H, 0F8H ;25DD: 8 PUSH 04F8 DB 24H ;25E0: PUSH CS DB 00H ;25E1: ADD TOS, NOS DB 40H, 2DH ;25E2: LD TOS.0, [602D] DB 3EH, 2EH ;25E4: LD TOS, [602E] DB 0DBH, 1AH ;25E6: SYS 1AB6 DB 86H, 1BH ;25E8: SYS 1B0C DB 33H ;25EA: OR TOS, NOS DB 08H, 05H ;25EB: JZ 25F1 DB 23H, 00H ;25ED: PUSH 00 DB 0B1H, 25H ;25EF: SYS 2562 DB 0CH, 0E8H ;25F1: LOOP 25DA DB 22H, 80H, 48H ;25F3: 8 PUSH 8048 DB 22H, 04H, 0F8H ;25F6: 8 PUSH 04F8 S25F9 DB 40H, 2DH ;25F9: LD TOS.0, [602D] DB 3EH, 2EH ;25FB: LD TOS, [602E] DB 0DEH, 1AH ;25FD: SYS 1ABC DB 88H, 1BH ;25FF: SYS 1B10 DB 33H ;2601: OR TOS, NOS DB 08H, 05H ;2602: JZ 2608 DB 23H, 00H ;2604: PUSH 00 DB 0B1H, 25H ;2606: SYS 2562 DB 23H, 01H ;2608: PUSH 01 DB 0B1H, 25H ;260A: SYS 2562 DB 11H ;260C: RET DB 0FFH ;260D: FF DB 15H ;260E: 15 DB 96H, 0CH ;260F: SYS 0C2C DB 08H, 05H ;2611: JZ 2617 DB 23H, 06H ;2613: PUSH 06 DB 0B1H, 25H ;2615: SYS 2562 DB 11H ;2617: RET ; ; ====================================================================== ; DATA AREA: CALLI TABLE (STRING FORMAT HANDLERS) ; Range: 0x2618-0x261E ; ---------------------------------------------------------------------- ; Function pointer table for CALLI at 0x2618 (3 entries + terminator). ; Used by string/field formatting operations. ; ; 2618: 0616 -> LD [TOS], NOS (16-bit store) ; 261A: 0893 -> OR TOS, NOS ; 261C: 0641 -> XOR TOS, NOS ; 261E: 15 (terminator / entry byte for next code block) ; ====================================================================== DW S0616 ;2618: 06 16 DW S0893 ;261A: 08 93 DW S0641 ;261C: 06 41 DB 15H ;261E: 15 S261F DB 2AH ;261F: LD TOS.0, [RP] DB 1EH ;2620: DUP DB 23H, 04H ;2621: PUSH 04 DB 12H ;2623: AND TOS, NOS DB 08H, 07H ;2624: JZ 262C DB 0DAH, 13H ;2626: SYS 13B4 DB 5EH ;2628: LD TOS, VC DB 17H ;2629: LD TOS.0, [TOS] DB 0AH, 02H ;262A: JP 262D DB 2AH ;262C: LD TOS.0, [RP] DB 0DFH, 13H ;262D: SYS 13BE DB 62H ;262F: LD TOS, VA DB 17H ;2630: LD TOS.0, [TOS] DB 21H ;2631: ROT DB 75H ;2632: PUSH 0003 DB 12H ;2633: AND TOS, NOS DB 66H, 26H, 18H ;2634: 8 CALLI 2618 DB 1EH ;2637: DUP DB 08H, 05H ;2638: JZ 263E DB 42H, 60H ;263A: LD [60BD], 60 DB 0AH, 03H ;263C: JP 2640 DB 42H, 61H ;263E: LD [60BD], 61 DB 62H ;2640: LD TOS, VA DB 19H ;2641: LD [TOS], NOS.0 DB 11H ;2642: RET DB 0FFH ;2643: FF DB 15H ;2644: 15 DB 62H ;2645: LD TOS, VA DB 64H ;2646: LD TOS, VB DB 00H ;2647: ADD TOS, NOS DB 19H ;2648: LD [TOS], NOS.0 DB 73H ;2649: PUSH 0001 DB 22H, 60H, 58H ;264A: 8 PUSH 6058 DB 05H ;264D: ADD [TOS], NOS DB 11H ;264E: RET DB 0FFH ;264F: FF DB 15H ;2650: 15 DB 62H ;2651: LD TOS, VA DB 64H ;2652: LD TOS, VB DB 00H ;2653: ADD TOS, NOS DB 27H ;2654: SUB TOS, 1 DB 64H ;2655: LD TOS, VB DB 0E8H, 09H ;2656: SYS 09D0 DB 11H ;2658: RET DB 0FFH ;2659: FF DB 15H ;265A: 15 DB 62H ;265B: LD TOS, VA DB 15H ;265C: LD TOS, [TOS] DB 14H ;265D: ISNEG TOS DB 1EH ;265E: DUP DB 08H, 03H ;265F: JZ 2663 DB 0A8H, 26H ;2661: SYS 2650 DB 11H ;2663: RET DB 15H ;2664: 15 DB 62H ;2665: LD TOS, VA DB 22H, 60H, 30H ;2666: 0 PUSH 6030 DB 64H ;2669: LD TOS, VB DB 02H ;266A: SUB TOS, NOS DB 61H ;266B: LD VA, TOS DB 2CH ;266C: NUMCP DB 0ADH, 26H ;266D: SYS 265A DB 20H ;266F: SWAP DB 1EH ;2670: DUP DB 5DH ;2671: LD VC, TOS DB 64H ;2672: LD TOS, VB DB 5FH ;2673: LD VD, TOS DB 22H, 60H, 38H ;2674: 8 PUSH 6038 DB 64H ;2677: LD TOS, VB DB 02H ;2678: SUB TOS, NOS DB 61H ;2679: LD VA, TOS DB 2CH ;267A: NUMCP DB 0ADH, 26H ;267B: SYS 265A DB 20H ;267D: SWAP DB 64H ;267E: LD TOS, VB DB 0F1H, 09H ;267F: SYS 09E2 DB 61H ;2681: LD VA, TOS DB 22H, 60H, 48H ;2682: 8 PUSH 6048 DB 64H ;2685: LD TOS, VB DB 01H ;2686: SHL TOS DB 1EH ;2687: DUP DB 5FH ;2688: LD VD, TOS DB 02H ;2689: SUB TOS, NOS DB 5DH ;268A: LD VC, TOS DB 2CH ;268B: NUMCP DB 0A0H, 06H ;268C: SYS 0640 DB 08H, 03H ;268E: JZ 2692 DB 0A8H, 26H ;2690: SYS 2650 DB 11H ;2692: RET DB 0FFH ;2693: FF DB 15H ;2694: 15 DB 62H ;2695: LD TOS, VA DB 22H, 60H, 38H ;2696: 8 PUSH 6038 DB 64H ;2699: LD TOS, VB DB 02H ;269A: SUB TOS, NOS DB 61H ;269B: LD VA, TOS DB 2CH ;269C: NUMCP DB 0ADH, 26H ;269D: SYS 265A DB 20H ;269F: SWAP DB 1EH ;26A0: DUP DB 5DH ;26A1: LD VC, TOS DB 64H ;26A2: LD TOS, VB DB 5FH ;26A3: LD VD, TOS DB 64H ;26A4: LD TOS, VB DB 01H ;26A5: SHL TOS DB 63H ;26A6: LD VB, TOS DB 22H, 60H, 48H ;26A7: 8 PUSH 6048 DB 64H ;26AA: LD TOS, VB DB 02H ;26AB: SUB TOS, NOS DB 61H ;26AC: LD VA, TOS DB 2CH ;26AD: NUMCP DB 0ADH, 26H ;26AE: SYS 265A DB 60H ;26B0: LD TOS, VD DB 89H, 0AH ;26B1: SYS 0A12 DB 08H, 06H ;26B3: JZ 26BA DB 0A8H, 26H ;26B5: SYS 2650 DB 20H ;26B7: SWAP DB 13H ;26B8: ISZ TOS DB 20H ;26B9: SWAP DB 22H, 60H, 30H ;26BA: 0 PUSH 6030 DB 60H ;26BD: LD TOS, VD DB 02H ;26BE: SUB TOS, NOS DB 5DH ;26BF: LD VC, TOS DB 61H ;26C0: LD VA, TOS DB 60H ;26C1: LD TOS, VD DB 63H ;26C2: LD VB, TOS DB 2CH ;26C3: NUMCP DB 08H, 03H ;26C4: JZ 26C8 DB 0A8H, 26H ;26C6: SYS 2650 DB 11H ;26C8: RET ; ; ====================================================================== ; DATA AREA: CALLI TABLE (NUMERIC/STRING COPY HANDLERS) ; Range: 0x26C9-0x26D1 ; ---------------------------------------------------------------------- ; Function pointer table for CALLI at 0x26C9 (4 entries + terminator). ; Dispatches to string copy and numeric formatting routines. ; ; 26C9: 07F6 -> STRCP (string copy with space pad) ; 26CB: 081E -> NUMCP (numeric copy with zero pad) ; 26CD: 0853 -> (string operation variant) ; 26CF: 0816 -> NUMCZ (numeric copy with '0' pad) ; 26D1: FF (terminator) ; ====================================================================== DW S07F6 ;26C9: 07 F6 DW S081E ;26CB: 08 1E DW S0853 ;26CD: 08 53 DW S0816 ;26CF: 08 16 DB 0FFH ;26D1: FF DB 15H ;26D2: 15 DB 2AH ;26D3: LD TOS.0, [RP] DB 60H ;26D4: LD TOS, VD DB 64H ;26D5: LD TOS, VB DB 02H ;26D6: SUB TOS, NOS DB 1FH ;26D7: DUPNZ DB 08H, 2BH ;26D8: JZ 2704 DB 14H ;26DA: ISNEG TOS DB 08H, 11H ;26DB: JZ 26ED DB 62H ;26DD: LD TOS, VA DB 22H, 60H, 28H ;26DE: 8 PUSH 6028 DB 61H ;26E1: LD VA, TOS DB 20H ;26E2: SWAP DB 66H, 26H, 0C9H ;26E3: 9 CALLI 26C9 DB 61H ;26E6: LD VA, TOS DB 22H, 60H, 28H ;26E7: 8 PUSH 6028 DB 5DH ;26EA: LD VC, TOS DB 0AH, 16H ;26EB: JP 2702 DB 5EH ;26ED: LD TOS, VC DB 60H ;26EE: LD TOS, VD DB 22H, 60H, 56H ;26EF: 6 PUSH 6056 DB 22H, 60H, 5AH ;26F2: A PUSH 605A DB 23H, 04H ;26F5: PUSH 04 DB 1AH ;26F7: MCPY [NOS], [3OS] DB 63H ;26F8: LD VB, TOS DB 22H, 60H, 28H ;26F9: 8 PUSH 6028 DB 61H ;26FC: LD VA, TOS DB 20H ;26FD: SWAP DB 66H, 26H, 0C9H ;26FE: 9 CALLI 26C9 DB 5DH ;2701: LD VC, TOS DB 0AH, 02H ;2702: JP 2705 DB 1CH ;2704: DROP DB 0E9H, 10H ;2705: SYS 10D2 DB 11H ;2707: RET DB 15H ;2708: 15 DB 62H ;2709: LD TOS, VA DB 64H ;270A: LD TOS, VB DB 00H ;270B: ADD TOS, NOS DB 27H ;270C: SUB TOS, 1 DB 22H, 60H, 28H ;270D: 8 PUSH 6028 DB 61H ;2710: LD VA, TOS DB 2CH ;2711: NUMCP DB 22H, 60H, 28H ;2712: 8 PUSH 6028 DB 64H ;2715: LD TOS, VB DB 00H ;2716: ADD TOS, NOS DB 27H ;2717: SUB TOS, 1 DB 64H ;2718: LD TOS, VB DB 11H ;2719: RET DB 15H ;271A: 15 S271B DB 90H, 13H ;271B: SYS 1320 DB 0DFH, 13H ;271D: SYS 13BE DB 84H, 27H ;271F: SYS 2708 DB 0D3H, 09H ;2721: SYS 09A6 DB 11H ;2723: RET DB 15H ;2724: 15 S2725 DB 0D8H, 13H ;2725: SYS 13B0 DB 84H, 27H ;2727: SYS 2708 DB 0D3H, 09H ;2729: SYS 09A6 DB 11H ;272B: RET DB 15H ;272C: 15 S272D DB 90H, 13H ;272D: SYS 1320 DB 0DFH, 13H ;272F: SYS 13BE DB 84H, 27H ;2731: SYS 2708 DB 0E0H, 09H ;2733: SYS 09C0 DB 11H ;2735: RET DB 15H ;2736: 15 S2737 DB 0D8H, 13H ;2737: SYS 13B0 DB 84H, 27H ;2739: SYS 2708 DB 0E0H, 09H ;273B: SYS 09C0 DB 11H ;273D: RET DB 15H ;273E: 15 S273F DB 0D8H, 13H ;273F: SYS 13B0 DB 0CAH, 26H ;2741: SYS 2694 DB 11H ;2743: RET DB 15H ;2744: 15 S2745 DB 90H, 13H ;2745: SYS 1320 DB 0DFH, 13H ;2747: SYS 13BE DB 0CAH, 26H ;2749: SYS 2694 DB 11H ;274B: RET DB 15H ;274C: 15 S274D DB 0D8H, 13H ;274D: SYS 13B0 DB 0B2H, 26H ;274F: SYS 2664 DB 11H ;2751: RET DB 15H ;2752: 15 S2753 DB 90H, 13H ;2753: SYS 1320 DB 0DFH, 13H ;2755: SYS 13BE DB 0B2H, 26H ;2757: SYS 2664 DB 11H ;2759: RET DB 15H ;275A: 15 S275B DB 0D8H, 13H ;275B: SYS 13B0 DB 0E9H, 26H ;275D: SYS 26D2 DB 11H ;275F: RET DB 15H ;2760: 15 S2761 DB 90H, 13H ;2761: SYS 1320 DB 0DFH, 13H ;2763: SYS 13BE DB 0E9H, 26H ;2765: SYS 26D2 DB 11H ;2767: RET DB 15H ;2768: 15 S2769 DB 0B9H, 21H ;2769: SYS 2172 DB 4CH ;276B: TOHEX DB 23H, 2BH ;276C: PUSH 2B DB 0A2H, 26H ;276E: SYS 2644 DB 11H ;2770: RET DB 0FFH ;2771: FF DB 15H ;2772: 15 S2773 DB 0B5H, 21H ;2773: SYS 216A DB 4BH ;2775: FMHEX DB 11H ;2776: RET DB 0FFH ;2777: FF DB 15H ;2778: 15 S2779 DB 0B5H, 21H ;2779: SYS 216A DB 2DH ;277B: NUMCZ DB 11H ;277C: RET DB 0FFH ;277D: FF DB 15H ;277E: 15 S277F DB 0B9H, 21H ;277F: SYS 2172 DB 2DH ;2781: NUMCZ DB 23H, 2BH ;2782: PUSH 2B DB 0A2H, 26H ;2784: SYS 2644 DB 11H ;2786: RET DB 0FFH ;2787: FF DB 15H ;2788: 15 DB 22H, 60H, 38H ;2789: 8 PUSH 6038 DB 61H ;278C: LD VA, TOS DB 60H ;278D: LD TOS, VD DB 63H ;278E: LD VB, TOS DB 2CH ;278F: NUMCP DB 0ADH, 26H ;2790: SYS 265A DB 1CH ;2792: DROP DB 64H ;2793: LD TOS, VB DB 48H ;2794: TOBCD DB 22H, 60H, 38H ;2795: 8 PUSH 6038 DB 64H ;2798: LD TOS, VB DB 02H ;2799: SUB TOS, NOS DB 5DH ;279A: LD VC, TOS DB 11H ;279B: RET DB 15H ;279C: 15 DB 60H ;279D: LD TOS, VD DB 49H ;279E: FMBCD DB 22H, 60H, 38H ;279F: 8 PUSH 6038 DB 5DH ;27A2: LD VC, TOS DB 61H ;27A3: LD VA, TOS DB 2CH ;27A4: NUMCP DB 11H ;27A5: RET DB 15H ;27A6: 15 S27A7 DB 62H ;27A7: LD TOS, VA DB 64H ;27A8: LD TOS, VB DB 0C4H, 27H ;27A9: SYS 2788 DB 63H ;27AB: LD VB, TOS DB 61H ;27AC: LD VA, TOS DB 2CH ;27AD: NUMCP DB 11H ;27AE: RET DB 0FFH ;27AF: FF DB 15H ;27B0: 15 S27B1 DB 62H ;27B1: LD TOS, VA DB 64H ;27B2: LD TOS, VB DB 0C4H, 27H ;27B3: SYS 2788 DB 63H ;27B5: LD VB, TOS DB 61H ;27B6: LD VA, TOS DB 4CH ;27B7: TOHEX DB 11H ;27B8: RET DB 0FFH ;27B9: FF DB 15H ;27BA: 15 S27BB DB 5EH ;27BB: LD TOS, VC DB 15H ;27BC: LD TOS, [TOS] DB 14H ;27BD: ISNEG TOS DB 08H, 05H ;27BE: JZ 27C4 DB 23H, 2DH ;27C0: PUSH 2D DB 0AH, 03H ;27C2: JP 27C6 DB 23H, 2BH ;27C4: PUSH 2B DB 0B9H, 21H ;27C6: SYS 2172 DB 0D8H, 27H ;27C8: SYS 27B0 DB 0A2H, 26H ;27CA: SYS 2644 DB 11H ;27CC: RET DB 0FFH ;27CD: FF DB 15H ;27CE: 15 S27CF DB 62H ;27CF: LD TOS, VA DB 64H ;27D0: LD TOS, VB DB 60H ;27D1: LD TOS, VD DB 03H ;27D2: ADD TOS, 1 DB 0CAH, 05H ;27D3: SYS 0594 DB 63H ;27D5: LD VB, TOS DB 22H, 60H, 38H ;27D6: 8 PUSH 6038 DB 64H ;27D9: LD TOS, VB DB 02H ;27DA: SUB TOS, NOS DB 61H ;27DB: LD VA, TOS DB 4BH ;27DC: FMHEX DB 22H, 60H, 56H ;27DD: 6 PUSH 6056 DB 22H, 60H, 5AH ;27E0: A PUSH 605A DB 23H, 04H ;27E3: PUSH 04 DB 1AH ;27E5: MCPY [NOS], [3OS] DB 63H ;27E6: LD VB, TOS DB 0CEH, 27H ;27E7: SYS 279C DB 11H ;27E9: RET DB 15H ;27EA: 15 S27EB DB 0B5H, 21H ;27EB: SYS 216A DB 5EH ;27ED: LD TOS, VC DB 60H ;27EE: LD TOS, VD DB 00H ;27EF: ADD TOS, NOS DB 17H ;27F0: LD TOS.0, [TOS] DB 0E7H, 27H ;27F1: SYS 27CE DB 23H, 2DH ;27F3: PUSH 2D DB 4FH ;27F5: ISEQ DB 08H, 03H ;27F6: JZ 27FA DB 0A8H, 26H ;27F8: SYS 2650 DB 11H ;27FA: RET DB 0FFH ;27FB: FF DB 15H ;27FC: 15 S27FD DB 62H ;27FD: LD TOS, VA DB 22H, 60H, 38H ;27FE: 8 PUSH 6038 DB 64H ;2801: LD TOS, VB DB 02H ;2802: SUB TOS, NOS DB 61H ;2803: LD VA, TOS DB 0A9H, 08H ;2804: SYS 0852 DB 22H, 60H, 56H ;2806: 6 PUSH 6056 DB 22H, 60H, 5AH ;2809: A PUSH 605A DB 23H, 04H ;280C: PUSH 04 DB 1AH ;280E: MCPY [NOS], [3OS] DB 0CEH, 27H ;280F: SYS 279C DB 11H ;2811: RET DW S07F6 ;2812: 07 F6 DW S27CF ;2814: 27 CF DW S0A73 ;2816: 0A 73 DW S277F ;2818: 27 7F DW S07F6 ;281A: 07 F6 DW S2583 ;281C: 25 83 DW S2583 ;281E: 25 83 DW S2583 ;2820: 25 83 DW S27B1 ;2822: 27 B1 DW S2583 ;2824: 25 83 DW S27A7 ;2826: 27 A7 DW S27BB ;2828: 27 BB DW S27B1 ;282A: 27 B1 DW S2583 ;282C: 25 83 DW S2583 ;282E: 25 83 DW S2583 ;2830: 25 83 DW S0AC2 ;2832: 0A C2 DW S27FD ;2834: 27 FD DW S0853 ;2836: 08 53 DW S2769 ;2838: 27 69 DW S0AC2 ;283A: 0A C2 DW S2583 ;283C: 25 83 DW S2583 ;283E: 25 83 DW S2583 ;2840: 25 83 DW S2779 ;2842: 27 79 DW S27EB ;2844: 27 EB DW S2773 ;2846: 27 73 DW S0816 ;2848: 08 16 DW S2779 ;284A: 27 79 DW S2583 ;284C: 25 83 DW S2583 ;284E: 25 83 DW S2583 ;2850: 25 83 DW S07F6 ;2852: 07 F6 DW S27CF ;2854: 27 CF DW S0A73 ;2856: 0A 73 DW S277F ;2858: 27 7F DW S0816 ;285A: 08 16 DB 15H ;285C: 15 S285D DB 2AH ;285D: LD TOS.0, [RP] DB 0D8H, 13H ;285E: SYS 13B0 DB 66H, 28H, 12H ;2860: 2 CALLI 2812 DB 11H ;2863: RET DB 15H ;2864: 15 S2865 DB 90H, 13H ;2865: SYS 1320 DB 0DFH, 13H ;2867: SYS 13BE DB 2CH ;2869: NUMCP DB 11H ;286A: RET DB 0FFH ;286B: FF DB 15H ;286C: 15 S286D DB 90H, 13H ;286D: SYS 1320 DB 0DFH, 13H ;286F: SYS 13BE DB 2BH ;2871: STRCP DB 11H ;2872: RET DB 0FFH ;2873: FF DB 15H ;2874: 15 S2875 DB 0D8H, 13H ;2875: SYS 13B0 DB 2BH ;2877: STRCP DB 11H ;2878: RET DB 0FFH ;2879: FF DB 15H ;287A: 15 S287B DB 0DAH, 13H ;287B: SYS 13B4 DB 2AH ;287D: LD TOS.0, [RP] DB 5EH ;287E: LD TOS, VC DB 60H ;287F: LD TOS, VD DB 46H ;2880: FILL DB 11H ;2881: RET DB 15H ;2882: 15 S2883 DB 0D8H, 13H ;2883: SYS 13B0 DB 2CH ;2885: NUMCP DB 11H ;2886: RET DB 0FFH ;2887: FF DB 15H ;2888: 15 S2889 DB 0D8H, 13H ;2889: SYS 13B0 DB 2DH ;288B: NUMCZ DB 11H ;288C: RET DB 0FFH ;288D: FF DB 15H ;288E: 15 S288F DB 22H, 60H, 0B7H ;288F: 7 PUSH 60B7 DB 8EH, 21H ;2892: SYS 211C DB 31H ;2894: MCPY3 [TOS], [NOS] DB 8EH, 21H ;2895: SYS 211C DB 6AH ;2897: LD TOS, [RP] DB 40H, 72H ;2898: LD TOS.0, [6072] DB 27H ;289A: SUB TOS, 1 DB 40H, 73H ;289B: LD TOS.0, [6073] DB 06H ;289D: MUL TOS, NOS DB 00H ;289E: ADD TOS, NOS DB 6FH ;289F: ADD24 [NOS], TOS DB 0DFH, 13H ;28A0: SYS 13BE DB 8EH, 21H ;28A2: SYS 211C DB 62H ;28A4: LD TOS, VA DB 64H ;28A5: LD TOS, VB DB 0E9H, 15H ;28A6: SYS 15D2 DB 11H ;28A8: RET DB 0FFH ;28A9: FF DB 15H ;28AA: 15 DB 6AH ;28AB: LD TOS, [RP] DB 1FH ;28AC: DUPNZ DB 08H, 05H ;28AD: JZ 28B3 DB 52H, 0EH ;28AF: PUSH VE, 0E DB 8EH, 13H ;28B1: SYS 131C DB 53H, 0FH ;28B3: PUSH [VE].0, 0F DB 3DH, 62H, 96H ;28B5: 6 LD [6296], TOS.0 DB 11H ;28B8: RET DB 0FFH ;28B9: FF DB 15H ;28BA: 15 DB 86H, 21H ;28BB: SYS 210C DB 5DH ;28BD: LD VC, TOS DB 23H, 09H ;28BE: PUSH 09 DB 5FH ;28C0: LD VD, TOS DB 11H ;28C1: RET DB 15H ;28C2: 15 DB 1EH ;28C3: DUP DB 22H, 62H, 0CBH ;28C4: B PUSH 62CB DB 0DCH, 08H ;28C7: SYS 08B8 DB 14H ;28C9: ISNEG TOS DB 13H ;28CA: ISZ TOS DB 1DH ;28CB: OVER DB 22H, 62H, 0CEH ;28CC: E PUSH 62CE DB 0DCH, 08H ;28CF: SYS 08B8 DB 73H ;28D1: PUSH 0001 DB 4FH ;28D2: ISEQ DB 13H ;28D3: ISZ TOS DB 12H ;28D4: AND TOS, NOS DB 08H, 07H ;28D5: JZ 28DD DB 22H, 62H, 0C8H ;28D7: 8 PUSH 62C8 DB 32H ;28DA: ADD24 [NOS], [TOS] DB 0AH, 02H ;28DB: JP 28DE DB 1CH ;28DD: DROP DB 11H ;28DE: RET DB 0FFH ;28DF: FF DB 15H ;28E0: 15 DB 3EH, 5EH ;28E1: LD TOS, [605E] DB 22H, 60H, 0B7H ;28E3: 7 PUSH 60B7 DB 0E1H, 28H ;28E6: SYS 28C2 DB 23H, 09H ;28E8: PUSH 09 DB 22H, 64H, 00H ;28EA: 0 PUSH 6400 DB 8EH, 13H ;28ED: SYS 131C DB 22H, 64H, 00H ;28EF: 0 PUSH 6400 DB 60H ;28F2: LD TOS, VD DB 00H ;28F3: ADD TOS, NOS DB 22H, 64H, 00H ;28F4: 0 PUSH 6400 DB 0EH ;28F7: LOOP FRAME DB 24H ;28F8: PUSH CS DB 15H ;28F9: LD TOS, [TOS] DB 3FH, 5EH ;28FA: LD [605E], TOS DB 52H, 0CH ;28FC: PUSH VE, 0C DB 52H, 00H ;28FE: PUSH VE, 00 DB 0EH ;2900: LOOP FRAME DB 24H ;2901: PUSH CS DB 0E1H, 28H ;2902: SYS 28C2 DB 75H ;2904: PUSH 0003 DB 0DH, 0FBH ;2905: LOOP TOS, 2901 DB 74H ;2907: PUSH 0002 DB 0DH, 0EFH ;2908: LOOP TOS, 28F8 DB 3FH, 5EH ;290A: LD [605E], TOS DB 11H ;290C: RET DB 0FFH ;290D: FF DB 15H ;290E: 15 DB 0B0H, 10H ;290F: SYS 1060 DB 11H ;2911: RET DB 15H ;2912: 15 DB 0F0H, 28H ;2913: SYS 28E0 DB 0C3H, 10H ;2915: SYS 1086 DB 3AH, 63H, 0C4H ;2917: 4 LD TOS, [63C4] DB 0C1H, 13H ;291A: SYS 1382 DB 11H ;291C: RET DB 0FFH ;291D: FF DB 15H ;291E: 15 DB 73H ;291F: PUSH 0001 DB 60H ;2920: LD TOS, VD DB 75H ;2921: PUSH 0003 DB 00H ;2922: ADD TOS, NOS DB 5BH, 60H, 28H, 62H, 90H;2923: 8 LDBNK 6028, [6290] DB 22H, 60H, 28H ;2928: 8 PUSH 6028 DB 22H, 21H, 45H ;292B: 5 PUSH 2145 DB 0DCH, 08H ;292E: SYS 08B8 DB 08H, 25H ;2930: JZ 2956 DB 5EH ;2932: LD TOS, VC DB 22H, 60H, 2BH ;2933: B PUSH 602B DB 60H ;2936: LD TOS, VD DB 34H ;2937: COMP DB 08H, 21H ;2938: JZ 295A DB 58H, 62H, 0ADH, 62H, 90H;293A: D MCPY3 [62AD],[6290] DB 59H, 60H, 28H, 62H, 90H;293F: 8 ADD24 [6290],[6028] DB 82H, 21H ;2944: SYS 2104 DB 22H, 63H, 0E9H ;2946: 9 PUSH 63E9 DB 0DCH, 08H ;2949: SYS 08B8 DB 73H ;294B: PUSH 0001 DB 4FH ;294C: ISEQ DB 09H, 0D2H ;294D: JZ 2920 DB 72H ;294F: PUSH 0000 DB 41H, 1AH ;2950: LD [601A], TOS.0 DB 23H, 07H ;2952: PUSH 07 DB 0B1H, 25H ;2954: SYS 2562 DB 13H ;2956: ISZ TOS DB 75H ;2957: PUSH 0003 DB 0AH, 03H ;2958: JP 295C DB 23H, 0EH ;295A: PUSH 0E DB 5BH, 62H, 93H, 62H, 90H;295C: 3 LDBNK 6293, [6290] DB 11H ;2961: RET DB 15H ;2962: 15 DB 58H, 62H, 90H, 60H, 4BH;2963: 0 MCPY3 [6290],[604B] DB 58H, 63H, 0E9H, 60H, 48H;2968: 9 MCPY3 [63E9],[6048] DB 72H ;296D: PUSH 0000 DB 3DH, 63H, 0E8H ;296E: 8 LD [63E8], TOS.0 DB 8FH, 29H ;2971: SYS 291E DB 11H ;2973: RET DB 15H ;2974: 15 DB 58H, 62H, 90H, 21H, 87H;2975: 0 MCPY3 [6290],[2187] DB 58H, 63H, 0E9H, 21H, 8AH;297A: 9 MCPY3 [63E9],[218A] DB 73H ;297F: PUSH 0001 DB 3DH, 63H, 0E8H ;2980: 8 LD [63E8], TOS.0 DB 8FH, 29H ;2983: SYS 291E DB 11H ;2985: RET DB 15H ;2986: 15 DB 0B1H, 29H ;2987: SYS 2962 DB 1FH ;2989: DUPNZ DB 13H ;298A: ISZ TOS DB 08H, 03H ;298B: JZ 298F DB 0BAH, 29H ;298D: SYS 2974 DB 11H ;298F: RET DB 15H ;2990: 15 DB 0DDH, 28H ;2991: SYS 28BA DB 0C3H, 29H ;2993: SYS 2986 DB 13H ;2995: ISZ TOS DB 08H, 05H ;2996: JZ 299C DB 23H, 04H ;2998: PUSH 04 DB 0B1H, 25H ;299A: SYS 2562 DB 11H ;299C: RET DB 0FFH ;299D: FF DB 15H ;299E: 15 DB 22H, 21H, 48H ;299F: 8 PUSH 2148 DB 37H ;29A2: LDVCD [TOS] DB 0B1H, 29H ;29A3: SYS 2962 DB 1CH ;29A5: DROP DB 58H, 62H, 90H, 62H, 0ADH;29A6: 0 MCPY3 [6290],[62AD] DB 75H ;29AB: PUSH 0003 DB 5BH, 62H, 93H, 62H, 90H;29AC: 3 LDBNK 6293, [6290] DB 11H ;29B1: RET DB 15H ;29B2: 15 DB 75H ;29B3: PUSH 0003 DB 5BH, 62H, 0AAH, 62H, 0A1H;29B4: A LDBNK 62AA, [62A1] DB 8CH, 21H ;29B9: SYS 2118 DB 8AH, 21H ;29BB: SYS 2114 DB 6EH ;29BD: SUB24 [NOS], [TOS] DB 59H, 62H, 0A1H, 62H, 0AAH;29BE: 1 ADD24 [62AA],[62A1] DB 11H ;29C3: RET DB 15H ;29C4: 15 DB 58H, 62H, 0C2H, 62H, 0A4H;29C5: 2 MCPY3 [62C2],[62A4] DB 94H, 21H ;29CA: SYS 2128 DB 0AEH, 0AH ;29CC: SYS 0A5C DB 58H, 62H, 0BCH, 62H, 0C2H;29CE: C MCPY3 [62BC],[62C2] DB 59H, 62H, 0AAH, 62H, 0BCH;29D3: A ADD24 [62BC],[62AA] DB 58H, 62H, 0BFH, 62H, 90H;29D8: F MCPY3 [62BF],[6290] DB 59H, 62H, 93H, 62H, 0BFH;29DD: 3 ADD24 [62BF],[6293] DB 58H, 62H, 0A1H, 62H, 90H;29E2: 1 MCPY3 [62A1],[6290] DB 11H ;29E7: RET DB 15H ;29E8: 15 DB 58H, 62H, 0BCH, 62H, 0A4H;29E9: C MCPY3 [62BC],[62A4] DB 58H, 62H, 0BFH, 62H, 0A4H;29EE: F MCPY3 [62BF],[62A4] DB 59H, 62H, 0AAH, 62H, 0BFH;29F3: A ADD24 [62BF],[62AA] DB 58H, 62H, 0C2H, 62H, 90H;29F8: 2 MCPY3 [62C2],[6290] DB 59H, 62H, 93H, 62H, 0C2H;29FD: 3 ADD24 [62C2],[6293] DB 94H, 21H ;2A02: SYS 2128 DB 0AEH, 0AH ;2A04: SYS 0A5C DB 58H, 62H, 0A1H, 62H, 90H;2A06: 1 MCPY3 [62A1],[6290] DB 88H, 21H ;2A0B: SYS 2110 DB 8CH, 21H ;2A0D: SYS 2118 DB 6EH ;2A0F: SUB24 [NOS], [TOS] DB 11H ;2A10: RET DB 0FFH ;2A11: FF DB 15H ;2A12: 15 DB 82H, 21H ;2A13: SYS 2104 DB 88H, 21H ;2A15: SYS 2110 DB 0DCH, 08H ;2A17: SYS 08B8 DB 1FH ;2A19: DUPNZ DB 08H, 43H ;2A1A: JZ 2A5E DB 03H ;2A1C: ADD TOS, 1 DB 75H ;2A1D: PUSH 0003 DB 5BH, 62H, 0A7H, 62H, 0A1H;2A1E: 7 LDBNK 62A7, [62A1] DB 22H, 62H, 0A7H ;2A23: 7 PUSH 62A7 DB 8CH, 21H ;2A26: SYS 2118 DB 6EH ;2A28: SUB24 [NOS], [TOS] DB 75H ;2A29: PUSH 0003 DB 5AH, 62H, 0A1H, 62H, 0A7H;2A2A: 1 STBNK [62A1], 62A7 DB 75H ;2A2F: PUSH 0003 DB 5BH, 62H, 0ADH, 62H, 90H;2A30: D LDBNK 62AD, [6290] DB 59H, 62H, 0AAH, 62H, 0ADH;2A35: A ADD24 [62AD],[62AA] DB 75H ;2A3A: PUSH 0003 DB 5AH, 62H, 90H, 62H, 0ADH;2A3B: 0 STBNK [6290], 62AD DB 08H, 05H ;2A40: JZ 2A46 DB 0F4H, 29H ;2A42: SYS 29E8 DB 0AH, 03H ;2A44: JP 2A48 DB 0E2H, 29H ;2A46: SYS 29C4 DB 87H, 29H ;2A48: SYS 290E DB 8DH, 23H ;2A4A: SYS 231A DB 89H, 29H ;2A4C: SYS 2912 DB 75H ;2A4E: PUSH 0003 DB 5BH, 62H, 0A4H, 62H, 0A1H;2A4F: 4 LDBNK 62A4, [62A1] DB 59H, 62H, 0A1H, 62H, 0A4H;2A54: 1 ADD24 [62A4],[62A1] DB 8AH, 21H ;2A59: SYS 2114 DB 8CH, 21H ;2A5B: SYS 2118 DB 6EH ;2A5D: SUB24 [NOS], [TOS] DB 11H ;2A5E: RET DB 0FFH ;2A5F: FF DB 15H ;2A60: 15 DB 8AH, 21H ;2A61: SYS 2114 DB 97H, 15H ;2A63: SYS 152E DB 8AH, 21H ;2A65: SYS 2114 DB 8DH, 0FH ;2A67: SYS 0F1A DB 8CH, 21H ;2A69: SYS 2118 DB 60H ;2A6B: LD TOS, VD DB 70H ;2A6C: SUB24 [NOS], TOS DB 11H ;2A6D: RET DB 15H ;2A6E: 15 DB 86H, 21H ;2A6F: SYS 210C DB 22H, 60H, 38H ;2A71: 8 PUSH 6038 DB 23H, 0BH ;2A74: PUSH 0B DB 1AH ;2A76: MCPY [NOS], [3OS] DB 0CFH, 29H ;2A77: SYS 299E DB 22H, 60H, 38H ;2A79: 8 PUSH 6038 DB 86H, 21H ;2A7C: SYS 210C DB 23H, 0BH ;2A7E: PUSH 0B DB 1AH ;2A80: MCPY [NOS], [3OS] DB 89H, 2AH ;2A81: SYS 2A12 DB 58H, 62H, 0A7H, 62H, 0A4H;2A83: 7 MCPY3 [62A7],[62A4] DB 22H, 62H, 0A7H ;2A88: 7 PUSH 62A7 DB 88H, 21H ;2A8B: SYS 2110 DB 6EH ;2A8D: SUB24 [NOS], [TOS] DB 75H ;2A8E: PUSH 0003 DB 5AH, 62H, 0A1H, 62H, 0A7H;2A8F: 1 STBNK [62A1], 62A7 DB 58H, 62H, 0A1H, 62H, 0A4H;2A94: 1 MCPY3 [62A1],[62A4] DB 8CH, 21H ;2A99: SYS 2118 DB 5DH ;2A9B: LD VC, TOS DB 75H ;2A9C: PUSH 0003 DB 5FH ;2A9D: LD VD, TOS DB 0B0H, 2AH ;2A9E: SYS 2A60 DB 86H, 21H ;2AA0: SYS 210C DB 5DH ;2AA2: LD VC, TOS DB 23H, 40H ;2AA3: PUSH 40 DB 3DH, 62H, 9FH ;2AA5: F LD [629F], TOS.0 DB 23H, 0BH ;2AA8: PUSH 0B DB 5FH ;2AAA: LD VD, TOS DB 0B0H, 2AH ;2AAB: SYS 2A60 DB 11H ;2AAD: RET DB 15H ;2AAE: 15 S2AAF DB 67H ;2AAF: LD VE, [RP] DB 0D5H, 28H ;2AB0: SYS 28AA DB 23H, 0EH ;2AB2: PUSH 0E DB 87H, 26H ;2AB4: SYS 260E DB 0B7H, 2AH ;2AB6: SYS 2A6E DB 29H ;2AB8: NAVBK DB 11H ;2AB9: RET DB 15H ;2ABA: 15 DB 58H, 62H, 0C2H, 62H, 90H;2ABB: 2 MCPY3 [62C2],[6290] DB 94H, 21H ;2AC0: SYS 2128 DB 0AEH, 0AH ;2AC2: SYS 0A5C DB 58H, 62H, 0BCH, 62H, 0C2H;2AC4: C MCPY3 [62BC],[62C2] DB 59H, 62H, 93H, 62H, 0BCH;2AC9: 3 ADD24 [62BC],[6293] DB 58H, 62H, 0BFH, 62H, 0A4H;2ACE: F MCPY3 [62BF],[62A4] DB 59H, 62H, 0AAH, 62H, 0BFH;2AD3: A ADD24 [62BF],[62AA] DB 11H ;2AD8: RET DB 0FFH ;2AD9: FF DB 15H ;2ADA: 15 DB 58H, 62H, 0BFH, 62H, 90H;2ADB: F MCPY3 [62BF],[6290] DB 59H, 62H, 93H, 62H, 0BFH;2AE0: 3 ADD24 [62BF],[6293] DB 58H, 62H, 0BCH, 62H, 90H;2AE5: C MCPY3 [62BC],[6290] DB 58H, 62H, 0C2H, 62H, 0A4H;2AEA: 2 MCPY3 [62C2],[62A4] DB 94H, 21H ;2AEF: SYS 2128 DB 0AEH, 0AH ;2AF1: SYS 0A5C DB 88H, 21H ;2AF3: SYS 2110 DB 84H, 21H ;2AF5: SYS 2108 DB 6EH ;2AF7: SUB24 [NOS], [TOS] DB 8AH, 21H ;2AF8: SYS 2114 DB 84H, 21H ;2AFA: SYS 2108 DB 6EH ;2AFC: SUB24 [NOS], [TOS] DB 11H ;2AFD: RET DB 15H ;2AFE: 15 DB 75H ;2AFF: PUSH 0003 DB 5AH, 62H, 0A1H, 21H, 45H;2B00: 1 STBNK [62A1], 2145 DB 0CFH, 29H ;2B05: SYS 299E DB 58H, 62H, 0A1H, 62H, 90H;2B07: 1 MCPY3 [62A1],[6290] DB 58H, 62H, 0A4H, 62H, 0A1H;2B0C: 4 MCPY3 [62A4],[62A1] DB 59H, 62H, 93H, 62H, 0A4H;2B11: 3 ADD24 [62A4],[6293] DB 11H ;2B16: RET DB 0FFH ;2B17: FF DB 15H ;2B18: 15 DB 75H ;2B19: PUSH 0003 DB 5BH, 62H, 0A7H, 62H, 0A1H;2B1A: 7 LDBNK 62A7, [62A1] DB 82H, 21H ;2B1F: SYS 2104 DB 88H, 21H ;2B21: SYS 2110 DB 0DCH, 08H ;2B23: SYS 08B8 DB 1FH ;2B25: DUPNZ DB 08H, 12H ;2B26: JZ 2B39 DB 03H ;2B28: ADD TOS, 1 DB 08H, 05H ;2B29: JZ 2B2F DB 0DDH, 2AH ;2B2B: SYS 2ABA DB 0AH, 03H ;2B2D: JP 2B31 DB 0EDH, 2AH ;2B2F: SYS 2ADA DB 87H, 29H ;2B31: SYS 290E DB 8DH, 23H ;2B33: SYS 231A DB 89H, 29H ;2B35: SYS 2912 DB 0AH, 03H ;2B37: JP 2B3B DB 0FFH, 2AH ;2B39: SYS 2AFE DB 59H, 62H, 93H, 62H, 0A7H;2B3B: 3 ADD24 [62A7],[6293] DB 75H ;2B40: PUSH 0003 DB 5AH, 62H, 0A1H, 62H, 0A7H;2B41: 1 STBNK [62A1], 62A7 DB 0D9H, 29H ;2B46: SYS 29B2 DB 11H ;2B48: RET DB 0FFH ;2B49: FF DB 15H ;2B4A: 15 S2B4B DB 67H ;2B4B: LD VE, [RP] DB 0D5H, 28H ;2B4C: SYS 28AA DB 53H, 0FH ;2B4E: PUSH [VE].0, 0F DB 3DH, 62H, 96H ;2B50: 6 LD [6296], TOS.0 DB 0DDH, 28H ;2B53: SYS 28BA DB 0B1H, 29H ;2B55: SYS 2962 DB 08H, 07H ;2B57: JZ 2B5F DB 8CH, 2BH ;2B59: SYS 2B18 DB 42H, 60H ;2B5B: LD [60BD], 60 DB 0AH, 03H ;2B5D: JP 2B61 DB 42H, 61H ;2B5F: LD [60BD], 61 DB 29H ;2B61: NAVBK DB 11H ;2B62: RET DB 0FFH ;2B63: FF DB 15H ;2B64: 15 DB 52H, 00H ;2B65: PUSH VE, 00 DB 23H, 0EH ;2B67: PUSH 0E DB 6FH ;2B69: ADD24 [NOS], TOS DB 52H, 00H ;2B6A: PUSH VE, 00 DB 52H, 06H ;2B6C: PUSH VE, 06 DB 31H ;2B6E: MCPY3 [TOS], [NOS] DB 72H ;2B6F: PUSH 0000 DB 56H, 0CH ;2B70: POP [VE], 0C DB 53H, 0EH ;2B72: PUSH [VE].0, 0E DB 23H, 02H ;2B74: PUSH 02 DB 4FH ;2B76: ISEQ DB 08H, 0CH ;2B77: JZ 2B84 DB 22H, 60H, 0B7H ;2B79: 7 PUSH 60B7 DB 52H, 09H ;2B7C: PUSH VE, 09 DB 31H ;2B7E: MCPY3 [TOS], [NOS] DB 52H, 09H ;2B7F: PUSH VE, 09 DB 55H, 11H ;2B81: PUSH [VE], 11 DB 6FH ;2B83: ADD24 [NOS], TOS DB 42H, 60H ;2B84: LD [60BD], 60 DB 11H ;2B86: RET DB 0FFH ;2B87: FF DB 15H ;2B88: 15 S2B89 DB 67H ;2B89: LD VE, [RP] DB 0D5H, 28H ;2B8A: SYS 28AA DB 42H, 61H ;2B8C: LD [60BD], 61 DB 0DDH, 28H ;2B8E: SYS 28BA DB 0B1H, 29H ;2B90: SYS 2962 DB 08H, 0FH ;2B92: JZ 2BA2 DB 89H, 2AH ;2B94: SYS 2A12 DB 88H, 21H ;2B96: SYS 2110 DB 52H, 00H ;2B98: PUSH VE, 00 DB 31H ;2B9A: MCPY3 [TOS], [NOS] DB 8AH, 21H ;2B9B: SYS 2114 DB 52H, 03H ;2B9D: PUSH VE, 03 DB 31H ;2B9F: MCPY3 [TOS], [NOS] DB 0B2H, 2BH ;2BA0: SYS 2B64 DB 29H ;2BA2: NAVBK DB 11H ;2BA3: RET DB 15H ;2BA4: 15 DB 67H ;2BA5: LD VE, [RP] DB 0D5H, 28H ;2BA6: SYS 28AA DB 42H, 61H ;2BA8: LD [60BD], 61 DB 0DDH, 28H ;2BAA: SYS 28BA DB 0C3H, 29H ;2BAC: SYS 2986 DB 08H, 21H ;2BAE: JZ 2BD0 DB 82H, 21H ;2BB0: SYS 2104 DB 52H, 00H ;2BB2: PUSH VE, 00 DB 31H ;2BB4: MCPY3 [TOS], [NOS] DB 88H, 21H ;2BB5: SYS 2110 DB 82H, 21H ;2BB7: SYS 2104 DB 0DCH, 08H ;2BB9: SYS 08B8 DB 08H, 0DH ;2BBB: JZ 2BC9 DB 82H, 21H ;2BBD: SYS 2104 DB 52H, 03H ;2BBF: PUSH VE, 03 DB 31H ;2BC1: MCPY3 [TOS], [NOS] DB 52H, 03H ;2BC2: PUSH VE, 03 DB 84H, 21H ;2BC4: SYS 2108 DB 32H ;2BC6: ADD24 [NOS], [TOS] DB 0AH, 06H ;2BC7: JP 2BCE DB 8AH, 21H ;2BC9: SYS 2114 DB 52H, 03H ;2BCB: PUSH VE, 03 DB 31H ;2BCD: MCPY3 [TOS], [NOS] DB 0B2H, 2BH ;2BCE: SYS 2B64 DB 11H ;2BD0: RET DB 0FFH ;2BD1: FF DB 15H ;2BD2: 15 S2BD3 DB 67H ;2BD3: LD VE, [RP] DB 0D5H, 28H ;2BD4: SYS 28AA DB 75H ;2BD6: PUSH 0003 DB 5BH, 62H, 0AAH, 62H, 0A1H;2BD7: A LDBNK 62AA, [62A1] DB 8CH, 21H ;2BDC: SYS 2118 DB 23H, 0EH ;2BDE: PUSH 0E DB 70H ;2BE0: SUB24 [NOS], TOS DB 58H, 62H, 0A4H, 62H, 0A1H;2BE1: 4 MCPY3 [62A4],[62A1] DB 8AH, 21H ;2BE6: SYS 2114 DB 23H, 0EH ;2BE8: PUSH 0E DB 6FH ;2BEA: ADD24 [NOS], TOS DB 8AH, 21H ;2BEB: SYS 2114 DB 52H, 00H ;2BED: PUSH VE, 00 DB 31H ;2BEF: MCPY3 [TOS], [NOS] DB 8AH, 21H ;2BF0: SYS 2114 DB 52H, 03H ;2BF2: PUSH VE, 03 DB 31H ;2BF4: MCPY3 [TOS], [NOS] DB 11H ;2BF5: RET DB 15H ;2BF6: 15 S2BF7 DB 0D2H, 2BH ;2BF7: SYS 2BA4 DB 29H ;2BF9: NAVBK DB 11H ;2BFA: RET DB 0FFH ;2BFB: FF DB 15H ;2BFC: 15 S2BFD DB 0D2H, 2BH ;2BFD: SYS 2BA4 DB 40H, 0BDH ;2BFF: LD TOS.0, [60BD] DB 23H, 61H ;2C01: PUSH 61 DB 4FH ;2C03: ISEQ DB 08H, 05H ;2C04: JZ 2C0A DB 23H, 04H ;2C06: PUSH 04 DB 0B1H, 25H ;2C08: SYS 2562 DB 57H, 62H, 9FH, 80H ;2C0A: F80 LDAND 629F, 80 DB 08H, 05H ;2C0E: JZ 2C14 DB 55H, 01H ;2C10: PUSH [VE], 01 DB 0AH, 08H ;2C12: JP 2C1B DB 0AFH, 21H ;2C14: SYS 215E DB 0D2H, 22H ;2C16: SYS 22A4 DB 22H, 74H, 00H ;2C18: 0 PUSH 7400 DB 3BH, 63H, 0B8H ;2C1B: 8 LD [63B8], TOS DB 11H ;2C1E: RET DB 0FFH ;2C1F: FF DB 15H ;2C20: 15 S2C21 DB 67H ;2C21: LD VE, [RP] DB 0D5H, 28H ;2C22: SYS 28AA DB 52H, 0FH ;2C24: PUSH VE, 0F DB 5DH ;2C26: LD VC, TOS DB 53H, 0FH ;2C27: PUSH [VE].0, 0F DB 13H ;2C29: ISZ TOS DB 13H ;2C2A: ISZ TOS DB 5FH ;2C2B: LD VD, TOS DB 0C3H, 29H ;2C2C: SYS 2986 DB 08H, 05H ;2C2E: JZ 2C34 DB 42H, 60H ;2C30: LD [60BD], 60 DB 0AH, 03H ;2C32: JP 2C36 DB 42H, 61H ;2C34: LD [60BD], 61 DB 29H ;2C36: NAVBK DB 11H ;2C37: RET DB 15H ;2C38: 15 S2C39 DB 67H ;2C39: LD VE, [RP] DB 0D5H, 28H ;2C3A: SYS 28AA DB 52H, 0FH ;2C3C: PUSH VE, 0F DB 5DH ;2C3E: LD VC, TOS DB 53H, 0FH ;2C3F: PUSH [VE].0, 0F DB 13H ;2C41: ISZ TOS DB 13H ;2C42: ISZ TOS DB 5FH ;2C43: LD VD, TOS DB 59H, 62H, 93H, 62H, 90H;2C44: 3 ADD24 [6290],[6293] DB 8FH, 29H ;2C49: SYS 291E DB 1EH ;2C4B: DUP DB 3CH, 63H, 0E8H ;2C4C: 8 LD TOS.0, [63E8] DB 33H ;2C4F: OR TOS, NOS DB 13H ;2C50: ISZ TOS DB 08H, 04H ;2C51: JZ 2C56 DB 1CH ;2C53: DROP DB 0BAH, 29H ;2C54: SYS 2974 DB 08H, 05H ;2C56: JZ 2C5C DB 42H, 60H ;2C58: LD [60BD], 60 DB 0AH, 03H ;2C5A: JP 2C5E DB 42H, 61H ;2C5C: LD [60BD], 61 DB 29H ;2C5E: NAVBK DB 11H ;2C5F: RET DB 15H ;2C60: 15 S2C61 DB 67H ;2C61: LD VE, [RP] DB 0D5H, 28H ;2C62: SYS 28AA DB 22H, 60H, 0B7H ;2C64: 7 PUSH 60B7 DB 52H, 00H ;2C67: PUSH VE, 00 DB 31H ;2C69: MCPY3 [TOS], [NOS] DB 52H, 00H ;2C6A: PUSH VE, 00 DB 6AH ;2C6C: LD TOS, [RP] DB 6FH ;2C6D: ADD24 [NOS], TOS DB 52H, 00H ;2C6E: PUSH VE, 00 DB 52H, 06H ;2C70: PUSH VE, 06 DB 31H ;2C72: MCPY3 [TOS], [NOS] DB 52H, 00H ;2C73: PUSH VE, 00 DB 52H, 03H ;2C75: PUSH VE, 03 DB 31H ;2C77: MCPY3 [TOS], [NOS] DB 52H, 03H ;2C78: PUSH VE, 03 DB 6AH ;2C7A: LD TOS, [RP] DB 6FH ;2C7B: ADD24 [NOS], TOS DB 72H ;2C7C: PUSH 0000 DB 56H, 0CH ;2C7D: POP [VE], 0C DB 11H ;2C7F: RET DB 15H ;2C80: 15 S2C81 DB 52H, 00H ;2C81: PUSH VE, 00 DB 0ABH, 0BH ;2C83: SYS 0B56 DB 1FH ;2C85: DUPNZ DB 08H, 0DH ;2C86: JZ 2C94 DB 3DH, 63H, 0EFH ;2C88: F LD [63EF], TOS.0 DB 23H, 61H ;2C8B: PUSH 61 DB 23H, 01H ;2C8D: PUSH 01 DB 3DH, 63H, 8FH ;2C8F: F LD [638F], TOS.0 DB 0AH, 03H ;2C92: JP 2C96 DB 23H, 60H ;2C94: PUSH 60 DB 11H ;2C96: RET DB 0FFH ;2C97: FF DB 15H ;2C98: 15 S2C99 DB 23H, 61H ;2C99: PUSH 61 DB 23H, 04H ;2C9B: PUSH 04 DB 3DH, 63H, 8FH ;2C9D: F LD [638F], TOS.0 DB 53H, 02H ;2CA0: PUSH [VE].0, 02 DB 72H ;2CA2: PUSH 0000 DB 52H, 04H ;2CA3: PUSH VE, 04 DB 5DH ;2CA5: LD VC, TOS DB 53H, 03H ;2CA6: PUSH [VE].0, 03 DB 5FH ;2CA8: LD VD, TOS DB 0EH ;2CA9: LOOP FRAME DB 0DFH, 08H ;2CAA: SYS 08BE DB 73H ;2CAC: PUSH 0001 DB 4FH ;2CAD: ISEQ DB 60H ;2CAE: LD TOS, VD DB 22H, 60H, 5AH ;2CAF: A PUSH 605A DB 05H ;2CB2: ADD [TOS], NOS DB 0DFH, 08H ;2CB3: SYS 08BE DB 14H ;2CB5: ISNEG TOS DB 00H ;2CB6: ADD TOS, NOS DB 13H ;2CB7: ISZ TOS DB 60H ;2CB8: LD TOS, VD DB 22H, 60H, 5AH ;2CB9: A PUSH 605A DB 05H ;2CBC: ADD [TOS], NOS DB 08H, 05H ;2CBD: JZ 2CC3 DB 1CH ;2CBF: DROP DB 5EH ;2CC0: LD TOS, VC DB 17H ;2CC1: LD TOS.0, [TOS] DB 0FH ;2CC2: LOOP CLR DB 73H ;2CC3: PUSH 0001 DB 22H, 60H, 5AH ;2CC4: A PUSH 605A DB 05H ;2CC7: ADD [TOS], NOS DB 0CH, 0E1H ;2CC8: LOOP 2CAA DB 11H ;2CCA: RET DB 0FFH ;2CCB: FF DB 15H ;2CCC: 15 S2CCD DB 52H, 00H ;2CCD: PUSH VE, 00 DB 8EH, 21H ;2CCF: SYS 211C DB 36H ;2CD1: LD24 [TOS], NOS DB 62H ;2CD2: LD TOS, VA DB 5DH ;2CD3: LD VC, TOS DB 64H ;2CD4: LD TOS, VB DB 5FH ;2CD5: LD VD, TOS DB 8EH, 21H ;2CD6: SYS 211C DB 0E9H, 16H ;2CD8: SYS 16D2 DB 13H ;2CDA: ISZ TOS DB 08H, 09H ;2CDB: JZ 2CE5 DB 1CH ;2CDD: DROP DB 23H, 61H ;2CDE: PUSH 61 DB 23H, 05H ;2CE0: PUSH 05 DB 3DH, 63H, 8FH ;2CE2: F LD [638F], TOS.0 DB 11H ;2CE5: RET DW S2583 ;2CE6: 25 83 DW S2C81 ;2CE8: 2C 81 DW S2C99 ;2CEA: 2C 99 DW S2CCD ;2CEC: 2C CD DB 15H ;2CEE: 15 DB 3AH, 63H, 92H ;2CEF: 2 LD TOS, [6392] DB 3FH, 5EH ;2CF2: LD [605E], TOS DB 53H, 01H ;2CF4: PUSH [VE].0, 01 DB 66H, 2CH, 0E6H ;2CF6: 6 CALLI 2CE6 DB 11H ;2CF9: RET DB 15H ;2CFA: 15 S2CFB DB 6AH ;2CFB: LD TOS, [RP] DB 0C9H, 22H ;2CFC: SYS 2292 DB 0DFH, 13H ;2CFE: SYS 13BE DB 62H ;2D00: LD TOS, VA DB 5DH ;2D01: LD VC, TOS DB 64H ;2D02: LD TOS, VB DB 5FH ;2D03: LD VD, TOS DB 0F7H, 2CH ;2D04: SYS 2CEE DB 41H, 0BDH ;2D06: LD [60BD], TOS.0 DB 29H ;2D08: NAVBK DB 11H ;2D09: RET DB 15H ;2D0A: 15 S2D0B DB 52H, 06H ;2D0B: PUSH VE, 06 DB 39H ;2D0D: LDBNK [TOS] DB 41H, 0BDH ;2D0E: LD [60BD], TOS.0 DB 11H ;2D10: RET DB 0FFH ;2D11: FF DB 15H ;2D12: 15 S2D13 DB 42H, 60H ;2D13: LD [60BD], 60 DB 11H ;2D15: RET DB 15H ;2D16: 15 S2D17 DB 53H, 10H ;2D17: PUSH [VE].0, 10 DB 5FH ;2D19: LD VD, TOS DB 52H, 06H ;2D1A: PUSH VE, 06 DB 0C8H, 15H ;2D1C: SYS 1590 DB 52H, 09H ;2D1E: PUSH VE, 09 DB 0E9H, 16H ;2D20: SYS 16D2 DB 41H, 0BDH ;2D22: LD [60BD], TOS.0 DB 5FH ;2D24: LD VD, TOS DB 11H ;2D25: RET DW S2D13 ;2D26: 2D 13 DW S2D0B ;2D28: 2D 0B DW S2D17 ;2D2A: 2D 17 DB 15H ;2D2C: 15 S2D2D DB 52H, 00H ;2D2D: PUSH VE, 00 DB 52H, 06H ;2D2F: PUSH VE, 06 DB 31H ;2D31: MCPY3 [TOS], [NOS] DB 11H ;2D32: RET DB 0FFH ;2D33: FF DB 15H ;2D34: 15 S2D35 DB 52H, 06H ;2D35: PUSH VE, 06 DB 0A3H, 0AH ;2D37: SYS 0A46 DB 11H ;2D39: RET DB 15H ;2D3A: 15 S2D3B DB 52H, 06H ;2D3B: PUSH VE, 06 DB 55H, 11H ;2D3D: PUSH [VE], 11 DB 6FH ;2D3F: ADD24 [NOS], TOS DB 11H ;2D40: RET DB 0FFH ;2D41: FF DB 15H ;2D42: 15 S2D43 DB 8BH, 2DH ;2D43: SYS 2D16 DB 52H, 06H ;2D45: PUSH VE, 06 DB 60H ;2D47: LD TOS, VD DB 6FH ;2D48: ADD24 [NOS], TOS DB 11H ;2D49: RET DW S2D3B ;2D4A: 2D 3B DW S2D35 ;2D4C: 2D 35 DW S2D43 ;2D4E: 2D 43 DB 15H ;2D50: 15 S2D51 DB 53H, 0EH ;2D51: PUSH [VE].0, 0E DB 66H, 2DH, 4AH ;2D53: A CALLI 2D4A DB 11H ;2D56: RET DB 0FFH ;2D57: FF DB 15H ;2D58: 15 S2D59 DB 52H, 03H ;2D59: PUSH VE, 03 DB 52H, 06H ;2D5B: PUSH VE, 06 DB 31H ;2D5D: MCPY3 [TOS], [NOS] DB 52H, 06H ;2D5E: PUSH VE, 06 DB 0AEH, 0AH ;2D60: SYS 0A5C DB 11H ;2D62: RET DB 0FFH ;2D63: FF DB 15H ;2D64: 15 S2D65 DB 52H, 03H ;2D65: PUSH VE, 03 DB 52H, 06H ;2D67: PUSH VE, 06 DB 31H ;2D69: MCPY3 [TOS], [NOS] DB 52H, 06H ;2D6A: PUSH VE, 06 DB 55H, 11H ;2D6C: PUSH [VE], 11 DB 70H ;2D6E: SUB24 [NOS], TOS DB 11H ;2D6F: RET DB 15H ;2D70: 15 S2D71 DB 22H, 63H, 5CH ;2D71: C PUSH 635C DB 5DH ;2D74: LD VC, TOS DB 73H ;2D75: PUSH 0001 DB 5FH ;2D76: LD VD, TOS DB 96H, 2DH ;2D77: SYS 2D2C DB 0F2H, 0BH ;2D79: SYS 0BE4 DB 08H, 0CH ;2D7B: JZ 2D88 DB 0A1H, 2DH ;2D7D: SYS 2D42 DB 52H, 06H ;2D7F: PUSH VE, 06 DB 52H, 03H ;2D81: PUSH VE, 03 DB 0DCH, 08H ;2D83: SYS 08B8 DB 03H ;2D85: ADD TOS, 1 DB 09H, 0F6H ;2D86: JZ 2D7D DB 52H, 06H ;2D88: PUSH VE, 06 DB 60H ;2D8A: LD TOS, VD DB 70H ;2D8B: SUB24 [NOS], TOS DB 11H ;2D8C: RET DW S2D65 ;2D8D: 2D 65 DW S2D59 ;2D8F: 2D 59 DW S2D71 ;2D91: 2D 71 DB 0FFH ;2D93: FF DB 15H ;2D94: 15 S2D95 DB 53H, 0EH ;2D95: PUSH [VE].0, 0E DB 66H, 2DH, 8DH ;2D97: D CALLI 2D8D DB 11H ;2D9A: RET DB 0FFH ;2D9B: FF DB 15H ;2D9C: 15 S2D9D DB 52H, 06H ;2D9D: PUSH VE, 06 DB 0AEH, 0AH ;2D9F: SYS 0A5C DB 11H ;2DA1: RET DB 15H ;2DA2: 15 S2DA3 DB 52H, 06H ;2DA3: PUSH VE, 06 DB 55H, 11H ;2DA5: PUSH [VE], 11 DB 70H ;2DA7: SUB24 [NOS], TOS DB 11H ;2DA8: RET DB 0FFH ;2DA9: FF DB 15H ;2DAA: 15 S2DAB DB 52H, 03H ;2DAB: PUSH VE, 03 DB 22H, 63H, 0BFH ;2DAD: F PUSH 63BF DB 31H ;2DB0: MCPY3 [TOS], [NOS] DB 52H, 06H ;2DB1: PUSH VE, 06 DB 52H, 03H ;2DB3: PUSH VE, 03 DB 31H ;2DB5: MCPY3 [TOS], [NOS] DB 96H, 2DH ;2DB6: SYS 2D2C DB 0B8H, 2DH ;2DB8: SYS 2D70 DB 22H, 63H, 0BFH ;2DBA: F PUSH 63BF DB 52H, 03H ;2DBD: PUSH VE, 03 DB 31H ;2DBF: MCPY3 [TOS], [NOS] DB 11H ;2DC0: RET DW S2DA3 ;2DC1: 2D A3 DW S2D9D ;2DC3: 2D 9D DW S2DAB ;2DC5: 2D AB DB 0FFH ;2DC7: FF DB 15H ;2DC8: 15 S2DC9 DB 53H, 0EH ;2DC9: PUSH [VE].0, 0E DB 66H, 2DH, 0C1H ;2DCB: 1 CALLI 2DC1 DB 11H ;2DCE: RET DB 0FFH ;2DCF: FF DB 15H ;2DD0: 15 S2DD1 DB 52H, 06H ;2DD1: PUSH VE, 06 DB 64H ;2DD3: LD TOS, VB DB 6FH ;2DD4: ADD24 [NOS], TOS DB 11H ;2DD5: RET DB 15H ;2DD6: 15 S2DD7 DB 55H, 11H ;2DD7: PUSH [VE], 11 DB 64H ;2DD9: LD TOS, VB DB 06H ;2DDA: MUL TOS, NOS DB 1CH ;2DDB: DROP DB 52H, 06H ;2DDC: PUSH VE, 06 DB 22H, 60H, 45H ;2DDE: 5 PUSH 6045 DB 32H ;2DE1: ADD24 [NOS], [TOS] DB 11H ;2DE2: RET DB 0FFH ;2DE3: FF DB 15H ;2DE4: 15 S2DE5 DB 22H, 63H, 5CH ;2DE5: C PUSH 635C DB 5DH ;2DE8: LD VC, TOS DB 64H ;2DE9: LD TOS, VB DB 1FH ;2DEA: DUPNZ DB 08H, 0DH ;2DEB: JZ 2DF9 DB 72H ;2DED: PUSH 0000 DB 0EH ;2DEE: LOOP FRAME DB 0A1H, 2DH ;2DEF: SYS 2D42 DB 0F2H, 0BH ;2DF1: SYS 0BE4 DB 13H ;2DF3: ISZ TOS DB 08H, 02H ;2DF4: JZ 2DF7 DB 0FH ;2DF6: LOOP CLR DB 0CH, 0F7H ;2DF7: LOOP 2DEF DB 11H ;2DF9: RET DW S2DD7 ;2DFA: 2D D7 DW S2DD1 ;2DFC: 2D D1 DW S2DE5 ;2DFE: 2D E5 DB 15H ;2E00: 15 S2E01 DB 0DAH, 13H ;2E01: SYS 13B4 DB 22H, 60H, 58H ;2E03: 8 PUSH 6058 DB 61H ;2E06: LD VA, TOS DB 74H ;2E07: PUSH 0002 DB 63H ;2E08: LD VB, TOS DB 2CH ;2E09: NUMCP DB 76H ;2E0A: PUSH FFFF DB 22H, 60H, 58H ;2E0B: 8 PUSH 6058 DB 05H ;2E0E: ADD [TOS], NOS DB 96H, 2DH ;2E0F: SYS 2D2C DB 53H, 0EH ;2E11: PUSH [VE].0, 0E DB 66H, 2DH, 0FAH ;2E13: A CALLI 2DFA DB 11H ;2E16: RET DW S2D51 ;2E17: 2D 51 DW S2DC9 ;2E19: 2D C9 DW S2D2D ;2E1B: 2D 2D DW S2D95 ;2E1D: 2D 95 DW S2E01 ;2E1F: 2E 01 DB 0FFH ;2E21: FF DB 15H ;2E22: 15 S2E23 DB 67H ;2E23: LD VE, [RP] DB 22H, 63H, 5CH ;2E24: C PUSH 635C DB 5DH ;2E27: LD VC, TOS DB 2AH ;2E28: LD TOS.0, [RP] DB 66H, 2EH, 17H ;2E29: 7 CALLI 2E17 DB 42H, 63H ;2E2C: LD [60BD], 63 DB 0F2H, 0BH ;2E2E: SYS 0BE4 DB 08H, 06H ;2E30: JZ 2E37 DB 53H, 0EH ;2E32: PUSH [VE].0, 0E DB 66H, 2DH, 26H ;2E34: 6 CALLI 2D26 DB 72H ;2E37: PUSH 0000 DB 56H, 0CH ;2E38: POP [VE], 0C DB 29H ;2E3A: NAVBK DB 11H ;2E3B: RET DB 15H ;2E3C: 15 S2E3D DB 67H ;2E3D: LD VE, [RP] DB 0DAH, 13H ;2E3E: SYS 13B4 DB 42H, 63H ;2E40: LD [60BD], 63 DB 52H, 06H ;2E42: PUSH VE, 06 DB 55H, 0CH ;2E44: PUSH [VE], 0C DB 6FH ;2E46: ADD24 [NOS], TOS DB 0F2H, 0BH ;2E47: SYS 0BE4 DB 08H, 0DH ;2E49: JZ 2E57 DB 53H, 0EH ;2E4B: PUSH [VE].0, 0E DB 66H, 2DH, 26H ;2E4D: 6 CALLI 2D26 DB 60H ;2E50: LD TOS, VD DB 56H, 0CH ;2E51: POP [VE], 0C DB 52H, 06H ;2E53: PUSH VE, 06 DB 0C8H, 15H ;2E55: SYS 1590 DB 29H ;2E57: NAVBK DB 11H ;2E58: RET DB 0FFH ;2E59: FF DB 15H ;2E5A: 15 S2E5B DB 6AH ;2E5B: LD TOS, [RP] DB 5DH ;2E5C: LD VC, TOS DB 53H, 10H ;2E5D: PUSH [VE].0, 10 DB 5FH ;2E5F: LD VD, TOS DB 52H, 09H ;2E60: PUSH VE, 09 DB 8EH, 21H ;2E62: SYS 211C DB 31H ;2E64: MCPY3 [TOS], [NOS] DB 8EH, 21H ;2E65: SYS 211C DB 60H ;2E67: LD TOS, VD DB 03H ;2E68: ADD TOS, 1 DB 2AH ;2E69: LD TOS.0, [RP] DB 27H ;2E6A: SUB TOS, 1 DB 06H ;2E6B: MUL TOS, NOS DB 23H, 04H ;2E6C: PUSH 04 DB 00H ;2E6E: ADD TOS, NOS DB 6FH ;2E6F: ADD24 [NOS], TOS DB 8EH, 21H ;2E70: SYS 211C DB 0C8H, 15H ;2E72: SYS 1590 DB 8EH, 21H ;2E74: SYS 211C DB 9CH, 0FH ;2E76: SYS 0F38 DB 8EH, 21H ;2E78: SYS 211C DB 39H ;2E7A: LDBNK [TOS] DB 5FH ;2E7B: LD VD, TOS DB 11H ;2E7C: RET DW S13B5 ;2E7D: 13 B5 DW S13B5 ;2E7F: 13 B5 DW S2E5B ;2E81: 2E 5B DB 0FFH ;2E83: FF DB 15H ;2E84: 15 S2E85 DB 67H ;2E85: LD VE, [RP] DB 53H, 0EH ;2E86: PUSH [VE].0, 0E DB 66H, 2EH, 7DH ;2E88: D CALLI 2E7D DB 60H ;2E8B: LD TOS, VD DB 87H, 26H ;2E8C: SYS 260E DB 0B0H, 2AH ;2E8E: SYS 2A60 DB 8AH, 21H ;2E90: SYS 2114 DB 52H, 03H ;2E92: PUSH VE, 03 DB 31H ;2E94: MCPY3 [TOS], [NOS] DB 29H ;2E95: NAVBK DB 11H ;2E96: RET DB 0FFH ;2E97: FF DB 15H ;2E98: 15 S2E99 DB 67H ;2E99: LD VE, [RP] DB 53H, 0EH ;2E9A: PUSH [VE].0, 0E DB 66H, 2EH, 7DH ;2E9C: D CALLI 2E7D DB 52H, 06H ;2E9F: PUSH VE, 06 DB 97H, 15H ;2EA1: SYS 152E DB 11H ;2EA3: RET DB 15H ;2EA4: 15 S2EA5 DB 67H ;2EA5: LD VE, [RP] DB 53H, 0EH ;2EA6: PUSH [VE].0, 0E DB 66H, 2EH, 7DH ;2EA8: D CALLI 2E7D DB 60H ;2EAB: LD TOS, VD DB 87H, 26H ;2EAC: SYS 260E DB 58H, 62H, 0C2H, 62H, 0A4H;2EAE: 2 MCPY3 [62C2],[62A4] DB 94H, 21H ;2EB3: SYS 2128 DB 0AEH, 0AH ;2EB5: SYS 0A5C DB 58H, 62H, 0BCH, 62H, 0C2H;2EB7: C MCPY3 [62BC],[62C2] DB 90H, 21H ;2EBC: SYS 2120 DB 60H ;2EBE: LD TOS, VD DB 6FH ;2EBF: ADD24 [NOS], TOS DB 52H, 06H ;2EC0: PUSH VE, 06 DB 92H, 21H ;2EC2: SYS 2124 DB 31H ;2EC4: MCPY3 [TOS], [NOS] DB 8AH, 21H ;2EC5: SYS 2114 DB 60H ;2EC7: LD TOS, VD DB 6FH ;2EC8: ADD24 [NOS], TOS DB 8AH, 21H ;2EC9: SYS 2114 DB 52H, 03H ;2ECB: PUSH VE, 03 DB 31H ;2ECD: MCPY3 [TOS], [NOS] DB 8DH, 23H ;2ECE: SYS 231A DB 52H, 06H ;2ED0: PUSH VE, 06 DB 97H, 15H ;2ED2: SYS 152E DB 0D9H, 29H ;2ED4: SYS 29B2 DB 72H ;2ED6: PUSH 0000 DB 56H, 0CH ;2ED7: POP [VE], 0C DB 29H ;2ED9: NAVBK DB 11H ;2EDA: RET DB 0FFH ;2EDB: FF DB 15H ;2EDC: 15 S2EDD DB 73H ;2EDD: PUSH 0001 DB 5FH ;2EDE: LD VD, TOS DB 11H ;2EDF: RET DB 15H ;2EE0: 15 S2EE1 DB 55H, 11H ;2EE1: PUSH [VE], 11 DB 5FH ;2EE3: LD VD, TOS DB 11H ;2EE4: RET DW S2EE1 ;2EE5: 2E E1 DW S2EDD ;2EE7: 2E DD DW S2D17 ;2EE9: 2D 17 DB 0FFH ;2EEB: FF DB 15H ;2EEC: 15 S2EED DB 67H ;2EED: LD VE, [RP] DB 0F2H, 0BH ;2EEE: SYS 0BE4 DB 08H, 3DH ;2EF0: JZ 2F2E DB 22H, 63H, 5CH ;2EF2: C PUSH 635C DB 5DH ;2EF5: LD VC, TOS DB 53H, 0EH ;2EF6: PUSH [VE].0, 0E DB 66H, 2EH, 0E5H ;2EF8: 5 CALLI 2EE5 DB 52H, 06H ;2EFB: PUSH VE, 06 DB 90H, 21H ;2EFD: SYS 2120 DB 31H ;2EFF: MCPY3 [TOS], [NOS] DB 58H, 62H, 0C2H, 62H, 0A4H;2F00: 2 MCPY3 [62C2],[62A4] DB 94H, 21H ;2F05: SYS 2128 DB 0AEH, 0AH ;2F07: SYS 0A5C DB 58H, 62H, 0BFH, 62H, 0BCH;2F09: F MCPY3 [62BF],[62BC] DB 92H, 21H ;2F0E: SYS 2124 DB 60H ;2F10: LD TOS, VD DB 6FH ;2F11: ADD24 [NOS], TOS DB 8AH, 21H ;2F12: SYS 2114 DB 60H ;2F14: LD TOS, VD DB 70H ;2F15: SUB24 [NOS], TOS DB 8AH, 21H ;2F16: SYS 2114 DB 52H, 03H ;2F18: PUSH VE, 03 DB 31H ;2F1A: MCPY3 [TOS], [NOS] DB 72H ;2F1B: PUSH 0000 DB 56H, 0CH ;2F1C: POP [VE], 0C DB 8DH, 23H ;2F1E: SYS 231A DB 0D9H, 29H ;2F20: SYS 29B2 DB 0F2H, 0BH ;2F22: SYS 0BE4 DB 08H, 05H ;2F24: JZ 2F2A DB 23H, 60H ;2F26: PUSH 60 DB 0AH, 03H ;2F28: JP 2F2C DB 23H, 63H ;2F2A: PUSH 63 DB 0AH, 03H ;2F2C: JP 2F30 DB 23H, 61H ;2F2E: PUSH 61 DB 41H, 0BDH ;2F30: LD [60BD], TOS.0 DB 29H ;2F32: NAVBK DB 11H ;2F33: RET DB 15H ;2F34: 15 DB 5EH ;2F35: LD TOS, VC DB 60H ;2F36: LD TOS, VD DB 0AFH, 21H ;2F37: SYS 215E DB 8EH, 21H ;2F39: SYS 211C DB 61H ;2F3B: LD VA, TOS DB 75H ;2F3C: PUSH 0003 DB 63H ;2F3D: LD VB, TOS DB 52H, 11H ;2F3E: PUSH VE, 11 DB 5DH ;2F40: LD VC, TOS DB 74H ;2F41: PUSH 0002 DB 5FH ;2F42: LD VD, TOS DB 0CAH, 26H ;2F43: SYS 2694 DB 5FH ;2F45: LD VD, TOS DB 5DH ;2F46: LD VC, TOS DB 3EH, 2EH ;2F47: LD TOS, [602E] DB 11H ;2F49: RET DB 15H ;2F4A: 15 S2F4B DB 96H, 2DH ;2F4B: SYS 2D2C DB 9AH, 2FH ;2F4D: SYS 2F34 DB 03H ;2F4F: ADD TOS, 1 DB 3BH, 63H, 0BDH ;2F50: D LD [63BD], TOS DB 72H ;2F53: PUSH 0000 DB 3BH, 63H, 0BBH ;2F54: B LD [63BB], TOS DB 3AH, 63H, 0BBH ;2F57: B LD TOS, [63BB] DB 1EH ;2F5A: DUP DB 3AH, 63H, 0BDH ;2F5B: D LD TOS, [63BD] DB 91H, 07H ;2F5E: SYS 0722 DB 1EH ;2F60: DUP DB 27H ;2F61: SUB TOS, 1 DB 63H ;2F62: LD VB, TOS DB 4FH ;2F63: ISEQ DB 3AH, 63H, 0BDH ;2F64: D LD TOS, [63BD] DB 64H ;2F67: LD TOS, VB DB 03H ;2F68: ADD TOS, 1 DB 4FH ;2F69: ISEQ DB 00H ;2F6A: ADD TOS, NOS DB 13H ;2F6B: ISZ TOS DB 08H, 1BH ;2F6C: JZ 2F88 DB 64H ;2F6E: LD TOS, VB DB 03H ;2F6F: ADD TOS, 1 DB 96H, 2DH ;2F70: SYS 2D2C DB 0EBH, 2DH ;2F72: SYS 2DD6 DB 52H, 06H ;2F74: PUSH VE, 06 DB 9DH, 16H ;2F76: SYS 163A DB 1FH ;2F78: DUPNZ DB 08H, 09H ;2F79: JZ 2F83 DB 03H ;2F7B: ADD TOS, 1 DB 22H, 63H, 0BBH ;2F7C: B PUSH 63BB DB 00H ;2F7F: ADD TOS, NOS DB 16H ;2F80: LD [TOS], NOS DB 0BH, 0D5H ;2F81: JP 2F57 DB 1CH ;2F83: DROP DB 42H, 60H ;2F84: LD [60BD], 60 DB 0AH, 0AH ;2F86: JP 2F91 DB 3AH, 63H, 0BDH ;2F88: D LD TOS, [63BD] DB 27H ;2F8B: SUB TOS, 1 DB 63H ;2F8C: LD VB, TOS DB 96H, 2DH ;2F8D: SYS 2D2C DB 0EBH, 2DH ;2F8F: SYS 2DD6 DB 11H ;2F91: RET DB 15H ;2F92: 15 DB 52H, 06H ;2F93: PUSH VE, 06 DB 9AH, 2FH ;2F95: SYS 2F34 DB 55H, 11H ;2F97: PUSH [VE], 11 DB 63H ;2F99: LD VB, TOS DB 0B4H, 16H ;2F9A: SYS 1668 DB 08H, 07H ;2F9C: JZ 2FA4 DB 42H, 60H ;2F9E: LD [60BD], 60 DB 52H, 06H ;2FA0: PUSH VE, 06 DB 9CH, 0FH ;2FA2: SYS 0F38 DB 11H ;2FA4: RET DB 0FFH ;2FA5: FF DB 15H ;2FA6: 15 DB 9DH, 2DH ;2FA7: SYS 2D3A DB 0F2H, 0BH ;2FA9: SYS 0BE4 DB 08H, 03H ;2FAB: JZ 2FAF DB 0C9H, 2FH ;2FAD: SYS 2F92 DB 11H ;2FAF: RET DB 15H ;2FB0: 15 DB 0AH, 0DH ;2FB1: JP 2FBF DB 0FFH, 15H ;2FB3: SYS 15FE DB 0F2H, 0BH ;2FB5: SYS 0BE4 DB 08H, 1CH ;2FB7: JZ 2FD4 DB 52H, 06H ;2FB9: PUSH VE, 06 DB 9DH, 16H ;2FBB: SYS 163A DB 08H, 14H ;2FBD: JZ 2FD2 DB 5EH ;2FBF: LD TOS, VC DB 60H ;2FC0: LD TOS, VD DB 22H, 63H, 5CH ;2FC1: C PUSH 635C DB 5DH ;2FC4: LD VC, TOS DB 0A1H, 2DH ;2FC5: SYS 2D42 DB 5FH ;2FC7: LD VD, TOS DB 5DH ;2FC8: LD VC, TOS DB 0F2H, 0BH ;2FC9: SYS 0BE4 DB 13H ;2FCB: ISZ TOS DB 09H, 0ECH ;2FCC: JZ 2FB9 DB 42H, 61H ;2FCE: LD [60BD], 61 DB 0AH, 03H ;2FD0: JP 2FD4 DB 42H, 60H ;2FD2: LD [60BD], 60 DB 11H ;2FD4: RET DB 0FFH ;2FD5: FF DB 15H ;2FD6: 15 S2FD7 DB 96H, 2DH ;2FD7: SYS 2D2C DB 53H, 0EH ;2FD9: PUSH [VE].0, 0E DB 23H, 02H ;2FDB: PUSH 02 DB 4FH ;2FDD: ISEQ DB 08H, 05H ;2FDE: JZ 2FE4 DB 0DAH, 2FH ;2FE0: SYS 2FB4 DB 0AH, 03H ;2FE2: JP 2FE6 DB 0C9H, 2FH ;2FE4: SYS 2F92 DB 11H ;2FE6: RET DB 0FFH ;2FE7: FF DB 15H ;2FE8: 15 S2FE9 DB 53H, 0EH ;2FE9: PUSH [VE].0, 0E DB 23H, 02H ;2FEB: PUSH 02 DB 4FH ;2FED: ISEQ DB 08H, 05H ;2FEE: JZ 2FF4 DB 0D8H, 2FH ;2FF0: SYS 2FB0 DB 0AH, 03H ;2FF2: JP 2FF6 DB 0D3H, 2FH ;2FF4: SYS 2FA6 DB 11H ;2FF6: RET DW S2F4B ;2FF7: 2F 4B DW S2FD7 ;2FF9: 2F D7 DW S2FE9 ;2FFB: 2F E9 DB 0FFH ;2FFD: FF DB 15H ;2FFE: 15 S2FFF DB 67H ;2FFF: LD VE, [RP] DB 2AH ;3000: LD TOS.0, [RP] DB 42H, 61H ;3001: LD [60BD], 61 DB 0DAH, 13H ;3003: SYS 13B4 DB 66H, 2FH, 0F7H ;3005: 7 CALLI 2FF7 DB 72H ;3008: PUSH 0000 DB 56H, 0CH ;3009: POP [VE], 0C DB 29H ;300B: NAVBK DB 11H ;300C: RET DB 0FFH ;300D: FF DB 15H ;300E: 15 DB 3AH, 62H, 8DH ;300F: D LD TOS, [628D] DB 5DH ;3012: LD VC, TOS DB 3CH, 62H, 8FH ;3013: F LD TOS.0, [628F] DB 5FH ;3016: LD VD, TOS DB 57H, 62H, 81H, 08H ;3017: 108 LDAND 6281, 08 DB 13H ;301B: ISZ TOS DB 57H, 62H, 81H, 10H ;301C: 110 LDAND 6281, 10 DB 13H ;3020: ISZ TOS DB 0A0H, 06H ;3021: SYS 0640 DB 08H, 2CH ;3023: JZ 3050 DB 64H ;3025: LD TOS, VB DB 62H ;3026: LD TOS, VA DB 22H, 63H, 5CH ;3027: C PUSH 635C DB 61H ;302A: LD VA, TOS DB 3CH, 62H, 8CH ;302B: C LD TOS.0, [628C] DB 57H, 62H, 81H, 40H ;302E: 140 LDAND 6281, 40 DB 13H ;3032: ISZ TOS DB 13H ;3033: ISZ TOS DB 00H ;3034: ADD TOS, NOS DB 63H ;3035: LD VB, TOS DB 57H, 62H, 81H, 38H ;3036: 138 LDAND 6281, 38 DB 57H, 62H, 81H, 40H ;303A: 140 LDAND 6281, 40 DB 08H, 03H ;303E: JZ 3042 DB 75H ;3040: PUSH 0003 DB 33H ;3041: OR TOS, NOS DB 66H, 28H, 12H ;3042: 2 CALLI 2812 DB 22H, 60H, 56H ;3045: 6 PUSH 6056 DB 22H, 60H, 5AH ;3048: A PUSH 605A DB 23H, 04H ;304B: PUSH 04 DB 1AH ;304D: MCPY [NOS], [3OS] DB 61H ;304E: LD VA, TOS DB 63H ;304F: LD VB, TOS DB 11H ;3050: RET DB 0FFH ;3051: FF DB 15H ;3052: 15 S3053 DB 0B9H, 21H ;3053: SYS 2172 DB 2DH ;3055: NUMCZ DB 3CH, 63H, 8CH ;3056: C LD TOS.0, [638C] DB 0A2H, 26H ;3059: SYS 2644 DB 11H ;305B: RET DB 15H ;305C: 15 S305D DB 0E7H, 27H ;305D: SYS 27CE DB 3CH, 63H, 8CH ;305F: C LD TOS.0, [638C] DB 23H, 2DH ;3062: PUSH 2D DB 4FH ;3064: ISEQ DB 08H, 03H ;3065: JZ 3069 DB 0A8H, 26H ;3067: SYS 2650 DB 11H ;3069: RET DW S07F6 ;306A: 07 F6 DW S305D ;306C: 30 5D DW S0A73 ;306E: 0A 73 DW S3053 ;3070: 30 53 DW S0816 ;3072: 08 16 DB 15H ;3074: 15 DB 22H, 63H, 3BH ;3075: B PUSH 633B DB 37H ;3078: LDVCD [TOS] DB 57H, 62H, 81H, 38H ;3079: 138 LDAND 6281, 38 DB 0CAH, 05H ;307D: SYS 0594 DB 0CAH, 05H ;307F: SYS 0594 DB 0CAH, 05H ;3081: SYS 0594 DB 66H, 30H, 6AH ;3083: A CALLI 306A DB 11H ;3086: RET DB 0FFH ;3087: FF DB 15H ;3088: 15 DB 3CH, 63H, 98H ;3089: 8 LD TOS.0, [6398] DB 08H, 0FH ;308C: JZ 309C DB 0AAH, 17H ;308E: SYS 1754 DB 3CH, 63H, 97H ;3090: 7 LD TOS.0, [6397] DB 23H, 01H ;3093: PUSH 01 DB 4FH ;3095: ISEQ DB 08H, 03H ;3096: JZ 309A DB 0E1H, 17H ;3098: SYS 17C2 DB 0AH, 05H ;309A: JP 30A0 DB 3AH, 63H, 0B0H ;309C: 0 LD TOS, [63B0] DB 10H ;309F: EXEC TOS DB 11H ;30A0: RET DB 0FFH ;30A1: FF DB 15H ;30A2: 15 DB 3CH, 63H, 98H ;30A3: 8 LD TOS.0, [6398] DB 08H, 0FH ;30A6: JZ 30B6 DB 0AEH, 17H ;30A8: SYS 175C DB 3CH, 63H, 97H ;30AA: 7 LD TOS.0, [6397] DB 23H, 01H ;30AD: PUSH 01 DB 4FH ;30AF: ISEQ DB 08H, 03H ;30B0: JZ 30B4 DB 0E9H, 17H ;30B2: SYS 17D2 DB 0AH, 05H ;30B4: JP 30BA DB 3AH, 63H, 0B2H ;30B6: 2 LD TOS, [63B2] DB 10H ;30B9: EXEC TOS DB 11H ;30BA: RET DB 0FFH ;30BB: FF DB 15H ;30BC: 15 DB 0E4H, 1DH ;30BD: SYS 1DC8 DB 0B7H, 17H ;30BF: SYS 176E DB 09H, 0FDH ;30C1: JZ 30BF DB 11H ;30C3: RET DB 15H ;30C4: 15 DB 0C3H, 1EH ;30C5: SYS 1E86 DB 3DH, 60H, 37H ;30C7: 7 LD [6037], TOS.0 DB 0B7H, 17H ;30CA: SYS 176E DB 09H, 0FDH ;30CC: JZ 30CA DB 11H ;30CE: RET DB 0FFH ;30CF: FF DB 15H ;30D0: 15 DB 0C4H, 30H ;30D1: SYS 3088 DB 0DEH, 30H ;30D3: SYS 30BC DB 11H ;30D5: RET DB 15H ;30D6: 15 DB 0C4H, 30H ;30D7: SYS 3088 DB 0E2H, 30H ;30D9: SYS 30C4 DB 11H ;30DB: RET DB 15H ;30DC: 15 DB 0D1H, 30H ;30DD: SYS 30A2 DB 0BDH, 1CH ;30DF: SYS 1C7A DB 11H ;30E1: RET DB 15H ;30E2: 15 DB 3DH, 60H, 38H ;30E3: 8 LD [6038], TOS.0 DB 22H, 60H, 37H ;30E6: 7 PUSH 6037 DB 2EH ;30E9: LD [TOS], 0 DB 76H ;30EA: PUSH FFFF DB 22H, 60H, 39H ;30EB: 9 PUSH 6039 DB 30H ;30EE: ADD [TOS], NOS.0 DB 3CH, 63H, 0A8H ;30EF: 8 LD TOS.0, [63A8] DB 3DH, 60H, 3AH ;30F2: A LD [603A], TOS.0 DB 11H ;30F5: RET DB 15H ;30F6: 15 DB 3DH, 60H, 37H ;30F7: 7 LD [6037], TOS.0 DB 22H, 60H, 38H ;30FA: 8 PUSH 6038 DB 2EH ;30FD: LD [TOS], 0 DB 76H ;30FE: PUSH FFFF DB 22H, 60H, 3AH ;30FF: A PUSH 603A DB 30H ;3102: ADD [TOS], NOS.0 DB 11H ;3103: RET DB 15H ;3104: 15 DB 3CH, 63H, 0ABH ;3105: B LD TOS.0, [63AB] DB 13H ;3108: ISZ TOS DB 3DH, 63H, 0ABH ;3109: B LD [63AB], TOS.0 DB 11H ;310C: RET DB 0FFH ;310D: FF DB 15H ;310E: 15 DB 3CH, 63H, 0ABH ;310F: B LD TOS.0, [63AB] DB 08H, 06H ;3112: JZ 3119 DB 3AH, 63H, 0A5H ;3114: 5 LD TOS, [63A5] DB 0AH, 04H ;3117: JP 311C DB 3AH, 63H, 0A3H ;3119: 3 LD TOS, [63A3] DB 11H ;311C: RET DB 0FFH ;311D: FF DB 15H ;311E: 15 DB 3CH, 63H, 9DH ;311F: D LD TOS.0, [639D] DB 08H, 08H ;3122: JZ 312B DB 42H, 61H ;3124: LD [60BD], 61 DB 23H, 75H ;3126: PUSH 75 DB 3DH, 63H, 0BAH ;3128: A LD [63BA], TOS.0 DB 11H ;312B: RET DB 15H ;312C: 15 DB 3CH, 60H, 37H ;312D: 7 LD TOS.0, [6037] DB 13H ;3130: ISZ TOS DB 3CH, 60H, 38H ;3131: 8 LD TOS.0, [6038] DB 13H ;3134: ISZ TOS DB 12H ;3135: AND TOS, NOS DB 3CH, 60H, 3AH ;3136: A LD TOS.0, [603A] DB 13H ;3139: ISZ TOS DB 3CH, 60H, 39H ;313A: 9 LD TOS.0, [6039] DB 13H ;313D: ISZ TOS DB 33H ;313E: OR TOS, NOS DB 33H ;313F: OR TOS, NOS DB 3CH, 63H, 9DH ;3140: D LD TOS.0, [639D] DB 33H ;3143: OR TOS, NOS DB 11H ;3144: RET DB 0FFH ;3145: FF DB 15H ;3146: 15 DB 3CH, 60H, 37H ;3147: 7 LD TOS.0, [6037] DB 3CH, 60H, 38H ;314A: 8 LD TOS.0, [6038] DB 33H ;314D: OR TOS, NOS DB 1FH ;314E: DUPNZ DB 08H, 06H ;314F: JZ 3156 DB 3DH, 63H, 0BAH ;3151: A LD [63BA], TOS.0 DB 42H, 61H ;3154: LD [60BD], 61 DB 11H ;3156: RET DB 0FFH ;3157: FF DB 15H ;3158: 15 DB 22H, 60H, 28H ;3159: 8 PUSH 6028 DB 22H, 60H, 60H ;315C: 0 PUSH 6060 DB 36H ;315F: LD24 [TOS], NOS DB 72H ;3160: PUSH 0000 DB 3FH, 28H ;3161: LD [6028], TOS DB 72H ;3163: PUSH 0000 DB 75H ;3164: PUSH 0003 DB 0EEH, 30H ;3165: SYS 30DC DB 3DH, 60H, 38H ;3167: 8 LD [6038], TOS.0 DB 11H ;316A: RET DB 0FFH ;316B: FF DB 15H ;316C: 15 DB 72H ;316D: PUSH 0000 DB 3BH, 60H, 37H ;316E: 7 LD [6037], TOS DB 22H, 60H, 31H ;3171: 1 PUSH 6031 DB 2EH ;3174: LD [TOS], 0 DB 3CH, 63H, 0A8H ;3175: 8 LD TOS.0, [63A8] DB 1EH ;3178: DUP DB 3DH, 60H, 3AH ;3179: A LD [603A], TOS.0 DB 3DH, 60H, 39H ;317C: 9 LD [6039], TOS.0 DB 11H ;317F: RET DB 15H ;3180: 15 S3181 DB 42H, 61H ;3181: LD [60BD], 61 DB 0D1H, 30H ;3183: SYS 30A2 DB 22H, 02H, 05H ;3185: 5 PUSH 0205 DB 0EBH, 30H ;3188: SYS 30D6 DB 22H, 03H, 06H ;318A: 6 PUSH 0306 DB 0EBH, 30H ;318D: SYS 30D6 DB 0ACH, 31H ;318F: SYS 3158 DB 3CH, 60H, 38H ;3191: 8 LD TOS.0, [6038] DB 08H, 07H ;3194: JZ 319C DB 23H, 04H ;3196: PUSH 04 DB 0FBH, 30H ;3198: SYS 30F6 DB 0AH, 13H ;319A: JP 31AE DB 40H, 28H ;319C: LD TOS.0, [6028] DB 23H, 0FEH ;319E: PUSH FE DB 12H ;31A0: AND TOS, NOS DB 1FH ;31A1: DUPNZ DB 08H, 05H ;31A2: JZ 31A8 DB 0F1H, 30H ;31A4: SYS 30E2 DB 0AH, 07H ;31A6: JP 31AE DB 42H, 60H ;31A8: LD [60BD], 60 DB 72H ;31AA: PUSH 0000 DB 3BH, 60H, 37H ;31AB: 7 LD [6037], TOS DB 11H ;31AE: RET DB 0FFH ;31AF: FF DB 15H ;31B0: 15 DB 3EH, 28H ;31B1: LD TOS, [6028] DB 87H, 31H ;31B3: SYS 310E DB 4FH ;31B5: ISEQ DB 08H, 14H ;31B6: JZ 31CB DB 82H, 31H ;31B8: SYS 3104 DB 42H, 60H ;31BA: LD [60BD], 60 DB 3CH, 60H, 32H ;31BC: 2 LD TOS.0, [6032] DB 08H, 05H ;31BF: JZ 31C5 DB 23H, 04H ;31C1: PUSH 04 DB 0EBH, 30H ;31C3: SYS 30D6 DB 72H ;31C5: PUSH 0000 DB 3BH, 60H, 37H ;31C6: 7 LD [6037], TOS DB 0AH, 2FH ;31C9: JP 31F9 DB 3EH, 28H ;31CB: LD TOS, [6028] DB 87H, 31H ;31CD: SYS 310E DB 73H ;31CF: PUSH 0001 DB 0A0H, 06H ;31D0: SYS 0640 DB 4FH ;31D2: ISEQ DB 40H, 28H ;31D3: LD TOS.0, [6028] DB 23H, 15H ;31D5: PUSH 15 DB 4FH ;31D7: ISEQ DB 33H ;31D8: OR TOS, NOS DB 08H, 07H ;31D9: JZ 31E1 DB 23H, 0AH ;31DB: PUSH 0A DB 0F1H, 30H ;31DD: SYS 30E2 DB 0AH, 19H ;31DF: JP 31F9 DB 3EH, 28H ;31E1: LD TOS, [6028] DB 22H, 10H, 3BH ;31E3: B PUSH 103B DB 4FH ;31E6: ISEQ DB 08H, 09H ;31E7: JZ 31F1 DB 0B6H, 31H ;31E9: SYS 316C DB 74H ;31EB: PUSH 0002 DB 3DH, 60H, 38H ;31EC: 8 LD [6038], TOS.0 DB 0AH, 05H ;31EF: JP 31F5 DB 23H, 05H ;31F1: PUSH 05 DB 0FBH, 30H ;31F3: SYS 30F6 DB 22H, 60H, 31H ;31F5: 1 PUSH 6031 DB 2FH ;31F8: LD [TOS], 1 DB 11H ;31F9: RET DB 15H ;31FA: 15 S31FB DB 0ACH, 31H ;31FB: SYS 3158 DB 0D8H, 31H ;31FD: SYS 31B0 DB 11H ;31FF: RET DB 15H ;3200: 15 S3201 DB 72H ;3201: PUSH 0000 DB 3DH, 60H, 37H ;3202: 7 LD [6037], TOS.0 DB 42H, 60H ;3205: LD [60BD], 60 DB 11H ;3207: RET DB 15H ;3208: 15 S3209 DB 22H, 60H, 39H ;3209: 9 PUSH 6039 DB 2EH ;320C: LD [TOS], 0 DB 3CH, 63H, 9AH ;320D: A LD TOS.0, [639A] DB 41H, 09H ;3210: LD [6009], TOS.0 DB 45H ;3212: DELAY DB 11H ;3213: RET DW S3201 ;3214: 32 01 DW S3209 ;3216: 32 09 DW S31FB ;3218: 31 FB DW S3201 ;321A: 32 01 DW S3209 ;321C: 32 09 DW S3181 ;321E: 31 81 DB 15H ;3220: 15 DB 22H, 60H, 3EH ;3221: E PUSH 603E DB 22H, 60H, 60H ;3224: 0 PUSH 6060 DB 31H ;3227: MCPY3 [TOS], [NOS] DB 0C4H, 30H ;3228: SYS 3088 DB 3CH, 63H, 0A0H ;322A: 0 LD TOS.0, [63A0] DB 1FH ;322D: DUPNZ DB 08H, 10H ;322E: JZ 323F DB 57H, 63H, 99H, 80H ;3230: 980 LDAND 6399, 80 DB 08H, 05H ;3234: JZ 323A DB 22H, 10H, 00H ;3236: 0 PUSH 1000 DB 33H ;3239: OR TOS, NOS DB 0C3H, 1EH ;323A: SYS 1E86 DB 3DH, 60H, 37H ;323C: 7 LD [6037], TOS.0 DB 3CH, 60H, 32H ;323F: 2 LD TOS.0, [6032] DB 08H, 06H ;3242: JZ 3249 DB 3CH, 63H, 0A2H ;3244: 2 LD TOS.0, [63A2] DB 0AH, 04H ;3247: JP 324C DB 3CH, 63H, 0A1H ;3249: 1 LD TOS.0, [63A1] DB 1EH ;324C: DUP DB 3CH, 63H, 9BH ;324D: B LD TOS.0, [639B] DB 3AH, 60H, 33H ;3250: 3 LD TOS, [6033] DB 0E4H, 1DH ;3253: SYS 1DC8 DB 3DH, 60H, 37H ;3255: 7 LD [6037], TOS.0 DB 20H ;3258: SWAP DB 1FH ;3259: DUPNZ DB 08H, 10H ;325A: JZ 326B DB 57H, 63H, 99H, 80H ;325C: 980 LDAND 6399, 80 DB 08H, 05H ;3260: JZ 3266 DB 22H, 10H, 00H ;3262: 0 PUSH 1000 DB 33H ;3265: OR TOS, NOS DB 0C3H, 1EH ;3266: SYS 1E86 DB 3DH, 60H, 37H ;3268: 7 LD [6037], TOS.0 DB 3CH, 63H, 0A7H ;326B: 7 LD TOS.0, [63A7] DB 08H, 08H ;326E: JZ 3277 DB 0C3H, 1EH ;3270: SYS 1E86 DB 3DH, 60H, 37H ;3272: 7 LD [6037], TOS.0 DB 0AH, 02H ;3275: JP 3278 DB 1CH ;3277: DROP DB 0B7H, 17H ;3278: SYS 176E DB 09H, 0FDH ;327A: JZ 3278 DB 11H ;327C: RET DB 0FFH ;327D: FF DB 15H ;327E: 15 DB 0B6H, 31H ;327F: SYS 316C DB 42H, 60H ;3281: LD [60BD], 60 DB 3CH, 63H, 98H ;3283: 8 LD TOS.0, [6398] DB 08H, 2EH ;3286: JZ 32B5 DB 3CH, 60H, 31H ;3288: 1 LD TOS.0, [6031] DB 08H, 0BH ;328B: JZ 3297 DB 23H, 05H ;328D: PUSH 05 DB 0EBH, 30H ;328F: SYS 30D6 DB 22H, 60H, 31H ;3291: 1 PUSH 6031 DB 2EH ;3294: LD [TOS], 0 DB 0AH, 0CH ;3295: JP 32A2 DB 0BCH, 19H ;3297: SYS 1978 DB 90H, 32H ;3299: SYS 3220 DB 0C4H, 19H ;329B: SYS 1988 DB 58H, 62H, 0BFH, 60H, 60H;329D: F MCPY3 [62BF],[6060] DB 3CH, 63H, 98H ;32A2: 8 LD TOS.0, [6398] DB 66H, 32H, 14H ;32A5: 4 CALLI 3214 DB 96H, 31H ;32A8: SYS 312C DB 09H, 0DDH ;32AA: JZ 3288 DB 0A3H, 31H ;32AC: SYS 3146 DB 58H, 60H, 3EH, 62H, 0BFH;32AE: E MCPY3 [603E],[62BF] DB 0AH, 05H ;32B3: JP 32B9 DB 3AH, 63H, 0ACH ;32B5: C LD TOS, [63AC] DB 10H ;32B8: EXEC TOS DB 11H ;32B9: RET DB 15H ;32BA: 15 DB 20H ;32BB: SWAP DB 1DH ;32BC: OVER DB 23H, 0FFH ;32BD: PUSH FF DB 12H ;32BF: AND TOS, NOS DB 23H, 05H ;32C0: PUSH 05 DB 4FH ;32C2: ISEQ DB 08H, 02H ;32C3: JZ 32C6 DB 13H ;32C5: ISZ TOS DB 74H ;32C6: PUSH 0002 DB 02H ;32C7: SUB TOS, NOS DB 1FH ;32C8: DUPNZ DB 13H ;32C9: ISZ TOS DB 08H, 25H ;32CA: JZ 32F0 DB 22H, 60H, 3BH ;32CC: B PUSH 603B DB 39H ;32CF: LDBNK [TOS] DB 23H, 05H ;32D0: PUSH 05 DB 4FH ;32D2: ISEQ DB 08H, 0AH ;32D3: JZ 32DE DB 0B6H, 31H ;32D5: SYS 316C DB 74H ;32D7: PUSH 0002 DB 3DH, 60H, 37H ;32D8: 7 LD [6037], TOS.0 DB 1CH ;32DB: DROP DB 0AH, 0CH ;32DC: JP 32E9 DB 23H, 0FFH ;32DE: PUSH FF DB 12H ;32E0: AND TOS, NOS DB 1FH ;32E1: DUPNZ DB 13H ;32E2: ISZ TOS DB 08H, 03H ;32E3: JZ 32E7 DB 23H, 04H ;32E5: PUSH 04 DB 0F1H, 30H ;32E7: SYS 30E2 DB 23H, 15H ;32E9: PUSH 15 DB 3BH, 63H, 0B6H ;32EB: 6 LD [63B6], TOS DB 0AH, 2BH ;32EE: JP 331A DB 1EH ;32F0: DUP DB 75H ;32F1: PUSH 0003 DB 4FH ;32F2: ISEQ DB 08H, 09H ;32F3: JZ 32FD DB 23H, 0AH ;32F5: PUSH 0A DB 0FBH, 30H ;32F7: SYS 30F6 DB 1CH ;32F9: DROP DB 1CH ;32FA: DROP DB 0AH, 1EH ;32FB: JP 331A DB 74H ;32FD: PUSH 0002 DB 4FH ;32FE: ISEQ DB 3CH, 60H, 32H ;32FF: 2 LD TOS.0, [6032] DB 12H ;3302: AND TOS, NOS DB 08H, 0DH ;3303: JZ 3311 DB 42H, 63H ;3305: LD [60BD], 63 DB 72H ;3307: PUSH 0000 DB 3BH, 60H, 37H ;3308: 7 LD [6037], TOS DB 22H, 60H, 32H ;330B: 2 PUSH 6032 DB 2EH ;330E: LD [TOS], 0 DB 0AH, 09H ;330F: JP 3319 DB 23H, 05H ;3311: PUSH 05 DB 0F1H, 30H ;3313: SYS 30E2 DB 22H, 63H, 0A9H ;3315: 9 PUSH 63A9 DB 2EH ;3318: LD [TOS], 0 DB 1CH ;3319: DROP DB 11H ;331A: RET DB 0FFH ;331B: FF DB 15H ;331C: 15 S331D DB 22H, 63H, 0A9H ;331D: 9 PUSH 63A9 DB 2FH ;3320: LD [TOS], 1 DB 1EH ;3321: DUP DB 3AH, 63H, 9EH ;3322: E LD TOS, [639E] DB 13H ;3325: ISZ TOS DB 08H, 05H ;3326: JZ 332C DB 22H, 0FFH, 0FDH ;3328: D PUSH FFFD DB 12H ;332B: AND TOS, NOS DB 3CH, 60H, 32H ;332C: 2 LD TOS.0, [6032] DB 33H ;332F: OR TOS, NOS DB 08H, 05H ;3330: JZ 3336 DB 0DDH, 32H ;3332: SYS 32BA DB 0AH, 38H ;3334: JP 336D DB 1CH ;3336: DROP DB 23H, 02H ;3337: PUSH 02 DB 4FH ;3339: ISEQ DB 08H, 2AH ;333A: JZ 3365 DB 22H, 60H, 60H ;333C: 0 PUSH 6060 DB 0AEH, 0AH ;333F: SYS 0A5C DB 22H, 60H, 60H ;3341: 0 PUSH 6060 DB 0AEH, 0AH ;3344: SYS 0A5C DB 22H, 60H, 60H ;3346: 0 PUSH 6060 DB 39H ;3349: LDBNK [TOS] DB 23H, 03H ;334A: PUSH 03 DB 4FH ;334C: ISEQ DB 08H, 05H ;334D: JZ 3353 DB 22H, 60H, 32H ;334F: 2 PUSH 6032 DB 2FH ;3352: LD [TOS], 1 DB 42H, 66H ;3353: LD [60BD], 66 DB 58H, 60H, 3BH, 60H, 60H;3355: B MCPY3 [603B],[6060] DB 0B6H, 31H ;335A: SYS 316C DB 82H, 31H ;335C: SYS 3104 DB 87H, 31H ;335E: SYS 310E DB 3BH, 63H, 0B6H ;3360: 6 LD [63B6], TOS DB 0AH, 09H ;3363: JP 336D DB 23H, 05H ;3365: PUSH 05 DB 0F1H, 30H ;3367: SYS 30E2 DB 22H, 63H, 0A9H ;3369: 9 PUSH 63A9 DB 2EH ;336C: LD [TOS], 0 DB 11H ;336D: RET DB 15H ;336E: 15 S336F DB 23H, 0FFH ;336F: PUSH FF DB 12H ;3371: AND TOS, NOS DB 1FH ;3372: DUPNZ DB 08H, 05H ;3373: JZ 3379 DB 0F1H, 30H ;3375: SYS 30E2 DB 0AH, 08H ;3377: JP 3380 DB 42H, 66H ;3379: LD [60BD], 66 DB 58H, 60H, 3BH, 60H, 60H;337B: B MCPY3 [603B],[6060] DB 22H, 60H, 32H ;3380: 2 PUSH 6032 DB 2EH ;3383: LD [TOS], 0 DB 11H ;3384: RET DW S2583 ;3385: 25 83 DW S336F ;3387: 33 6F DW S331D ;3389: 33 1D DW S2583 ;338B: 25 83 DW S336F ;338D: 33 6F DW S2583 ;338F: 25 83 DB 0FFH ;3391: FF DB 15H ;3392: 15 DB 0B6H, 31H ;3393: SYS 316C DB 3CH, 63H, 98H ;3395: 8 LD TOS.0, [6398] DB 22H, 60H, 32H ;3398: 2 PUSH 6032 DB 2EH ;339B: LD [TOS], 0 DB 08H, 4DH ;339C: JZ 33EA DB 0BCH, 19H ;339E: SYS 1978 DB 3CH, 63H, 0A9H ;33A0: 9 LD TOS.0, [63A9] DB 08H, 06H ;33A3: JZ 33AA DB 3AH, 63H, 0B6H ;33A5: 6 LD TOS, [63B6] DB 0EBH, 30H ;33A8: SYS 30D6 DB 22H, 60H, 3BH ;33AA: B PUSH 603B DB 22H, 60H, 60H ;33AD: 0 PUSH 6060 DB 31H ;33B0: MCPY3 [TOS], [NOS] DB 3CH, 63H, 9CH ;33B1: C LD TOS.0, [639C] DB 3AH, 63H, 9EH ;33B4: E LD TOS, [639E] DB 0EEH, 30H ;33B7: SYS 30DC DB 0C4H, 19H ;33B9: SYS 1988 DB 3CH, 63H, 98H ;33BB: 8 LD TOS.0, [6398] DB 66H, 33H, 85H ;33BE: 5 CALLI 3385 DB 3AH, 60H, 37H ;33C1: 7 LD TOS, [6037] DB 13H ;33C4: ISZ TOS DB 3CH, 60H, 32H ;33C5: 2 LD TOS.0, [6032] DB 13H ;33C8: ISZ TOS DB 12H ;33C9: AND TOS, NOS DB 3AH, 63H, 9EH ;33CA: E LD TOS, [639E] DB 13H ;33CD: ISZ TOS DB 13H ;33CE: ISZ TOS DB 40H, 0BDH ;33CF: LD TOS.0, [60BD] DB 23H, 63H ;33D1: PUSH 63 DB 4FH ;33D3: ISEQ DB 33H ;33D4: OR TOS, NOS DB 12H ;33D5: AND TOS, NOS DB 3CH, 60H, 39H ;33D6: 9 LD TOS.0, [6039] DB 13H ;33D9: ISZ TOS DB 33H ;33DA: OR TOS, NOS DB 3CH, 60H, 3AH ;33DB: A LD TOS.0, [603A] DB 13H ;33DE: ISZ TOS DB 33H ;33DF: OR TOS, NOS DB 3CH, 63H, 9DH ;33E0: D LD TOS.0, [639D] DB 33H ;33E3: OR TOS, NOS DB 09H, 0B9H ;33E4: JZ 339E DB 0A3H, 31H ;33E6: SYS 3146 DB 0AH, 05H ;33E8: JP 33EE DB 3AH, 63H, 0AEH ;33EA: E LD TOS, [63AE] DB 10H ;33ED: EXEC TOS DB 11H ;33EE: RET DW S1795 ;33EF: 17 95 DW S1781 ;33F1: 17 81 DW S17A1 ;33F3: 17 A1 DW S17AD ;33F5: 17 AD DB 0FFH ;33F7: FF DB 15H ;33F8: 15 S33F9 DB 2AH ;33F9: LD TOS.0, [RP] DB 66H, 33H, 0EFH ;33FA: F CALLI 33EF DB 08H, 05H ;33FD: JZ 3403 DB 42H, 60H ;33FF: LD [60BD], 60 DB 0AH, 03H ;3401: JP 3405 DB 42H, 61H ;3403: LD [60BD], 61 DB 29H ;3405: NAVBK DB 11H ;3406: RET DW S1745 ;3407: 17 45 DW S174D ;3409: 17 4D DW S1755 ;340B: 17 55 DW S175D ;340D: 17 5D DW S1765 ;340F: 17 65 DW S178B ;3411: 17 8B DW S17C3 ;3413: 17 C3 DW S17D3 ;3415: 17 D3 DB 0FFH ;3417: FF DB 15H ;3418: 15 S3419 DB 2AH ;3419: LD TOS.0, [RP] DB 66H, 34H, 07H ;341A: 7 CALLI 3407 DB 11H ;341D: RET DB 15H ;341E: 15 DB 42H, 60H ;341F: LD [60BD], 60 DB 22H, 60H, 32H ;3421: 2 PUSH 6032 DB 2EH ;3424: LD [TOS], 0 DB 3AH, 63H, 9EH ;3425: E LD TOS, [639E] DB 1EH ;3428: DUP DB 3CH, 63H, 9BH ;3429: B LD TOS.0, [639B] DB 23H, 20H ;342C: PUSH 20 DB 12H ;342E: AND TOS, NOS DB 08H, 03H ;342F: JZ 3433 DB 0CAH, 05H ;3431: SYS 0594 DB 8EH, 21H ;3433: SYS 211C DB 36H ;3435: LD24 [TOS], NOS DB 3BH, 60H, 33H ;3436: 3 LD [6033], TOS DB 8EH, 21H ;3439: SYS 211C DB 22H, 62H, 0C5H ;343B: 5 PUSH 62C5 DB 0DCH, 08H ;343E: SYS 08B8 DB 14H ;3440: ISNEG TOS DB 40H, 0BDH ;3441: LD TOS.0, [60BD] DB 23H, 60H ;3443: PUSH 60 DB 4FH ;3445: ISEQ DB 12H ;3446: AND TOS, NOS DB 3CH, 63H, 9DH ;3447: D LD TOS.0, [639D] DB 13H ;344A: ISZ TOS DB 12H ;344B: AND TOS, NOS DB 08H, 0BH ;344C: JZ 3458 DB 0BFH, 32H ;344E: SYS 327E DB 22H, 62H, 0C5H ;3450: 5 PUSH 62C5 DB 8EH, 21H ;3453: SYS 211C DB 6EH ;3455: SUB24 [NOS], [TOS] DB 0BH, 0E2H ;3456: JP 3439 DB 22H, 62H, 0C5H ;3458: 5 PUSH 62C5 DB 03H ;345B: ADD TOS, 1 DB 15H ;345C: LD TOS, [TOS] DB 3CH, 63H, 9BH ;345D: B LD TOS.0, [639B] DB 23H, 20H ;3460: PUSH 20 DB 12H ;3462: AND TOS, NOS DB 08H, 02H ;3463: JZ 3466 DB 01H ;3465: SHL TOS DB 3BH, 60H, 33H ;3466: 3 LD [6033], TOS DB 11H ;3469: RET DB 15H ;346A: 15 DB 1EH ;346B: DUP DB 74H ;346C: PUSH 0002 DB 12H ;346D: AND TOS, NOS DB 08H, 0FH ;346E: JZ 347E DB 0DAH, 13H ;3470: SYS 13B4 DB 5EH ;3472: LD TOS, VC DB 22H, 60H, 3EH ;3473: E PUSH 603E DB 36H ;3476: LD24 [TOS], NOS DB 60H ;3477: LD TOS, VD DB 22H, 62H, 0C5H ;3478: 5 PUSH 62C5 DB 36H ;347B: LD24 [TOS], NOS DB 0AH, 15H ;347C: JP 3492 DB 67H ;347E: LD VE, [RP] DB 52H, 06H ;347F: PUSH VE, 06 DB 22H, 60H, 3EH ;3481: E PUSH 603E DB 31H ;3484: MCPY3 [TOS], [NOS] DB 52H, 03H ;3485: PUSH VE, 03 DB 22H, 62H, 0C5H ;3487: 5 PUSH 62C5 DB 31H ;348A: MCPY3 [TOS], [NOS] DB 22H, 62H, 0C5H ;348B: 5 PUSH 62C5 DB 22H, 60H, 3EH ;348E: E PUSH 603E DB 6EH ;3491: SUB24 [NOS], [TOS] DB 73H ;3492: PUSH 0001 DB 12H ;3493: AND TOS, NOS DB 3CH, 63H, 9BH ;3494: B LD TOS.0, [639B] DB 20H ;3497: SWAP DB 08H, 06H ;3498: JZ 349F DB 23H, 20H ;349A: PUSH 20 DB 33H ;349C: OR TOS, NOS DB 0AH, 04H ;349D: JP 34A2 DB 23H, 0DFH ;349F: PUSH DF DB 12H ;34A1: AND TOS, NOS DB 3DH, 63H, 9BH ;34A2: B LD [639B], TOS.0 DB 11H ;34A5: RET DB 15H ;34A6: 15 DB 42H, 60H ;34A7: LD [60BD], 60 DB 08H, 07H ;34A9: JZ 34B1 DB 42H, 61H ;34AB: LD [60BD], 61 DB 75H ;34AD: PUSH 0003 DB 3DH, 63H, 0BAH ;34AE: A LD [63BA], TOS.0 DB 11H ;34B1: RET DB 15H ;34B2: 15 DB 72H ;34B3: PUSH 0000 DB 5EH ;34B4: LD TOS, VC DB 60H ;34B5: LD TOS, VD DB 0E0H, 1BH ;34B6: SYS 1BC0 DB 20H ;34B8: SWAP DB 1CH ;34B9: DROP DB 13H ;34BA: ISZ TOS DB 0D3H, 34H ;34BB: SYS 34A6 DB 11H ;34BD: RET DB 15H ;34BE: 15 DB 40H, 0B2H ;34BF: LD TOS.0, [60B2] DB 40H, 0B0H ;34C1: LD TOS.0, [60B0] DB 40H, 0B1H ;34C3: LD TOS.0, [60B1] DB 4FH ;34C5: ISEQ DB 33H ;34C6: OR TOS, NOS DB 09H, 0F7H ;34C7: JZ 34BF DB 11H ;34C9: RET DB 15H ;34CA: 15 S34CB DB 0DFH, 34H ;34CB: SYS 34BE DB 40H, 0B2H ;34CD: LD TOS.0, [60B2] DB 0D3H, 34H ;34CF: SYS 34A6 DB 29H ;34D1: NAVBK DB 11H ;34D2: RET DB 0FFH ;34D3: FF DB 15H ;34D4: 15 DB 2AH ;34D5: LD TOS.0, [RP] DB 1EH ;34D6: DUP DB 75H ;34D7: PUSH 0003 DB 12H ;34D8: AND TOS, NOS DB 74H ;34D9: PUSH 0002 DB 4FH ;34DA: ISEQ DB 3CH, 63H, 98H ;34DB: 8 LD TOS.0, [6398] DB 23H, 04H ;34DE: PUSH 04 DB 4FH ;34E0: ISEQ DB 12H ;34E1: AND TOS, NOS DB 08H, 09H ;34E2: JZ 34EC DB 1CH ;34E4: DROP DB 0DAH, 13H ;34E5: SYS 13B4 DB 0D9H, 34H ;34E7: SYS 34B2 DB 72H ;34E9: PUSH 0000 DB 0AH, 11H ;34EA: JP 34FC DB 0B5H, 34H ;34EC: SYS 346A DB 0DFH, 34H ;34EE: SYS 34BE DB 8FH, 34H ;34F0: SYS 341E DB 40H, 0BDH ;34F2: LD TOS.0, [60BD] DB 23H, 60H ;34F4: PUSH 60 DB 4FH ;34F6: ISEQ DB 3CH, 63H, 9DH ;34F7: D LD TOS.0, [639D] DB 13H ;34FA: ISZ TOS DB 12H ;34FB: AND TOS, NOS DB 11H ;34FC: RET DB 0FFH ;34FD: FF DB 15H ;34FE: 15 S34FF DB 0EAH, 34H ;34FF: SYS 34D4 DB 08H, 03H ;3501: JZ 3505 DB 0BFH, 32H ;3503: SYS 327E DB 8FH, 31H ;3505: SYS 311E DB 29H ;3507: NAVBK DB 11H ;3508: RET DB 0FFH ;3509: FF DB 15H ;350A: 15 S350B DB 0EAH, 34H ;350B: SYS 34D4 DB 08H, 07H ;350D: JZ 3515 DB 22H, 60H, 32H ;350F: 2 PUSH 6032 DB 2FH ;3512: LD [TOS], 1 DB 0BFH, 32H ;3513: SYS 327E DB 8FH, 31H ;3515: SYS 311E DB 29H ;3517: NAVBK DB 11H ;3518: RET DB 0FFH ;3519: FF DB 15H ;351A: 15 DB 3AH, 63H, 9EH ;351B: E LD TOS, [639E] DB 08H, 44H ;351E: JZ 3563 DB 3CH, 60H, 30H ;3520: 0 LD TOS.0, [6030] DB 1EH ;3523: DUP DB 73H ;3524: PUSH 0001 DB 12H ;3525: AND TOS, NOS DB 08H, 03H ;3526: JZ 352A DB 0D4H, 23H ;3528: SYS 23A8 DB 58H, 62H, 0ADH, 60H, 60H;352A: D MCPY3 [62AD],[6060] DB 8EH, 21H ;352F: SYS 211C DB 8AH, 21H ;3531: SYS 2114 DB 6EH ;3533: SUB24 [NOS], [TOS] DB 3AH, 62H, 0AEH ;3534: E LD TOS, [62AE] DB 3BH, 63H, 0EFH ;3537: F LD [63EF], TOS DB 74H ;353A: PUSH 0002 DB 12H ;353B: AND TOS, NOS DB 08H, 13H ;353C: JZ 3550 DB 3AH, 63H, 0EFH ;353E: F LD TOS, [63EF] DB 60H ;3541: LD TOS, VD DB 4DH ;3542: ISLT DB 13H ;3543: ISZ TOS DB 08H, 05H ;3544: JZ 354A DB 3AH, 62H, 0AEH ;3546: E LD TOS, [62AE] DB 5FH ;3549: LD VD, TOS DB 8AH, 21H ;354A: SYS 2114 DB 0C8H, 15H ;354C: SYS 1590 DB 0AH, 12H ;354E: JP 3561 DB 8AH, 21H ;3550: SYS 2114 DB 52H, 06H ;3552: PUSH VE, 06 DB 31H ;3554: MCPY3 [TOS], [NOS] DB 58H, 62H, 0A4H, 60H, 3BH;3555: 4 MCPY3 [62A4],[603B] DB 8AH, 21H ;355A: SYS 2114 DB 52H, 03H ;355C: PUSH VE, 03 DB 31H ;355E: MCPY3 [TOS], [NOS] DB 0D9H, 29H ;355F: SYS 29B2 DB 0AH, 09H ;3561: JP 356B DB 42H, 62H ;3563: LD [60BD], 62 DB 3AH, 60H, 41H ;3565: 1 LD TOS, [6041] DB 3BH, 63H, 9EH ;3568: E LD [639E], TOS DB 11H ;356B: RET DB 15H ;356C: 15 S356D DB 2AH ;356D: LD TOS.0, [RP] DB 1EH ;356E: DUP DB 3DH, 60H, 30H ;356F: 0 LD [6030], TOS.0 DB 74H ;3572: PUSH 0002 DB 12H ;3573: AND TOS, NOS DB 08H, 05H ;3574: JZ 357A DB 0DAH, 13H ;3576: SYS 13B4 DB 0AH, 02H ;3578: JP 357B DB 67H ;357A: LD VE, [RP] DB 3AH, 63H, 9EH ;357B: E LD TOS, [639E] DB 8EH, 21H ;357E: SYS 211C DB 36H ;3580: LD24 [TOS], NOS DB 8EH, 21H ;3581: SYS 211C DB 3AH, 62H, 0B0H ;3583: 0 LD TOS, [62B0] DB 6FH ;3586: ADD24 [NOS], TOS DB 8EH, 21H ;3587: SYS 211C DB 8CH, 21H ;3589: SYS 2118 DB 0DCH, 08H ;358B: SYS 08B8 DB 14H ;358D: ISNEG TOS DB 13H ;358E: ISZ TOS DB 08H, 14H ;358F: JZ 35A4 DB 22H, 60H, 28H ;3591: 8 PUSH 6028 DB 22H, 60H, 3BH ;3594: B PUSH 603B DB 36H ;3597: LD24 [TOS], NOS DB 3AH, 63H, 9EH ;3598: E LD TOS, [639E] DB 3BH, 60H, 41H ;359B: 1 LD [6041], TOS DB 72H ;359E: PUSH 0000 DB 3BH, 63H, 9EH ;359F: E LD [639E], TOS DB 0AH, 06H ;35A2: JP 35A9 DB 58H, 60H, 3BH, 62H, 0A4H;35A4: B MCPY3 [603B],[62A4] DB 0C9H, 33H ;35A9: SYS 3392 DB 8DH, 35H ;35AB: SYS 351A DB 8FH, 31H ;35AD: SYS 311E DB 29H ;35AF: NAVBK DB 11H ;35B0: RET DB 0FFH ;35B1: FF DB 15H ;35B2: 15 S35B3 DB 0B6H, 31H ;35B3: SYS 316C DB 22H, 63H, 0ABH ;35B5: B PUSH 63AB DB 2EH ;35B8: LD [TOS], 0 DB 0BCH, 19H ;35B9: SYS 1978 DB 23H, 05H ;35BB: PUSH 05 DB 0EBH, 30H ;35BD: SYS 30D6 DB 0ACH, 31H ;35BF: SYS 3158 DB 3EH, 28H ;35C1: LD TOS, [6028] DB 87H, 31H ;35C3: SYS 310E DB 02H ;35C5: SUB TOS, NOS DB 08H, 17H ;35C6: JZ 35DE DB 3EH, 28H ;35C8: LD TOS, [6028] DB 22H, 10H, 3BH ;35CA: B PUSH 103B DB 02H ;35CD: SUB TOS, NOS DB 08H, 07H ;35CE: JZ 35D6 DB 23H, 05H ;35D0: PUSH 05 DB 0F1H, 30H ;35D2: SYS 30E2 DB 0AH, 07H ;35D4: JP 35DC DB 0B6H, 31H ;35D6: SYS 316C DB 22H, 60H, 37H ;35D8: 7 PUSH 6037 DB 2FH ;35DB: LD [TOS], 1 DB 0AH, 09H ;35DC: JP 35E6 DB 82H, 31H ;35DE: SYS 3104 DB 72H ;35E0: PUSH 0000 DB 3BH, 60H, 37H ;35E1: 7 LD [6037], TOS DB 42H, 60H ;35E4: LD [60BD], 60 DB 96H, 31H ;35E6: SYS 312C DB 0C4H, 19H ;35E8: SYS 1988 DB 09H, 0CEH ;35EA: JZ 35B9 DB 0A3H, 31H ;35EC: SYS 3146 DB 8FH, 31H ;35EE: SYS 311E DB 29H ;35F0: NAVBK DB 11H ;35F1: RET DB 15H ;35F2: 15 S35F3 DB 0B6H, 31H ;35F3: SYS 316C DB 22H, 63H, 0ABH ;35F5: B PUSH 63AB DB 2EH ;35F8: LD [TOS], 0 DB 42H, 60H ;35F9: LD [60BD], 60 DB 87H, 31H ;35FB: SYS 310E DB 3BH, 63H, 0B6H ;35FD: 6 LD [63B6], TOS DB 22H, 60H, 32H ;3600: 2 PUSH 6032 DB 2EH ;3603: LD [TOS], 0 DB 0BCH, 19H ;3604: SYS 1978 DB 0ACH, 31H ;3606: SYS 3158 DB 40H, 28H ;3608: LD TOS.0, [6028] DB 23H, 05H ;360A: PUSH 05 DB 02H ;360C: SUB TOS, NOS DB 08H, 24H ;360D: JZ 3632 DB 40H, 28H ;360F: LD TOS.0, [6028] DB 23H, 15H ;3611: PUSH 15 DB 4FH ;3613: ISEQ DB 08H, 0BH ;3614: JZ 3620 DB 23H, 04H ;3616: PUSH 04 DB 0EBH, 30H ;3618: SYS 30D6 DB 22H, 60H, 38H ;361A: 8 PUSH 6038 DB 2FH ;361D: LD [TOS], 1 DB 0AH, 11H ;361E: JP 3630 DB 3EH, 28H ;3620: LD TOS, [6028] DB 22H, 10H, 04H ;3622: 4 PUSH 1004 DB 4FH ;3625: ISEQ DB 08H, 05H ;3626: JZ 362C DB 42H, 63H ;3628: LD [60BD], 63 DB 0AH, 05H ;362A: JP 3630 DB 23H, 05H ;362C: PUSH 05 DB 0FBH, 30H ;362E: SYS 30F6 DB 0AH, 07H ;3630: JP 3638 DB 72H ;3632: PUSH 0000 DB 3BH, 60H, 37H ;3633: 7 LD [6037], TOS DB 42H, 60H ;3636: LD [60BD], 60 DB 96H, 31H ;3638: SYS 312C DB 0C4H, 19H ;363A: SYS 1988 DB 09H, 0C7H ;363C: JZ 3604 DB 0A3H, 31H ;363E: SYS 3146 DB 8FH, 31H ;3640: SYS 311E DB 29H ;3642: NAVBK DB 11H ;3643: RET DB 15H ;3644: 15 DB 53H, 0CH ;3645: PUSH [VE].0, 0C DB 1EH ;3647: DUP DB 3DH, 63H, 97H ;3648: 7 LD [6397], TOS.0 DB 23H, 01H ;364B: PUSH 01 DB 4FH ;364D: ISEQ DB 08H, 08H ;364E: JZ 3657 DB 40H, 08H ;3650: LD TOS.0, [6008] DB 23H, 80H ;3652: PUSH 80 DB 33H ;3654: OR TOS, NOS DB 41H, 08H ;3655: LD [6008], TOS.0 DB 11H ;3657: RET S3658 DW S0217 ;3658: 02 17 DW S0310 ;365A: 03 10 DW S3010 ;365C: 30 10 DW S3101 ;365E: 31 01 DB 15H ;3660: 15 S3661 DB 22H, 36H, 58H ;3661: 8 PUSH 3658 DB 22H, 63H, 0A0H ;3664: 0 PUSH 63A0 DB 23H, 08H ;3667: PUSH 08 DB 1AH ;3669: MCPY [NOS], [3OS] DB 23H, 07H ;366A: PUSH 07 DB 22H, 63H, 0A8H ;366C: 8 PUSH 63A8 DB 19H ;366F: LD [TOS], NOS.0 DB 22H, 63H, 0A9H ;3670: 9 PUSH 63A9 DB 2FH ;3673: LD [TOS], 1 DB 53H, 01H ;3674: PUSH [VE].0, 01 DB 1EH ;3676: DUP DB 3DH, 63H, 9BH ;3677: B LD [639B], TOS.0 DB 74H ;367A: PUSH 0002 DB 33H ;367B: OR TOS, NOS DB 3DH, 63H, 9CH ;367C: C LD [639C], TOS.0 DB 3EH, 26H ;367F: LD TOS, [6026] DB 3BH, 63H, 9EH ;3681: E LD [639E], TOS DB 11H ;3684: RET DB 0FFH ;3685: FF DB 15H ;3686: 15 S3687 DB 53H, 01H ;3687: PUSH [VE].0, 01 DB 1EH ;3689: DUP DB 3DH, 63H, 9BH ;368A: B LD [639B], TOS.0 DB 3DH, 63H, 9CH ;368D: C LD [639C], TOS.0 DB 3EH, 26H ;3690: LD TOS, [6026] DB 3BH, 63H, 9EH ;3692: E LD [639E], TOS DB 11H ;3695: RET DB 15H ;3696: 15 S3697 DB 72H ;3697: PUSH 0000 DB 22H, 63H, 0A0H ;3698: 0 PUSH 63A0 DB 23H, 08H ;369B: PUSH 08 DB 46H ;369D: FILL DB 22H, 63H, 0A8H ;369E: 8 PUSH 63A8 DB 2FH ;36A1: LD [TOS], 1 DB 22H, 63H, 0A9H ;36A2: 9 PUSH 63A9 DB 2EH ;36A5: LD [TOS], 0 DB 0C3H, 36H ;36A6: SYS 3686 DB 11H ;36A8: RET DB 0FFH ;36A9: FF DB 15H ;36AA: 15 S36AB DB 22H, 36H, 58H ;36AB: 8 PUSH 3658 DB 22H, 63H, 0A0H ;36AE: 0 PUSH 63A0 DB 23H, 08H ;36B1: PUSH 08 DB 1AH ;36B3: MCPY [NOS], [3OS] DB 22H, 63H, 0A8H ;36B4: 8 PUSH 63A8 DB 2FH ;36B7: LD [TOS], 1 DB 72H ;36B8: PUSH 0000 DB 3BH, 63H, 9BH ;36B9: B LD [639B], TOS DB 22H, 01H, 00H ;36BC: 0 PUSH 0100 DB 3BH, 63H, 9EH ;36BF: E LD [639E], TOS DB 11H ;36C2: RET DW S3687 ;36C3: 36 87 DW S3697 ;36C5: 36 97 DW S3661 ;36C7: 36 61 DW S3661 ;36C9: 36 61 DW S3697 ;36CB: 36 97 DW S36AB ;36CD: 36 AB DB 0FFH ;36CF: FF DB 15H ;36D0: 15 S36D1 DB 0DFH, 34H ;36D1: SYS 34BE DB 90H, 13H ;36D3: SYS 1320 DB 5EH ;36D5: LD TOS, VC DB 3FH, 5EH ;36D6: LD [605E], TOS DB 0A2H, 36H ;36D8: SYS 3644 DB 22H, 65H, 00H ;36DA: 0 PUSH 6500 DB 2EH ;36DD: LD [TOS], 0 DB 22H, 63H, 9DH ;36DE: D PUSH 639D DB 2EH ;36E1: LD [TOS], 0 DB 52H, 03H ;36E2: PUSH VE, 03 DB 22H, 60H, 1FH ;36E4: F PUSH 601F DB 23H, 09H ;36E7: PUSH 09 DB 1AH ;36E9: MCPY [NOS], [3OS] DB 0DEH, 17H ;36EA: SYS 17BC DB 52H, 00H ;36EC: PUSH VE, 00 DB 22H, 63H, 98H ;36EE: 8 PUSH 6398 DB 31H ;36F1: MCPY3 [TOS], [NOS] DB 3CH, 63H, 98H ;36F2: 8 LD TOS.0, [6398] DB 66H, 36H, 0C3H ;36F5: 3 CALLI 36C3 DB 11H ;36F8: RET DB 0FFH ;36F9: FF DB 15H ;36FA: 15 DB 72H ;36FB: PUSH 0000 DB 41H, 0B0H ;36FC: LD [60B0], TOS.0 DB 72H ;36FE: PUSH 0000 DB 41H, 0B1H ;36FF: LD [60B1], TOS.0 DB 72H ;3701: PUSH 0000 DB 41H, 0B2H ;3702: LD [60B2], TOS.0 DB 11H ;3704: RET DB 0FFH ;3705: FF DB 15H ;3706: 15 S3707 DB 0B8H, 1CH ;3707: SYS 1C70 DB 40H, 07H ;3709: LD TOS.0, [6007] DB 23H, 40H ;370B: PUSH 40 DB 33H ;370D: OR TOS, NOS DB 41H, 07H ;370E: LD [6007], TOS.0 DB 75H ;3710: PUSH 0003 DB 86H, 18H ;3711: SYS 180C DB 0FDH, 36H ;3713: SYS 36FA DB 57H, 60H, 08H, 3FH ;3715: 83F LDAND 6008, 3F DB 41H, 08H ;3719: LD [6008], TOS.0 DB 0E8H, 36H ;371B: SYS 36D0 DB 0DBH, 17H ;371D: SYS 17B6 DB 3CH, 63H, 98H ;371F: 8 LD TOS.0, [6398] DB 08H, 2CH ;3722: JZ 374F DB 57H, 60H, 08H, 80H ;3724: 880 LDAND 6008, 80 DB 13H ;3728: ISZ TOS DB 08H, 21H ;3729: JZ 374B DB 0A2H, 17H ;372B: SYS 1744 DB 23H, 07H ;372D: PUSH 07 DB 72H ;372F: PUSH 0000 DB 0EH ;3730: LOOP FRAME DB 0CAH, 17H ;3731: SYS 1794 DB 08H, 08H ;3733: JZ 373C DB 0C4H, 30H ;3735: SYS 3088 DB 42H, 60H ;3737: LD [60BD], 60 DB 0FH ;3739: LOOP CLR DB 0AH, 0CH ;373A: JP 3747 DB 23H, 32H ;373C: PUSH 32 DB 41H, 09H ;373E: LD [6009], TOS.0 DB 45H ;3740: DELAY DB 75H ;3741: PUSH 0003 DB 3DH, 63H, 0BAH ;3742: A LD [63BA], TOS.0 DB 42H, 61H ;3745: LD [60BD], 61 DB 0CH, 0E9H ;3747: LOOP 3731 DB 0AH, 03H ;3749: JP 374D DB 0C4H, 30H ;374B: SYS 3088 DB 0AH, 05H ;374D: JP 3753 DB 3AH, 63H, 0B4H ;374F: 4 LD TOS, [63B4] DB 10H ;3752: EXEC TOS DB 8FH, 31H ;3753: SYS 311E DB 29H ;3755: NAVBK DB 11H ;3756: RET DB 0FFH ;3757: FF DB 15H ;3758: 15 S3759 DB 0DFH, 34H ;3759: SYS 34BE DB 0B7H, 17H ;375B: SYS 176E DB 09H, 0FDH ;375D: JZ 375B DB 0A6H, 17H ;375F: SYS 174C DB 0AEH, 17H ;3761: SYS 175C DB 0E9H, 17H ;3763: SYS 17D2 DB 40H, 07H ;3765: LD TOS.0, [6007] DB 23H, 0BFH ;3767: PUSH BF DB 12H ;3769: AND TOS, NOS DB 41H, 07H ;376A: LD [6007], TOS.0 DB 72H ;376C: PUSH 0000 DB 86H, 18H ;376D: SYS 180C DB 57H, 60H, 64H, 80H ;376F: 480 LDAND 6064, 80 DB 41H, 64H ;3773: LD [6064], TOS.0 DB 72H ;3775: PUSH 0000 DB 0C1H, 1BH ;3776: SYS 1B82 DB 72H ;3778: PUSH 0000 DB 41H, 63H ;3779: LD [6063], TOS.0 DB 0B8H, 1CH ;377B: SYS 1C70 DB 11H ;377D: RET DB 15H ;377E: 15 S377F DB 22H, 10H, 04H ;377F: 4 PUSH 1004 DB 0EBH, 30H ;3782: SYS 30D6 DB 23H, 32H ;3784: PUSH 32 DB 72H ;3786: PUSH 0000 DB 0EH ;3787: LOOP FRAME DB 0CAH, 17H ;3788: SYS 1794 DB 08H, 08H ;378A: JZ 3793 DB 23H, 05H ;378C: PUSH 05 DB 41H, 09H ;378E: LD [6009], TOS.0 DB 45H ;3790: DELAY DB 0AH, 02H ;3791: JP 3794 DB 0FH ;3793: LOOP CLR DB 0CH, 0F3H ;3794: LOOP 3788 DB 0ACH, 37H ;3796: SYS 3758 DB 11H ;3798: RET DB 0FFH ;3799: FF DB 15H ;379A: 15 DB 3AH, 62H, 84H ;379B: 4 LD TOS, [6284] DB 57H, 62H, 81H, 04H ;379E: 104 LDAND 6281, 04 DB 08H, 06H ;37A2: JZ 37A9 DB 22H, 62H, 60H ;37A4: 0 PUSH 6260 DB 0AH, 08H ;37A7: JP 37B0 DB 22H, 60H, 80H ;37A9: 0 PUSH 6080 DB 3CH, 62H, 87H ;37AC: 7 LD TOS.0, [6287] DB 00H ;37AF: ADD TOS, NOS DB 8EH, 13H ;37B0: SYS 131C DB 22H, 60H, 5AH ;37B2: A PUSH 605A DB 22H, 60H, 56H ;37B5: 6 PUSH 6056 DB 23H, 04H ;37B8: PUSH 04 DB 1AH ;37BA: MCPY [NOS], [3OS] DB 11H ;37BB: RET DB 15H ;37BC: 15 DB 0EBH, 12H ;37BD: SYS 12D6 DB 57H, 62H, 80H, 04H ;37BF: 004 LDAND 6280, 04 DB 08H, 09H ;37C3: JZ 37CD DB 23H, 20H ;37C5: PUSH 20 DB 22H, 60H, 80H ;37C7: 0 PUSH 6080 DB 23H, 20H ;37CA: PUSH 20 DB 46H ;37CC: FILL DB 3AH, 62H, 82H ;37CD: 2 LD TOS, [6282] DB 1FH ;37D0: DUPNZ DB 08H, 0AH ;37D1: JZ 37DC DB 22H, 60H, 80H ;37D3: 0 PUSH 6080 DB 3CH, 62H, 86H ;37D6: 6 LD TOS.0, [6286] DB 00H ;37D9: ADD TOS, NOS DB 8EH, 13H ;37DA: SYS 131C DB 11H ;37DC: RET DB 0FFH ;37DD: FF DB 15H ;37DE: 15 DB 57H, 62H, 81H, 04H ;37DF: 104 LDAND 6281, 04 DB 08H, 0BH ;37E3: JZ 37EF DB 3CH, 62H, 87H ;37E5: 7 LD TOS.0, [6287] DB 22H, 60H, 80H ;37E8: 0 PUSH 6080 DB 00H ;37EB: ADD TOS, NOS DB 43H ;37EC: DISP DB 0AH, 33H ;37ED: JP 3821 DB 60H ;37EF: LD TOS, VD DB 64H ;37F0: LD TOS, VB DB 4DH ;37F1: ISLT DB 08H, 2AH ;37F2: JZ 381D DB 57H, 62H, 81H, 38H ;37F4: 138 LDAND 6281, 38 DB 13H ;37F8: ISZ TOS DB 08H, 03H ;37F9: JZ 37FD DB 0CCH, 07H ;37FB: SYS 0798 DB 64H ;37FD: LD TOS, VB DB 60H ;37FE: LD TOS, VD DB 4DH ;37FF: ISLT DB 08H, 03H ;3800: JZ 3804 DB 64H ;3802: LD TOS, VB DB 5FH ;3803: LD VD, TOS DB 60H ;3804: LD TOS, VD DB 64H ;3805: LD TOS, VB DB 02H ;3806: SUB TOS, NOS DB 03H ;3807: ADD TOS, 1 DB 72H ;3808: PUSH 0000 DB 64H ;3809: LD TOS, VB DB 5FH ;380A: LD VD, TOS DB 0EH ;380B: LOOP FRAME DB 2BH ;380C: STRCP DB 44H ;380D: LCD DB 3CH, 63H, 3AH ;380E: A LD TOS.0, [633A] DB 41H, 09H ;3811: LD [6009], TOS.0 DB 45H ;3813: DELAY DB 73H ;3814: PUSH 0001 DB 22H, 60H, 5AH ;3815: A PUSH 605A DB 05H ;3818: ADD [TOS], NOS DB 0CH, 0F2H ;3819: LOOP 380C DB 0AH, 05H ;381B: JP 3821 DB 5EH ;381D: LD TOS, VC DB 62H ;381E: LD TOS, VA DB 60H ;381F: LD TOS, VD DB 1AH ;3820: MCPY [NOS], [3OS] DB 11H ;3821: RET DB 15H ;3822: 15 DB 0DEH, 37H ;3823: SYS 37BC DB 0CDH, 37H ;3825: SYS 379A DB 87H, 30H ;3827: SYS 300E DB 0EFH, 37H ;3829: SYS 37DE DB 57H, 62H, 81H, 04H ;382B: 104 LDAND 6281, 04 DB 08H, 03H ;382F: JZ 3833 DB 0DDH, 07H ;3831: SYS 07BA DB 3CH, 62H, 88H ;3833: 8 LD TOS.0, [6288] DB 1FH ;3836: DUPNZ DB 13H ;3837: ISZ TOS DB 09H, 0EAH ;3838: JZ 3823 DB 44H ;383A: LCD DB 11H ;383B: RET DB 15H ;383C: 15 S383D DB 0DAH, 13H ;383D: SYS 13B4 DB 5EH ;383F: LD TOS, VC DB 17H ;3840: LD TOS.0, [TOS] DB 0AH, 04H ;3841: JP 3846 DB 0FFH ;3843: FF DB 15H ;3844: 15 S3845 DB 2AH ;3845: LD TOS.0, [RP] DB 91H, 38H ;3846: SYS 3822 DB 11H ;3848: RET DB 0FFH ;3849: FF DB 15H ;384A: 15 S384B DB 2AH ;384B: LD TOS.0, [RP] DB 22H, 60H, 80H ;384C: 0 PUSH 6080 DB 00H ;384F: ADD TOS, NOS DB 6AH ;3850: LD TOS, [RP] DB 20H ;3851: SWAP DB 8EH, 13H ;3852: SYS 131C DB 44H ;3854: LCD DB 11H ;3855: RET DB 15H ;3856: 15 S3857 DB 23H, 20H ;3857: PUSH 20 DB 22H, 60H, 80H ;3859: 0 PUSH 6080 DB 23H, 20H ;385C: PUSH 20 DB 46H ;385E: FILL DB 44H ;385F: LCD DB 11H ;3860: RET DB 0FFH ;3861: FF DB 15H ;3862: 15 S3863 DB 6AH ;3863: LD TOS, [RP] DB 22H, 63H, 0C8H ;3864: 8 PUSH 63C8 DB 8EH, 13H ;3867: SYS 131C DB 60H ;3869: LD TOS, VD DB 3DH, 63H, 95H ;386A: 5 LD [6395], TOS.0 DB 42H, 60H ;386D: LD [60BD], 60 DB 22H, 63H, 96H ;386F: 6 PUSH 6396 DB 2FH ;3872: LD [TOS], 1 DB 11H ;3873: RET DB 15H ;3874: 15 S3875 DB 3CH, 63H, 96H ;3875: 6 LD TOS.0, [6396] DB 40H, 0BDH ;3878: LD TOS.0, [60BD] DB 23H, 79H ;387A: PUSH 79 DB 4FH ;387C: ISEQ DB 08H, 04H ;387D: JZ 3882 DB 27H ;387F: SUB TOS, 1 DB 0AH, 09H ;3880: JP 388A DB 40H, 0BDH ;3882: LD TOS.0, [60BD] DB 23H, 65H ;3884: PUSH 65 DB 4FH ;3886: ISEQ DB 08H, 02H ;3887: JZ 388A DB 03H ;3889: ADD TOS, 1 DB 1EH ;388A: DUP DB 3DH, 63H, 96H ;388B: 6 LD [6396], TOS.0 DB 73H ;388E: PUSH 0001 DB 3CH, 63H, 95H ;388F: 5 LD TOS.0, [6395] DB 0BDH, 21H ;3892: SYS 217A DB 08H, 0EH ;3894: JZ 38A3 DB 22H, 63H, 0C8H ;3896: 8 PUSH 63C8 DB 3CH, 63H, 96H ;3899: 6 LD TOS.0, [6396] DB 27H ;389C: SUB TOS, 1 DB 00H ;389D: ADD TOS, NOS DB 17H ;389E: LD TOS.0, [TOS] DB 91H, 38H ;389F: SYS 3822 DB 0AH, 14H ;38A1: JP 38B6 DB 40H, 0BDH ;38A3: LD TOS.0, [60BD] DB 23H, 79H ;38A5: PUSH 79 DB 4FH ;38A7: ISEQ DB 08H, 07H ;38A8: JZ 38B0 DB 3CH, 63H, 95H ;38AA: 5 LD TOS.0, [6395] DB 03H ;38AD: ADD TOS, 1 DB 0AH, 02H ;38AE: JP 38B1 DB 72H ;38B0: PUSH 0000 DB 3DH, 63H, 96H ;38B1: 6 LD [6396], TOS.0 DB 42H, 61H ;38B4: LD [60BD], 61 DB 29H ;38B6: NAVBK DB 11H ;38B7: RET DB 15H ;38B8: 15 S38B9 DB 2AH ;38B9: LD TOS.0, [RP] DB 01H ;38BA: SHL TOS DB 3AH, 63H, 0B8H ;38BB: 8 LD TOS, [63B8] DB 00H ;38BE: ADD TOS, NOS DB 15H ;38BF: LD TOS, [TOS] DB 10H ;38C0: EXEC TOS DB 11H ;38C1: RET DB 15H ;38C2: 15 S38C3 DB 6AH ;38C3: LD TOS, [RP] DB 15H ;38C4: LD TOS, [TOS] DB 03H ;38C5: ADD TOS, 1 DB 10H ;38C6: EXEC TOS DB 11H ;38C7: RET DB 15H ;38C8: 15 DB 1EH ;38C9: DUP DB 3DH, 62H, 96H ;38CA: 6 LD [6296], TOS.0 DB 3DH, 62H, 0B2H ;38CD: 2 LD [62B2], TOS.0 DB 22H, 62H, 97H ;38D0: 7 PUSH 6297 DB 22H, 62H, 0B3H ;38D3: 3 PUSH 62B3 DB 23H, 08H ;38D6: PUSH 08 DB 1AH ;38D8: MCPY [NOS], [3OS] DB 0C8H, 29H ;38D9: SYS 2990 DB 22H, 60H, 0B7H ;38DB: 7 PUSH 60B7 DB 9CH, 0FH ;38DE: SYS 0F38 DB 11H ;38E0: RET DB 0FFH ;38E1: FF DB 15H ;38E2: 15 DB 0B0H, 10H ;38E3: SYS 1060 DB 0DDH, 28H ;38E5: SYS 28BA DB 23H, 5AH ;38E7: PUSH 5A DB 3DH, 62H, 96H ;38E9: 6 LD [6296], TOS.0 DB 0B1H, 29H ;38EC: SYS 2962 DB 08H, 07H ;38EE: JZ 38F6 DB 3EH, 53H ;38F0: LD TOS, [6053] DB 3FH, 51H ;38F2: LD [6051], TOS DB 0AH, 11H ;38F4: JP 3906 DB 23H, 20H ;38F6: PUSH 20 DB 87H, 26H ;38F8: SYS 260E DB 0B7H, 2AH ;38FA: SYS 2A6E DB 8AH, 21H ;38FC: SYS 2114 DB 23H, 12H ;38FE: PUSH 12 DB 6FH ;3900: ADD24 [NOS], TOS DB 8CH, 21H ;3901: SYS 2118 DB 23H, 12H ;3903: PUSH 12 DB 70H ;3905: SUB24 [NOS], TOS DB 22H, 62H, 0B2H ;3906: 2 PUSH 62B2 DB 23H, 0AH ;3909: PUSH 0A DB 0A2H, 15H ;390B: SYS 1544 DB 22H, 60H, 0C4H ;390D: 4 PUSH 60C4 DB 23H, 02H ;3910: PUSH 02 DB 0A2H, 15H ;3912: SYS 1544 DB 22H, 63H, 0C2H ;3914: 2 PUSH 63C2 DB 23H, 04H ;3917: PUSH 04 DB 0A2H, 15H ;3919: SYS 1544 DB 22H, 60H, 6AH ;391B: A PUSH 606A DB 74H ;391E: PUSH 0002 DB 0A2H, 15H ;391F: SYS 1544 DB 72H ;3921: PUSH 0000 DB 3BH, 63H, 0C2H ;3922: 2 LD [63C2], TOS DB 0E4H, 38H ;3925: SYS 38C8 DB 22H, 60H, 0B7H ;3927: 7 PUSH 60B7 DB 22H, 60H, 0C3H ;392A: 3 PUSH 60C3 DB 23H, 06H ;392D: PUSH 06 DB 0E9H, 15H ;392F: SYS 15D2 DB 85H, 10H ;3931: SYS 100A DB 11H ;3933: RET DB 15H ;3934: 15 S3935 DB 67H ;3935: LD VE, [RP] DB 0D5H, 28H ;3936: SYS 28AA DB 53H, 0FH ;3938: PUSH [VE].0, 0F DB 0F1H, 38H ;393A: SYS 38E2 DB 11H ;393C: RET DB 0FFH ;393D: FF DB 15H ;393E: 15 S393F DB 22H, 62H, 0B3H ;393F: 3 PUSH 62B3 DB 22H, 62H, 97H ;3942: 7 PUSH 6297 DB 23H, 08H ;3945: PUSH 08 DB 1AH ;3947: MCPY [NOS], [3OS] DB 23H, 5AH ;3948: PUSH 5A DB 3DH, 62H, 96H ;394A: 6 LD [6296], TOS.0 DB 0C8H, 29H ;394D: SYS 2990 DB 86H, 21H ;394F: SYS 210C DB 23H, 0AH ;3951: PUSH 0A DB 0D0H, 15H ;3953: SYS 15A0 DB 22H, 60H, 0C4H ;3955: 4 PUSH 60C4 DB 23H, 02H ;3958: PUSH 02 DB 0D0H, 15H ;395A: SYS 15A0 DB 22H, 63H, 0C2H ;395C: 2 PUSH 63C2 DB 23H, 04H ;395F: PUSH 04 DB 0D0H, 15H ;3961: SYS 15A0 DB 22H, 60H, 6AH ;3963: A PUSH 606A DB 74H ;3966: PUSH 0002 DB 0D0H, 15H ;3967: SYS 15A0 DB 3CH, 62H, 96H ;3969: 6 LD TOS.0, [6296] DB 0E4H, 38H ;396C: SYS 38C8 DB 0C3H, 10H ;396E: SYS 1086 DB 0B8H, 23H ;3970: SYS 2370 DB 0B0H, 23H ;3972: SYS 2360 DB 22H, 60H, 0B7H ;3974: 7 PUSH 60B7 DB 8EH, 21H ;3977: SYS 211C DB 31H ;3979: MCPY3 [TOS], [NOS] DB 8EH, 21H ;397A: SYS 211C DB 75H ;397C: PUSH 0003 DB 6FH ;397D: ADD24 [NOS], TOS DB 75H ;397E: PUSH 0003 DB 5BH, 60H, 0C6H, 62H, 0ADH;397F: 6 LDBNK 60C6, [62AD] DB 11H ;3984: RET DB 0FFH ;3985: FF DB 15H ;3986: 15 S3987 DB 0DAH, 13H ;3987: SYS 13B4 DB 5EH ;3989: LD TOS, VC DB 15H ;398A: LD TOS, [TOS] DB 0C9H, 0FH ;398B: SYS 0F92 DB 11H ;398D: RET DB 15H ;398E: 15 DB 22H, 21H, 55H ;398F: 5 PUSH 2155 DB 86H, 21H ;3992: SYS 210C DB 23H, 09H ;3994: PUSH 09 DB 1AH ;3996: MCPY [NOS], [3OS] DB 23H, 59H ;3997: PUSH 59 DB 0F1H, 38H ;3999: SYS 38E2 DB 11H ;399B: RET DB 15H ;399C: 15 S399D DB 0F2H, 23H ;399D: SYS 23E4 DB 85H, 10H ;399F: SYS 100A DB 11H ;39A1: RET DB 15H ;39A2: 15 DB 3CH, 65H, 00H ;39A3: 0 LD TOS.0, [6500] DB 08H, 55H ;39A6: JZ 39FC DB 0B6H, 31H ;39A8: SYS 316C DB 42H, 60H ;39AA: LD [60BD], 60 DB 3CH, 63H, 98H ;39AC: 8 LD TOS.0, [6398] DB 23H, 04H ;39AF: PUSH 04 DB 4FH ;39B1: ISEQ DB 08H, 0DH ;39B2: JZ 39C0 DB 22H, 65H, 00H ;39B4: 0 PUSH 6500 DB 37H ;39B7: LDVCD [TOS] DB 0D9H, 34H ;39B8: SYS 34B2 DB 22H, 65H, 00H ;39BA: 0 PUSH 6500 DB 2EH ;39BD: LD [TOS], 0 DB 0AH, 3DH ;39BE: JP 39FC DB 22H, 60H, 32H ;39C0: 2 PUSH 6032 DB 2FH ;39C3: LD [TOS], 1 DB 22H, 65H, 00H ;39C4: 0 PUSH 6500 DB 03H ;39C7: ADD TOS, 1 DB 22H, 60H, 3EH ;39C8: E PUSH 603E DB 36H ;39CB: LD24 [TOS], NOS DB 22H, 65H, 00H ;39CC: 0 PUSH 6500 DB 17H ;39CF: LD TOS.0, [TOS] DB 3BH, 60H, 33H ;39D0: 3 LD [6033], TOS DB 3CH, 63H, 98H ;39D3: 8 LD TOS.0, [6398] DB 23H, 05H ;39D6: PUSH 05 DB 4FH ;39D8: ISEQ DB 08H, 03H ;39D9: JZ 39DD DB 0C0H, 31H ;39DB: SYS 3180 DB 40H, 0BDH ;39DD: LD TOS.0, [60BD] DB 23H, 60H ;39DF: PUSH 60 DB 4FH ;39E1: ISEQ DB 08H, 17H ;39E2: JZ 39FA DB 72H ;39E4: PUSH 0000 DB 3BH, 60H, 37H ;39E5: 7 LD [6037], TOS DB 0C4H, 30H ;39E8: SYS 3088 DB 90H, 32H ;39EA: SYS 3220 DB 3CH, 63H, 98H ;39EC: 8 LD TOS.0, [6398] DB 23H, 05H ;39EF: PUSH 05 DB 4FH ;39F1: ISEQ DB 08H, 03H ;39F2: JZ 39F6 DB 0D1H, 30H ;39F4: SYS 30A2 DB 22H, 65H, 00H ;39F6: 0 PUSH 6500 DB 2EH ;39F9: LD [TOS], 0 DB 0A3H, 31H ;39FA: SYS 3146 DB 11H ;39FC: RET DB 0FFH ;39FD: FF DB 15H ;39FE: 15 DB 42H, 60H ;39FF: LD [60BD], 60 DB 3CH, 65H, 00H ;3A01: 0 LD TOS.0, [6500] DB 23H, 80H ;3A04: PUSH 80 DB 4DH ;3A06: ISLT DB 3CH, 63H, 98H ;3A07: 8 LD TOS.0, [6398] DB 23H, 04H ;3A0A: PUSH 04 DB 4FH ;3A0C: ISEQ DB 33H ;3A0D: OR TOS, NOS DB 08H, 03H ;3A0E: JZ 3A12 DB 0D1H, 39H ;3A10: SYS 39A2 DB 11H ;3A12: RET DB 0FFH ;3A13: FF DB 15H ;3A14: 15 DB 22H, 63H, 6CH ;3A15: C PUSH 636C DB 61H ;3A18: LD VA, TOS DB 66H, 28H, 12H ;3A19: 2 CALLI 2812 DB 62H ;3A1C: LD TOS, VA DB 5DH ;3A1D: LD VC, TOS DB 64H ;3A1E: LD TOS, VB DB 5FH ;3A1F: LD VD, TOS DB 11H ;3A20: RET DB 0FFH ;3A21: FF DB 15H ;3A22: 15 S3A23 DB 0DAH, 13H ;3A23: SYS 13B4 DB 5EH ;3A25: LD TOS, VC DB 15H ;3A26: LD TOS, [TOS] DB 0AH, 04H ;3A27: JP 3A2C DB 0FFH ;3A29: FF DB 15H ;3A2A: 15 S3A2B DB 6AH ;3A2B: LD TOS, [RP] DB 0FFH, 39H ;3A2C: SYS 39FE DB 8FH, 31H ;3A2E: SYS 311E DB 40H, 0BDH ;3A30: LD TOS.0, [60BD] DB 23H, 61H ;3A32: PUSH 61 DB 02H ;3A34: SUB TOS, NOS DB 08H, 05H ;3A35: JZ 3A3B DB 0C9H, 0FH ;3A37: SYS 0F92 DB 0AH, 02H ;3A39: JP 3A3C DB 1CH ;3A3B: DROP DB 29H ;3A3C: NAVBK DB 11H ;3A3D: RET DB 15H ;3A3E: 15 S3A3F DB 0D1H, 39H ;3A3F: SYS 39A2 DB 23H, 0BH ;3A41: PUSH 0B DB 0AH, 05H ;3A43: JP 3A49 DB 0FFH ;3A45: FF DB 15H ;3A46: 15 S3A47 DB 23H, 09H ;3A47: PUSH 09 DB 22H, 65H, 00H ;3A49: 0 PUSH 6500 DB 0C2H, 0CH ;3A4C: SYS 0C84 DB 2AH ;3A4E: LD TOS.0, [RP] DB 23H, 20H ;3A4F: PUSH 20 DB 00H ;3A51: ADD TOS, NOS DB 22H, 65H, 00H ;3A52: 0 PUSH 6500 DB 0C2H, 0CH ;3A55: SYS 0C84 DB 11H ;3A57: RET DB 15H ;3A58: 15 S3A59 DB 0DAH, 13H ;3A59: SYS 13B4 DB 2AH ;3A5B: LD TOS.0, [RP] DB 2AH ;3A5C: LD TOS.0, [RP] DB 63H ;3A5D: LD VB, TOS DB 1EH ;3A5E: DUP DB 75H ;3A5F: PUSH 0003 DB 0A0H, 06H ;3A60: SYS 0640 DB 08H, 06H ;3A62: JZ 3A69 DB 73H ;3A64: PUSH 0001 DB 22H, 60H, 58H ;3A65: 8 PUSH 6058 DB 05H ;3A68: ADD [TOS], NOS DB 23H, 08H ;3A69: PUSH 08 DB 06H ;3A6B: MUL TOS, NOS DB 75H ;3A6C: PUSH 0003 DB 33H ;3A6D: OR TOS, NOS DB 8AH, 3AH ;3A6E: SYS 3A14 DB 60H ;3A70: LD TOS, VD DB 5EH ;3A71: LD TOS, VC DB 90H, 13H ;3A72: SYS 1320 DB 22H, 60H, 5AH ;3A74: A PUSH 605A DB 22H, 60H, 56H ;3A77: 6 PUSH 6056 DB 23H, 04H ;3A7A: PUSH 04 DB 1AH ;3A7C: MCPY [NOS], [3OS] DB 5DH ;3A7D: LD VC, TOS DB 5FH ;3A7E: LD VD, TOS DB 22H, 65H, 00H ;3A7F: 0 PUSH 6500 DB 35H ;3A82: ADD TOS, [TOS] DB 03H ;3A83: ADD TOS, 1 DB 43H ;3A84: DISP DB 0DDH, 07H ;3A85: SYS 07BA DB 64H ;3A87: LD TOS, VB DB 22H, 65H, 00H ;3A88: 0 PUSH 6500 DB 30H ;3A8B: ADD [TOS], NOS.0 DB 11H ;3A8C: RET DB 0FFH ;3A8D: FF DB 15H ;3A8E: 15 S3A8F DB 0DAH, 13H ;3A8F: SYS 13B4 DB 2AH ;3A91: LD TOS.0, [RP] DB 23H, 08H ;3A92: PUSH 08 DB 06H ;3A94: MUL TOS, NOS DB 2AH ;3A95: LD TOS.0, [RP] DB 63H ;3A96: LD VB, TOS DB 8AH, 3AH ;3A97: SYS 3A14 DB 5EH ;3A99: LD TOS, VC DB 22H, 65H, 00H ;3A9A: 0 PUSH 6500 DB 35H ;3A9D: ADD TOS, [TOS] DB 03H ;3A9E: ADD TOS, 1 DB 60H ;3A9F: LD TOS, VD DB 1AH ;3AA0: MCPY [NOS], [3OS] DB 60H ;3AA1: LD TOS, VD DB 22H, 65H, 00H ;3AA2: 0 PUSH 6500 DB 30H ;3AA5: ADD [TOS], NOS.0 DB 11H ;3AA6: RET DB 0FFH ;3AA7: FF DB 15H ;3AA8: 15 S3AA9 DB 6AH ;3AA9: LD TOS, [RP] DB 22H, 65H, 00H ;3AAA: 0 PUSH 6500 DB 35H ;3AAD: ADD TOS, [TOS] DB 03H ;3AAE: ADD TOS, 1 DB 8EH, 13H ;3AAF: SYS 131C DB 60H ;3AB1: LD TOS, VD DB 22H, 65H, 00H ;3AB2: 0 PUSH 6500 DB 30H ;3AB5: ADD [TOS], NOS.0 DB 11H ;3AB6: RET DB 0FFH ;3AB7: FF DB 15H ;3AB8: 15 S3AB9 DB 0DEH, 0FH ;3AB9: SYS 0FBC DB 29H ;3ABB: NAVBK DB 11H ;3ABC: RET DB 0FFH ;3ABD: FF DB 15H ;3ABE: 15 S3ABF DB 90H, 13H ;3ABF: SYS 1320 DB 2AH ;3AC1: LD TOS.0, [RP] DB 72H ;3AC2: PUSH 0000 DB 0EH ;3AC3: LOOP FRAME DB 5EH ;3AC4: LD TOS, VC DB 22H, 65H, 00H ;3AC5: 0 PUSH 6500 DB 35H ;3AC8: ADD TOS, [TOS] DB 03H ;3AC9: ADD TOS, 1 DB 60H ;3ACA: LD TOS, VD DB 1AH ;3ACB: MCPY [NOS], [3OS] DB 60H ;3ACC: LD TOS, VD DB 22H, 65H, 00H ;3ACD: 0 PUSH 6500 DB 30H ;3AD0: ADD [TOS], NOS.0 DB 0CH, 0F2H ;3AD1: LOOP 3AC4 DB 11H ;3AD3: RET DW S2D13 ;3AD4: 2D 13 DW S3AA9 ;3AD6: 3A A9 DW S3AA9 ;3AD8: 3A A9 DW S3A8F ;3ADA: 3A 8F DW S3ABF ;3ADC: 3A BF DB 15H ;3ADE: 15 S3ADF DB 2AH ;3ADF: LD TOS.0, [RP] DB 66H, 3AH, 0D4H ;3AE0: 4 CALLI 3AD4 DB 0D1H, 39H ;3AE3: SYS 39A2 DB 8FH, 31H ;3AE5: SYS 311E DB 29H ;3AE7: NAVBK DB 11H ;3AE8: RET DB 0FFH ;3AE9: FF DB 15H ;3AEA: 15 S3AEB DB 2AH ;3AEB: LD TOS.0, [RP] DB 66H, 3AH, 0D4H ;3AEC: 4 CALLI 3AD4 DB 23H, 0DH ;3AEF: PUSH 0D DB 22H, 65H, 00H ;3AF1: 0 PUSH 6500 DB 0C2H, 0CH ;3AF4: SYS 0C84 DB 0D1H, 39H ;3AF6: SYS 39A2 DB 8FH, 31H ;3AF8: SYS 311E DB 29H ;3AFA: NAVBK DB 11H ;3AFB: RET DB 15H ;3AFC: 15 S3AFD DB 3CH, 63H, 3BH ;3AFD: B LD TOS.0, [633B] DB 08H, 11H ;3B00: JZ 3B12 DB 0CDH, 37H ;3B02: SYS 379A DB 22H, 63H, 3BH ;3B04: B PUSH 633B DB 2EH ;3B07: LD [TOS], 0 DB 22H, 63H, 3BH ;3B08: B PUSH 633B DB 37H ;3B0B: LDVCD [TOS] DB 0EFH, 37H ;3B0C: SYS 37DE DB 44H ;3B0E: LCD DB 72H ;3B0F: PUSH 0000 DB 0AH, 03H ;3B10: JP 3B14 DB 23H, 78H ;3B12: PUSH 78 DB 11H ;3B14: RET DB 0FFH ;3B15: FF DB 15H ;3B16: 15 S3B17 DB 3CH, 63H, 3BH ;3B17: B LD TOS.0, [633B] DB 08H, 12H ;3B1A: JZ 3B2D DB 0CDH, 37H ;3B1C: SYS 379A DB 76H ;3B1E: PUSH FFFF DB 22H, 63H, 3BH ;3B1F: B PUSH 633B DB 30H ;3B22: ADD [TOS], NOS.0 DB 22H, 63H, 3BH ;3B23: B PUSH 633B DB 37H ;3B26: LDVCD [TOS] DB 0EFH, 37H ;3B27: SYS 37DE DB 44H ;3B29: LCD DB 72H ;3B2A: PUSH 0000 DB 0AH, 03H ;3B2B: JP 3B2F DB 23H, 79H ;3B2D: PUSH 79 DB 11H ;3B2F: RET DB 15H ;3B30: 15 DB 1EH ;3B31: DUP DB 22H, 63H, 90H ;3B32: 0 PUSH 6390 DB 00H ;3B35: ADD TOS, NOS DB 17H ;3B36: LD TOS.0, [TOS] DB 3DH, 60H, 80H ;3B37: 0 LD [6080], TOS.0 DB 3DH, 62H, 0D9H ;3B3A: 9 LD [62D9], TOS.0 DB 22H, 62H, 0DAH ;3B3D: A PUSH 62DA DB 3CH, 62H, 0D9H ;3B40: 9 LD TOS.0, [62D9] DB 08H, 06H ;3B43: JZ 3B4A DB 22H, 21H, 8DH ;3B45: D PUSH 218D DB 39H ;3B48: LDBNK [TOS] DB 00H ;3B49: ADD TOS, NOS DB 22H, 62H, 0D7H ;3B4A: 7 PUSH 62D7 DB 16H ;3B4D: LD [TOS], NOS DB 11H ;3B4E: RET DB 0FFH ;3B4F: FF DB 15H ;3B50: 15 S3B51 DB 3CH, 62H, 0D9H ;3B51: 9 LD TOS.0, [62D9] DB 13H ;3B54: ISZ TOS DB 98H, 3BH ;3B55: SYS 3B30 DB 72H ;3B57: PUSH 0000 DB 44H ;3B58: LCD DB 11H ;3B59: RET DB 15H ;3B5A: 15 S3B5B DB 3CH, 63H, 3BH ;3B5B: B LD TOS.0, [633B] DB 3CH, 62H, 8BH ;3B5E: B LD TOS.0, [628B] DB 3CH, 62H, 8CH ;3B61: C LD TOS.0, [628C] DB 0BDH, 21H ;3B64: SYS 217A DB 08H, 2DH ;3B66: JZ 3B94 DB 3CH, 62H, 8FH ;3B68: F LD TOS.0, [628F] DB 63H ;3B6B: LD VB, TOS DB 3AH, 62H, 89H ;3B6C: 9 LD TOS, [6289] DB 1FH ;3B6F: DUPNZ DB 08H, 19H ;3B70: JZ 3B8A DB 0C9H, 22H ;3B72: SYS 2292 DB 22H, 63H, 6CH ;3B74: C PUSH 636C DB 61H ;3B77: LD VA, TOS DB 0BAH, 30H ;3B78: SYS 3074 DB 0F7H, 2CH ;3B7A: SYS 2CEE DB 1EH ;3B7C: DUP DB 23H, 61H ;3B7D: PUSH 61 DB 02H ;3B7F: SUB TOS, NOS DB 08H, 07H ;3B80: JZ 3B88 DB 62H ;3B82: LD TOS, VA DB 3AH, 62H, 8DH ;3B83: D LD TOS, [628D] DB 64H ;3B86: LD TOS, VB DB 1AH ;3B87: MCPY [NOS], [3OS] DB 0AH, 09H ;3B88: JP 3B92 DB 3AH, 62H, 8DH ;3B8A: D LD TOS, [628D] DB 61H ;3B8D: LD VA, TOS DB 0BAH, 30H ;3B8E: SYS 3074 DB 23H, 60H ;3B90: PUSH 60 DB 0AH, 08H ;3B92: JP 3B9B DB 23H, 61H ;3B94: PUSH 61 DB 23H, 02H ;3B96: PUSH 02 DB 3DH, 63H, 8FH ;3B98: F LD [638F], TOS.0 DB 11H ;3B9B: RET DB 15H ;3B9C: 15 S3B9D DB 23H, 2BH ;3B9D: PUSH 2B DB 3DH, 63H, 8CH ;3B9F: C LD [638C], TOS.0 DB 0ADH, 3BH ;3BA2: SYS 3B5A DB 11H ;3BA4: RET DB 0FFH ;3BA5: FF DB 15H ;3BA6: 15 S3BA7 DB 23H, 2DH ;3BA7: PUSH 2D DB 3DH, 63H, 8CH ;3BA9: C LD [638C], TOS.0 DB 0ADH, 3BH ;3BAC: SYS 3B5A DB 11H ;3BAE: RET DB 0FFH ;3BAF: FF DB 15H ;3BB0: 15 S3BB1 DB 3CH, 63H, 8CH ;3BB1: C LD TOS.0, [638C] DB 23H, 06H ;3BB4: PUSH 06 DB 0A0H, 06H ;3BB6: SYS 0640 DB 1EH ;3BB8: DUP DB 3DH, 63H, 8CH ;3BB9: C LD [638C], TOS.0 DB 3DH, 60H, 80H ;3BBC: 0 LD [6080], TOS.0 DB 44H ;3BBF: LCD DB 72H ;3BC0: PUSH 0000 DB 11H ;3BC1: RET DB 15H ;3BC2: 15 DB 0ADH, 3BH ;3BC3: SYS 3B5A DB 23H, 61H ;3BC5: PUSH 61 DB 4FH ;3BC7: ISEQ DB 08H, 04H ;3BC8: JZ 3BCD DB 1CH ;3BCA: DROP DB 23H, 61H ;3BCB: PUSH 61 DB 11H ;3BCD: RET DB 15H ;3BCE: 15 S3BCF DB 23H, 7AH ;3BCF: PUSH 7A DB 0E1H, 3BH ;3BD1: SYS 3BC2 DB 11H ;3BD3: RET DB 15H ;3BD4: 15 S3BD5 DB 23H, 7BH ;3BD5: PUSH 7B DB 0E1H, 3BH ;3BD7: SYS 3BC2 DB 11H ;3BD9: RET DB 15H ;3BDA: 15 S3BDB DB 23H, 7CH ;3BDB: PUSH 7C DB 0E1H, 3BH ;3BDD: SYS 3BC2 DB 11H ;3BDF: RET DB 15H ;3BE0: 15 S3BE1 DB 23H, 7DH ;3BE1: PUSH 7D DB 0E1H, 3BH ;3BE3: SYS 3BC2 DB 11H ;3BE5: RET DB 15H ;3BE6: 15 S3BE7 DB 23H, 7EH ;3BE7: PUSH 7E DB 0E1H, 3BH ;3BE9: SYS 3BC2 DB 11H ;3BEB: RET DB 15H ;3BEC: 15 S3BED DB 23H, 7FH ;3BED: PUSH 7F DB 0E1H, 3BH ;3BEF: SYS 3BC2 DB 11H ;3BF1: RET DB 15H ;3BF2: 15 S3BF3 DB 3AH, 63H, 0C6H ;3BF3: 6 LD TOS, [63C6] DB 10H ;3BF6: EXEC TOS DB 11H ;3BF7: RET DB 15H ;3BF8: 15 S3BF9 DB 23H, 76H ;3BF9: PUSH 76 DB 11H ;3BFB: RET DB 15H ;3BFC: 15 S3BFD DB 3CH, 63H, 8DH ;3BFD: D LD TOS.0, [638D] DB 23H, 30H ;3C00: PUSH 30 DB 23H, 39H ;3C02: PUSH 39 DB 0BDH, 21H ;3C04: SYS 217A DB 3CH, 63H, 8DH ;3C06: D LD TOS.0, [638D] DB 23H, 41H ;3C09: PUSH 41 DB 23H, 46H ;3C0B: PUSH 46 DB 0BDH, 21H ;3C0D: SYS 217A DB 33H ;3C0F: OR TOS, NOS DB 11H ;3C10: RET DB 0FFH ;3C11: FF DB 15H ;3C12: 15 S3C13 DB 3CH, 63H, 8DH ;3C13: D LD TOS.0, [638D] DB 23H, 30H ;3C16: PUSH 30 DB 23H, 39H ;3C18: PUSH 39 DB 0BDH, 21H ;3C1A: SYS 217A DB 11H ;3C1C: RET DB 0FFH ;3C1D: FF DB 15H ;3C1E: 15 S3C1F DB 3CH, 63H, 8DH ;3C1F: D LD TOS.0, [638D] DB 23H, 41H ;3C22: PUSH 41 DB 23H, 5AH ;3C24: PUSH 5A DB 0BDH, 21H ;3C26: SYS 217A DB 11H ;3C28: RET DB 0FFH ;3C29: FF DB 15H ;3C2A: 15 S3C2B DB 73H ;3C2B: PUSH 0001 DB 11H ;3C2C: RET DW S3BFD ;3C2D: 3B FD DW S3C1F ;3C2F: 3C 1F DW S3C13 ;3C31: 3C 13 DW S3C2B ;3C33: 3C 2B DB 0FFH ;3C35: FF DB 15H ;3C36: 15 DB 57H, 62H, 81H, 04H ;3C37: 104 LDAND 6281, 04 DB 08H, 0FH ;3C3B: JZ 3C4B DB 22H, 63H, 3BH ;3C3D: B PUSH 633B DB 37H ;3C40: LDVCD [TOS] DB 3CH, 62H, 87H ;3C41: 7 LD TOS.0, [6287] DB 22H, 60H, 80H ;3C44: 0 PUSH 6080 DB 00H ;3C47: ADD TOS, NOS DB 43H ;3C48: DISP DB 0AH, 1EH ;3C49: JP 3C68 DB 3CH, 63H, 3BH ;3C4B: B LD TOS.0, [633B] DB 64H ;3C4E: LD TOS, VB DB 4DH ;3C4F: ISLT DB 08H, 0DH ;3C50: JZ 3C5E DB 22H, 63H, 3BH ;3C52: B PUSH 633B DB 35H ;3C55: ADD TOS, [TOS] DB 64H ;3C56: LD TOS, VB DB 02H ;3C57: SUB TOS, NOS DB 03H ;3C58: ADD TOS, 1 DB 62H ;3C59: LD TOS, VA DB 64H ;3C5A: LD TOS, VB DB 1AH ;3C5B: MCPY [NOS], [3OS] DB 0AH, 0BH ;3C5C: JP 3C68 DB 3CH, 63H, 8DH ;3C5E: D LD TOS.0, [638D] DB 62H ;3C61: LD TOS, VA DB 3CH, 63H, 3BH ;3C62: B LD TOS.0, [633B] DB 00H ;3C65: ADD TOS, NOS DB 27H ;3C66: SUB TOS, 1 DB 19H ;3C67: LD [TOS], NOS.0 DB 44H ;3C68: LCD DB 11H ;3C69: RET DB 15H ;3C6A: 15 S3C6B DB 3CH, 63H, 8DH ;3C6B: D LD TOS.0, [638D] DB 22H, 63H, 3BH ;3C6E: B PUSH 633B DB 0C2H, 0CH ;3C71: SYS 0C84 DB 9BH, 3CH ;3C73: SYS 3C36 DB 57H, 62H, 81H, 03H ;3C75: 103 LDAND 6281, 03 DB 66H, 3CH, 2DH ;3C79: D CALLI 3C2D DB 08H, 15H ;3C7C: JZ 3C92 DB 3CH, 63H, 3BH ;3C7E: B LD TOS.0, [633B] DB 57H, 62H, 80H, 01H ;3C81: 001 LDAND 6280, 01 DB 00H ;3C85: ADD TOS, NOS DB 3CH, 62H, 8CH ;3C86: C LD TOS.0, [628C] DB 4DH ;3C89: ISLT DB 1EH ;3C8A: DUP DB 08H, 04H ;3C8B: JZ 3C90 DB 1CH ;3C8D: DROP DB 0CEH, 3BH ;3C8E: SYS 3B9C DB 0AH, 08H ;3C90: JP 3C99 DB 23H, 61H ;3C92: PUSH 61 DB 23H, 03H ;3C94: PUSH 03 DB 3DH, 63H, 8FH ;3C96: F LD [638F], TOS.0 DB 11H ;3C99: RET DB 15H ;3C9A: 15 S3C9B DB 72H ;3C9B: PUSH 0000 DB 11H ;3C9C: RET DW S3B51 ;3C9D: 3B 51 DW S3BB1 ;3C9F: 3B B1 DW S3B5B ;3CA1: 3B 5B DW S3B9D ;3CA3: 3B 9D DW S3BA7 ;3CA5: 3B A7 DW S3C6B ;3CA7: 3C 6B DW S3BF9 ;3CA9: 3B F9 DW S3BF3 ;3CAB: 3B F3 DW S3C9B ;3CAD: 3C 9B DW S3AFD ;3CAF: 3A FD DW S3B17 ;3CB1: 3B 17 DW S3BCF ;3CB3: 3B CF DW S3BD5 ;3CB5: 3B D5 DW S3BDB ;3CB7: 3B DB DW S3BE1 ;3CB9: 3B E1 DW S3BE7 ;3CBB: 3B E7 DW S3BED ;3CBD: 3B ED DB 0FFH ;3CBF: FF DB 15H ;3CC0: 15 DB 72H ;3CC1: PUSH 0000 DB 3DH, 63H, 94H ;3CC2: 4 LD [6394], TOS.0 DB 57H, 62H, 80H, 02H ;3CC5: 002 LDAND 6280, 02 DB 08H, 06H ;3CC9: JZ 3CD0 DB 3AH, 62H, 0D5H ;3CCB: 5 LD TOS, [62D5] DB 0AH, 06H ;3CCE: JP 3CD5 DB 0D0H, 1BH ;3CD0: SYS 1BA0 DB 22H, 23H, 0EDH ;3CD2: D PUSH 23ED DB 3BH, 62H, 0D3H ;3CD5: 3 LD [62D3], TOS DB 57H, 62H, 80H, 08H ;3CD8: 008 LDAND 6280, 08 DB 13H ;3CDC: ISZ TOS DB 13H ;3CDD: ISZ TOS DB 98H, 3BH ;3CDE: SYS 3B30 DB 44H ;3CE0: LCD DB 57H, 62H, 80H, 10H ;3CE1: 010 LDAND 6280, 10 DB 08H, 05H ;3CE5: JZ 3CEB DB 23H, 74H ;3CE7: PUSH 74 DB 0AH, 03H ;3CE9: JP 3CED DB 84H, 24H ;3CEB: SYS 2408 DB 1EH ;3CED: DUP DB 23H, 6EH ;3CEE: PUSH 6E DB 4DH ;3CF0: ISLT DB 08H, 0AH ;3CF1: JZ 3CFC DB 23H, 6FH ;3CF3: PUSH 6F DB 02H ;3CF5: SUB TOS, NOS DB 66H, 3CH, 9DH ;3CF6: D CALLI 3C9D DB 1FH ;3CF9: DUPNZ DB 09H, 0F0H ;3CFA: JZ 3CEB DB 1EH ;3CFC: DUP DB 41H, 0BDH ;3CFD: LD [60BD], TOS.0 DB 41H, 0BEH ;3CFF: LD [60BE], TOS.0 DB 11H ;3D01: RET DB 15H ;3D02: 15 S3D03 DB 0DAH, 13H ;3D03: SYS 13B4 DB 5EH ;3D05: LD TOS, VC DB 17H ;3D06: LD TOS.0, [TOS] DB 0AH, 04H ;3D07: JP 3D0C DB 0FFH ;3D09: FF DB 15H ;3D0A: 15 S3D0B DB 2AH ;3D0B: LD TOS.0, [RP] DB 0DEH, 37H ;3D0C: SYS 37BC DB 0CDH, 37H ;3D0E: SYS 379A DB 3CH, 63H, 94H ;3D10: 4 LD TOS.0, [6394] DB 08H, 1FH ;3D13: JZ 3D33 DB 3CH, 63H, 3BH ;3D15: B LD TOS.0, [633B] DB 1FH ;3D18: DUPNZ DB 08H, 17H ;3D19: JZ 3D31 DB 22H, 63H, 3BH ;3D1B: B PUSH 633B DB 00H ;3D1E: ADD TOS, NOS DB 17H ;3D1F: LD TOS.0, [TOS] DB 3DH, 63H, 8DH ;3D20: D LD [638D], TOS.0 DB 76H ;3D23: PUSH FFFF DB 22H, 63H, 3BH ;3D24: B PUSH 633B DB 30H ;3D27: ADD [TOS], NOS.0 DB 3CH, 62H, 80H ;3D28: 0 LD TOS.0, [6280] DB 23H, 10H ;3D2B: PUSH 10 DB 33H ;3D2D: OR TOS, NOS DB 3DH, 62H, 80H ;3D2E: 0 LD [6280], TOS.0 DB 0AH, 0AH ;3D31: JP 3D3C DB 22H, 63H, 3BH ;3D33: B PUSH 633B DB 2EH ;3D36: LD [TOS], 0 DB 23H, 2BH ;3D37: PUSH 2B DB 3DH, 63H, 8CH ;3D39: C LD [638C], TOS.0 DB 22H, 63H, 3BH ;3D3C: B PUSH 633B DB 37H ;3D3F: LDVCD [TOS] DB 0EFH, 37H ;3D40: SYS 37DE DB 3CH, 60H, 80H ;3D42: 0 LD TOS.0, [6080] DB 3DH, 63H, 90H ;3D45: 0 LD [6390], TOS.0 DB 0E0H, 3CH ;3D48: SYS 3CC0 DB 6BH ;3D4A: SETBK DB 11H ;3D4B: RET DB 15H ;3D4C: 15 S3D4D DB 3CH, 60H, 80H ;3D4D: 0 LD TOS.0, [6080] DB 3DH, 63H, 90H ;3D50: 0 LD [6390], TOS.0 DB 72H ;3D53: PUSH 0000 DB 98H, 3BH ;3D54: SYS 3B30 DB 0D0H, 1BH ;3D56: SYS 1BA0 DB 22H, 23H, 0EDH ;3D58: D PUSH 23ED DB 3BH, 62H, 0D3H ;3D5B: 3 LD [62D3], TOS DB 84H, 24H ;3D5E: SYS 2408 DB 1EH ;3D60: DUP DB 23H, 6FH ;3D61: PUSH 6F DB 4FH ;3D63: ISEQ DB 08H, 07H ;3D64: JZ 3D6C DB 1CH ;3D66: DROP DB 0A8H, 3BH ;3D67: SYS 3B50 DB 1CH ;3D69: DROP DB 0BH, 0F3H ;3D6A: JP 3D5E DB 1EH ;3D6C: DUP DB 41H, 0BDH ;3D6D: LD [60BD], TOS.0 DB 41H, 0BEH ;3D6F: LD [60BE], TOS.0 DB 6BH ;3D71: SETBK DB 11H ;3D72: RET DB 0FFH ;3D73: FF DB 15H ;3D74: 15 S3D75 DB 3CH, 63H, 8EH ;3D75: E LD TOS.0, [638E] DB 41H, 09H ;3D78: LD [6009], TOS.0 DB 45H ;3D7A: DELAY DB 22H, 60H, 69H ;3D7B: 9 PUSH 6069 DB 2EH ;3D7E: LD [TOS], 0 DB 0A6H, 3DH ;3D7F: SYS 3D4C DB 11H ;3D81: RET DB 15H ;3D82: 15 S3D83 DB 23H, 20H ;3D83: PUSH 20 DB 22H, 60H, 80H ;3D85: 0 PUSH 6080 DB 23H, 20H ;3D88: PUSH 20 DB 46H ;3D8A: FILL DB 0A5H, 38H ;3D8B: SYS 384A DB 0A6H, 3DH ;3D8D: SYS 3D4C DB 11H ;3D8F: RET DB 15H ;3D90: 15 S3D91 DB 0F2H, 23H ;3D91: SYS 23E4 DB 3EH, 0AH ;3D93: LD TOS, [600A] DB 13H ;3D95: ISZ TOS DB 09H, 0FCH ;3D96: JZ 3D93 DB 84H, 24H ;3D98: SYS 2408 DB 1EH ;3D9A: DUP DB 1EH ;3D9B: DUP DB 41H, 0BDH ;3D9C: LD [60BD], TOS.0 DB 41H, 0BEH ;3D9E: LD [60BE], TOS.0 DB 23H, 78H ;3DA0: PUSH 78 DB 4FH ;3DA2: ISEQ DB 08H, 05H ;3DA3: JZ 3DA9 DB 85H, 10H ;3DA5: SYS 100A DB 0AH, 0CH ;3DA7: JP 3DB4 DB 40H, 0BDH ;3DA9: LD TOS.0, [60BD] DB 23H, 64H ;3DAB: PUSH 64 DB 4FH ;3DAD: ISEQ DB 08H, 03H ;3DAE: JZ 3DB2 DB 0B7H, 0EH ;3DB0: SYS 0E6E DB 0BH, 0DEH ;3DB2: JP 3D91 DB 11H ;3DB4: RET DB 0FFH ;3DB5: FF DB 15H ;3DB6: 15 DB 0E3H, 21H ;3DB7: SYS 21C6 DB 58H, 62H, 0A1H, 60H, 4BH;3DB9: 1 MCPY3 [62A1],[604B] DB 58H, 62H, 93H, 60H, 48H;3DBE: 3 MCPY3 [6293],[6048] DB 84H, 21H ;3DC3: SYS 2108 DB 88H, 21H ;3DC5: SYS 2110 DB 6EH ;3DC7: SUB24 [NOS], [TOS] DB 84H, 21H ;3DC8: SYS 2108 DB 74H ;3DCA: PUSH 0002 DB 70H ;3DCB: SUB24 [NOS], TOS DB 75H ;3DCC: PUSH 0003 DB 5AH, 62H, 0A1H, 62H, 93H;3DCD: 1 STBNK [62A1], 6293 DB 22H, 21H, 4CH ;3DD2: C PUSH 214C DB 23H, 1DH ;3DD5: PUSH 1D DB 0A2H, 15H ;3DD7: SYS 1544 DB 8AH, 21H ;3DD9: SYS 2114 DB 8DH, 0FH ;3DDB: SYS 0F1A DB 22H, 60H, 48H ;3DDD: 8 PUSH 6048 DB 74H ;3DE0: PUSH 0002 DB 70H ;3DE1: SUB24 [NOS], TOS DB 75H ;3DE2: PUSH 0003 DB 5AH, 60H, 48H, 21H, 45H;3DE3: 8 STBNK [6048], 2145 DB 58H, 62H, 0AAH, 60H, 48H;3DE8: A MCPY3 [62AA],[6048] DB 8CH, 21H ;3DED: SYS 2118 DB 8AH, 21H ;3DEF: SYS 2114 DB 6EH ;3DF1: SUB24 [NOS], [TOS] DB 11H ;3DF2: RET DB 0FFH ;3DF3: FF DB 15H ;3DF4: 15 DB 22H, 05H, 00H ;3DF5: 0 PUSH 0500 DB 22H, 61H, 00H ;3DF8: 0 PUSH 6100 DB 23H, 19H ;3DFB: PUSH 19 DB 1AH ;3DFD: MCPY [NOS], [3OS] DB 22H, 24H, 4AH ;3DFE: A PUSH 244A DB 22H, 60H, 0AH ;3E01: A PUSH 600A DB 23H, 10H ;3E04: PUSH 10 DB 1AH ;3E06: MCPY [NOS], [3OS] DB 23H, 0AAH ;3E07: PUSH AA DB 41H, 1AH ;3E09: LD [601A], TOS.0 DB 22H, 01H, 00H ;3E0B: 0 PUSH 0100 DB 3BH, 62H, 0B0H ;3E0E: 0 LD [62B0], TOS DB 22H, 60H, 0E0H ;3E11: 0 PUSH 60E0 DB 3FH, 1BH ;3E14: LD [601B], TOS DB 22H, 20H, 40H ;3E16: 0 PUSH 2040 DB 3BH, 63H, 90H ;3E19: 0 LD [6390], TOS DB 72H ;3E1C: PUSH 0000 DB 3DH, 63H, 94H ;3E1D: 4 LD [6394], TOS.0 DB 11H ;3E20: RET DB 0FFH ;3E21: FF DB 15H ;3E22: 15 DB 0B8H, 22H ;3E23: SYS 2270 DB 22H, 21H, 84H ;3E25: 4 PUSH 2184 DB 0DBH, 10H ;3E28: SYS 10B6 DB 0A1H, 21H ;3E2A: SYS 2142 DB 4FH ;3E2C: ISEQ DB 08H, 0DH ;3E2D: JZ 3E3B DB 22H, 21H, 55H ;3E2F: 5 PUSH 2155 DB 5DH ;3E32: LD VC, TOS DB 23H, 09H ;3E33: PUSH 09 DB 5FH ;3E35: LD VD, TOS DB 0BAH, 29H ;3E36: SYS 2974 DB 13H ;3E38: ISZ TOS DB 08H, 05H ;3E39: JZ 3E3F DB 23H, 09H ;3E3B: PUSH 09 DB 0B1H, 25H ;3E3D: SYS 2562 DB 0DBH, 3DH ;3E3F: SYS 3DB6 DB 22H, 21H, 4AH ;3E41: A PUSH 214A DB 37H ;3E44: LDVCD [TOS] DB 0BAH, 29H ;3E45: SYS 2974 DB 1CH ;3E47: DROP DB 23H, 80H ;3E48: PUSH 80 DB 41H, 55H ;3E4A: LD [6055], TOS.0 DB 23H, 59H ;3E4C: PUSH 59 DB 0F1H, 38H ;3E4E: SYS 38E2 DB 0FAH, 3DH ;3E50: SYS 3DF4 DB 0C1H, 22H ;3E52: SYS 2282 DB 0C4H, 19H ;3E54: SYS 1988 DB 0A7H, 12H ;3E56: SYS 124E DB 15H ;3E58: 15 DB 94H, 22H ;3E59: SYS 2228 DB 57H, 60H, 07H, 14H ;3E5B: 714 LDAND 6007, 14 DB 08H, 26H ;3E5F: JZ 3E86 DB 57H, 60H, 07H, 04H ;3E61: 704 LDAND 6007, 04 DB 08H, 05H ;3E65: JZ 3E6B DB 23H, 81H ;3E67: PUSH 81 DB 41H, 55H ;3E69: LD [6055], TOS.0 DB 0B8H, 22H ;3E6B: SYS 2270 DB 22H, 60H, 0C9H ;3E6D: 9 PUSH 60C9 DB 22H, 63H, 0EAH ;3E70: A PUSH 63EA DB 31H ;3E73: MCPY3 [TOS], [NOS] DB 40H, 1BH ;3E74: LD TOS.0, [601B] DB 3BH, 63H, 0EDH ;3E76: D LD [63ED], TOS DB 0C7H, 39H ;3E79: SYS 398E DB 22H, 3EH, 56H ;3E7B: 6 PUSH 3E56 DB 3FH, 1DH ;3E7E: LD [601D], TOS DB 0FAH, 3DH ;3E80: SYS 3DF4 DB 0E9H, 17H ;3E82: SYS 17D2 DB 0D7H, 19H ;3E84: SYS 19AE DB 44H ;3E86: LCD DB 57H, 60H, 07H, 80H ;3E87: 780 LDAND 6007, 80 DB 08H, 07H ;3E8B: JZ 3E93 DB 22H, 63H, 9DH ;3E8D: D PUSH 639D DB 2FH ;3E90: LD [TOS], 1 DB 0CDH, 0EH ;3E91: SYS 0E9A DB 0E9H, 17H ;3E93: SYS 17D2 DB 57H, 60H, 07H, 40H ;3E95: 740 LDAND 6007, 40 DB 08H, 07H ;3E99: JZ 3EA1 DB 22H, 63H, 9DH ;3E9B: D PUSH 639D DB 2FH ;3E9E: LD [TOS], 1 DB 0F0H, 23H ;3E9F: SYS 23E0 DB 42H, 60H ;3EA1: LD [60BD], 60 DB 57H, 60H, 07H, 02H ;3EA3: 702 LDAND 6007, 02 DB 08H, 03H ;3EA7: JZ 3EAB DB 42H, 67H ;3EA9: LD [60BD], 67 DB 57H, 60H, 07H, 01H ;3EAB: 701 LDAND 6007, 01 DB 08H, 03H ;3EAF: JZ 3EB3 DB 42H, 68H ;3EB1: LD [60BD], 68 DB 57H, 60H, 07H, 20H ;3EB3: 720 LDAND 6007, 20 DB 08H, 03H ;3EB7: JZ 3EBB DB 0D7H, 19H ;3EB9: SYS 19AE DB 23H, 05H ;3EBB: PUSH 05 DB 0B1H, 25H ;3EBD: SYS 2562 DB 0FFH ;3EBF: FF DB 0FFH ;3EC0: FF ; ; ====================================================================== ; DATA AREA: UNUSED ROM (0xFF FILL) ; Range: 0x3EC1-0x3EFF ; ---------------------------------------------------------------------- ; Erased/unused EPROM area. 63 bytes of 0xFF. ; Marks the end of the system ROM bytecode content. ; Last valid code/data is at 0x3EC0. ; ====================================================================== DB 0FFH ;3EC1: FF DB 0FFH ;3EC2: FF DB 0FFH ;3EC3: FF DB 0FFH ;3EC4: FF DB 0FFH ;3EC5: FF DB 0FFH ;3EC6: FF DB 0FFH ;3EC7: FF DB 0FFH ;3EC8: FF DB 0FFH ;3EC9: FF DB 0FFH ;3ECA: FF DB 0FFH ;3ECB: FF DB 0FFH ;3ECC: FF DB 0FFH ;3ECD: FF DB 0FFH ;3ECE: FF DB 0FFH ;3ECF: FF DB 0FFH ;3ED0: FF DB 0FFH ;3ED1: FF DB 0FFH ;3ED2: FF DB 0FFH ;3ED3: FF DB 0FFH ;3ED4: FF DB 0FFH ;3ED5: FF DB 0FFH ;3ED6: FF DB 0FFH ;3ED7: FF DB 0FFH ;3ED8: FF DB 0FFH ;3ED9: FF DB 0FFH ;3EDA: FF DB 0FFH ;3EDB: FF DB 0FFH ;3EDC: FF DB 0FFH ;3EDD: FF DB 0FFH ;3EDE: FF DB 0FFH ;3EDF: FF DB 0FFH ;3EE0: FF DB 0FFH ;3EE1: FF DB 0FFH ;3EE2: FF DB 0FFH ;3EE3: FF DB 0FFH ;3EE4: FF DB 0FFH ;3EE5: FF DB 0FFH ;3EE6: FF DB 0FFH ;3EE7: FF DB 0FFH ;3EE8: FF DB 0FFH ;3EE9: FF DB 0FFH ;3EEA: FF DB 0FFH ;3EEB: FF DB 0FFH ;3EEC: FF DB 0FFH ;3EED: FF DB 0FFH ;3EEE: FF DB 0FFH ;3EEF: FF DB 0FFH ;3EF0: FF DB 0FFH ;3EF1: FF DB 0FFH ;3EF2: FF DB 0FFH ;3EF3: FF DB 0FFH ;3EF4: FF DB 0FFH ;3EF5: FF DB 0FFH ;3EF6: FF DB 0FFH ;3EF7: FF DB 0FFH ;3EF8: FF DB 0FFH ;3EF9: FF DB 0FFH ;3EFA: FF DB 0FFH ;3EFB: FF DB 0FFH ;3EFC: FF DB 0FFH ;3EFD: FF DB 0FFH ;3EFE: FF DB 0FFH ;3EFF: FF ; ; ====================================================================== ; DATA AREA: AMI I/O REGISTER SPACE (NOT ACCESSIBLE AS ROM) ; Range: 0x3F00-0x3FFF ; ---------------------------------------------------------------------- ; This 256-byte region (0x3F00-0x3FFF) is decoded by the AMI 9217MLB ; gate array as memory-mapped I/O registers. CPU reads/writes to these ; addresses access the AMI chip, NOT the ROM data shown here. ; ; The ROM image contains 0xFF (3F00-3F7F) and 0x00 (3F80-3FFF) at ; these addresses, but this data is never read by the CPU. ; ; Key AMI registers: ; 3F00-3F0F: MM58174AN Real-Time Clock (16 nibble registers) ; 3F20-3F25: Keyboard scan buffer (6 bytes, read by CPU) ; 3F50: HD44780 data register (character writes) ; 3F80: HD44780 command register ; 3F81: AMI interrupt cause/ACK register ; 3FA0: Status register (bit 0 = busy) ; 3FA2: Bank select — window 1 (app ROM) ; 3FC0-3FC3: Bank select — window 2 (expansion RAM) ; ====================================================================== DB 00H ;3F00: 00 DB 09H ;3F01: 09 DB 01H ;3F02: 01 DB 04H ;3F03: 04 DB 07H ;3F04: 07 DB 00H ;3F05: 00 DB 01H ;3F06: 01 DB 00H ;3F07: 00 DB 01H ;3F08: 01 DB 00H ;3F09: 00 DB 04H ;3F0A: 04 DB 01H ;3F0B: 01 DB 00H ;3F0C: 00 DB 00H ;3F0D: 00 DB 00H ;3F0E: 00 DB 00H ;3F0F: 00 DB 0FFH ;3F10: FF DB 0FFH ;3F11: FF DB 0FFH ;3F12: FF DB 0FFH ;3F13: FF DB 0FFH ;3F14: FF DB 0FFH ;3F15: FF DB 0FFH ;3F16: FF DB 0FFH ;3F17: FF DB 0FFH ;3F18: FF DB 0FFH ;3F19: FF DB 0FFH ;3F1A: FF DB 0FFH ;3F1B: FF DB 0FFH ;3F1C: FF DB 0FFH ;3F1D: FF DB 0FFH ;3F1E: FF DB 0FFH ;3F1F: FF DB 00H ;3F20: 00 DB 00H ;3F21: 00 DB 00H ;3F22: 00 DB 00H ;3F23: 00 DB 00H ;3F24: 00 DB 00H ;3F25: 00 DB 00H ;3F26: 00 DB 00H ;3F27: 00 DB 0FFH ;3F28: FF DB 0FFH ;3F29: FF DB 0FFH ;3F2A: FF DB 0FFH ;3F2B: FF DB 0FFH ;3F2C: FF DB 0FFH ;3F2D: FF DB 0FFH ;3F2E: FF DB 0FFH ;3F2F: FF DB 0FFH ;3F30: FF DB 0FFH ;3F31: FF DB 0FFH ;3F32: FF DB 0FFH ;3F33: FF DB 0FFH ;3F34: FF DB 0FFH ;3F35: FF DB 0FFH ;3F36: FF DB 0FFH ;3F37: FF DB 0FFH ;3F38: FF DB 0FFH ;3F39: FF DB 0FFH ;3F3A: FF DB 0FFH ;3F3B: FF DB 0FFH ;3F3C: FF DB 0FFH ;3F3D: FF DB 0FFH ;3F3E: FF DB 0FFH ;3F3F: FF DB 0FFH ;3F40: FF DB 0FFH ;3F41: FF DB 0FFH ;3F42: FF DB 0FFH ;3F43: FF DB 0FFH ;3F44: FF DB 0FFH ;3F45: FF DB 0FFH ;3F46: FF DB 0FFH ;3F47: FF DB 0FFH ;3F48: FF DB 0FFH ;3F49: FF DB 0FFH ;3F4A: FF DB 0FFH ;3F4B: FF DB 0FFH ;3F4C: FF DB 0FFH ;3F4D: FF DB 0FFH ;3F4E: FF DB 00H ;3F4F: 00 DB 00H ;3F50: 00 DB 0FFH ;3F51: FF DB 0FFH ;3F52: FF DB 0FFH ;3F53: FF DB 0FFH ;3F54: FF DB 0FFH ;3F55: FF DB 0FFH ;3F56: FF DB 0FFH ;3F57: FF DB 0FFH ;3F58: FF DB 0FFH ;3F59: FF DB 0FFH ;3F5A: FF DB 0FFH ;3F5B: FF DB 0FFH ;3F5C: FF DB 0FFH ;3F5D: FF DB 0FFH ;3F5E: FF DB 0FFH ;3F5F: FF DB 0FFH ;3F60: FF DB 0FFH ;3F61: FF DB 0FFH ;3F62: FF DB 0FFH ;3F63: FF DB 0FFH ;3F64: FF DB 0FFH ;3F65: FF DB 0FFH ;3F66: FF DB 0FFH ;3F67: FF DB 0FFH ;3F68: FF DB 0FFH ;3F69: FF DB 0FFH ;3F6A: FF DB 0FFH ;3F6B: FF DB 0FFH ;3F6C: FF DB 0FFH ;3F6D: FF DB 0FFH ;3F6E: FF DB 0FFH ;3F6F: FF DB 0FFH ;3F70: FF DB 0FFH ;3F71: FF DB 0FFH ;3F72: FF DB 0FFH ;3F73: FF DB 0FFH ;3F74: FF DB 0FFH ;3F75: FF DB 0FFH ;3F76: FF DB 0FFH ;3F77: FF DB 0FFH ;3F78: FF DB 0FFH ;3F79: FF DB 0FFH ;3F7A: FF DB 0FFH ;3F7B: FF DB 0FFH ;3F7C: FF DB 0FFH ;3F7D: FF DB 0FFH ;3F7E: FF DB 0FFH ;3F7F: FF DB 00H ;3F80: 00 DB 00H ;3F81: 00 DB 00H ;3F82: 00 DB 00H ;3F83: 00 DB 00H ;3F84: 00 DB 00H ;3F85: 00 DB 00H ;3F86: 00 DB 00H ;3F87: 00 DB 00H ;3F88: 00 DB 00H ;3F89: 00 DB 00H ;3F8A: 00 DB 00H ;3F8B: 00 DB 00H ;3F8C: 00 DB 00H ;3F8D: 00 DB 00H ;3F8E: 00 DB 00H ;3F8F: 00 DB 00H ;3F90: 00 DB 00H ;3F91: 00 DB 00H ;3F92: 00 DB 00H ;3F93: 00 DB 00H ;3F94: 00 DB 00H ;3F95: 00 DB 00H ;3F96: 00 DB 00H ;3F97: 00 DB 00H ;3F98: 00 DB 00H ;3F99: 00 DB 00H ;3F9A: 00 DB 00H ;3F9B: 00 DB 00H ;3F9C: 00 DB 00H ;3F9D: 00 DB 00H ;3F9E: 00 DB 00H ;3F9F: 00 DB 00H ;3FA0: 00 DB 00H ;3FA1: 00 DB 00H ;3FA2: 00 DB 00H ;3FA3: 00 DB 00H ;3FA4: 00 DB 00H ;3FA5: 00 DB 00H ;3FA6: 00 DB 00H ;3FA7: 00 DB 00H ;3FA8: 00 DB 00H ;3FA9: 00 DB 00H ;3FAA: 00 DB 00H ;3FAB: 00 DB 00H ;3FAC: 00 DB 00H ;3FAD: 00 DB 00H ;3FAE: 00 DB 00H ;3FAF: 00 DB 00H ;3FB0: 00 DB 00H ;3FB1: 00 DB 00H ;3FB2: 00 DB 00H ;3FB3: 00 DB 00H ;3FB4: 00 DB 00H ;3FB5: 00 DB 00H ;3FB6: 00 DB 00H ;3FB7: 00 DB 00H ;3FB8: 00 DB 00H ;3FB9: 00 DB 00H ;3FBA: 00 DB 00H ;3FBB: 00 DB 00H ;3FBC: 00 DB 00H ;3FBD: 00 DB 00H ;3FBE: 00 DB 00H ;3FBF: 00 DB 00H ;3FC0: 00 DB 00H ;3FC1: 00 DB 00H ;3FC2: 00 DB 00H ;3FC3: 00 DB 00H ;3FC4: 00 DB 00H ;3FC5: 00 DB 00H ;3FC6: 00 DB 00H ;3FC7: 00 DB 00H ;3FC8: 00 DB 00H ;3FC9: 00 DB 00H ;3FCA: 00 DB 00H ;3FCB: 00 DB 00H ;3FCC: 00 DB 00H ;3FCD: 00 DB 00H ;3FCE: 00 DB 00H ;3FCF: 00 DB 00H ;3FD0: 00 DB 00H ;3FD1: 00 DB 00H ;3FD2: 00 DB 00H ;3FD3: 00 DB 00H ;3FD4: 00 DB 00H ;3FD5: 00 DB 00H ;3FD6: 00 DB 00H ;3FD7: 00 DB 00H ;3FD8: 00 DB 00H ;3FD9: 00 DB 00H ;3FDA: 00 DB 00H ;3FDB: 00 DB 00H ;3FDC: 00 DB 00H ;3FDD: 00 DB 00H ;3FDE: 00 DB 00H ;3FDF: 00 DB 00H ;3FE0: 00 DB 00H ;3FE1: 00 DB 00H ;3FE2: 00 DB 00H ;3FE3: 00 DB 00H ;3FE4: 00 DB 00H ;3FE5: 00 DB 00H ;3FE6: 00 DB 00H ;3FE7: 00 DB 00H ;3FE8: 00 DB 00H ;3FE9: 00 DB 00H ;3FEA: 00 DB 00H ;3FEB: 00 DB 00H ;3FEC: 00 DB 00H ;3FED: 00 DB 00H ;3FEE: 00 DB 00H ;3FEF: 00 DB 00H ;3FF0: 00 DB 00H ;3FF1: 00 DB 00H ;3FF2: 00 DB 00H ;3FF3: 00 DB 00H ;3FF4: 00 DB 00H ;3FF5: 00 DB 00H ;3FF6: 00 DB 00H ;3FF7: 00 DB 00H ;3FF8: 00 DB 00H ;3FF9: 00 DB 00H ;3FFA: 00 DB 00H ;3FFB: 00 DB 00H ;3FFC: 00 DB 00H ;3FFD: 00 DB 00H ;3FFE: 00 DB 00H ;3FFF: 00 END