home *** CD-ROM | disk | FTP | other *** search
Text File | 1994-06-19 | 91.3 KB | 1,606 lines |
-
- Module: TSUNTD.PAS
- Group: 'DGROUP' _DATA,_BSS
-
- Segment: TSUNTD_TEXT PARA 0000100b bytes
- 0000 TRIMRGFN:
- 0000 55 TSUNTD_001 push bp
- 0001 89 e5 mov bp,sp
- 0003 b8 04 03 mov ax,0304H
- 0006 9a 00 00 00 00 call far SYSTEM_034
- 000b 81 ec 04 03 sub sp,0304H
- 000f c4 7e 08 les di,dword ptr +8H[bp]
- 0012 06 push es
- 0013 57 push di
- 0014 8d be 00 ff lea di,-100H[bp]
- 0018 16 push ss
- 0019 57 push di
- 001a b8 ff 00 mov ax,00ffH
- 001d 50 push ax
- 001e 9a 00 00 00 00 call far SYSTEM_00C
- 0023 c7 86 fc fd 00 01 mov word ptr -204H[bp],0100H
- 0029 8b 86 fc fd mov ax,-204H[bp]
- 002d 48 dec ax
- 002e 8b d0 mov dx,ax
- 0030 8a 46 06 mov al,+6H[bp]
- 0033 30 e4 xor ah,ah
- 0035 3b c2 cmp ax,dx
- 0037 76 08 jbe L1
- 0039 8b 86 fc fd mov ax,-204H[bp]
- 003d 48 dec ax
- 003e 88 46 06 mov +6H[bp],al
- 0041 8a 86 00 ff L1 mov al,-100H[bp]
- 0045 30 e4 xor ah,ah
- 0047 89 86 fe fd mov -202H[bp],ax
- 004b 8a 46 06 mov al,+6H[bp]
- 004e 30 e4 xor ah,ah
- 0050 3b 86 fe fd cmp ax,-202H[bp]
- 0054 7d 37 jge L2
- 0056 8d be fc fc lea di,-304H[bp]
- 005a 16 push ss
- 005b 57 push di
- 005c 8d be 00 ff lea di,-100H[bp]
- 0060 16 push ss
- 0061 57 push di
- 0062 8a 46 06 mov al,+6H[bp]
- 0065 30 e4 xor ah,ah
- 0067 8b d0 mov dx,ax
- 0069 8b 86 fe fd mov ax,-202H[bp]
- 006d 2b c2 sub ax,dx
- 006f 40 inc ax
- 0070 50 push ax
- 0071 8a 46 06 mov al,+6H[bp]
- 0074 30 e4 xor ah,ah
- 0076 50 push ax
- 0077 9a 00 00 00 00 call far SYSTEM_00E
- 007c 8d be 00 fe lea di,-200H[bp]
- 0080 16 push ss
- 0081 57 push di
- 0082 b8 ff 00 mov ax,00ffH
- 0085 50 push ax
- 0086 9a 00 00 00 00 call far SYSTEM_00C
- 008b eb 3a jmp L3
- 008d 8d be 00 fe L2 lea di,-200H[bp]
- 0091 16 push ss
- 0092 57 push di
- 0093 ff b6 fc fd push -204H[bp]
- 0097 b0 20 mov al,20H
- 0099 50 push ax
- 009a 9a 00 00 00 00 call far SYSTEM_05C
- 009f 8a 46 06 mov al,+6H[bp]
- 00a2 88 86 00 fe mov -200H[bp],al
- 00a6 8d be 01 ff lea di,-0ffH[bp]
- 00aa 16 push ss
- 00ab 57 push di
- 00ac 8a 46 06 mov al,+6H[bp]
- 00af 30 e4 xor ah,ah
- 00b1 2b 86 fe fd sub ax,-202H[bp]
- 00b5 40 inc ax
- 00b6 8b f8 mov di,ax
- 00b8 8d bb 00 fe lea di,-200H[bp+di]
- 00bc 16 push ss
- 00bd 57 push di
- 00be ff b6 fe fd push -202H[bp]
- 00c2 9a 00 00 00 00 call far SYSTEM_060
- 00c7 8d be 00 fe L3 lea di,-200H[bp]
- 00cb 16 push ss
- 00cc 57 push di
- 00cd c4 7e 0c les di,dword ptr +0cH[bp]
- 00d0 06 push es
- 00d1 57 push di
- 00d2 b8 ff 00 mov ax,00ffH
- 00d5 50 push ax
- 00d6 9a 00 00 00 00 call far SYSTEM_00C
- 00db 89 ec mov sp,bp
- 00dd 5d pop bp
- 00de ca 06 00 retf 0006H
- 00e1 TRIMLFFN:
- 00e1 55 TSUNTD_002 push bp
- 00e2 89 e5 mov bp,sp
- 00e4 b8 07 02 mov ax,0207H
- 00e7 9a 00 00 00 00 call far SYSTEM_034
- 00ec 81 ec 07 02 sub sp,0207H
- 00f0 c4 7e 08 les di,dword ptr +8H[bp]
- 00f3 06 push es
- 00f4 57 push di
- 00f5 8d be 00 ff lea di,-100H[bp]
- 00f9 16 push ss
- 00fa 57 push di
- 00fb b8 ff 00 mov ax,00ffH
- 00fe 50 push ax
- 00ff 9a 00 00 00 00 call far SYSTEM_00C
- 0104 c7 86 fc fd 00 01 mov word ptr -204H[bp],0100H
- 010a 8b 86 fc fd mov ax,-204H[bp]
- 010e 48 dec ax
- 010f 8b d0 mov dx,ax
- 0111 8a 46 06 mov al,+6H[bp]
- 0114 30 e4 xor ah,ah
- 0116 3b c2 cmp ax,dx
- 0118 76 08 jbe L4
- 011a 8b 86 fc fd mov ax,-204H[bp]
- 011e 48 dec ax
- 011f 88 46 06 mov +6H[bp],al
- 0122 8a 86 00 ff L4 mov al,-100H[bp]
- 0126 30 e4 xor ah,ah
- 0128 89 86 fe fd mov -202H[bp],ax
- 012c c6 86 fb fd 00 mov byte ptr -205H[bp],00H
- 0131 8a 86 fe fd mov al,-202H[bp]
- 0135 88 86 f9 fd mov -207H[bp],al
- 0139 b0 01 mov al,01H
- 013b 3a 86 f9 fd cmp al,-207H[bp]
- 013f 77 2d ja L8
- 0141 88 86 fa fd mov -206H[bp],al
- 0145 eb 04 jmp L6
- 0147 fe 86 fa fd L5 inc byte ptr -206H[bp]
- 014b 8a 86 fa fd L6 mov al,-206H[bp]
- 014f 30 e4 xor ah,ah
- 0151 8b f8 mov di,ax
- 0153 80 bb 00 ff 20 cmp byte ptr -100H[bp+di],20H
- 0158 76 0a jbe L7
- 015a 8a 86 fa fd mov al,-206H[bp]
- 015e 88 86 fb fd mov -205H[bp],al
- 0162 eb 0a jmp L8
- 0164 8a 86 fa fd L7 mov al,-206H[bp]
- 0168 3a 86 f9 fd cmp al,-207H[bp]
- 016c 75 d9 jne L5
- 016e 8d be 00 fe L8 lea di,-200H[bp]
- 0172 16 push ss
- 0173 57 push di
- 0174 ff b6 fc fd push -204H[bp]
- 0178 b0 20 mov al,20H
- 017a 50 push ax
- 017b 9a 00 00 00 00 call far SYSTEM_05C
- 0180 8a 46 06 mov al,+6H[bp]
- 0183 88 86 00 fe mov -200H[bp],al
- 0187 80 be fb fd 00 cmp byte ptr -205H[bp],00H
- 018c 76 55 jbe L10
- 018e 8a 46 06 mov al,+6H[bp]
- 0191 30 e4 xor ah,ah
- 0193 3b 86 fe fd cmp ax,-202H[bp]
- 0197 7d 21 jge L9
- 0199 8a 86 fb fd mov al,-205H[bp]
- 019d 30 e4 xor ah,ah
- 019f 8b f8 mov di,ax
- 01a1 8d bb 00 ff lea di,-100H[bp+di]
- 01a5 16 push ss
- 01a6 57 push di
- 01a7 8d be 01 fe lea di,-1ffH[bp]
- 01ab 16 push ss
- 01ac 57 push di
- 01ad 8a 46 06 mov al,+6H[bp]
- 01b0 30 e4 xor ah,ah
- 01b2 50 push ax
- 01b3 9a 00 00 00 00 call far SYSTEM_060
- 01b8 eb 29 jmp L10
- 01ba 8a 86 fb fd L9 mov al,-205H[bp]
- 01be 30 e4 xor ah,ah
- 01c0 8b f8 mov di,ax
- 01c2 8d bb 00 ff lea di,-100H[bp+di]
- 01c6 16 push ss
- 01c7 57 push di
- 01c8 8d be 01 fe lea di,-1ffH[bp]
- 01cc 16 push ss
- 01cd 57 push di
- 01ce 8a 86 fb fd mov al,-205H[bp]
- 01d2 30 e4 xor ah,ah
- 01d4 8b d0 mov dx,ax
- 01d6 8b 86 fe fd mov ax,-202H[bp]
- 01da 2b c2 sub ax,dx
- 01dc 40 inc ax
- 01dd 50 push ax
- 01de 9a 00 00 00 00 call far SYSTEM_060
- 01e3 8d be 00 fe L10 lea di,-200H[bp]
- 01e7 16 push ss
- 01e8 57 push di
- 01e9 c4 7e 0c les di,dword ptr +0cH[bp]
- 01ec 06 push es
- 01ed 57 push di
- 01ee b8 ff 00 mov ax,00ffH
- 01f1 50 push ax
- 01f2 9a 00 00 00 00 call far SYSTEM_00C
- 01f7 89 ec mov sp,bp
- 01f9 5d pop bp
- 01fa ca 06 00 retf 0006H
- 01fd LEADFN:
- 01fd 55 TSUNTD_003 push bp
- 01fe 89 e5 mov bp,sp
- 0200 b8 02 03 mov ax,0302H
- 0203 9a 00 00 00 00 call far SYSTEM_034
- 0208 81 ec 02 03 sub sp,0302H
- 020c c4 7e 0a les di,dword ptr +0aH[bp]
- 020f 06 push es
- 0210 57 push di
- 0211 8d be 00 ff lea di,-100H[bp]
- 0215 16 push ss
- 0216 57 push di
- 0217 b8 ff 00 mov ax,00ffH
- 021a 50 push ax
- 021b 9a 00 00 00 00 call far SYSTEM_00C
- 0220 8a 86 00 ff mov al,-100H[bp]
- 0224 30 e4 xor ah,ah
- 0226 89 86 fe fe mov -102H[bp],ax
- 022a 8a 46 08 mov al,+8H[bp]
- 022d 30 e4 xor ah,ah
- 022f 3b 86 fe fe cmp ax,-102H[bp]
- 0233 7f 16 jg L11
- 0235 8d be 00 ff lea di,-100H[bp]
- 0239 16 push ss
- 023a 57 push di
- 023b c4 7e 0e les di,dword ptr +0eH[bp]
- 023e 06 push es
- 023f 57 push di
- 0240 b8 ff 00 mov ax,00ffH
- 0243 50 push ax
- 0244 9a 00 00 00 00 call far SYSTEM_00C
- 0249 eb 4a jmp L12
- 024b 8d be fe fd L11 lea di,-202H[bp]
- 024f 16 push ss
- 0250 57 push di
- 0251 b8 00 01 mov ax,0100H
- 0254 50 push ax
- 0255 8a 46 06 mov al,+6H[bp]
- 0258 50 push ax
- 0259 9a 00 00 00 00 call far SYSTEM_05C
- 025e 8a 46 08 mov al,+8H[bp]
- 0261 30 e4 xor ah,ah
- 0263 2b 86 fe fe sub ax,-102H[bp]
- 0267 88 86 fe fd mov -202H[bp],al
- 026b 8d be fe fc lea di,-302H[bp]
- 026f 16 push ss
- 0270 57 push di
- 0271 8d be fe fd lea di,-202H[bp]
- 0275 16 push ss
- 0276 57 push di
- 0277 9a 00 00 00 00 call far SYSTEM_00B
- 027c 8d be 00 ff lea di,-100H[bp]
- 0280 16 push ss
- 0281 57 push di
- 0282 9a 00 00 00 00 call far SYSTEM_00F
- 0287 c4 7e 0e les di,dword ptr +0eH[bp]
- 028a 06 push es
- 028b 57 push di
- 028c b8 ff 00 mov ax,00ffH
- 028f 50 push ax
- 0290 9a 00 00 00 00 call far SYSTEM_00C
- 0295 89 ec L12 mov sp,bp
- 0297 5d pop bp
- 0298 ca 08 00 retf 0008H
- 029b TRAILFN:
- 029b 55 TSUNTD_004 push bp
- 029c 89 e5 mov bp,sp
- 029e b8 02 03 mov ax,0302H
- 02a1 9a 00 00 00 00 call far SYSTEM_034
- 02a6 81 ec 02 03 sub sp,0302H
- 02aa c4 7e 0a les di,dword ptr +0aH[bp]
- 02ad 06 push es
- 02ae 57 push di
- 02af 8d be 00 ff lea di,-100H[bp]
- 02b3 16 push ss
- 02b4 57 push di
- 02b5 b8 ff 00 mov ax,00ffH
- 02b8 50 push ax
- 02b9 9a 00 00 00 00 call far SYSTEM_00C
- 02be 8a 86 00 ff mov al,-100H[bp]
- 02c2 30 e4 xor ah,ah
- 02c4 89 86 fe fe mov -102H[bp],ax
- 02c8 8a 46 08 mov al,+8H[bp]
- 02cb 30 e4 xor ah,ah
- 02cd 3b 86 fe fe cmp ax,-102H[bp]
- 02d1 7f 16 jg L13
- 02d3 8d be 00 ff lea di,-100H[bp]
- 02d7 16 push ss
- 02d8 57 push di
- 02d9 c4 7e 0e les di,dword ptr +0eH[bp]
- 02dc 06 push es
- 02dd 57 push di
- 02de b8 ff 00 mov ax,00ffH
- 02e1 50 push ax
- 02e2 9a 00 00 00 00 call far SYSTEM_00C
- 02e7 eb 4a jmp L14
- 02e9 8d be fe fd L13 lea di,-202H[bp]
- 02ed 16 push ss
- 02ee 57 push di
- 02ef b8 00 01 mov ax,0100H
- 02f2 50 push ax
- 02f3 8a 46 06 mov al,+6H[bp]
- 02f6 50 push ax
- 02f7 9a 00 00 00 00 call far SYSTEM_05C
- 02fc 8a 46 08 mov al,+8H[bp]
- 02ff 30 e4 xor ah,ah
- 0301 2b 86 fe fe sub ax,-102H[bp]
- 0305 88 86 fe fd mov -202H[bp],al
- 0309 8d be fe fc lea di,-302H[bp]
- 030d 16 push ss
- 030e 57 push di
- 030f 8d be 00 ff lea di,-100H[bp]
- 0313 16 push ss
- 0314 57 push di
- 0315 9a 00 00 00 00 call far SYSTEM_00B
- 031a 8d be fe fd lea di,-202H[bp]
- 031e 16 push ss
- 031f 57 push di
- 0320 9a 00 00 00 00 call far SYSTEM_00F
- 0325 c4 7e 0e les di,dword ptr +0eH[bp]
- 0328 06 push es
- 0329 57 push di
- 032a b8 ff 00 mov ax,00ffH
- 032d 50 push ax
- 032e 9a 00 00 00 00 call far SYSTEM_00C
- 0333 89 ec L14 mov sp,bp
- 0335 5d pop bp
- 0336 ca 08 00 retf 0008H
- 0339 1a 50 52 L15 sbb dl,+52H[bx+si]
- 033c 4f dec di
- 033d 47 inc di
- 033e 52 push dx
- 033f 41 inc cx
- 0340 4d dec bp
- 0341 20 46 41 and +41H[bp],al
- 0344 49 dec cx
- 0345 4c dec sp
- 0346 55 push bp
- 0347 52 push dx
- 0348 45 inc bp
- 0349 20 49 4e and +4eH[bx+di],cl
- 034c 20 4d 4f and +4fH[di],cl
- 034f 44 inc sp
- 0350 55 push bp
- 0351 4c dec sp
- 0352 45 inc bp
- 0353 20 35 and [di],dh
- 0355 50 push ax
- 0356 4c dec sp
- 0357 45 inc bp
- 0358 41 inc cx
- 0359 53 push bx
- 035a 45 inc bp
- 035b 20 44 4f and +4fH[si],al
- 035e 43 inc bx
- 035f 55 push bp
- 0360 4d dec bp
- 0361 45 inc bp
- 0362 4e dec si
- 0363 54 push sp
- 0364 20 54 48 and +48H[si],dl
- 0367 45 inc bp
- 0368 20 44 45 and +45H[si],al
- 036b 54 push sp
- 036c 41 inc cx
- 036d 49 dec cx
- 036e 4c dec sp
- 036f 53 push bx
- 0370 20 41 4e and +4eH[bx+di],al
- 0373 44 inc sp
- 0374 20 4e 4f and +4fH[bp],cl
- 0377 54 push sp
- 0378 49 dec cx
- 0379 46 inc si
- 037a 59 pop cx
- 037b 20 54 48 and +48H[si],dl
- 037e 45 inc bp
- 037f 20 41 55 and +55H[bx+di],al
- 0382 54 push sp
- 0383 48 dec ax
- 0384 4f dec di
- 0385 52 push dx
- 0386 2c 20 sub al,20H
- 0388 23 37 and si,[bx]
- 038a 55 TSUNTD_012 push bp
- 038b 89 e5 mov bp,sp
- 038d b8 00 01 mov ax,0100H
- 0390 9a 00 00 00 00 call far SYSTEM_034
- 0395 81 ec 00 01 sub sp,0100H
- 0399 c4 7e 04 les di,dword ptr +4H[bp]
- 039c 06 push es
- 039d 57 push di
- 039e 8d be 00 ff lea di,-100H[bp]
- 03a2 16 push ss
- 03a3 57 push di
- 03a4 b8 ff 00 mov ax,00ffH
- 03a7 50 push ax
- 03a8 9a 00 00 00 00 call far SYSTEM_00C
- 03ad bf 00 00 mov di,offset SYSTEM_BSS+100H
- 03b0 1e push ds
- 03b1 57 push di
- 03b2 bf 00 00 mov di,offset L15
- 03b5 0e push cs
- 03b6 57 push di
- 03b7 31 c0 xor ax,ax
- 03b9 50 push ax
- 03ba 9a 00 00 00 00 call far SYSTEM_036
- 03bf 8d be 00 ff lea di,-100H[bp]
- 03c3 16 push ss
- 03c4 57 push di
- 03c5 31 c0 xor ax,ax
- 03c7 50 push ax
- 03c8 9a 00 00 00 00 call far SYSTEM_036
- 03cd 9a 00 00 00 00 call far SYSTEM_03A
- 03d2 9a 00 00 00 00 call far SYSTEM_032
- 03d7 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 03da 1e push ds
- 03db 57 push di
- 03dc bf 00 00 mov di,offset L16
- 03df 0e push cs
- 03e0 57 push di
- 03e1 31 c0 xor ax,ax
- 03e3 50 push ax
- 03e4 9a 00 00 00 00 call far SYSTEM_036
- 03e9 9a 00 00 00 00 call far SYSTEM_03A
- 03ee 9a 00 00 00 00 call far SYSTEM_032
- 03f3 31 c0 xor ax,ax
- 03f5 9a 00 00 00 00 call far SYSTEM_003
- 03fa 89 ec mov sp,bp
- 03fc 5d pop bp
- 03fd c2 04 00 ret 0004H
- 0400 01 ff L17 add di,di
- 0402 05 50 41 L18 add ax,4150H
- 0405 52 push dx
- 0406 53 push bx
- 0407 45 inc bp
- 0408 PARSE:
- 0408 55 TSUNTD_006 push bp
- 0409 89 e5 mov bp,sp
- 040b b8 0c 05 mov ax,050cH
- 040e 9a 00 00 00 00 call far SYSTEM_034
- 0413 81 ec 0c 05 sub sp,050cH
- 0417 c4 7e 12 les di,dword ptr +12H[bp]
- 041a 06 push es
- 041b 57 push di
- 041c 8d be 00 fe lea di,-200H[bp]
- 0420 16 push ss
- 0421 57 push di
- 0422 b8 ff 00 mov ax,00ffH
- 0425 50 push ax
- 0426 9a 00 00 00 00 call far SYSTEM_00C
- 042b c4 7e 18 les di,dword ptr +18H[bp]
- 042e 06 push es
- 042f 57 push di
- 0430 8d be 00 ff lea di,-100H[bp]
- 0434 16 push ss
- 0435 57 push di
- 0436 b8 ff 00 mov ax,00ffH
- 0439 50 push ax
- 043a 9a 00 00 00 00 call far SYSTEM_00C
- 043f c4 7e 0e les di,dword ptr +0eH[bp]
- 0442 31 c0 xor ax,ax
- 0444 26 89 05 mov es:[di],ax
- 0447 c4 7e 06 les di,dword ptr +6H[bp]
- 044a 26 c6 05 01 mov byte ptr es:[di],01H
- 044e 8d be f4 fa lea di,-50cH[bp]
- 0452 16 push ss
- 0453 57 push di
- 0454 8d be 00 fe lea di,-200H[bp]
- 0458 16 push ss
- 0459 57 push di
- 045a 9a 00 00 00 00 call far SYSTEM_00B
- 045f bf 00 00 mov di,offset L17
- 0462 0e push cs
- 0463 57 push di
- 0464 9a 00 00 00 00 call far SYSTEM_00F
- 0469 8d be f6 fb lea di,-40aH[bp]
- 046d 16 push ss
- 046e 57 push di
- 046f b8 ff 00 mov ax,00ffH
- 0472 50 push ax
- 0473 9a 00 00 00 00 call far SYSTEM_00C
- 0478 8a 86 f6 fb mov al,-40aH[bp]
- 047c 30 e4 xor ah,ah
- 047e 89 86 f4 fb mov -40cH[bp],ax
- 0482 c4 7e 0a les di,dword ptr +0aH[bp]
- 0485 26 c4 3d les di,dword ptr es:[di]
- 0488 06 push es
- 0489 57 push di
- 048a b8 00 ff mov ax,0ff00H
- 048d 50 push ax
- 048e b0 2a mov al,2aH
- 0490 50 push ax
- 0491 9a 00 00 00 00 call far SYSTEM_05C
- 0496 31 c0 xor ax,ax
- 0498 89 86 fa fd mov -206H[bp],ax
- 049c 8a 86 00 ff mov al,-100H[bp]
- 04a0 30 e4 xor ah,ah
- 04a2 40 inc ax
- 04a3 89 86 fe fd mov -202H[bp],ax
- 04a7 81 be fe fd fe 00 cmp word ptr -202H[bp],00feH
- 04ad 7e 0a jle L19
- 04af c4 7e 06 les di,dword ptr +6H[bp]
- 04b2 26 c6 05 00 mov byte ptr es:[di],00H
- 04b6 e9 95 01 jmp L34
- 04b9 8d be f4 fa L19 lea di,-50cH[bp]
- 04bd 16 push ss
- 04be 57 push di
- 04bf 8d be 00 ff lea di,-100H[bp]
- 04c3 16 push ss
- 04c4 57 push di
- 04c5 9a 00 00 00 00 call far SYSTEM_00B
- 04ca bf 00 00 mov di,offset L17
- 04cd 0e push cs
- 04ce 57 push di
- 04cf 9a 00 00 00 00 call far SYSTEM_00F
- 04d4 8d be 00 ff lea di,-100H[bp]
- 04d8 16 push ss
- 04d9 57 push di
- 04da b8 ff 00 mov ax,00ffH
- 04dd 50 push ax
- 04de 9a 00 00 00 00 call far SYSTEM_00C
- 04e3 c4 7e 0e L20 les di,dword ptr +0eH[bp]
- 04e6 26 8b 05 mov ax,es:[di]
- 04e9 3b 46 16 cmp ax,+16H[bp]
- 04ec 7c 0a jl L21
- 04ee c4 7e 06 les di,dword ptr +6H[bp]
- 04f1 26 c6 05 00 mov byte ptr es:[di],00H
- 04f5 e9 56 01 jmp L34
- 04f8 8b 86 fa fd L21 mov ax,-206H[bp]
- 04fc 89 86 fc fd mov -204H[bp],ax
- 0500 8b 86 fc fd L22 mov ax,-204H[bp]
- 0504 40 inc ax
- 0505 89 86 fc fd mov -204H[bp],ax
- 0509 8b 86 fc fd mov ax,-204H[bp]
- 050d 3b 86 fe fd cmp ax,-202H[bp]
- 0511 7e 08 jle L23
- 0513 bf 00 00 mov di,offset L18
- 0516 0e push cs
- 0517 57 push di
- 0518 e8 00 00 call TSUNTD_012
- 051b 8d be f4 fa L23 lea di,-50cH[bp]
- 051f 16 push ss
- 0520 57 push di
- 0521 8b be fc fd mov di,-204H[bp]
- 0525 8a 83 00 ff mov al,-100H[bp+di]
- 0529 50 push ax
- 052a 9a 00 00 00 00 call far SYSTEM_012
- 052f 8d be f6 fb lea di,-40aH[bp]
- 0533 16 push ss
- 0534 57 push di
- 0535 9a 00 00 00 00 call far SYSTEM_010
- 053a 89 86 f6 fd mov -20aH[bp],ax
- 053e 8b 86 f6 fd mov ax,-20aH[bp]
- 0542 3b 86 f4 fb cmp ax,-40cH[bp]
- 0546 75 03 jne L24
- 0548 e9 03 01 jmp L34
- 054b 83 be f6 fd 00 L24 cmp word ptr -20aH[bp],0000H
- 0550 75 0a jne L25
- 0552 8b 86 fc fd mov ax,-204H[bp]
- 0556 89 86 f8 fd mov -208H[bp],ax
- 055a eb 02 jmp L26
- 055c eb a2 L25 jmp L22
- 055e 8b 86 f8 fd L26 mov ax,-208H[bp]
- 0562 89 86 fc fd mov -204H[bp],ax
- 0566 8b 86 fc fd L27 mov ax,-204H[bp]
- 056a 40 inc ax
- 056b 89 86 fc fd mov -204H[bp],ax
- 056f 8b 86 fc fd mov ax,-204H[bp]
- 0573 3b 86 fe fd cmp ax,-202H[bp]
- 0577 7e 08 jle L28
- 0579 bf 00 00 mov di,offset L18
- 057c 0e push cs
- 057d 57 push di
- 057e e8 00 00 call TSUNTD_012
- 0581 8d be f4 fa L28 lea di,-50cH[bp]
- 0585 16 push ss
- 0586 57 push di
- 0587 8b be fc fd mov di,-204H[bp]
- 058b 8a 83 00 ff mov al,-100H[bp+di]
- 058f 50 push ax
- 0590 9a 00 00 00 00 call far SYSTEM_012
- 0595 8d be f6 fb lea di,-40aH[bp]
- 0599 16 push ss
- 059a 57 push di
- 059b 9a 00 00 00 00 call far SYSTEM_010
- 05a0 09 c0 or ax,ax
- 05a2 7e 0a jle L29
- 05a4 8b 86 fc fd mov ax,-204H[bp]
- 05a8 89 86 fa fd mov -206H[bp],ax
- 05ac eb 02 jmp L30
- 05ae eb b6 L29 jmp L27
- 05b0 8d be f6 fc L30 lea di,-30aH[bp]
- 05b4 16 push ss
- 05b5 57 push di
- 05b6 b8 00 01 mov ax,0100H
- 05b9 50 push ax
- 05ba b0 20 mov al,20H
- 05bc 50 push ax
- 05bd 9a 00 00 00 00 call far SYSTEM_05C
- 05c2 8b 86 fa fd mov ax,-206H[bp]
- 05c6 48 dec ax
- 05c7 89 86 f2 fb mov -40eH[bp],ax
- 05cb 8b 86 f8 fd mov ax,-208H[bp]
- 05cf 3b 86 f2 fb cmp ax,-40eH[bp]
- 05d3 7f 2b jg L33
- 05d5 89 86 fc fd mov -204H[bp],ax
- 05d9 eb 04 jmp L32
- 05db ff 86 fc fd L31 inc word ptr -204H[bp]
- 05df 8b be fc fd L32 mov di,-204H[bp]
- 05e3 8a 93 00 ff mov dl,-100H[bp+di]
- 05e7 8b 86 fc fd mov ax,-204H[bp]
- 05eb 2b 86 f8 fd sub ax,-208H[bp]
- 05ef 40 inc ax
- 05f0 8b f8 mov di,ax
- 05f2 88 93 f6 fc mov -30aH[bp+di],dl
- 05f6 8b 86 fc fd mov ax,-204H[bp]
- 05fa 3b 86 f2 fb cmp ax,-40eH[bp]
- 05fe 75 db jne L31
- 0600 8b 86 fa fd L33 mov ax,-206H[bp]
- 0604 2b 86 f8 fd sub ax,-208H[bp]
- 0608 88 86 f6 fc mov -30aH[bp],al
- 060c 8d be f6 fc lea di,-30aH[bp]
- 0610 16 push ss
- 0611 57 push di
- 0612 c4 7e 0e les di,dword ptr +0eH[bp]
- 0615 26 8b 05 mov ax,es:[di]
- 0618 40 inc ax
- 0619 b1 08 mov cl,08H
- 061b d3 e0 shl ax,cl
- 061d c4 7e 0a les di,dword ptr +0aH[bp]
- 0620 26 c4 3d les di,dword ptr es:[di]
- 0623 03 f8 add di,ax
- 0625 81 c7 00 ff add di,0ff00H
- 0629 06 push es
- 062a 57 push di
- 062b b8 ff 00 mov ax,00ffH
- 062e 50 push ax
- 062f 9a 00 00 00 00 call far SYSTEM_00C
- 0634 c4 7e 0e les di,dword ptr +0eH[bp]
- 0637 26 8b 05 mov ax,es:[di]
- 063a 40 inc ax
- 063b c4 7e 0e les di,dword ptr +0eH[bp]
- 063e 26 89 05 mov es:[di],ax
- 0641 8b 86 fa fd mov ax,-206H[bp]
- 0645 3b 86 fe fd cmp ax,-202H[bp]
- 0649 7d 03 jge L34
- 064b e9 95 fe jmp L20
- 064e 89 ec L34 mov sp,bp
- 0650 5d pop bp
- 0651 ca 16 00 retf 0016H
- 0654 01 ff L35 add di,di
- 0656 15 53 54 L36 adc ax,5453H
- 0659 52 push dx
- 065a 43 inc bx
- 065b 4e dec si
- 065c 54 push sp
- 065d 46 inc si
- 065e 4e dec si
- 065f 20 6f 75 and +75H[bx],ch
- 0662 74 20 je L38
- 0664 6f outsw
- 0665 66 20 72 61 and +61H[bp+si],dh
- 0669 6e outsb
- 066a 67 65 08 53 54 or gs:+54H[ebx],dl
- 066f 52 push dx
- 0670 43 inc bx
- 0671 4e dec si
- 0672 54 push sp
- 0673 46 inc si
- 0674 4e dec si
- 0675 STRCNTFN:
- 0675 55 TSUNTD_007 push bp
- 0676 89 e5 mov bp,sp
- 0678 b8 10 04 mov ax,0410H
- 067b 9a 00 00 00 00 call far SYSTEM_034
- 0680 81 ec 10 04 sub sp,0410H
- 0684 c4 7e 06 L38 les di,dword ptr +6H[bp]
- 0687 06 push es
- 0688 57 push di
- 0689 8d be fe fd lea di,-202H[bp]
- 068d 16 push ss
- 068e 57 push di
- 068f b8 ff 00 mov ax,00ffH
- 0692 50 push ax
- 0693 9a 00 00 00 00 call far SYSTEM_00C
- 0698 c4 7e 0a les di,dword ptr +0aH[bp]
- 069b 06 push es
- 069c 57 push di
- 069d 8d be fe fe lea di,-102H[bp]
- 06a1 16 push ss
- 06a2 57 push di
- 06a3 b8 ff 00 mov ax,00ffH
- 06a6 50 push ax
- 06a7 9a 00 00 00 00 call far SYSTEM_00C
- 06ac 31 c0 xor ax,ax
- 06ae 89 86 f0 fc mov -310H[bp],ax
- 06b2 8d be f0 fb lea di,-410H[bp]
- 06b6 16 push ss
- 06b7 57 push di
- 06b8 8d be fe fd lea di,-202H[bp]
- 06bc 16 push ss
- 06bd 57 push di
- 06be 9a 00 00 00 00 call far SYSTEM_00B
- 06c3 bf 00 00 mov di,offset L35
- 06c6 0e push cs
- 06c7 57 push di
- 06c8 9a 00 00 00 00 call far SYSTEM_00F
- 06cd 8d be f4 fc lea di,-30cH[bp]
- 06d1 16 push ss
- 06d2 57 push di
- 06d3 b8 ff 00 mov ax,00ffH
- 06d6 50 push ax
- 06d7 9a 00 00 00 00 call far SYSTEM_00C
- 06dc 8a 86 f4 fc mov al,-30cH[bp]
- 06e0 30 e4 xor ah,ah
- 06e2 89 86 f2 fc mov -30eH[bp],ax
- 06e6 31 c0 xor ax,ax
- 06e8 89 86 f8 fd mov -208H[bp],ax
- 06ec 8a 86 fe fe mov al,-102H[bp]
- 06f0 30 e4 xor ah,ah
- 06f2 40 inc ax
- 06f3 89 86 fc fd mov -204H[bp],ax
- 06f7 81 be fc fd fe 00 cmp word ptr -204H[bp],00feH
- 06fd 7e 2e jle L39
- 06ff bf 00 00 mov di,offset SYSTEM_BSS+100H
- 0702 1e push ds
- 0703 57 push di
- 0704 bf 00 00 mov di,offset L36
- 0707 0e push cs
- 0708 57 push di
- 0709 31 c0 xor ax,ax
- 070b 50 push ax
- 070c 9a 00 00 00 00 call far SYSTEM_036
- 0711 b0 07 mov al,07H
- 0713 50 push ax
- 0714 31 c0 xor ax,ax
- 0716 50 push ax
- 0717 9a 00 00 00 00 call far SYSTEM_039
- 071c 9a 00 00 00 00 call far SYSTEM_03A
- 0721 9a 00 00 00 00 call far SYSTEM_032
- 0726 31 c0 xor ax,ax
- 0728 9a 00 00 00 00 call far SYSTEM_003
- 072d 8d be f0 fb L39 lea di,-410H[bp]
- 0731 16 push ss
- 0732 57 push di
- 0733 8d be fe fe lea di,-102H[bp]
- 0737 16 push ss
- 0738 57 push di
- 0739 9a 00 00 00 00 call far SYSTEM_00B
- 073e bf 00 00 mov di,offset L35
- 0741 0e push cs
- 0742 57 push di
- 0743 9a 00 00 00 00 call far SYSTEM_00F
- 0748 8d be fe fe lea di,-102H[bp]
- 074c 16 push ss
- 074d 57 push di
- 074e b8 ff 00 mov ax,00ffH
- 0751 50 push ax
- 0752 9a 00 00 00 00 call far SYSTEM_00C
- 0757 8b 86 f8 fd L40 mov ax,-208H[bp]
- 075b 89 86 fa fd mov -206H[bp],ax
- 075f 8b 86 fa fd L41 mov ax,-206H[bp]
- 0763 40 inc ax
- 0764 89 86 fa fd mov -206H[bp],ax
- 0768 8b 86 fa fd mov ax,-206H[bp]
- 076c 3b 86 fc fd cmp ax,-204H[bp]
- 0770 7e 08 jle L42
- 0772 bf 00 00 mov di,offset L37
- 0775 0e push cs
- 0776 57 push di
- 0777 e8 00 00 call TSUNTD_012
- 077a 8d be f0 fb L42 lea di,-410H[bp]
- 077e 16 push ss
- 077f 57 push di
- 0780 8b be fa fd mov di,-206H[bp]
- 0784 8a 83 fe fe mov al,-102H[bp+di]
- 0788 50 push ax
- 0789 9a 00 00 00 00 call far SYSTEM_012
- 078e 8d be f4 fc lea di,-30cH[bp]
- 0792 16 push ss
- 0793 57 push di
- 0794 9a 00 00 00 00 call far SYSTEM_010
- 0799 89 86 f4 fd mov -20cH[bp],ax
- 079d 8b 86 f4 fd mov ax,-20cH[bp]
- 07a1 3b 86 f2 fc cmp ax,-30eH[bp]
- 07a5 75 0a jne L43
- 07a7 8b 86 f0 fc mov ax,-310H[bp]
- 07ab 89 46 fe mov -2H[bp],ax
- 07ae e9 82 00 jmp L51
- 07b1 83 be f4 fd 00 L43 cmp word ptr -20cH[bp],0000H
- 07b6 75 0a jne L44
- 07b8 8b 86 fa fd mov ax,-206H[bp]
- 07bc 89 86 f6 fd mov -20aH[bp],ax
- 07c0 eb 02 jmp L45
- 07c2 eb 9b L44 jmp L41
- 07c4 8b 86 f6 fd L45 mov ax,-20aH[bp]
- 07c8 89 86 fa fd mov -206H[bp],ax
- 07cc 8b 86 fa fd L46 mov ax,-206H[bp]
- 07d0 40 inc ax
- 07d1 89 86 fa fd mov -206H[bp],ax
- 07d5 8b 86 fa fd mov ax,-206H[bp]
- 07d9 3b 86 fc fd cmp ax,-204H[bp]
- 07dd 7e 08 jle L47
- 07df bf 00 00 mov di,offset L37
- 07e2 0e push cs
- 07e3 57 push di
- 07e4 e8 00 00 call TSUNTD_012
- 07e7 8d be f0 fb L47 lea di,-410H[bp]
- 07eb 16 push ss
- 07ec 57 push di
- 07ed 8b be fa fd mov di,-206H[bp]
- 07f1 8a 83 fe fe mov al,-102H[bp+di]
- 07f5 50 push ax
- 07f6 9a 00 00 00 00 call far SYSTEM_012
- 07fb 8d be f4 fc lea di,-30cH[bp]
- 07ff 16 push ss
- 0800 57 push di
- 0801 9a 00 00 00 00 call far SYSTEM_010
- 0806 09 c0 or ax,ax
- 0808 7e 0a jle L48
- 080a 8b 86 fa fd mov ax,-206H[bp]
- 080e 89 86 f8 fd mov -208H[bp],ax
- 0812 eb 02 jmp L49
- 0814 eb b6 L48 jmp L46
- 0816 8b 86 f0 fc L49 mov ax,-310H[bp]
- 081a 40 inc ax
- 081b 89 86 f0 fc mov -310H[bp],ax
- 081f 8b 86 f8 fd mov ax,-208H[bp]
- 0823 3b 86 fc fd cmp ax,-204H[bp]
- 0827 7d 03 jge L50
- 0829 e9 2b ff jmp L40
- 082c 8b 86 f0 fc L50 mov ax,-310H[bp]
- 0830 89 46 fe mov -2H[bp],ax
- 0833 8b 46 fe L51 mov ax,-2H[bp]
- 0836 89 ec mov sp,bp
- 0838 5d pop bp
- 0839 ca 08 00 retf 0008H
- 083c 0c 4f L52 or al,4fH
- 083e 75 74 jne L56
- 0840 20 6f 66 and +66H[bx],ch
- 0843 20 72 61 and +61H[bp+si],dh
- 0846 6e outsb
- 0847 67 65 01 ff add di,di
- 084b 07 L54 pop es
- 084c 53 push bx
- 084d 50 push ax
- 084e 41 inc cx
- 084f 52 push dx
- 0850 54 push sp
- 0851 46 inc si
- 0852 4e dec si
- 0853 SPARTFN:
- 0853 55 TSUNTD_008 push bp
- 0854 89 e5 mov bp,sp
- 0856 b8 0e 05 mov ax,050eH
- 0859 9a 00 00 00 00 call far SYSTEM_034
- 085e 81 ec 0e 05 sub sp,050eH
- 0862 c4 7e 08 les di,dword ptr +8H[bp]
- 0865 06 push es
- 0866 57 push di
- 0867 8d be 00 fe lea di,-200H[bp]
- 086b 16 push ss
- 086c 57 push di
- 086d b8 ff 00 mov ax,00ffH
- 0870 50 push ax
- 0871 9a 00 00 00 00 call far SYSTEM_00C
- 0876 c4 7e 0c les di,dword ptr +0cH[bp]
- 0879 06 push es
- 087a 57 push di
- 087b 8d be 00 ff lea di,-100H[bp]
- 087f 16 push ss
- 0880 57 push di
- 0881 b8 ff 00 mov ax,00ffH
- 0884 50 push ax
- 0885 9a 00 00 00 00 call far SYSTEM_00C
- 088a 8d be 00 ff lea di,-100H[bp]
- 088e 16 push ss
- 088f 57 push di
- 0890 8d be 00 fe lea di,-200H[bp]
- 0894 16 push ss
- 0895 57 push di
- 0896 0e push cs
- 0897 e8 00 00 call STRCNTFN
- 089a 89 86 f2 fb mov -40eH[bp],ax
- 089e 83 7e 06 01 cmp word ptr +6H[bp],0001H
- 08a2 7c 09 jl L55
- 08a4 8b 46 06 mov ax,+6H[bp]
- 08a7 3b 86 f2 fb cmp ax,-40eH[bp]
- 08ab 7e 16 jle L57
- 08ad bf 00 00 L55 mov di,offset L52
- 08b0 0e push cs
- 08b1 57 push di
- 08b2 c4 7e 10 les di,dword ptr +10H[bp]
- 08b5 06 push es
- 08b6 57 push di
- 08b7 b8 ff 00 mov ax,00ffH
- 08ba 50 push ax
- 08bb 9a 00 00 00 00 call far SYSTEM_00C
- 08c0 e9 e9 01 jmp L73
- 08c3 31 c0 L57 xor ax,ax
- 08c5 89 86 f2 fb mov -40eH[bp],ax
- 08c9 8d be f2 fa lea di,-50eH[bp]
- 08cd 16 push ss
- 08ce 57 push di
- 08cf 8d be 00 fe lea di,-200H[bp]
- 08d3 16 push ss
- 08d4 57 push di
- 08d5 9a 00 00 00 00 call far SYSTEM_00B
- 08da bf 00 00 mov di,offset L53
- 08dd 0e push cs
- 08de 57 push di
- 08df 9a 00 00 00 00 call far SYSTEM_00F
- 08e4 8d be f6 fb lea di,-40aH[bp]
- 08e8 16 push ss
- 08e9 57 push di
- 08ea b8 ff 00 mov ax,00ffH
- 08ed 50 push ax
- 08ee 9a 00 00 00 00 call far SYSTEM_00C
- 08f3 8a 86 f6 fb mov al,-40aH[bp]
- 08f7 30 e4 xor ah,ah
- 08f9 89 86 f4 fb mov -40cH[bp],ax
- 08fd 8d be f6 fc lea di,-30aH[bp]
- 0901 16 push ss
- 0902 57 push di
- 0903 b8 00 01 mov ax,0100H
- 0906 50 push ax
- 0907 b0 2a mov al,2aH
- 0909 50 push ax
- 090a 9a 00 00 00 00 call far SYSTEM_05C
- 090f 31 c0 xor ax,ax
- 0911 89 86 fa fd mov -206H[bp],ax
- 0915 8a 86 00 ff mov al,-100H[bp]
- 0919 30 e4 xor ah,ah
- 091b 40 inc ax
- 091c 89 86 fe fd mov -202H[bp],ax
- 0920 81 be fe fd fe 00 cmp word ptr -202H[bp],00feH
- 0926 7e 0a jle L58
- 0928 c4 7e 10 les di,dword ptr +10H[bp]
- 092b 26 c6 05 00 mov byte ptr es:[di],00H
- 092f e9 7a 01 jmp L73
- 0932 8d be f2 fa L58 lea di,-50eH[bp]
- 0936 16 push ss
- 0937 57 push di
- 0938 8d be 00 ff lea di,-100H[bp]
- 093c 16 push ss
- 093d 57 push di
- 093e 9a 00 00 00 00 call far SYSTEM_00B
- 0943 bf 00 00 mov di,offset L53
- 0946 0e push cs
- 0947 57 push di
- 0948 9a 00 00 00 00 call far SYSTEM_00F
- 094d 8d be 00 ff lea di,-100H[bp]
- 0951 16 push ss
- 0952 57 push di
- 0953 b8 ff 00 mov ax,00ffH
- 0956 50 push ax
- 0957 9a 00 00 00 00 call far SYSTEM_00C
- 095c 8b 86 fa fd L59 mov ax,-206H[bp]
- 0960 89 86 fc fd mov -204H[bp],ax
- 0964 8b 86 fc fd L60 mov ax,-204H[bp]
- 0968 40 inc ax
- 0969 89 86 fc fd mov -204H[bp],ax
- 096d 8b 86 fc fd mov ax,-204H[bp]
- 0971 3b 86 fe fd cmp ax,-202H[bp]
- 0975 7e 08 jle L61
- 0977 bf 00 00 mov di,offset L54
- 097a 0e push cs
- 097b 57 push di
- 097c e8 00 00 call TSUNTD_012
- 097f 8d be f2 fa L61 lea di,-50eH[bp]
- 0983 16 push ss
- 0984 57 push di
- 0985 8b be fc fd mov di,-204H[bp]
- 0989 8a 83 00 ff mov al,-100H[bp+di]
- 098d 50 push ax
- 098e 9a 00 00 00 00 call far SYSTEM_012
- 0993 8d be f6 fb lea di,-40aH[bp]
- 0997 16 push ss
- 0998 57 push di
- 0999 9a 00 00 00 00 call far SYSTEM_010
- 099e 89 86 f6 fd mov -20aH[bp],ax
- 09a2 8b 86 f6 fd mov ax,-20aH[bp]
- 09a6 3b 86 f4 fb cmp ax,-40cH[bp]
- 09aa 75 0a jne L62
- 09ac c4 7e 10 les di,dword ptr +10H[bp]
- 09af 26 c6 05 00 mov byte ptr es:[di],00H
- 09b3 e9 f6 00 jmp L73
- 09b6 83 be f6 fd 00 L62 cmp word ptr -20aH[bp],0000H
- 09bb 75 0a jne L63
- 09bd 8b 86 fc fd mov ax,-204H[bp]
- 09c1 89 86 f8 fd mov -208H[bp],ax
- 09c5 eb 02 jmp L64
- 09c7 eb 9b L63 jmp L60
- 09c9 8b 86 f8 fd L64 mov ax,-208H[bp]
- 09cd 89 86 fc fd mov -204H[bp],ax
- 09d1 8b 86 fc fd L65 mov ax,-204H[bp]
- 09d5 40 inc ax
- 09d6 89 86 fc fd mov -204H[bp],ax
- 09da 8b 86 fc fd mov ax,-204H[bp]
- 09de 3b 86 fe fd cmp ax,-202H[bp]
- 09e2 7e 08 jle L66
- 09e4 bf 00 00 mov di,offset L54
- 09e7 0e push cs
- 09e8 57 push di
- 09e9 e8 00 00 call TSUNTD_012
- 09ec 8d be f2 fa L66 lea di,-50eH[bp]
- 09f0 16 push ss
- 09f1 57 push di
- 09f2 8b be fc fd mov di,-204H[bp]
- 09f6 8a 83 00 ff mov al,-100H[bp+di]
- 09fa 50 push ax
- 09fb 9a 00 00 00 00 call far SYSTEM_012
- 0a00 8d be f6 fb lea di,-40aH[bp]
- 0a04 16 push ss
- 0a05 57 push di
- 0a06 9a 00 00 00 00 call far SYSTEM_010
- 0a0b 09 c0 or ax,ax
- 0a0d 7e 0a jle L67
- 0a0f 8b 86 fc fd mov ax,-204H[bp]
- 0a13 89 86 fa fd mov -206H[bp],ax
- 0a17 eb 02 jmp L68
- 0a19 eb b6 L67 jmp L65
- 0a1b 8d be f6 fc L68 lea di,-30aH[bp]
- 0a1f 16 push ss
- 0a20 57 push di
- 0a21 b8 00 01 mov ax,0100H
- 0a24 50 push ax
- 0a25 b0 20 mov al,20H
- 0a27 50 push ax
- 0a28 9a 00 00 00 00 call far SYSTEM_05C
- 0a2d 8b 86 fa fd mov ax,-206H[bp]
- 0a31 48 dec ax
- 0a32 89 86 f0 fb mov -410H[bp],ax
- 0a36 8b 86 f8 fd mov ax,-208H[bp]
- 0a3a 3b 86 f0 fb cmp ax,-410H[bp]
- 0a3e 7f 2b jg L71
- 0a40 89 86 fc fd mov -204H[bp],ax
- 0a44 eb 04 jmp L70
- 0a46 ff 86 fc fd L69 inc word ptr -204H[bp]
- 0a4a 8b be fc fd L70 mov di,-204H[bp]
- 0a4e 8a 93 00 ff mov dl,-100H[bp+di]
- 0a52 8b 86 fc fd mov ax,-204H[bp]
- 0a56 2b 86 f8 fd sub ax,-208H[bp]
- 0a5a 40 inc ax
- 0a5b 8b f8 mov di,ax
- 0a5d 88 93 f6 fc mov -30aH[bp+di],dl
- 0a61 8b 86 fc fd mov ax,-204H[bp]
- 0a65 3b 86 f0 fb cmp ax,-410H[bp]
- 0a69 75 db jne L69
- 0a6b 8b 86 fa fd L71 mov ax,-206H[bp]
- 0a6f 2b 86 f8 fd sub ax,-208H[bp]
- 0a73 88 86 f6 fc mov -30aH[bp],al
- 0a77 8b 86 f2 fb mov ax,-40eH[bp]
- 0a7b 40 inc ax
- 0a7c 89 86 f2 fb mov -40eH[bp],ax
- 0a80 8b 86 f2 fb mov ax,-40eH[bp]
- 0a84 3b 46 06 cmp ax,+6H[bp]
- 0a87 75 16 jne L72
- 0a89 8d be f6 fc lea di,-30aH[bp]
- 0a8d 16 push ss
- 0a8e 57 push di
- 0a8f c4 7e 10 les di,dword ptr +10H[bp]
- 0a92 06 push es
- 0a93 57 push di
- 0a94 b8 ff 00 mov ax,00ffH
- 0a97 50 push ax
- 0a98 9a 00 00 00 00 call far SYSTEM_00C
- 0a9d eb 0d jmp L73
- 0a9f 8b 86 fa fd L72 mov ax,-206H[bp]
- 0aa3 3b 86 fe fd cmp ax,-202H[bp]
- 0aa7 7d 03 jge L73
- 0aa9 e9 b0 fe jmp L59
- 0aac 89 ec L73 mov sp,bp
- 0aae 5d pop bp
- 0aaf ca 0a 00 retf 000aH
- 0ab2 PARSENFN:
- 0ab2 55 TSUNTD_009 push bp
- 0ab3 89 e5 mov bp,sp
- 0ab5 b8 08 01 mov ax,0108H
- 0ab8 9a 00 00 00 00 call far SYSTEM_034
- 0abd 81 ec 08 01 sub sp,0108H
- 0ac1 c4 7e 06 les di,dword ptr +6H[bp]
- 0ac4 06 push es
- 0ac5 57 push di
- 0ac6 8d be fe fe lea di,-102H[bp]
- 0aca 16 push ss
- 0acb 57 push di
- 0acc b8 ff 00 mov ax,00ffH
- 0acf 50 push ax
- 0ad0 9a 00 00 00 00 call far SYSTEM_00C
- 0ad5 8a 86 fe fe mov al,-102H[bp]
- 0ad9 30 e4 xor ah,ah
- 0adb 89 86 fc fe mov -104H[bp],ax
- 0adf 31 c0 xor ax,ax
- 0ae1 89 86 fa fe mov -106H[bp],ax
- 0ae5 c7 86 f8 fe 01 00 mov word ptr -108H[bp],0001H
- 0aeb 8b be f8 fe L74 mov di,-108H[bp]
- 0aef 80 bb fe fe 20 cmp byte ptr -102H[bp+di],20H
- 0af4 77 10 ja L75
- 0af6 8b 86 f8 fe mov ax,-108H[bp]
- 0afa 3b 86 fc fe cmp ax,-104H[bp]
- 0afe 7f 06 jg L75
- 0b00 ff 86 f8 fe inc word ptr -108H[bp]
- 0b04 eb e5 jmp L74
- 0b06 8b 86 f8 fe L75 mov ax,-108H[bp]
- 0b0a 3b 86 fc fe cmp ax,-104H[bp]
- 0b0e 7e 09 jle L76
- 0b10 8b 86 fa fe mov ax,-106H[bp]
- 0b14 89 46 fe mov -2H[bp],ax
- 0b17 eb 34 jmp L79
- 0b19 8b be f8 fe L76 mov di,-108H[bp]
- 0b1d 80 bb fe fe 20 cmp byte ptr -102H[bp+di],20H
- 0b22 76 10 jbe L77
- 0b24 8b 86 f8 fe mov ax,-108H[bp]
- 0b28 3b 86 fc fe cmp ax,-104H[bp]
- 0b2c 7f 06 jg L77
- 0b2e ff 86 f8 fe inc word ptr -108H[bp]
- 0b32 eb e5 jmp L76
- 0b34 ff 86 fa fe L77 inc word ptr -106H[bp]
- 0b38 8b 86 f8 fe mov ax,-108H[bp]
- 0b3c 3b 86 fc fe cmp ax,-104H[bp]
- 0b40 7e 09 jle L78
- 0b42 8b 86 fa fe mov ax,-106H[bp]
- 0b46 89 46 fe mov -2H[bp],ax
- 0b49 eb 02 jmp L79
- 0b4b eb 9e L78 jmp L74
- 0b4d 8b 46 fe L79 mov ax,-2H[bp]
- 0b50 89 ec mov sp,bp
- 0b52 5d pop bp
- 0b53 ca 04 00 retf 0004H
- 0b56 PARSERFN:
- 0b56 55 TSUNTD_00A push bp
- 0b57 89 e5 mov bp,sp
- 0b59 b8 08 02 mov ax,0208H
- 0b5c 9a 00 00 00 00 call far SYSTEM_034
- 0b61 81 ec 08 02 sub sp,0208H
- 0b65 c4 7e 08 les di,dword ptr +8H[bp]
- 0b68 06 push es
- 0b69 57 push di
- 0b6a 8d be 00 ff lea di,-100H[bp]
- 0b6e 16 push ss
- 0b6f 57 push di
- 0b70 b8 ff 00 mov ax,00ffH
- 0b73 50 push ax
- 0b74 9a 00 00 00 00 call far SYSTEM_00C
- 0b79 83 7e 06 01 cmp word ptr +6H[bp],0001H
- 0b7d 7c 0f jl L80
- 0b7f 8d be 00 ff lea di,-100H[bp]
- 0b83 16 push ss
- 0b84 57 push di
- 0b85 0e push cs
- 0b86 e8 00 00 call PARSENFN
- 0b89 3b 46 06 cmp ax,+6H[bp]
- 0b8c 7d 0a jge L81
- 0b8e c4 7e 0c L80 les di,dword ptr +0cH[bp]
- 0b91 26 c6 05 00 mov byte ptr es:[di],00H
- 0b95 e9 b1 00 jmp L88
- 0b98 8a 86 00 ff L81 mov al,-100H[bp]
- 0b9c 30 e4 xor ah,ah
- 0b9e 89 86 fe fe mov -102H[bp],ax
- 0ba2 31 c0 xor ax,ax
- 0ba4 89 86 fc fe mov -104H[bp],ax
- 0ba8 c7 86 f8 fe 01 00 mov word ptr -108H[bp],0001H
- 0bae 8b be f8 fe L82 mov di,-108H[bp]
- 0bb2 80 bb 00 ff 20 cmp byte ptr -100H[bp+di],20H
- 0bb7 77 10 ja L83
- 0bb9 8b 86 f8 fe mov ax,-108H[bp]
- 0bbd 3b 86 fe fe cmp ax,-102H[bp]
- 0bc1 7f 06 jg L83
- 0bc3 ff 86 f8 fe inc word ptr -108H[bp]
- 0bc7 eb e5 jmp L82
- 0bc9 ff 86 fc fe L83 inc word ptr -104H[bp]
- 0bcd 8b 86 fc fe mov ax,-104H[bp]
- 0bd1 3b 46 06 cmp ax,+6H[bp]
- 0bd4 75 55 jne L86
- 0bd6 31 c0 xor ax,ax
- 0bd8 89 86 fa fe mov -106H[bp],ax
- 0bdc 8b be f8 fe L84 mov di,-108H[bp]
- 0be0 80 bb 00 ff 20 cmp byte ptr -100H[bp+di],20H
- 0be5 76 2c jbe L85
- 0be7 8b 86 f8 fe mov ax,-108H[bp]
- 0beb 3b 86 fe fe cmp ax,-102H[bp]
- 0bef 7f 22 jg L85
- 0bf1 ff 86 fa fe inc word ptr -106H[bp]
- 0bf5 8a 86 fa fe mov al,-106H[bp]
- 0bf9 88 86 f8 fd mov -208H[bp],al
- 0bfd 8b be f8 fe mov di,-108H[bp]
- 0c01 8a 83 00 ff mov al,-100H[bp+di]
- 0c05 8b be fa fe mov di,-106H[bp]
- 0c09 88 83 f8 fd mov -208H[bp+di],al
- 0c0d ff 86 f8 fe inc word ptr -108H[bp]
- 0c11 eb c9 jmp L84
- 0c13 8d be f8 fd L85 lea di,-208H[bp]
- 0c17 16 push ss
- 0c18 57 push di
- 0c19 c4 7e 0c les di,dword ptr +0cH[bp]
- 0c1c 06 push es
- 0c1d 57 push di
- 0c1e b8 ff 00 mov ax,00ffH
- 0c21 50 push ax
- 0c22 9a 00 00 00 00 call far SYSTEM_00C
- 0c27 eb 20 jmp L88
- 0c29 eb 1b jmp L87
- 0c2b 8b be f8 fe L86 mov di,-108H[bp]
- 0c2f 80 bb 00 ff 20 cmp byte ptr -100H[bp+di],20H
- 0c34 76 10 jbe L87
- 0c36 8b 86 f8 fe mov ax,-108H[bp]
- 0c3a 3b 86 fe fe cmp ax,-102H[bp]
- 0c3e 7f 06 jg L87
- 0c40 ff 86 f8 fe inc word ptr -108H[bp]
- 0c44 eb e5 jmp L86
- 0c46 e9 65 ff L87 jmp L82
- 0c49 89 ec L88 mov sp,bp
- 0c4b 5d pop bp
- 0c4c ca 06 00 retf 0006H
- 0c4f DOSDELAY:
- 0c4f 55 TSUNTD_00B push bp
- 0c50 89 e5 mov bp,sp
- 0c52 b8 14 00 mov ax,0014H
- 0c55 9a 00 00 00 00 call far SYSTEM_034
- 0c5a 83 ec 14 sub sp,0014H
- 0c5d 8d 7e f8 lea di,-8H[bp]
- 0c60 16 push ss
- 0c61 57 push di
- 0c62 8d 7e fa lea di,-6H[bp]
- 0c65 16 push ss
- 0c66 57 push di
- 0c67 8d 7e fc lea di,-4H[bp]
- 0c6a 16 push ss
- 0c6b 57 push di
- 0c6c 8d 7e fe lea di,-2H[bp]
- 0c6f 16 push ss
- 0c70 57 push di
- 0c71 9a 00 00 00 00 call far DOS_005
- 0c76 8b 46 fe mov ax,-2H[bp]
- 0c79 31 d2 xor dx,dx
- 0c7b 9a 00 00 00 00 call far SYSTEM_073
- 0c80 b9 87 00 mov cx,0087H
- 0c83 31 f6 xor si,si
- 0c85 bf 00 48 mov di,4800H
- 0c88 9a 00 00 00 00 call far SYSTEM_071
- 0c8d 52 push dx
- 0c8e 53 push bx
- 0c8f 50 push ax
- 0c90 8b 46 fa mov ax,-6H[bp]
- 0c93 b9 3c 00 mov cx,003cH
- 0c96 f7 e1 mul cx
- 0c98 8b d8 mov bx,ax
- 0c9a 8b 46 f8 mov ax,-8H[bp]
- 0c9d b9 10 0e mov cx,0e10H
- 0ca0 f7 e1 mul cx
- 0ca2 03 c3 add ax,bx
- 0ca4 03 46 fc add ax,-4H[bp]
- 0ca7 31 d2 xor dx,dx
- 0ca9 9a 00 00 00 00 call far SYSTEM_073
- 0cae 59 pop cx
- 0caf 5e pop si
- 0cb0 5f pop di
- 0cb1 9a 00 00 00 00 call far SYSTEM_06E
- 0cb6 89 46 f2 mov -0eH[bp],ax
- 0cb9 89 5e f4 mov -0cH[bp],bx
- 0cbc 89 56 f6 mov -0aH[bp],dx
- 0cbf 8d 7e f8 L89 lea di,-8H[bp]
- 0cc2 16 push ss
- 0cc3 57 push di
- 0cc4 8d 7e fa lea di,-6H[bp]
- 0cc7 16 push ss
- 0cc8 57 push di
- 0cc9 8d 7e fc lea di,-4H[bp]
- 0ccc 16 push ss
- 0ccd 57 push di
- 0cce 8d 7e fe lea di,-2H[bp]
- 0cd1 16 push ss
- 0cd2 57 push di
- 0cd3 9a 00 00 00 00 call far DOS_005
- 0cd8 8b 46 fe mov ax,-2H[bp]
- 0cdb 31 d2 xor dx,dx
- 0cdd 9a 00 00 00 00 call far SYSTEM_073
- 0ce2 b9 87 00 mov cx,0087H
- 0ce5 31 f6 xor si,si
- 0ce7 bf 00 48 mov di,4800H
- 0cea 9a 00 00 00 00 call far SYSTEM_071
- 0cef 52 push dx
- 0cf0 53 push bx
- 0cf1 50 push ax
- 0cf2 8b 46 fa mov ax,-6H[bp]
- 0cf5 b9 3c 00 mov cx,003cH
- 0cf8 f7 e1 mul cx
- 0cfa 8b d8 mov bx,ax
- 0cfc 8b 46 f8 mov ax,-8H[bp]
- 0cff b9 10 0e mov cx,0e10H
- 0d02 f7 e1 mul cx
- 0d04 03 c3 add ax,bx
- 0d06 03 46 fc add ax,-4H[bp]
- 0d09 31 d2 xor dx,dx
- 0d0b 9a 00 00 00 00 call far SYSTEM_073
- 0d10 59 pop cx
- 0d11 5e pop si
- 0d12 5f pop di
- 0d13 9a 00 00 00 00 call far SYSTEM_06E
- 0d18 89 46 ec mov -14H[bp],ax
- 0d1b 89 5e ee mov -12H[bp],bx
- 0d1e 89 56 f0 mov -10H[bp],dx
- 0d21 8b 46 06 mov ax,+6H[bp]
- 0d24 31 d2 xor dx,dx
- 0d26 9a 00 00 00 00 call far SYSTEM_073
- 0d2b 52 push dx
- 0d2c 53 push bx
- 0d2d 50 push ax
- 0d2e 8b 46 ec mov ax,-14H[bp]
- 0d31 8b 5e ee mov bx,-12H[bp]
- 0d34 8b 56 f0 mov dx,-10H[bp]
- 0d37 8b 4e f2 mov cx,-0eH[bp]
- 0d3a 8b 76 f4 mov si,-0cH[bp]
- 0d3d 8b 7e f6 mov di,-0aH[bp]
- 0d40 9a 00 00 00 00 call far SYSTEM_06F
- 0d45 b9 8a 00 mov cx,008aH
- 0d48 31 f6 xor si,si
- 0d4a bf 00 7a mov di,7a00H
- 0d4d 9a 00 00 00 00 call far SYSTEM_070
- 0d52 59 pop cx
- 0d53 5e pop si
- 0d54 5f pop di
- 0d55 9a 00 00 00 00 call far SYSTEM_072
- 0d5a 77 27 ja L90
- 0d5c 8b 46 ec mov ax,-14H[bp]
- 0d5f 8b 5e ee mov bx,-12H[bp]
- 0d62 8b 56 f0 mov dx,-10H[bp]
- 0d65 8b 4e f2 mov cx,-0eH[bp]
- 0d68 8b 76 f4 mov si,-0cH[bp]
- 0d6b 8b 7e f6 mov di,-0aH[bp]
- 0d6e 9a 00 00 00 00 call far SYSTEM_06F
- 0d73 31 c9 xor cx,cx
- 0d75 31 f6 xor si,si
- 0d77 31 ff xor di,di
- 0d79 9a 00 00 00 00 call far SYSTEM_072
- 0d7e 72 03 jb L90
- 0d80 e9 3c ff jmp L89
- 0d83 89 ec L90 mov sp,bp
- 0d85 5d pop bp
- 0d86 ca 02 00 retf 0002H
- 0d89 55 TSUNTD_013 push bp
- 0d8a 89 e5 mov bp,sp
- 0d8c b8 04 00 mov ax,0004H
- 0d8f 9a 00 00 00 00 call far SYSTEM_034
- 0d94 83 ec 04 sub sp,0004H
- 0d97 b8 dc 34 mov ax,34dcH
- 0d9a ba 12 00 mov dx,0012H
- 0d9d c4 4e 04 les cx,dword ptr +4H[bp]
- 0da0 8c c3 mov bx,es
- 0da2 9a 00 00 00 00 call far SYSTEM_006
- 0da7 89 46 fc mov -4H[bp],ax
- 0daa 89 56 fe mov -2H[bp],dx
- 0dad 83 7e fe 00 cmp word ptr -2H[bp],0000H
- 0db1 7c 08 jl L91
- 0db3 7f 08 jg L92
- 0db5 83 7e fc 00 cmp word ptr -4H[bp],0000H
- 0db9 77 02 ja L92
- 0dbb eb 23 L91 jmp L93
- 0dbd b0 b6 L92 mov al,0b6H
- 0dbf e6 43 out 43H,al
- 0dc1 c4 46 fc les ax,dword ptr -4H[bp]
- 0dc4 8c c2 mov dx,es
- 0dc6 0d ff 00 or ax,00ffH
- 0dc9 81 ca 00 00 or dx,0000H
- 0dcd e6 42 out 42H,al
- 0dcf c4 46 fc les ax,dword ptr -4H[bp]
- 0dd2 8c c2 mov dx,es
- 0dd4 b9 08 00 mov cx,0008H
- 0dd7 31 db xor bx,bx
- 0dd9 9a 00 00 00 00 call far SYSTEM_007
- 0dde e6 42 out 42H,al
- 0de0 89 ec L93 mov sp,bp
- 0de2 5d pop bp
- 0de3 c2 04 00 ret 0004H
- 0de6 AUDIO:
- 0de6 55 TSUNTD_00C push bp
- 0de7 89 e5 mov bp,sp
- 0de9 31 c0 xor ax,ax
- 0deb 9a 00 00 00 00 call far SYSTEM_034
- 0df0 ff 76 0a push +0aH[bp]
- 0df3 ff 76 08 push +8H[bp]
- 0df6 e8 00 00 call TSUNTD_013
- 0df9 e4 61 in al,61H
- 0dfb 0c 03 or al,03H
- 0dfd e6 61 out 61H,al
- 0dff ff 76 06 push +6H[bp]
- 0e02 0e push cs
- 0e03 e8 00 00 call DOSDELAY
- 0e06 e4 61 in al,61H
- 0e08 24 fc and al,0fcH
- 0e0a e6 61 out 61H,al
- 0e0c 89 ec mov sp,bp
- 0e0e 5d pop bp
- 0e0f ca 06 00 retf 0006H
- 0e12 PRTONLFN:
- 0e12 55 TSUNTD_00D push bp
- 0e13 89 e5 mov bp,sp
- 0e15 b8 16 00 mov ax,0016H
- 0e18 9a 00 00 00 00 call far SYSTEM_034
- 0e1d 83 ec 16 sub sp,0016H
- 0e20 b8 e8 03 mov ax,03e8H
- 0e23 50 push ax
- 0e24 0e push cs
- 0e25 e8 00 00 call DOSDELAY
- 0e28 8d 7e eb lea di,-15H[bp]
- 0e2b 16 push ss
- 0e2c 57 push di
- 0e2d b8 14 00 mov ax,0014H
- 0e30 50 push ax
- 0e31 b0 00 mov al,00H
- 0e33 50 push ax
- 0e34 9a 00 00 00 00 call far SYSTEM_05C
- 0e39 31 c0 xor ax,ax
- 0e3b 89 46 f1 mov -0fH[bp],ax
- 0e3e c6 46 ec 02 mov byte ptr -14H[bp],02H
- 0e42 b0 17 mov al,17H
- 0e44 50 push ax
- 0e45 8d 7e eb lea di,-15H[bp]
- 0e48 16 push ss
- 0e49 57 push di
- 0e4a 9a 00 00 00 00 call far DOS_001
- 0e4f 8a 46 ec mov al,-14H[bp]
- 0e52 88 46 ea mov -16H[bp],al
- 0e55 8a 46 ea mov al,-16H[bp]
- 0e58 24 10 and al,10H
- 0e5a 08 c0 or al,al
- 0e5c 75 09 jne L94
- 0e5e 8a 46 ea mov al,-16H[bp]
- 0e61 24 08 and al,08H
- 0e63 08 c0 or al,al
- 0e65 74 0f je L95
- 0e67 8a 46 ea L94 mov al,-16H[bp]
- 0e6a 24 80 and al,80H
- 0e6c 08 c0 or al,al
- 0e6e 75 06 jne L95
- 0e70 c6 46 ff 00 mov byte ptr -1H[bp],00H
- 0e74 eb 04 jmp L96
- 0e76 c6 46 ff 01 L95 mov byte ptr -1H[bp],01H
- 0e7a 8a 46 ff L96 mov al,-1H[bp]
- 0e7d 89 ec mov sp,bp
- 0e7f 5d pop bp
- 0e80 cb retf
- 0e81 GETPRTFN:
- 0e81 55 TSUNTD_010 push bp
- 0e82 89 e5 mov bp,sp
- 0e84 b8 01 00 mov ax,0001H
- 0e87 9a 00 00 00 00 call far SYSTEM_034
- 0e8c 83 ec 01 sub sp,0001H
- 0e8f be 40 00 mov si,0040H
- 0e92 8e c6 mov es,si
- 0e94 26 a0 78 00 mov al,es:[00000078H]
- 0e98 88 46 ff mov -1H[bp],al
- 0e9b 8a 46 ff mov al,-1H[bp]
- 0e9e 89 ec mov sp,bp
- 0ea0 5d pop bp
- 0ea1 cb retf
- 0ea2 SETPRT:
- 0ea2 55 TSUNTD_011 push bp
- 0ea3 89 e5 mov bp,sp
- 0ea5 b8 01 00 mov ax,0001H
- 0ea8 9a 00 00 00 00 call far SYSTEM_034
- 0ead 83 ec 01 sub sp,0001H
- 0eb0 80 7e 06 00 cmp byte ptr +6H[bp],00H
- 0eb4 75 02 jne L97
- 0eb6 eb 22 jmp L100
- 0eb8 c6 46 ff 01 L97 mov byte ptr -1H[bp],01H
- 0ebc eb 03 jmp L99
- 0ebe fe 46 ff L98 inc byte ptr -1H[bp]
- 0ec1 8a 56 06 L99 mov dl,+6H[bp]
- 0ec4 8a 46 ff mov al,-1H[bp]
- 0ec7 30 e4 xor ah,ah
- 0ec9 8b f8 mov di,ax
- 0ecb be 40 00 mov si,0040H
- 0ece 8e c6 mov es,si
- 0ed0 26 88 55 77 mov es:+77H[di],dl
- 0ed4 80 7e ff 04 cmp byte ptr -1H[bp],04H
- 0ed8 75 e4 jne L98
- 0eda 89 ec L100 mov sp,bp
- 0edc 5d pop bp
- 0edd ca 02 00 retf 0002H
- 0ee0 04 4c L101 add al,4cH
- 0ee2 50 push ax
- 0ee3 54 push sp
- 0ee4 31 55 89 xor -77H[di],dx
- 0ee7 e5 b8 in ax,0b8H
- 0ee9 07 pop es
- 0eea 01 9a 00 00 add SYSTEM_034[bp+si],bx
- 0eee 00 00 add [bx+si],al
- 0ef0 81 ec 07 01 sub sp,0107H
- 0ef4 be 40 00 mov si,0040H
- 0ef7 8e c6 mov es,si
- 0ef9 26 c4 06 78 00 les ax,dword ptr es:[00000078H]
- 0efe 8c c2 mov dx,es
- 0f00 89 46 fb mov -5H[bp],ax
- 0f03 89 56 fd mov -3H[bp],dx
- 0f06 a0 00 00 mov al,SYSTEM_BSS+236H
- 0f09 88 86 fa fe mov -106H[bp],al
- 0f0d c6 86 f9 fe 01 mov byte ptr -107H[bp],01H
- 0f12 eb 04 jmp L103
- 0f14 fe 86 f9 fe L102 inc byte ptr -107H[bp]
- 0f18 8a 86 f9 fe L103 mov al,-107H[bp]
- 0f1c 30 e4 xor ah,ah
- 0f1e 8b f8 mov di,ax
- 0f20 be 40 00 mov si,0040H
- 0f23 8e c6 mov es,si
- 0f25 26 c6 45 77 02 mov byte ptr es:+77H[di],02H
- 0f2a 80 be f9 fe 04 cmp byte ptr -107H[bp],04H
- 0f2f 75 e3 jne L102
- 0f31 c6 06 00 00 02 mov byte ptr SYSTEM_BSS+236H,02H
- 0f36 8d be fb fe lea di,-105H[bp]
- 0f3a 16 push ss
- 0f3b 57 push di
- 0f3c bf 00 00 mov di,offset L101
- 0f3f 0e push cs
- 0f40 57 push di
- 0f41 9a 00 00 00 00 call far SYSTEM_045
- 0f46 8d be fb fe lea di,-105H[bp]
- 0f4a 16 push ss
- 0f4b 57 push di
- 0f4c 9a 00 00 00 00 call far SYSTEM_047
- 0f51 9a 00 00 00 00 call far SYSTEM_032
- 0f56 8d be fb fe lea di,-105H[bp]
- 0f5a 16 push ss
- 0f5b 57 push di
- 0f5c b0 0d mov al,0dH
- 0f5e 50 push ax
- 0f5f 31 c0 xor ax,ax
- 0f61 50 push ax
- 0f62 9a 00 00 00 00 call far SYSTEM_039
- 0f67 9a 00 00 00 00 call far SYSTEM_03B
- 0f6c 9a 00 00 00 00 call far SYSTEM_031
- 0f71 09 c0 or ax,ax
- 0f73 74 04 je L104
- 0f75 b0 00 mov al,00H
- 0f77 eb 02 jmp L105
- 0f79 b0 01 L104 mov al,01H
- 0f7b 88 46 ff L105 mov -1H[bp],al
- 0f7e 8d be fb fe lea di,-105H[bp]
- 0f82 16 push ss
- 0f83 57 push di
- 0f84 9a 00 00 00 00 call far SYSTEM_048
- 0f89 9a 00 00 00 00 call far SYSTEM_032
- 0f8e 8a 86 fa fe mov al,-106H[bp]
- 0f92 a2 00 00 mov SYSTEM_BSS+236H,al
- 0f95 c4 46 fb les ax,dword ptr -5H[bp]
- 0f98 8c c2 mov dx,es
- 0f9a be 40 00 mov si,0040H
- 0f9d 8e c6 mov es,si
- 0f9f 26 a3 78 00 mov es:[00000078H],ax
- 0fa3 26 89 16 7a 00 mov es:[0000007aH],dx
- 0fa8 8a 46 ff mov al,-1H[bp]
- 0fab 89 ec mov sp,bp
- 0fad 5d pop bp
- 0fae cb retf
- 0faf PRTSCR:
- 0faf 55 TSUNTD_00F push bp
- 0fb0 89 e5 mov bp,sp
- 0fb2 b8 14 00 mov ax,0014H
- 0fb5 9a 00 00 00 00 call far SYSTEM_034
- 0fba 83 ec 14 sub sp,0014H
- 0fbd 8d 7e ec lea di,-14H[bp]
- 0fc0 16 push ss
- 0fc1 57 push di
- 0fc2 b8 14 00 mov ax,0014H
- 0fc5 50 push ax
- 0fc6 b0 00 mov al,00H
- 0fc8 50 push ax
- 0fc9 9a 00 00 00 00 call far SYSTEM_05C
- 0fce b0 05 mov al,05H
- 0fd0 50 push ax
- 0fd1 8d 7e ec lea di,-14H[bp]
- 0fd4 16 push ss
- 0fd5 57 push di
- 0fd6 9a 00 00 00 00 call far DOS_001
- 0fdb 89 ec mov sp,bp
- 0fdd 5d pop bp
- 0fde cb retf
- 0fdf LOWCASFN:
- 0fdf 55 TSUNTD_005 push bp
- 0fe0 89 e5 mov bp,sp
- 0fe2 b8 01 00 mov ax,0001H
- 0fe5 9a 00 00 00 00 call far SYSTEM_034
- 0fea 83 ec 01 sub sp,0001H
- 0fed 8a 46 06 mov al,+6H[bp]
- 0ff0 50 push ax
- 0ff1 58 pop ax
- 0ff2 3d 41 00 cmp ax,0041H
- 0ff5 7c 08 jl L106
- 0ff7 3d 5a 00 cmp ax,005aH
- 0ffa 7f 03 jg L106
- 0ffc 05 20 00 add ax,0020H
- 0fff 88 46 ff L106 mov -1H[bp],al
- 1002 8a 46 ff mov al,-1H[bp]
- 1005 89 ec mov sp,bp
- 1007 5d pop bp
- 1008 ca 02 00 retf 0002H
-
- No disassembly errors
-
- ------------------------------------------------------------
-