https://bitchin100.com/wiki/index.php?action=history&feed=atom&title=M100_TS-DOS_ROM_Compression 2026-04-14T10:53:32Z Revision history for this page on the wiki MediaWiki 1.39.3 https://bitchin100.com/wiki/index.php?title=M100_TS-DOS_ROM_Compression&diff=1409&oldid=prev 2009-04-03T16:59:48Z

<p></p> <table style="background-color: #fff; color: #202122;" data-mw="interface"> <col class="diff-marker" /> <col class="diff-content" /> <col class="diff-marker" /> <col class="diff-content" /> <tr class="diff-title" lang="en"> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 09:59, 3 April 2009</td> </tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l514">Line 514:</td> <td colspan="2" class="diff-lineno">Line 514:</td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Navigate to:</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>Navigate to:</div></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del style="font-weight: bold; text-decoration: none;">* [[Dissasembly of RAM and ROM versions of TS-DOS]]</del></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div> </div></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del style="font-weight: bold; text-decoration: none;">* [[M100 TS-DOS ROM OptROM Support]]</del></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&lt;DPL&gt;</ins></div></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del style="font-weight: bold; text-decoration: none;">* [[M100 TS-DOS ROM UI Code]]</del></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">category=</ins>M100 TS-DOS ROM <ins style="font-weight: bold; text-decoration: none;">Disassembly</ins></div></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del style="font-weight: bold; text-decoration: none;">* [[M100 TS-DOS ROM RST 7 Handlers]]</del></div></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">&lt;/DPL&gt;</ins></div></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del style="font-weight: bold; text-decoration: none;">* [[</del>M100 TS-DOS ROM <del style="font-weight: bold; text-decoration: none;">TPDD Protocol]]</del></div></td><td colspan="2" class="diff-side-added"></td></tr> <tr><td class="diff-marker" data-marker="−"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del style="font-weight: bold; text-decoration: none;">* [[M100 TS-DOS ROM Cold Boot Recovery]]</del></div></td><td colspan="2" class="diff-side-added"></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><br/></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>[[Category:M100 TS-DOS ROM Disassembly]]</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>[[Category:M100 TS-DOS ROM Disassembly]]</div></td></tr> </table>

Jhoger https://bitchin100.com/wiki/index.php?title=M100_TS-DOS_ROM_Compression&diff=1401&oldid=prev 2009-04-03T16:51:34Z

<p></p> <table style="background-color: #fff; color: #202122;" data-mw="interface"> <col class="diff-marker" /> <col class="diff-content" /> <col class="diff-marker" /> <col class="diff-content" /> <tr class="diff-title" lang="en"> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 09:51, 3 April 2009</td> </tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l520">Line 520:</td> <td colspan="2" class="diff-lineno">Line 520:</td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>* [[M100 TS-DOS ROM TPDD Protocol]]</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>* [[M100 TS-DOS ROM TPDD Protocol]]</div></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>* [[M100 TS-DOS ROM Cold Boot Recovery]]</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>* [[M100 TS-DOS ROM Cold Boot Recovery]]</div></td></tr> <tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"></ins></div></td></tr> <tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">[[Category:M100 TS-DOS ROM Disassembly]]</ins></div></td></tr> </table>

Jhoger https://bitchin100.com/wiki/index.php?title=M100_TS-DOS_ROM_Compression&diff=1384&oldid=prev 2009-04-03T08:14:17Z

<p>New page: == TS-DOS Model 100/102 ROM Compression Routines == This code, as you can see, has not been disassembled yet. &lt;pre&gt; ; ====================================================================...</p> <p><b>New page</b></p><div>== TS-DOS Model 100/102 ROM Compression Routines ==<br /> <br /> This code, as you can see, has not been disassembled yet.<br /> <br /> &lt;pre&gt;<br /> ; =========================================================================================<br /> ; Compress / Decompress a file a .DO file<br /> ; =========================================================================================<br /> 5000H CALL 5008H<br /> 5003H RET<br /> <br /> 5004H CALL 500FH<br /> 5007H RET<br /> <br /> 5008H XRA A<br /> 5009H STA F69EH<br /> 500CH JMP 5018H<br /> <br /> <br /> ; =========================================================================================<br /> ; Perform compression / decompression<br /> ; =========================================================================================<br /> 500FH (3EH) MVI A,0CH<br /> 5011H (32H) STA F69EH<br /> 5014H (E7H) RST 4 ; Send character in A to screen/printer<br /> 5015H (CDH) CALL 5347H<br /> 5018H (22H) SHLD F69BH<br /> 501BH (21H) LXI H,534BH<br /> 501EH (11H) LXI D,F685H ; Keyboard buffer<br /> 5021H (01H) LXI B,0015H<br /> 5024H (CDH) CALL 5318H<br /> 5027H (3EH) MVI A,50H<br /> 5029H (32H) STA F69DH<br /> 502CH (AFH) XRA A<br /> 502DH (32H) STA F69FH<br /> 5030H (CDH) CALL 533BH<br /> 5033H (2AH) LHLD F69BH<br /> 5036H (CDH) CALL 5333H<br /> 5039H (EBH) XCHG<br /> 503AH (D5H) PUSH D<br /> 503BH (CDH) CALL 52ABH<br /> 503EH (00H) NOP<br /> 503FH (2EH) MVI L,7EH<br /> 5041H (C2H) JNZ 5046H<br /> 5044H (2EH) MVI L,80H<br /> 5046H (01H) LXI B,0000H<br /> 5049H (1AH) LDAX D<br /> 504AH (BDH) CMP L<br /> 504BH (DAH) JC 504FH<br /> 504EH (03H) INX B<br /> 504FH (13H) INX D<br /> 5050H (FEH) CPI 1AH<br /> 5052H (C2H) JNZ 5049H<br /> 5055H (E1H) POP H<br /> 5056H (3AH) LDA F69EH<br /> 5059H (D6H) SUI 0CH<br /> 505BH (C2H) JNZ 5060H ; Generate IE error<br /> 505EH (47H) MOV B,A<br /> 505FH (4FH) MOV C,A<br /> 5060H (CDH) CALL 533FH<br /> 5063H (D8H) RC<br /> 5064H (2BH) DCX H<br /> 5065H (E5H) PUSH H<br /> 5066H (CDH) CALL 52A5H<br /> 5069H (C2H) JNZ 5098H<br /> 506CH (CDH) CALL 52ABH<br /> 506FH (DCH) CC 5307H<br /> 5072H (C3H) JMP 521AH<br /> <br /> 5075H (CDH) CALL 5323H<br /> 5078H (DAH) JC 5075H<br /> 507BH (CDH) CALL 5337H<br /> 507EH (C9H) RET<br /> <br /> 507FH (4FH) MOV C,A<br /> 5080H (FEH) CPI 3AH<br /> 5082H (D0H) RNC<br /> 5083H (FEH) CPI 20H<br /> 5085H (37H) STC<br /> 5086H (C8H) RZ<br /> 5087H (FEH) CPI 2FH<br /> 5089H (C8H) RZ<br /> 508AH (3FH) CMC<br /> 508BH (C9H) RET<br /> <br /> 508CH (D6H) SUI 2FH<br /> 508EH (D0H) RNC<br /> 508FH (3EH) MVI A,0BH<br /> 5091H (C9H) RET<br /> <br /> 5092H (FEH) CPI 3AH<br /> 5094H (C0H) RNZ<br /> 5095H (3EH) MVI A,20H<br /> 5097H (C9H) RET<br /> <br /> 5098H (D5H) PUSH D<br /> 5099H (00H) NOP<br /> 509AH (00H) NOP<br /> 509BH (01H) LXI B,0000H<br /> 509EH (C5H) PUSH B<br /> 509FH (E1H) POP H<br /> 50A0H (03H) INX B<br /> 50A1H (13H) INX D<br /> 50A2H (1AH) LDAX D<br /> 50A3H (FEH) CPI 5BH<br /> 50A5H (D2H) JNC 50A0H<br /> 50A8H (FEH) CPI 1AH<br /> 50AAH (CAH) JZ 50B7H<br /> 50ADH (FEH) CPI 41H<br /> 50AFH (DAH) JC 50A1H<br /> 50B2H (00H) NOP<br /> 50B3H (23H) INX H<br /> 50B4H (C3H) JMP 50A1H<br /> <br /> 50B7H (C5H) PUSH B<br /> 50B8H (D1H) POP D<br /> 50B9H (DFH) RST 3 ; Compare DE and HL<br /> 50BAH (D1H) POP D<br /> 50BBH (DAH) JC 50C6H<br /> 50BEH (CDH) CALL 5307H<br /> 50C1H (3EH) MVI A,43H<br /> 50C3H (32H) STA F69DH<br /> 50C6H (AFH) XRA A<br /> 50C7H (32H) STA F69FH<br /> 50CAH (CDH) CALL 520AH<br /> 50CDH (CDH) CALL 518AH<br /> 50D0H (D2H) JNC 515EH<br /> 50D3H (CDH) CALL 507FH<br /> 50D6H (00H) NOP<br /> 50D7H (D2H) JNC 5117H<br /> 50DAH (13H) INX D<br /> 50DBH (1AH) LDAX D<br /> 50DCH (CDH) CALL 5080H<br /> 50DFH (1BH) DCX D<br /> 50E0H (47H) MOV B,A<br /> 50E1H (79H) MOV A,C<br /> 50E2H (D2H) JNC 5117H<br /> 50E5H (C2H) JNZ 50EEH<br /> 50E8H (B8H) CMP B<br /> 50E9H (CAH) JZ 5136H<br /> 50ECH (00H) NOP<br /> 50EDH (00H) NOP<br /> 50EEH (13H) INX D<br /> 50EFH (21H) LXI H,F69FH<br /> 50F2H (00H) NOP<br /> 50F3H (7EH) MOV A,M<br /> 50F4H (B7H) ORA A<br /> 50F5H (C2H) JNZ 50FFH<br /> 50F8H (3EH) MVI A,7EH<br /> 50FAH (77H) MOV M,A<br /> 50FBH (E1H) POP H<br /> 50FCH (77H) MOV M,A<br /> 50FDH (23H) INX H<br /> 50FEH (E5H) PUSH H<br /> 50FFH (79H) MOV A,C<br /> 5100H (CDH) CALL 508CH<br /> 5103H (00H) NOP<br /> 5104H (4FH) MOV C,A<br /> 5105H (78H) MOV A,B<br /> 5106H (CDH) CALL 508CH<br /> 5109H (C6H) ADI 0BH<br /> 510BH (0DH) DCR C<br /> 510CH (C2H) JNZ 5109H<br /> 510FH (C6H) ADI 7AH<br /> 5111H (E1H) POP H<br /> 5112H (77H) MOV M,A<br /> 5113H (E5H) PUSH H<br /> 5114H (C3H) JMP 50CAH<br /> <br /> 5117H (E1H) POP H<br /> 5118H (FEH) CPI 0DH<br /> 511AH (C2H) JNZ 512AH<br /> 511DH (13H) INX D<br /> 511EH (1AH) LDAX D<br /> 511FH (FEH) CPI 0AH<br /> 5121H (1BH) DCX D<br /> 5122H (3EH) MVI A,0DH<br /> 5124H (C2H) JNZ 512AH<br /> 5127H (13H) INX D<br /> 5128H (3EH) MVI A,80H<br /> 512AH (77H) MOV M,A<br /> 512BH (E5H) PUSH H<br /> 512CH (3AH) LDA F69FH<br /> 512FH (B7H) ORA A<br /> 5130H (C2H) JNZ 50C6H<br /> 5133H (00H) NOP<br /> 5134H (00H) NOP<br /> 5135H (7EH) MOV A,M<br /> 5136H (21H) LXI H,F684H<br /> 5139H (06H) MVI B,07H<br /> 513BH (05H) DCR B<br /> 513CH (CAH) JZ 50CAH<br /> 513FH (23H) INX H<br /> 5140H (BEH) CMP M<br /> 5141H (C2H) JNZ 513BH<br /> 5144H (0EH) MVI C,15H<br /> 5146H (CDH) CALL 518AH<br /> 5149H (D2H) JNC 515EH<br /> 514CH (21H) LXI H,F685H ; Keyboard buffer<br /> 514FH (BEH) CMP M<br /> 5150H (CAH) JZ 517BH<br /> 5153H (0DH) DCR C<br /> 5154H (CCH) CZ 520AH<br /> 5157H (CAH) JZ 5184H<br /> 515AH (23H) INX H<br /> 515BH (C3H) JMP 514FH<br /> <br /> 515EH (32H) STA F69AH<br /> 5161H (AFH) XRA A<br /> 5162H (32H) STA F69FH<br /> 5165H (78H) MOV A,B<br /> 5166H (FEH) CPI 07H<br /> 5168H (D2H) JNC 516EH<br /> 516BH (CDH) CALL 520AH<br /> 516EH (E1H) POP H<br /> 516FH (36H) MVI M,FFH<br /> 5171H (E5H) PUSH H<br /> 5172H (3AH) LDA F69AH<br /> 5175H (CDH) CALL 5195H<br /> 5178H (C3H) JMP 50CAH<br /> <br /> 517BH (79H) MOV A,C<br /> 517CH (C6H) ADI 15H<br /> 517EH (05H) DCR B<br /> 517FH (C2H) JNZ 517CH<br /> 5182H (C6H) ADI 6BH<br /> 5184H (E1H) POP H<br /> 5185H (77H) MOV M,A<br /> 5186H (E5H) PUSH H<br /> 5187H (C3H) JMP 50CAH<br /> <br /> 518AH (13H) INX D<br /> 518BH (1AH) LDAX D<br /> 518CH (FEH) CPI 1AH<br /> 518EH (CAH) JZ 52BAH<br /> 5191H (FEH) CPI 7EH<br /> 5193H (C9H) RET<br /> <br /> 5194H (7EH) MOV A,M<br /> 5195H (4FH) MOV C,A<br /> 5196H (3AH) LDA F69EH<br /> 5199H (B7H) ORA A<br /> 519AH (79H) MOV A,C<br /> 519BH (C1H) POP B<br /> 519CH (E1H) POP H<br /> 519DH (23H) INX H<br /> 519EH (C2H) JNZ 51A2H<br /> 51A1H (77H) MOV M,A<br /> 51A2H (E5H) PUSH H<br /> 51A3H (C5H) PUSH B<br /> 51A4H (C8H) RZ<br /> 51A5H (E7H) RST 4 ; Send character in A to screen/printer<br /> 51A6H (D5H) PUSH D<br /> 51A7H (6FH) MOV L,A<br /> 51A8H (3AH) LDA F63AH ; Cursor column (1-40)<br /> 51ABH (2FH) CMA<br /> 51ACH (C6H) ADI 2CH<br /> 51AEH (67H) MOV H,A<br /> 51AFH (7DH) MOV A,L<br /> 51B0H (CDH) CALL 51D7H<br /> 51B3H (00H) NOP<br /> 51B4H (00H) NOP<br /> 51B5H (3FH) CMC<br /> 51B6H (CAH) JZ 51C4H<br /> 51B9H (D2H) JNC 51C7H ; Print current STAT settings<br /> 51BCH (13H) INX D<br /> 51BDH (1AH) LDAX D<br /> 51BEH (CDH) CALL 51D7H<br /> 51C1H (C3H) JMP 51B6H<br /> <br /> 51C4H (CDH) CALL 532FH<br /> 51C7H (CDH) CALL 5075H<br /> 51CAH (00H) NOP<br /> 51CBH (D1H) POP D<br /> 51CCH (C8H) RZ<br /> 51CDH (FEH) CPI 20H<br /> 51CFH (DAH) JC 52BAH<br /> 51D2H (CCH) CZ 5327H<br /> 51D5H (00H) NOP<br /> 51D6H (C9H) RET<br /> <br /> 51D7H (25H) DCR H<br /> 51D8H (C8H) RZ<br /> 51D9H (FEH) CPI 21H<br /> 51DBH (3FH) CMC<br /> 51DCH (D0H) RNC<br /> 51DDH (FEH) CPI FEH<br /> 51DFH (3DH) DCR A<br /> 51E0H (D0H) RNC<br /> 51E1H (D6H) SUI 7FH<br /> 51E3H (CAH) JZ 5200H<br /> 51E6H (D8H) RC<br /> 51E7H (25H) DCR H<br /> 51E8H (00H) NOP<br /> 51E9H (C8H) RZ<br /> 51EAH (F5H) PUSH PSW<br /> 51EBH (3AH) LDA F69FH<br /> 51EEH (B7H) ORA A<br /> 51EFH (01H) LXI B,050BH<br /> 51F2H (C2H) JNZ 51F8H<br /> 51F5H (01H) LXI B,0015H<br /> 51F8H (F1H) POP PSW<br /> 51F9H (90H) SUB B<br /> 51FAH (90H) SUB B<br /> 51FBH (00H) NOP<br /> 51FCH (D8H) RC<br /> 51FDH (3CH) INR A<br /> 51FEH (FEH) CPI 6AH<br /> 5200H (3DH) DCR A<br /> 5201H (D0H) RNC<br /> 5202H (80H) ADD B<br /> 5203H (91H) SUB C<br /> 5204H (D8H) RC<br /> 5205H (C2H) JNZ 5203H<br /> 5208H (3CH) INR A<br /> 5209H (C9H) RET<br /> <br /> 520AH (C1H) POP B<br /> 520BH (E1H) POP H<br /> 520CH (23H) INX H<br /> 520DH (E5H) PUSH H<br /> 520EH (C5H) PUSH B<br /> 520FH (C9H) RET<br /> <br /> 5210H (AFH) XRA A<br /> 5211H (32H) STA F69FH<br /> 5214H (CDH) CALL 518AH<br /> 5217H (C3H) JMP 522FH ; TELCOM CALL instruction routine<br /> <br /> 521AH (CDH) CALL 52ABH<br /> 521DH (C2H) JNZ 5210H<br /> 5220H (CDH) CALL 518AH<br /> 5223H (DAH) JC 522FH ; TELCOM CALL instruction routine<br /> 5226H (C2H) JNZ 5239H<br /> 5229H (32H) STA F69FH<br /> 522CH (C3H) JMP 521AH<br /> <br /> 522FH (CDH) CALL 5195H<br /> 5232H (AFH) XRA A<br /> 5233H (32H) STA F69FH<br /> 5236H (C3H) JMP 521AH<br /> <br /> 5239H (FEH) CPI 80H<br /> 523BH (C2H) JNZ 5248H<br /> 523EH (3EH) MVI A,0DH<br /> 5240H (CDH) CALL 5195H<br /> 5243H (3EH) MVI A,0AH<br /> 5245H (C3H) JMP 522FH ; TELCOM CALL instruction routine<br /> <br /> 5248H (FEH) CPI FEH<br /> 524AH (CAH) JZ 5281H<br /> 524DH (D2H) JNC 5210H<br /> 5250H (4FH) MOV C,A<br /> 5251H (3AH) LDA F69FH<br /> 5254H (B7H) ORA A<br /> 5255H (79H) MOV A,C<br /> 5256H (CAH) JZ 5281H<br /> 5259H (D6H) SUI 86H<br /> 525BH (DAH) JC 521AH<br /> 525EH (01H) LXI B,0000H<br /> 5261H (0CH) INR C<br /> 5262H (D6H) SUI 0BH<br /> 5264H (D2H) JNC 5261H<br /> 5267H (C6H) ADI 3BH<br /> 5269H (CDH) CALL 5092H<br /> 526CH (32H) STA F69AH<br /> 526FH (79H) MOV A,C<br /> 5270H (C6H) ADI 2FH<br /> 5272H (CDH) CALL 5092H<br /> 5275H (CDH) CALL 5195H<br /> 5278H (3AH) LDA F69AH<br /> 527BH (CDH) CALL 5195H<br /> 527EH (C3H) JMP 521AH<br /> <br /> 5281H (D6H) SUI 81H<br /> 5283H (21H) LXI H,F68BH<br /> 5286H (2BH) DCX H<br /> 5287H (D6H) SUI 15H<br /> 5289H (D2H) JNC 5286H<br /> 528CH (C6H) ADI 16H<br /> 528EH (32H) STA F69AH<br /> 5291H (CDH) CALL 5194H<br /> 5294H (3AH) LDA F69AH<br /> 5297H (21H) LXI H,F69AH<br /> 529AH (2BH) DCX H<br /> 529BH (3DH) DCR A<br /> 529CH (C2H) JNZ 529AH<br /> 529FH (CDH) CALL 5194H<br /> 52A2H (C3H) JMP 521AH<br /> <br /> 52A5H (3AH) LDA F69EH<br /> 52A8H (FEH) CPI 0CH<br /> 52AAH (C8H) RZ<br /> 52ABH (2AH) LHLD F69BH<br /> 52AEH (01H) LXI B,000AH<br /> 52B1H (09H) DAD B<br /> 52B2H (7EH) MOV A,M<br /> 52B3H (FEH) CPI 50H<br /> 52B5H (C8H) RZ<br /> 52B6H (FEH) CPI 43H<br /> 52B8H (37H) STC<br /> 52B9H (C9H) RET<br /> <br /> 52BAH (32H) STA F69AH<br /> 52BDH (C5H) PUSH B<br /> 52BEH (CDH) CALL 52A5H<br /> 52C1H (C1H) POP B<br /> 52C2H (D1H) POP D<br /> 52C3H (E1H) POP H<br /> 52C4H (FEH) CPI 0CH<br /> 52C6H (C2H) JNZ 52D6H<br /> 52C9H (3AH) LDA F69AH<br /> 52CCH (FEH) CPI 1AH<br /> 52CEH (CCH) CZ 5327H<br /> 52D1H (CDH) CALL 532BH<br /> 52D4H (BFH) CMP A<br /> 52D5H (C9H) RET<br /> <br /> 52D6H (D6H) SUI 43H<br /> 52D8H (CAH) JZ 52E6H<br /> 52DBH (D6H) SUI 0FH<br /> 52DDH (CAH) JZ 52E6H<br /> 52E0H (78H) MOV A,B<br /> 52E1H (FEH) CPI 07H<br /> 52E3H (D2H) JNC 52E7H<br /> 52E6H (23H) INX H<br /> 52E7H (E5H) PUSH H<br /> 52E8H (2BH) DCX H<br /> 52E9H (01H) LXI B,FFFFH<br /> 52ECH (3EH) MVI A,1AH<br /> 52EEH (03H) INX B<br /> 52EFH (23H) INX H<br /> 52F0H (BEH) CMP M<br /> 52F1H (C2H) JNZ 52EEH<br /> 52F4H (E1H) POP H<br /> 52F5H (CDH) CALL 5343H<br /> 52F8H (CDH) CALL 52ABH<br /> 52FBH (CAH) JZ 5304H<br /> 52FEH (3AH) LDA F69DH<br /> 5301H (77H) MOV M,A<br /> 5302H (BFH) CMP A<br /> 5303H (C9H) RET<br /> <br /> 5304H (36H) MVI M,4FH<br /> 5306H (C9H) RET<br /> <br /> 5307H (21H) LXI H,F686H<br /> 530AH (3EH) MVI A,14H<br /> 530CH (F5H) PUSH PSW<br /> 530DH (7EH) MOV A,M<br /> 530EH (E6H) ANI DFH<br /> 5310H (77H) MOV M,A<br /> 5311H (F1H) POP PSW<br /> 5312H (3DH) DCR A<br /> 5313H (C8H) RZ<br /> 5314H (23H) INX H<br /> 5315H (C3H) JMP 530CH<br /> <br /> 5318H (7EH) MOV A,M<br /> 5319H (12H) STAX D<br /> 531AH (23H) INX H<br /> 531BH (13H) INX D<br /> 531CH (0BH) DCX B<br /> 531DH (78H) MOV A,B<br /> 531EH (B1H) ORA C<br /> 531FH (C2H) JNZ 5318H<br /> 5322H (C9H) RET<br /> <br /> 5323H (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5324H DW 7283H<br /> 5326H (C9H) RET<br /> <br /> 5327H (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5328H DW 12CBH<br /> 532AH (C9H) RET<br /> <br /> 532BH (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 532CH DW 4231H<br /> 532EH (C9H) RET<br /> <br /> 532FH (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5330H DW 4222H<br /> 5332H (C9H) RET<br /> <br /> 5333H (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5334H DW 5AE3H<br /> 5336H (C9H) RET<br /> <br /> 5337H (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5338H DW 7242H<br /> 533AH (C9H) RET<br /> <br /> 533BH (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 533CH DW 2146H<br /> 533EH (C9H) RET<br /> <br /> 533FH (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5340H DW 6B6DH)<br /> 5342H (C9H) RET<br /> <br /> 5343H (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5344H DW 6B9FH<br /> 5346H (C9H) RET<br /> <br /> 5347H (CFH) RST 1 ; Call main ROM at address in following 2 bytes<br /> 5348H DW 4244H<br /> 534AH (C9H) RET<br /> <br /> ; =========================================================================================<br /> ; Keystoke buffer contents (for performing compression?)<br /> ; =========================================================================================<br /> 534BH DB &quot;etaoinrshdlfcmugypwb&quot;<br /> &lt;/pre&gt;<br /> <br /> Navigate to:<br /> * [[Dissasembly of RAM and ROM versions of TS-DOS]]<br /> * [[M100 TS-DOS ROM OptROM Support]]<br /> * [[M100 TS-DOS ROM UI Code]]<br /> * [[M100 TS-DOS ROM RST 7 Handlers]]<br /> * [[M100 TS-DOS ROM TPDD Protocol]]<br /> * [[M100 TS-DOS ROM Cold Boot Recovery]]</div>

Kpettit