Power-Programmierung

home *** CD-ROM | disk | FTP | other *** search

/ Power-Programmierung / CD1.mdf / pascal / library / dos / tspa / tp4 / tsuntg.dis < prev next >

Wrap

Text File | 1994-06-19 | 89.8 KB | 1,593 lines

Module: TSUNTG.PAS Group: 'DGROUP' _DATA,_BSS Segment: TSUNTG_TEXT PARA 00000f16 bytes 0000 INDRIVFN: 0000 55 TSUNTG_004 push bp 0001 89 e5 mov bp,sp 0003 b8 17 00 mov ax,0017H 0006 9a 00 00 00 00 call far SYSTEM_034 000b 83 ec 17 sub sp,0017H 000e 8a 46 06 mov al,+6H[bp] 0011 50 push ax 0012 9a 00 00 00 00 call far SYSTEM_05A 0017 88 46 06 mov +6H[bp],al 001a 80 7e 06 30 cmp byte ptr +6H[bp],30H 001e 75 07 jne L1 0020 31 c0 xor ax,ax 0022 89 46 e9 mov -17H[bp],ax 0025 eb 1f jmp L4 0027 8a 46 06 L1 mov al,+6H[bp] 002a 3c 41 cmp al,41H 002c 72 06 jb L2 002e 3c 5a cmp al,5aH 0030 77 02 ja L2 0032 eb 06 jmp L3 0034 c6 46 ff 00 L2 mov byte ptr -1H[bp],00H 0038 eb 43 jmp L7 003a 8a 46 06 L3 mov al,+6H[bp] 003d 30 e4 xor ah,ah 003f 2d 41 00 sub ax,0041H 0042 40 inc ax 0043 89 46 e9 mov -17H[bp],ax 0046 8d 7e eb L4 lea di,-15H[bp] 0049 16 push ss 004a 57 push di 004b b8 14 00 mov ax,0014H 004e 50 push ax 004f b0 00 mov al,00H 0051 50 push ax 0052 9a 00 00 00 00 call far SYSTEM_05C 0057 c6 46 ec 1c mov byte ptr -14H[bp],1cH 005b 8a 46 e9 mov al,-17H[bp] 005e 88 46 f1 mov -0fH[bp],al 0061 b0 21 mov al,21H 0063 50 push ax 0064 8d 7e eb lea di,-15H[bp] 0067 16 push ss 0068 57 push di 0069 9a 00 00 00 00 call far DOS_001 006e 80 7e eb ff cmp byte ptr -15H[bp],0ffH 0072 75 04 jne L5 0074 b0 00 mov al,00H 0076 eb 02 jmp L6 0078 b0 01 L5 mov al,01H 007a 88 46 ff L6 mov -1H[bp],al 007d 8a 46 ff L7 mov al,-1H[bp] 0080 89 ec mov sp,bp 0082 5d pop bp 0083 ca 02 00 retf 0002H 0086 FIXEDFN: 0086 55 TSUNTG_005 push bp 0087 89 e5 mov bp,sp 0089 b8 36 00 mov ax,0036H 008c 9a 00 00 00 00 call far SYSTEM_034 0091 83 ec 36 sub sp,0036H 0094 c6 46 ff 00 mov byte ptr -1H[bp],00H 0098 8d 7e eb lea di,-15H[bp] 009b 16 push ss 009c 57 push di 009d b8 14 00 mov ax,0014H 00a0 50 push ax 00a1 b0 00 mov al,00H 00a3 50 push ax 00a4 9a 00 00 00 00 call far SYSTEM_05C 00a9 c6 46 ec 1c mov byte ptr -14H[bp],1cH 00ad 8a 46 06 mov al,+6H[bp] 00b0 50 push ax 00b1 9a 00 00 00 00 call far SYSTEM_05A 00b6 88 46 06 mov +6H[bp],al 00b9 8a 46 06 mov al,+6H[bp] 00bc 50 push ax 00bd 8d 7e ca lea di,-36H[bp] 00c0 16 push ss 00c1 57 push di 00c2 9a 00 00 00 00 call far SYSTEM_028 00c7 b0 30 mov al,30H 00c9 50 push ax 00ca 9a 00 00 00 00 call far SYSTEM_029 00cf b0 41 mov al,41H 00d1 50 push ax 00d2 b0 5a mov al,5aH 00d4 50 push ax 00d5 9a 00 00 00 00 call far SYSTEM_02A 00da 9a 00 00 00 00 call far SYSTEM_018 00df 75 02 jne L8 00e1 eb 42 jmp L11 00e3 80 7e 06 30 L8 cmp byte ptr +6H[bp],30H 00e7 75 04 jne L9 00e9 c6 46 06 40 mov byte ptr +6H[bp],40H 00ed 8a 46 06 L9 mov al,+6H[bp] 00f0 30 e4 xor ah,ah 00f2 2d 40 00 sub ax,0040H 00f5 88 46 f1 mov -0fH[bp],al 00f8 b0 21 mov al,21H 00fa 50 push ax 00fb 8d 7e eb lea di,-15H[bp] 00fe 16 push ss 00ff 57 push di 0100 9a 00 00 00 00 call far DOS_001 0105 80 7e eb ff cmp byte ptr -15H[bp],0ffH 0109 75 02 jne L10 010b eb 18 jmp L11 010d 8b 46 f9 L10 mov ax,-7H[bp] 0110 50 push ax 0111 8b 7e ed mov di,-13H[bp] 0114 07 pop es 0115 26 8a 05 mov al,es:[di] 0118 88 46 ea mov -16H[bp],al 011b 80 7e ea f8 cmp byte ptr -16H[bp],0f8H 011f 75 04 jne L11 0121 c6 46 ff 01 mov byte ptr -1H[bp],01H 0125 8a 46 ff L11 mov al,-1H[bp] 0128 89 ec mov sp,bp 012a 5d pop bp 012b ca 02 00 retf 0002H 012e DRIVESFN: 012e 55 TSUNTG_001 push bp 012f 89 e5 mov bp,sp 0131 b8 17 00 mov ax,0017H 0134 9a 00 00 00 00 call far SYSTEM_034 0139 83 ec 17 sub sp,0017H 013c 8d 7e eb lea di,-15H[bp] 013f 16 push ss 0140 57 push di 0141 b8 14 00 mov ax,0014H 0144 50 push ax 0145 b0 00 mov al,00H 0147 50 push ax 0148 9a 00 00 00 00 call far SYSTEM_05C 014d b0 11 mov al,11H 014f 50 push ax 0150 8d 7e eb lea di,-15H[bp] 0153 16 push ss 0154 57 push di 0155 9a 00 00 00 00 call far DOS_001 015a 8b 46 eb mov ax,-15H[bp] 015d 89 46 e9 mov -17H[bp],ax 0160 8b 46 e9 mov ax,-17H[bp] 0163 25 01 00 and ax,0001H 0166 3d 01 00 cmp ax,0001H 0169 75 11 jne L12 016b 8b 46 e9 mov ax,-17H[bp] 016e b9 06 00 mov cx,0006H 0171 d3 e8 shr ax,cl 0173 25 03 00 and ax,0003H 0176 40 inc ax 0177 88 46 ff mov -1H[bp],al 017a eb 04 jmp L13 017c c6 46 ff 00 L12 mov byte ptr -1H[bp],00H 0180 8a 46 ff L13 mov al,-1H[bp] 0183 89 ec mov sp,bp 0185 5d pop bp 0186 cb retf 0187 FDRIVEFN: 0187 55 TSUNTG_002 push bp 0188 89 e5 mov bp,sp 018a b8 01 00 mov ax,0001H 018d 9a 00 00 00 00 call far SYSTEM_034 0192 83 ec 01 sub sp,0001H 0195 0e push cs 0196 e8 00 00 call DRIVESFN 0199 3c 01 cmp al,01H 019b 76 06 jbe L14 019d c6 46 ff 41 mov byte ptr -1H[bp],41H 01a1 eb 20 jmp L16 01a3 31 c0 L14 xor ax,ax 01a5 50 push ax 01a6 bf 04 05 mov di,0504H 01a9 07 pop es 01aa 26 8a 05 mov al,es:[di] 01ad 30 e4 xor ah,ah 01af 3d 00 00 cmp ax,0000H 01b2 75 06 jne L15 01b4 c6 46 ff 41 mov byte ptr -1H[bp],41H 01b8 eb 09 jmp L16 01ba 3d 01 00 L15 cmp ax,0001H 01bd 75 04 jne L16 01bf c6 46 ff 42 mov byte ptr -1H[bp],42H 01c3 8a 46 ff L16 mov al,-1H[bp] 01c6 89 ec mov sp,bp 01c8 5d pop bp 01c9 cb retf 01ca GOATXY: 01ca 55 TSUNTG_00C push bp 01cb 89 e5 mov bp,sp 01cd b8 14 00 mov ax,0014H 01d0 9a 00 00 00 00 call far SYSTEM_034 01d5 83 ec 14 sub sp,0014H 01d8 8d 7e ec lea di,-14H[bp] 01db 16 push ss 01dc 57 push di 01dd b8 14 00 mov ax,0014H 01e0 50 push ax 01e1 b0 00 mov al,00H 01e3 50 push ax 01e4 9a 00 00 00 00 call far SYSTEM_05C 01e9 c6 46 ed 02 mov byte ptr -13H[bp],02H 01ed 8b 46 06 mov ax,+6H[bp] 01f0 48 dec ax 01f1 88 46 f3 mov -0dH[bp],al 01f4 8b 46 08 mov ax,+8H[bp] 01f7 48 dec ax 01f8 88 46 f2 mov -0eH[bp],al 01fb b0 10 mov al,10H 01fd 50 push ax 01fe 8d 7e ec lea di,-14H[bp] 0201 16 push ss 0202 57 push di 0203 9a 00 00 00 00 call far DOS_001 0208 89 ec mov sp,bp 020a 5d pop bp 020b ca 04 00 retf 0004H 020e WHEREXFN: 020e 55 TSUNTG_00D push bp 020f 89 e5 mov bp,sp 0211 b8 15 00 mov ax,0015H 0214 9a 00 00 00 00 call far SYSTEM_034 0219 83 ec 15 sub sp,0015H 021c 8d 7e eb lea di,-15H[bp] 021f 16 push ss 0220 57 push di 0221 b8 14 00 mov ax,0014H 0224 50 push ax 0225 b0 00 mov al,00H 0227 50 push ax 0228 9a 00 00 00 00 call far SYSTEM_05C 022d c6 46 ec 03 mov byte ptr -14H[bp],03H 0231 b0 10 mov al,10H 0233 50 push ax 0234 8d 7e eb lea di,-15H[bp] 0237 16 push ss 0238 57 push di 0239 9a 00 00 00 00 call far DOS_001 023e 8a 46 f1 mov al,-0fH[bp] 0241 30 e4 xor ah,ah 0243 40 inc ax 0244 88 46 ff mov -1H[bp],al 0247 8a 46 ff mov al,-1H[bp] 024a 89 ec mov sp,bp 024c 5d pop bp 024d cb retf 024e WHEREYFN: 024e 55 TSUNTG_00E push bp 024f 89 e5 mov bp,sp 0251 b8 15 00 mov ax,0015H 0254 9a 00 00 00 00 call far SYSTEM_034 0259 83 ec 15 sub sp,0015H 025c 8d 7e eb lea di,-15H[bp] 025f 16 push ss 0260 57 push di 0261 b8 14 00 mov ax,0014H 0264 50 push ax 0265 b0 00 mov al,00H 0267 50 push ax 0268 9a 00 00 00 00 call far SYSTEM_05C 026d c6 46 ec 03 mov byte ptr -14H[bp],03H 0271 b0 10 mov al,10H 0273 50 push ax 0274 8d 7e eb lea di,-15H[bp] 0277 16 push ss 0278 57 push di 0279 9a 00 00 00 00 call far DOS_001 027e 8a 46 f2 mov al,-0eH[bp] 0281 30 e4 xor ah,ah 0283 40 inc ax 0284 88 46 ff mov -1H[bp],al 0287 8a 46 ff mov al,-1H[bp] 028a 89 ec mov sp,bp 028c 5d pop bp 028d cb retf 028e KEYPREFN: 028e 55 TSUNTG_011 push bp 028f 89 e5 mov bp,sp 0291 b8 15 00 mov ax,0015H 0294 9a 00 00 00 00 call far SYSTEM_034 0299 83 ec 15 sub sp,0015H 029c 8d 7e eb lea di,-15H[bp] 029f 16 push ss 02a0 57 push di 02a1 b8 14 00 mov ax,0014H 02a4 50 push ax 02a5 b0 00 mov al,00H 02a7 50 push ax 02a8 9a 00 00 00 00 call far SYSTEM_05C 02ad c6 46 ec 0b mov byte ptr -14H[bp],0bH 02b1 b0 21 mov al,21H 02b3 50 push ax 02b4 8d 7e eb lea di,-15H[bp] 02b7 16 push ss 02b8 57 push di 02b9 9a 00 00 00 00 call far DOS_001 02be 80 7e eb ff cmp byte ptr -15H[bp],0ffH 02c2 74 04 je L17 02c4 b0 00 mov al,00H 02c6 eb 02 jmp L18 02c8 b0 01 L17 mov al,01H 02ca 88 46 ff L18 mov -1H[bp],al 02cd 8a 46 ff mov al,-1H[bp] 02d0 89 ec mov sp,bp 02d2 5d pop bp 02d3 cb retf 02d4 READKEFN: 02d4 55 TSUNTG_012 push bp 02d5 89 e5 mov bp,sp 02d7 b8 15 00 mov ax,0015H 02da 9a 00 00 00 00 call far SYSTEM_034 02df 83 ec 15 sub sp,0015H 02e2 8d 7e eb lea di,-15H[bp] 02e5 16 push ss 02e6 57 push di 02e7 b8 14 00 mov ax,0014H 02ea 50 push ax 02eb b0 00 mov al,00H 02ed 50 push ax 02ee 9a 00 00 00 00 call far SYSTEM_05C 02f3 c6 46 ec 08 mov byte ptr -14H[bp],08H 02f7 b0 21 mov al,21H 02f9 50 push ax 02fa 8d 7e eb lea di,-15H[bp] 02fd 16 push ss 02fe 57 push di 02ff 9a 00 00 00 00 call far DOS_001 0304 8a 46 eb mov al,-15H[bp] 0307 88 46 ff mov -1H[bp],al 030a 8a 46 ff mov al,-1H[bp] 030d 89 ec mov sp,bp 030f 5d pop bp 0310 cb retf 0311 REVAREA: 0311 55 TSUNTG_00F push bp 0312 89 e5 mov bp,sp 0314 b8 1b 00 mov ax,001bH 0317 9a 00 00 00 00 call far SYSTEM_034 031c 83 ec 1b sub sp,001bH 031f 8a 46 08 mov al,+8H[bp] 0322 88 46 e6 mov -1aH[bp],al 0325 8a 46 0c mov al,+0cH[bp] 0328 3a 46 e6 cmp al,-1aH[bp] 032b 76 03 jbe L19 032d e9 c3 00 jmp L26 0330 88 46 fb L19 mov -5H[bp],al 0333 eb 03 jmp L21 0335 fe 46 fb L20 inc byte ptr -5H[bp] 0338 8a 46 06 L21 mov al,+6H[bp] 033b 88 46 e5 mov -1bH[bp],al 033e 8a 46 0a mov al,+0aH[bp] 0341 3a 46 e5 cmp al,-1bH[bp] 0344 76 03 jbe L22 0346 e9 9f 00 jmp L25 0349 88 46 fc L22 mov -4H[bp],al 034c eb 03 jmp L24 034e fe 46 fc L23 inc byte ptr -4H[bp] 0351 8a 46 fb L24 mov al,-5H[bp] 0354 30 e4 xor ah,ah 0356 50 push ax 0357 8a 46 fc mov al,-4H[bp] 035a 30 e4 xor ah,ah 035c 50 push ax 035d 0e push cs 035e e8 00 00 call GOATXY 0361 8d 7e e7 lea di,-19H[bp] 0364 16 push ss 0365 57 push di 0366 b8 14 00 mov ax,0014H 0369 50 push ax 036a b0 00 mov al,00H 036c 50 push ax 036d 9a 00 00 00 00 call far SYSTEM_05C 0372 c6 46 e8 08 mov byte ptr -18H[bp],08H 0376 c6 46 ea 00 mov byte ptr -16H[bp],00H 037a b0 10 mov al,10H 037c 50 push ax 037d 8d 7e e7 lea di,-19H[bp] 0380 16 push ss 0381 57 push di 0382 9a 00 00 00 00 call far DOS_001 0387 8a 46 e8 mov al,-18H[bp] 038a 24 07 and al,07H 038c 88 46 fd mov -3H[bp],al 038f 8a 46 e8 mov al,-18H[bp] 0392 24 70 and al,70H 0394 88 46 fe mov -2H[bp],al 0397 8a 46 e8 mov al,-18H[bp] 039a 24 88 and al,88H 039c 88 46 ff mov -1H[bp],al 039f 8a 46 fd mov al,-3H[bp] 03a2 30 e4 xor ah,ah 03a4 b9 04 00 mov cx,0004H 03a7 d3 e0 shl ax,cl 03a9 8b d8 mov bx,ax 03ab 8a 46 fe mov al,-2H[bp] 03ae 30 e4 xor ah,ah 03b0 b9 04 00 mov cx,0004H 03b3 d3 e8 shr ax,cl 03b5 8b d0 mov dx,ax 03b7 8a 46 ff mov al,-1H[bp] 03ba 30 e4 xor ah,ah 03bc 03 c2 add ax,dx 03be 03 c3 add ax,bx 03c0 88 46 e9 mov -17H[bp],al 03c3 c6 46 e8 09 mov byte ptr -18H[bp],09H 03c7 c6 46 ea 00 mov byte ptr -16H[bp],00H 03cb c7 46 eb 01 00 mov word ptr -15H[bp],0001H 03d0 b0 10 mov al,10H 03d2 50 push ax 03d3 8d 7e e7 lea di,-19H[bp] 03d6 16 push ss 03d7 57 push di 03d8 9a 00 00 00 00 call far DOS_001 03dd 8a 46 fc mov al,-4H[bp] 03e0 3a 46 e5 cmp al,-1bH[bp] 03e3 74 03 je L25 03e5 e9 66 ff jmp L23 03e8 8a 46 fb L25 mov al,-5H[bp] 03eb 3a 46 e6 cmp al,-1aH[bp] 03ee 74 03 je L26 03f0 e9 42 ff jmp L20 03f3 89 ec L26 mov sp,bp 03f5 5d pop bp 03f6 ca 08 00 retf 0008H 03f9 CLS: 03f9 55 TSUNTG_00A push bp 03fa 89 e5 mov bp,sp 03fc b8 14 00 mov ax,0014H 03ff 9a 00 00 00 00 call far SYSTEM_034 0404 83 ec 14 sub sp,0014H 0407 8d 7e ec lea di,-14H[bp] 040a 16 push ss 040b 57 push di 040c b8 14 00 mov ax,0014H 040f 50 push ax 0410 b0 00 mov al,00H 0412 50 push ax 0413 9a 00 00 00 00 call far SYSTEM_05C 0418 c6 46 ed 00 mov byte ptr -13H[bp],00H 041c c6 46 ec 03 mov byte ptr -14H[bp],03H 0420 b0 10 mov al,10H 0422 50 push ax 0423 8d 7e ec lea di,-14H[bp] 0426 16 push ss 0427 57 push di 0428 9a 00 00 00 00 call far DOS_001 042d 89 ec mov sp,bp 042f 5d pop bp 0430 cb retf 0431 CLS40: 0431 55 TSUNTG_00B push bp 0432 89 e5 mov bp,sp 0434 b8 14 00 mov ax,0014H 0437 9a 00 00 00 00 call far SYSTEM_034 043c 83 ec 14 sub sp,0014H 043f 8d 7e ec lea di,-14H[bp] 0442 16 push ss 0443 57 push di 0444 b8 14 00 mov ax,0014H 0447 50 push ax 0448 b0 00 mov al,00H 044a 50 push ax 044b 9a 00 00 00 00 call far SYSTEM_05C 0450 c6 46 ed 00 mov byte ptr -13H[bp],00H 0454 c6 46 ec 01 mov byte ptr -14H[bp],01H 0458 b0 10 mov al,10H 045a 50 push ax 045b 8d 7e ec lea di,-14H[bp] 045e 16 push ss 045f 57 push di 0460 9a 00 00 00 00 call far DOS_001 0465 89 ec mov sp,bp 0467 5d pop bp 0468 cb retf 0469 55 TSUNTG_024 push bp 046a 89 e5 mov bp,sp 046c b8 18 00 mov ax,0018H 046f 9a 00 00 00 00 call far SYSTEM_034 0474 83 ec 18 sub sp,0018H 0477 8d 7e e8 lea di,-18H[bp] 047a 16 push ss 047b 57 push di 047c b8 14 00 mov ax,0014H 047f 50 push ax 0480 b0 00 mov al,00H 0482 50 push ax 0483 9a 00 00 00 00 call far SYSTEM_05C 0488 c6 46 e9 48 mov byte ptr -17H[bp],48H 048c c7 46 ea ff ff mov word ptr -16H[bp],0ffffH 0491 b0 21 mov al,21H 0493 50 push ax 0494 8d 7e e8 lea di,-18H[bp] 0497 16 push ss 0498 57 push di 0499 9a 00 00 00 00 call far DOS_001 049e 8b 46 fa mov ax,-6H[bp] 04a1 25 01 00 and ax,0001H 04a4 09 c0 or ax,ax 04a6 76 17 jbe L27 04a8 8b 46 ea mov ax,-16H[bp] 04ab 31 d2 xor dx,dx 04ad b9 10 00 mov cx,0010H 04b0 31 db xor bx,bx 04b2 9a 00 00 00 00 call far SYSTEM_005 04b7 89 46 fc mov -4H[bp],ax 04ba 89 56 fe mov -2H[bp],dx 04bd eb 08 jmp L28 04bf 31 c0 L27 xor ax,ax 04c1 89 46 fc mov -4H[bp],ax 04c4 89 46 fe mov -2H[bp],ax 04c7 8b 46 fc L28 mov ax,-4H[bp] 04ca 8b 56 fe mov dx,-2H[bp] 04cd 89 ec mov sp,bp 04cf 5d pop bp 04d0 c3 ret 04d1 00 55 89 L29 add -77H[di],dl 04d4 e5 31 in ax,31H 04d6 c0 9a 00 00 00 rcr byte ptr SYSTEM_034[bp+si],00H 04db 00 bf 00 00 add SYSTEM_BSS+100H[bx],bh 04df 1e push ds 04e0 57 push di 04e1 bf 00 00 mov di,offset L29 04e4 0e push cs 04e5 57 push di 04e6 9a 00 00 00 00 call far SYSTEM_045 04eb bf 00 00 mov di,offset SYSTEM_BSS+100H 04ee 1e push ds 04ef 57 push di 04f0 9a 00 00 00 00 call far SYSTEM_047 04f5 9a 00 00 00 00 call far SYSTEM_032 04fa c7 06 00 00 04 00 mov word ptr SYSTEM_BSS+100H,0004H 0500 89 ec mov sp,bp 0502 5d pop bp 0503 cb retf 0504 00 55 89 L30 add -77H[di],dl 0507 e5 31 in ax,31H 0509 c0 9a 00 00 00 rcr byte ptr SYSTEM_034[bp+si],00H 050e 00 bf 00 00 add SYSTEM_BSS+100H[bx],bh 0512 1e push ds 0513 57 push di 0514 bf 00 00 mov di,offset L30 0517 0e push cs 0518 57 push di 0519 9a 00 00 00 00 call far SYSTEM_045 051e bf 00 00 mov di,offset SYSTEM_BSS+100H 0521 1e push ds 0522 57 push di 0523 9a 00 00 00 00 call far SYSTEM_047 0528 9a 00 00 00 00 call far SYSTEM_032 052d c7 06 00 00 01 00 mov word ptr SYSTEM_BSS+100H,0001H 0533 89 ec mov sp,bp 0535 5d pop bp 0536 cb retf 0537 INKEYFN: 0537 55 TSUNTG_014 push bp 0538 89 e5 mov bp,sp 053a b8 15 00 mov ax,0015H 053d 9a 00 00 00 00 call far SYSTEM_034 0542 83 ec 15 sub sp,0015H 0545 c4 7e 06 les di,dword ptr +6H[bp] 0548 26 c6 05 00 mov byte ptr es:[di],00H 054c 8d 7e eb lea di,-15H[bp] 054f 16 push ss 0550 57 push di 0551 8d 7e ed lea di,-13H[bp] 0554 16 push ss 0555 57 push di 0556 8d 7e ef lea di,-11H[bp] 0559 16 push ss 055a 57 push di 055b 8d 7e f1 lea di,-0fH[bp] 055e 16 push ss 055f 57 push di 0560 9a 00 00 00 00 call far DOS_005 0565 8b 46 f1 mov ax,-0fH[bp] 0568 31 d2 xor dx,dx 056a 9a 00 00 00 00 call far SYSTEM_073 056f b9 87 00 mov cx,0087H 0572 31 f6 xor si,si 0574 bf 00 48 mov di,4800H 0577 9a 00 00 00 00 call far SYSTEM_071 057c 52 push dx 057d 53 push bx 057e 50 push ax 057f 8b 46 ef mov ax,-11H[bp] 0582 31 d2 xor dx,dx 0584 9a 00 00 00 00 call far SYSTEM_073 0589 52 push dx 058a 53 push bx 058b 50 push ax 058c 8b 46 ed mov ax,-13H[bp] 058f 31 d2 xor dx,dx 0591 9a 00 00 00 00 call far SYSTEM_073 0596 b9 86 00 mov cx,0086H 0599 31 f6 xor si,si 059b bf 00 70 mov di,7000H 059e 9a 00 00 00 00 call far SYSTEM_070 05a3 52 push dx 05a4 53 push bx 05a5 50 push ax 05a6 8b 46 eb mov ax,-15H[bp] 05a9 31 d2 xor dx,dx 05ab 9a 00 00 00 00 call far SYSTEM_073 05b0 b9 8c 00 mov cx,008cH 05b3 31 f6 xor si,si 05b5 bf 00 61 mov di,6100H 05b8 9a 00 00 00 00 call far SYSTEM_070 05bd 59 pop cx 05be 5e pop si 05bf 5f pop di 05c0 9a 00 00 00 00 call far SYSTEM_06E 05c5 59 pop cx 05c6 5e pop si 05c7 5f pop di 05c8 9a 00 00 00 00 call far SYSTEM_06E 05cd 59 pop cx 05ce 5e pop si 05cf 5f pop di 05d0 9a 00 00 00 00 call far SYSTEM_06E 05d5 89 46 f3 mov -0dH[bp],ax 05d8 89 5e f5 mov -0bH[bp],bx 05db 89 56 f7 mov -9H[bp],dx 05de 0e L31 push cs 05df e8 00 00 call KEYPREFN 05e2 08 c0 or al,al 05e4 74 0a je L32 05e6 0e push cs 05e7 e8 00 00 call READKEFN 05ea 88 46 ff mov -1H[bp],al 05ed e9 69 01 jmp L36 05f0 8d 7e eb L32 lea di,-15H[bp] 05f3 16 push ss 05f4 57 push di 05f5 8d 7e ed lea di,-13H[bp] 05f8 16 push ss 05f9 57 push di 05fa 8d 7e ef lea di,-11H[bp] 05fd 16 push ss 05fe 57 push di 05ff 8d 7e f1 lea di,-0fH[bp] 0602 16 push ss 0603 57 push di 0604 9a 00 00 00 00 call far DOS_005 0609 8b 46 f1 mov ax,-0fH[bp] 060c 31 d2 xor dx,dx 060e 9a 00 00 00 00 call far SYSTEM_073 0613 b9 87 00 mov cx,0087H 0616 31 f6 xor si,si 0618 bf 00 48 mov di,4800H 061b 9a 00 00 00 00 call far SYSTEM_071 0620 52 push dx 0621 53 push bx 0622 50 push ax 0623 8b 46 ef mov ax,-11H[bp] 0626 31 d2 xor dx,dx 0628 9a 00 00 00 00 call far SYSTEM_073 062d 52 push dx 062e 53 push bx 062f 50 push ax 0630 8b 46 ed mov ax,-13H[bp] 0633 31 d2 xor dx,dx 0635 9a 00 00 00 00 call far SYSTEM_073 063a b9 86 00 mov cx,0086H 063d 31 f6 xor si,si 063f bf 00 70 mov di,7000H 0642 9a 00 00 00 00 call far SYSTEM_070 0647 52 push dx 0648 53 push bx 0649 50 push ax 064a 8b 46 eb mov ax,-15H[bp] 064d 31 d2 xor dx,dx 064f 9a 00 00 00 00 call far SYSTEM_073 0654 b9 8c 00 mov cx,008cH 0657 31 f6 xor si,si 0659 bf 00 61 mov di,6100H 065c 9a 00 00 00 00 call far SYSTEM_070 0661 59 pop cx 0662 5e pop si 0663 5f pop di 0664 9a 00 00 00 00 call far SYSTEM_06E 0669 59 pop cx 066a 5e pop si 066b 5f pop di 066c 9a 00 00 00 00 call far SYSTEM_06E 0671 59 pop cx 0672 5e pop si 0673 5f pop di 0674 9a 00 00 00 00 call far SYSTEM_06E 0679 89 46 f9 mov -7H[bp],ax 067c 89 5e fb mov -5H[bp],bx 067f 89 56 fd mov -3H[bp],dx 0682 8b 46 f9 mov ax,-7H[bp] 0685 8b 5e fb mov bx,-5H[bp] 0688 8b 56 fd mov dx,-3H[bp] 068b 8b 4e f3 mov cx,-0dH[bp] 068e 8b 76 f5 mov si,-0bH[bp] 0691 8b 7e f7 mov di,-9H[bp] 0694 9a 00 00 00 00 call far SYSTEM_072 0699 72 03 jb L33 069b e9 86 00 jmp L34 069e 8b 46 f1 L33 mov ax,-0fH[bp] 06a1 31 d2 xor dx,dx 06a3 9a 00 00 00 00 call far SYSTEM_073 06a8 b9 87 00 mov cx,0087H 06ab 31 f6 xor si,si 06ad bf 00 48 mov di,4800H 06b0 9a 00 00 00 00 call far SYSTEM_071 06b5 52 push dx 06b6 53 push bx 06b7 50 push ax 06b8 8b 46 ef mov ax,-11H[bp] 06bb 31 d2 xor dx,dx 06bd 9a 00 00 00 00 call far SYSTEM_073 06c2 52 push dx 06c3 53 push bx 06c4 50 push ax 06c5 8b 46 ed mov ax,-13H[bp] 06c8 31 d2 xor dx,dx 06ca 9a 00 00 00 00 call far SYSTEM_073 06cf b9 86 00 mov cx,0086H 06d2 31 f6 xor si,si 06d4 bf 00 70 mov di,7000H 06d7 9a 00 00 00 00 call far SYSTEM_070 06dc 52 push dx 06dd 53 push bx 06de 50 push ax 06df 8b 46 eb mov ax,-15H[bp] 06e2 31 d2 xor dx,dx 06e4 9a 00 00 00 00 call far SYSTEM_073 06e9 b9 85 00 mov cx,0085H 06ec 31 f6 xor si,si 06ee bf 00 40 mov di,4000H 06f1 9a 00 00 00 00 call far SYSTEM_06E 06f6 b9 8c 00 mov cx,008cH 06f9 31 f6 xor si,si 06fb bf 00 61 mov di,6100H 06fe 9a 00 00 00 00 call far SYSTEM_070 0703 59 pop cx 0704 5e pop si 0705 5f pop di 0706 9a 00 00 00 00 call far SYSTEM_06E 070b 59 pop cx 070c 5e pop si 070d 5f pop di 070e 9a 00 00 00 00 call far SYSTEM_06E 0713 59 pop cx 0714 5e pop si 0715 5f pop di 0716 9a 00 00 00 00 call far SYSTEM_06E 071b 89 46 f9 mov -7H[bp],ax 071e 89 5e fb mov -5H[bp],bx 0721 89 56 fd mov -3H[bp],dx 0724 8b 46 f9 L34 mov ax,-7H[bp] 0727 8b 5e fb mov bx,-5H[bp] 072a 8b 56 fd mov dx,-3H[bp] 072d 8b 4e f3 mov cx,-0dH[bp] 0730 8b 76 f5 mov si,-0bH[bp] 0733 8b 7e f7 mov di,-9H[bp] 0736 9a 00 00 00 00 call far SYSTEM_06F 073b 8b 4e 0a mov cx,+0aH[bp] 073e 8b 76 0c mov si,+0cH[bp] 0741 8b 7e 0e mov di,+0eH[bp] 0744 9a 00 00 00 00 call far SYSTEM_072 0749 77 03 ja L35 074b e9 90 fe jmp L31 074e c4 7e 06 L35 les di,dword ptr +6H[bp] 0751 26 c6 05 01 mov byte ptr es:[di],01H 0755 c6 46 ff 00 mov byte ptr -1H[bp],00H 0759 8a 46 ff L36 mov al,-1H[bp] 075c 89 ec mov sp,bp 075e 5d pop bp 075f ca 0a 00 retf 000aH 0762 DSKCNTFN: 0762 55 TSUNTG_003 push bp 0763 89 e5 mov bp,sp 0765 b8 19 00 mov ax,0019H 0768 9a 00 00 00 00 call far SYSTEM_034 076d 83 ec 19 sub sp,0019H 0770 9a 00 00 00 00 call far TSUNT45_001 0775 86 c4 xchg al,ah 0777 3d 00 03 cmp ax,0300H 077a 73 06 jae L37 077c c6 46 ff 00 mov byte ptr -1H[bp],00H 0780 eb 41 jmp L38 0782 8d 7e eb L37 lea di,-15H[bp] 0785 16 push ss 0786 57 push di 0787 b8 14 00 mov ax,0014H 078a 50 push ax 078b b0 00 mov al,00H 078d 50 push ax 078e 9a 00 00 00 00 call far SYSTEM_05C 0793 c6 46 ec 52 mov byte ptr -14H[bp],52H 0797 b0 21 mov al,21H 0799 50 push ax 079a 8d 7e eb lea di,-15H[bp] 079d 16 push ss 079e 57 push di 079f 9a 00 00 00 00 call far DOS_001 07a4 8b 46 fb mov ax,-5H[bp] 07a7 89 46 e9 mov -17H[bp],ax 07aa 8b 46 ed mov ax,-13H[bp] 07ad 89 46 e7 mov -19H[bp],ax 07b0 8b 46 e9 mov ax,-17H[bp] 07b3 50 push ax 07b4 8b 46 e7 mov ax,-19H[bp] 07b7 05 20 00 add ax,0020H 07ba 8b f8 mov di,ax 07bc 07 pop es 07bd 26 8a 05 mov al,es:[di] 07c0 88 46 ff mov -1H[bp],al 07c3 8a 46 ff L38 mov al,-1H[bp] 07c6 89 ec mov sp,bp 07c8 5d pop bp 07c9 cb retf 07ca WARMBOOT: 07ca 55 TSUNTG_022 push bp 07cb 89 e5 mov bp,sp 07cd 31 c0 xor ax,ax 07cf 9a 00 00 00 00 call far SYSTEM_034 07d4 b8 40 00 mov ax,0040H 07d7 8e d8 mov ds,ax 07d9 c7 06 72 00 34 12 mov word ptr [00000072H],1234H 07df ea 00 00 ff ff jmp far 0ffffH:00000000H 07e4 89 ec mov sp,bp 07e6 5d pop bp 07e7 cb retf 07e8 COLDBOOT: 07e8 55 TSUNTG_023 push bp 07e9 89 e5 mov bp,sp 07eb 31 c0 xor ax,ax 07ed 9a 00 00 00 00 call far SYSTEM_034 07f2 b8 40 00 mov ax,0040H 07f5 8e d8 mov ds,ax 07f7 c7 06 72 00 00 00 mov word ptr [00000072H],0000H 07fd ea 00 00 ff ff jmp far 0ffffH:00000000H 0802 89 ec mov sp,bp 0804 5d pop bp 0805 cb retf 0806 RTCTRLFN: 0806 55 TSUNTG_019 push bp 0807 89 e5 mov bp,sp 0809 b8 01 00 mov ax,0001H 080c 9a 00 00 00 00 call far SYSTEM_034 0811 83 ec 01 sub sp,0001H 0814 be 40 00 mov si,0040H 0817 8e c6 mov es,si 0819 26 a0 96 00 mov al,es:[00000096H] 081d 30 e4 xor ah,ah 081f b9 02 00 mov cx,0002H 0822 d3 e8 shr ax,cl 0824 25 01 00 and ax,0001H 0827 3d 01 00 cmp ax,0001H 082a 74 04 je L39 082c b0 00 mov al,00H 082e eb 02 jmp L40 0830 b0 01 L39 mov al,01H 0832 88 46 ff L40 mov -1H[bp],al 0835 be 40 00 L41 mov si,0040H 0838 8e c6 mov es,si 083a 26 a0 96 00 mov al,es:[00000096H] 083e 30 e4 xor ah,ah 0840 b9 02 00 mov cx,0002H 0843 d3 e8 shr ax,cl 0845 25 01 00 and ax,0001H 0848 09 c0 or ax,ax 084a 75 e9 jne L41 084c 8a 46 ff mov al,-1H[bp] 084f 89 ec mov sp,bp 0851 5d pop bp 0852 cb retf 0853 LFCTRLFN: 0853 55 TSUNTG_018 push bp 0854 89 e5 mov bp,sp 0856 b8 01 00 mov ax,0001H 0859 9a 00 00 00 00 call far SYSTEM_034 085e 83 ec 01 sub sp,0001H 0861 be 40 00 mov si,0040H 0864 8e c6 mov es,si 0866 26 a0 18 00 mov al,es:[00000018H] 086a 30 e4 xor ah,ah 086c 31 c9 xor cx,cx 086e d3 e8 shr ax,cl 0870 25 01 00 and ax,0001H 0873 3d 01 00 cmp ax,0001H 0876 74 04 je L42 0878 b0 00 mov al,00H 087a eb 02 jmp L43 087c b0 01 L42 mov al,01H 087e 88 46 ff L43 mov -1H[bp],al 0881 be 40 00 L44 mov si,0040H 0884 8e c6 mov es,si 0886 26 a0 18 00 mov al,es:[00000018H] 088a 30 e4 xor ah,ah 088c 31 c9 xor cx,cx 088e d3 e8 shr ax,cl 0890 25 01 00 and ax,0001H 0893 09 c0 or ax,ax 0895 75 ea jne L44 0897 8a 46 ff mov al,-1H[bp] 089a 89 ec mov sp,bp 089c 5d pop bp 089d cb retf 089e CTRLFN: 089e 55 TSUNTG_017 push bp 089f 89 e5 mov bp,sp 08a1 b8 01 00 mov ax,0001H 08a4 9a 00 00 00 00 call far SYSTEM_034 08a9 83 ec 01 sub sp,0001H 08ac be 40 00 mov si,0040H 08af 8e c6 mov es,si 08b1 26 a0 17 00 mov al,es:[00000017H] 08b5 30 e4 xor ah,ah 08b7 b9 02 00 mov cx,0002H 08ba d3 e8 shr ax,cl 08bc 25 01 00 and ax,0001H 08bf 3d 01 00 cmp ax,0001H 08c2 74 04 je L45 08c4 b0 00 mov al,00H 08c6 eb 02 jmp L46 08c8 b0 01 L45 mov al,01H 08ca 88 46 ff L46 mov -1H[bp],al 08cd be 40 00 L47 mov si,0040H 08d0 8e c6 mov es,si 08d2 26 a0 17 00 mov al,es:[00000017H] 08d6 30 e4 xor ah,ah 08d8 b9 02 00 mov cx,0002H 08db d3 e8 shr ax,cl 08dd 25 01 00 and ax,0001H 08e0 09 c0 or ax,ax 08e2 75 e9 jne L47 08e4 8a 46 ff mov al,-1H[bp] 08e7 89 ec mov sp,bp 08e9 5d pop bp 08ea cb retf 08eb ALTFN: 08eb 55 TSUNTG_01A push bp 08ec 89 e5 mov bp,sp 08ee b8 01 00 mov ax,0001H 08f1 9a 00 00 00 00 call far SYSTEM_034 08f6 83 ec 01 sub sp,0001H 08f9 be 40 00 mov si,0040H 08fc 8e c6 mov es,si 08fe 26 a0 17 00 mov al,es:[00000017H] 0902 30 e4 xor ah,ah 0904 b9 03 00 mov cx,0003H 0907 d3 e8 shr ax,cl 0909 25 01 00 and ax,0001H 090c 3d 01 00 cmp ax,0001H 090f 74 04 je L48 0911 b0 00 mov al,00H 0913 eb 02 jmp L49 0915 b0 01 L48 mov al,01H 0917 88 46 ff L49 mov -1H[bp],al 091a be 40 00 L50 mov si,0040H 091d 8e c6 mov es,si 091f 26 a0 17 00 mov al,es:[00000017H] 0923 30 e4 xor ah,ah 0925 b9 03 00 mov cx,0003H 0928 d3 e8 shr ax,cl 092a 25 01 00 and ax,0001H 092d 09 c0 or ax,ax 092f 75 e9 jne L50 0931 8a 46 ff mov al,-1H[bp] 0934 89 ec mov sp,bp 0936 5d pop bp 0937 cb retf 0938 LFALTFN: 0938 55 TSUNTG_01B push bp 0939 89 e5 mov bp,sp 093b b8 01 00 mov ax,0001H 093e 9a 00 00 00 00 call far SYSTEM_034 0943 83 ec 01 sub sp,0001H 0946 be 40 00 mov si,0040H 0949 8e c6 mov es,si 094b 26 a0 18 00 mov al,es:[00000018H] 094f 30 e4 xor ah,ah 0951 d1 e8 shr ax,1 0953 25 01 00 and ax,0001H 0956 3d 01 00 cmp ax,0001H 0959 74 04 je L51 095b b0 00 mov al,00H 095d eb 02 jmp L52 095f b0 01 L51 mov al,01H 0961 88 46 ff L52 mov -1H[bp],al 0964 be 40 00 L53 mov si,0040H 0967 8e c6 mov es,si 0969 26 a0 18 00 mov al,es:[00000018H] 096d 30 e4 xor ah,ah 096f d1 e8 shr ax,1 0971 25 01 00 and ax,0001H 0974 09 c0 or ax,ax 0976 75 ec jne L53 0978 8a 46 ff mov al,-1H[bp] 097b 89 ec mov sp,bp 097d 5d pop bp 097e cb retf 097f RTALTFN: 097f 55 TSUNTG_01C push bp 0980 89 e5 mov bp,sp 0982 b8 01 00 mov ax,0001H 0985 9a 00 00 00 00 call far SYSTEM_034 098a 83 ec 01 sub sp,0001H 098d be 40 00 mov si,0040H 0990 8e c6 mov es,si 0992 26 a0 96 00 mov al,es:[00000096H] 0996 30 e4 xor ah,ah 0998 b9 03 00 mov cx,0003H 099b d3 e8 shr ax,cl 099d 25 01 00 and ax,0001H 09a0 3d 01 00 cmp ax,0001H 09a3 74 04 je L54 09a5 b0 00 mov al,00H 09a7 eb 02 jmp L55 09a9 b0 01 L54 mov al,01H 09ab 88 46 ff L55 mov -1H[bp],al 09ae be 40 00 L56 mov si,0040H 09b1 8e c6 mov es,si 09b3 26 a0 96 00 mov al,es:[00000096H] 09b7 30 e4 xor ah,ah 09b9 b9 03 00 mov cx,0003H 09bc d3 e8 shr ax,cl 09be 25 01 00 and ax,0001H 09c1 09 c0 or ax,ax 09c3 75 e9 jne L56 09c5 8a 46 ff mov al,-1H[bp] 09c8 89 ec mov sp,bp 09ca 5d pop bp 09cb cb retf 09cc LFSHFTFN: 09cc 55 TSUNTG_015 push bp 09cd 89 e5 mov bp,sp 09cf b8 01 00 mov ax,0001H 09d2 9a 00 00 00 00 call far SYSTEM_034 09d7 83 ec 01 sub sp,0001H 09da be 40 00 mov si,0040H 09dd 8e c6 mov es,si 09df 26 a0 17 00 mov al,es:[00000017H] 09e3 30 e4 xor ah,ah 09e5 d1 e8 shr ax,1 09e7 25 01 00 and ax,0001H 09ea 3d 01 00 cmp ax,0001H 09ed 74 04 je L57 09ef b0 00 mov al,00H 09f1 eb 02 jmp L58 09f3 b0 01 L57 mov al,01H 09f5 88 46 ff L58 mov -1H[bp],al 09f8 be 40 00 L59 mov si,0040H 09fb 8e c6 mov es,si 09fd 26 a0 17 00 mov al,es:[00000017H] 0a01 30 e4 xor ah,ah 0a03 d1 e8 shr ax,1 0a05 25 01 00 and ax,0001H 0a08 09 c0 or ax,ax 0a0a 75 ec jne L59 0a0c 8a 46 ff mov al,-1H[bp] 0a0f 89 ec mov sp,bp 0a11 5d pop bp 0a12 cb retf 0a13 RTSHFTFN: 0a13 55 TSUNTG_016 push bp 0a14 89 e5 mov bp,sp 0a16 b8 01 00 mov ax,0001H 0a19 9a 00 00 00 00 call far SYSTEM_034 0a1e 83 ec 01 sub sp,0001H 0a21 be 40 00 mov si,0040H 0a24 8e c6 mov es,si 0a26 26 a0 17 00 mov al,es:[00000017H] 0a2a 30 e4 xor ah,ah 0a2c 31 c9 xor cx,cx 0a2e d3 e8 shr ax,cl 0a30 25 01 00 and ax,0001H 0a33 3d 01 00 cmp ax,0001H 0a36 74 04 je L60 0a38 b0 00 mov al,00H 0a3a eb 02 jmp L61 0a3c b0 01 L60 mov al,01H 0a3e 88 46 ff L61 mov -1H[bp],al 0a41 be 40 00 L62 mov si,0040H 0a44 8e c6 mov es,si 0a46 26 a0 17 00 mov al,es:[00000017H] 0a4a 30 e4 xor ah,ah 0a4c 31 c9 xor cx,cx 0a4e d3 e8 shr ax,cl 0a50 25 01 00 and ax,0001H 0a53 09 c0 or ax,ax 0a55 75 ea jne L62 0a57 8a 46 ff mov al,-1H[bp] 0a5a 89 ec mov sp,bp 0a5c 5d pop bp 0a5d cb retf 0a5e SYSRQFN: 0a5e 55 TSUNTG_01D push bp 0a5f 89 e5 mov bp,sp 0a61 b8 01 00 mov ax,0001H 0a64 9a 00 00 00 00 call far SYSTEM_034 0a69 83 ec 01 sub sp,0001H 0a6c be 40 00 mov si,0040H 0a6f 8e c6 mov es,si 0a71 26 a0 18 00 mov al,es:[00000018H] 0a75 30 e4 xor ah,ah 0a77 b9 02 00 mov cx,0002H 0a7a d3 e8 shr ax,cl 0a7c 25 01 00 and ax,0001H 0a7f 3d 01 00 cmp ax,0001H 0a82 74 04 je L63 0a84 b0 00 mov al,00H 0a86 eb 02 jmp L64 0a88 b0 01 L63 mov al,01H 0a8a 88 46 ff L64 mov -1H[bp],al 0a8d be 40 00 L65 mov si,0040H 0a90 8e c6 mov es,si 0a92 26 a0 18 00 mov al,es:[00000018H] 0a96 30 e4 xor ah,ah 0a98 b9 02 00 mov cx,0002H 0a9b d3 e8 shr ax,cl 0a9d 25 01 00 and ax,0001H 0aa0 09 c0 or ax,ax 0aa2 75 e9 jne L65 0aa4 8a 46 ff mov al,-1H[bp] 0aa7 89 ec mov sp,bp 0aa9 5d pop bp 0aaa cb retf 0aab RDENKEFN: 0aab 55 TSUNTG_013 push bp 0aac 89 e5 mov bp,sp 0aae b8 16 00 mov ax,0016H 0ab1 9a 00 00 00 00 call far SYSTEM_034 0ab6 83 ec 16 sub sp,0016H 0ab9 31 c0 xor ax,ax 0abb 89 46 fe mov -2H[bp],ax 0abe be 40 00 mov si,0040H 0ac1 8e c6 mov es,si 0ac3 26 a0 96 00 mov al,es:[00000096H] 0ac7 30 e4 xor ah,ah 0ac9 b9 04 00 mov cx,0004H 0acc d3 e8 shr ax,cl 0ace 25 01 00 and ax,0001H 0ad1 09 c0 or ax,ax 0ad3 75 02 jne L66 0ad5 eb 28 jmp L67 0ad7 8d 7e ea L66 lea di,-16H[bp] 0ada 16 push ss 0adb 57 push di 0adc b8 14 00 mov ax,0014H 0adf 50 push ax 0ae0 b0 00 mov al,00H 0ae2 50 push ax 0ae3 9a 00 00 00 00 call far SYSTEM_05C 0ae8 c6 46 eb 10 mov byte ptr -15H[bp],10H 0aec b0 16 mov al,16H 0aee 50 push ax 0aef 8d 7e ea lea di,-16H[bp] 0af2 16 push ss 0af3 57 push di 0af4 9a 00 00 00 00 call far DOS_001 0af9 8b 46 ea mov ax,-16H[bp] 0afc 89 46 fe mov -2H[bp],ax 0aff 8b 46 fe L67 mov ax,-2H[bp] 0b02 89 ec mov sp,bp 0b04 5d pop bp 0b05 cb retf 0b06 06 L68 push es 0b07 5b pop bx 0b08 32 3b xor bh,[bp+di] 0b0a 31 30 xor [bx+si],si 0b0c 48 dec ax 0b0d 06 L69 push es 0b0e 5b pop bx 0b0f 35 3b 31 xor ax,313bH 0b12 30 48 07 xor +7H[bx+si],cl 0b15 20 20 and [bx+si],ah 0b17 20 20 and [bx+si],ah 0b19 20 20 and [bx+si],ah 0b1b 20 55 89 and -77H[di],dl 0b1e e5 b8 in ax,0b8H 0b20 06 push es 0b21 00 9a 00 00 add SYSTEM_034[bp+si],bl 0b25 00 00 add [bx+si],al 0b27 83 ec 06 sub sp,0006H 0b2a 0e push cs 0b2b e8 00 00 call TSUNTG_00D 0b2e 30 e4 xor ah,ah 0b30 89 46 fb mov -5H[bp],ax 0b33 0e push cs 0b34 e8 00 00 call TSUNTG_00E 0b37 30 e4 xor ah,ah 0b39 89 46 fd mov -3H[bp],ax 0b3c 83 7e fb 0a cmp word ptr -5H[bp],000aH 0b40 75 33 jne L71 0b42 83 7e fd 05 cmp word ptr -3H[bp],0005H 0b46 75 2d jne L71 0b48 c6 46 fa 02 mov byte ptr -6H[bp],02H 0b4c bf 00 00 mov di,offset SYSTEM_BSS+100H 0b4f 1e push ds 0b50 57 push di 0b51 b0 1b mov al,1bH 0b53 50 push ax 0b54 31 c0 xor ax,ax 0b56 50 push ax 0b57 9a 00 00 00 00 call far SYSTEM_039 0b5c bf 00 00 mov di,offset L68 0b5f 0e push cs 0b60 57 push di 0b61 31 c0 xor ax,ax 0b63 50 push ax 0b64 9a 00 00 00 00 call far SYSTEM_036 0b69 9a 00 00 00 00 call far SYSTEM_03B 0b6e 9a 00 00 00 00 call far SYSTEM_032 0b73 eb 2b jmp L72 0b75 c6 46 fa 05 L71 mov byte ptr -6H[bp],05H 0b79 bf 00 00 mov di,offset SYSTEM_BSS+100H 0b7c 1e push ds 0b7d 57 push di 0b7e b0 1b mov al,1bH 0b80 50 push ax 0b81 31 c0 xor ax,ax 0b83 50 push ax 0b84 9a 00 00 00 00 call far SYSTEM_039 0b89 bf 00 00 mov di,offset L69 0b8c 0e push cs 0b8d 57 push di 0b8e 31 c0 xor ax,ax 0b90 50 push ax 0b91 9a 00 00 00 00 call far SYSTEM_036 0b96 9a 00 00 00 00 call far SYSTEM_03B 0b9b 9a 00 00 00 00 call far SYSTEM_032 0ba0 0e L72 push cs 0ba1 e8 00 00 call TSUNTG_00D 0ba4 3c 0a cmp al,0aH 0ba6 75 0f jne L73 0ba8 0e push cs 0ba9 e8 00 00 call TSUNTG_00E 0bac 3a 46 fa cmp al,-6H[bp] 0baf 75 06 jne L73 0bb1 c6 46 ff 01 mov byte ptr -1H[bp],01H 0bb5 eb 2a jmp L74 0bb7 c6 46 ff 00 L73 mov byte ptr -1H[bp],00H 0bbb ff 76 fb push -5H[bp] 0bbe ff 76 fd push -3H[bp] 0bc1 0e push cs 0bc2 e8 00 00 call GOATXY 0bc5 bf 00 00 mov di,offset SYSTEM_BSS+100H 0bc8 1e push ds 0bc9 57 push di 0bca bf 00 00 mov di,offset L70 0bcd 0e push cs 0bce 57 push di 0bcf 31 c0 xor ax,ax 0bd1 50 push ax 0bd2 9a 00 00 00 00 call far SYSTEM_036 0bd7 9a 00 00 00 00 call far SYSTEM_03B 0bdc 9a 00 00 00 00 call far SYSTEM_032 0be1 ff 76 fb L74 push -5H[bp] 0be4 ff 76 fd push -3H[bp] 0be7 0e push cs 0be8 e8 00 00 call GOATXY 0beb 8a 46 ff mov al,-1H[bp] 0bee 89 ec mov sp,bp 0bf0 5d pop bp 0bf1 cb retf 0bf2 GETSCAN: 0bf2 55 TSUNTG_01E push bp 0bf3 89 e5 mov bp,sp 0bf5 b8 14 00 mov ax,0014H 0bf8 9a 00 00 00 00 call far SYSTEM_034 0bfd 83 ec 14 sub sp,0014H 0c00 8d 7e ec lea di,-14H[bp] 0c03 16 push ss 0c04 57 push di 0c05 b8 14 00 mov ax,0014H 0c08 50 push ax 0c09 b0 00 mov al,00H 0c0b 50 push ax 0c0c 9a 00 00 00 00 call far SYSTEM_05C 0c11 c6 46 ed 00 mov byte ptr -13H[bp],00H 0c15 b0 16 mov al,16H 0c17 50 push ax 0c18 8d 7e ec lea di,-14H[bp] 0c1b 16 push ss 0c1c 57 push di 0c1d 9a 00 00 00 00 call far DOS_001 0c22 8a 46 ed mov al,-13H[bp] 0c25 c4 7e 0a les di,dword ptr +0aH[bp] 0c28 26 88 05 mov es:[di],al 0c2b 8a 46 ec mov al,-14H[bp] 0c2e c4 7e 06 les di,dword ptr +6H[bp] 0c31 26 88 05 mov es:[di],al 0c34 89 ec mov sp,bp 0c36 5d pop bp 0c37 ca 08 00 retf 0008H 0c3a GETESCAN: 0c3a 55 TSUNTG_01F push bp 0c3b 89 e5 mov bp,sp 0c3d b8 14 00 mov ax,0014H 0c40 9a 00 00 00 00 call far SYSTEM_034 0c45 83 ec 14 sub sp,0014H 0c48 8d 7e ec lea di,-14H[bp] 0c4b 16 push ss 0c4c 57 push di 0c4d b8 14 00 mov ax,0014H 0c50 50 push ax 0c51 b0 00 mov al,00H 0c53 50 push ax 0c54 9a 00 00 00 00 call far SYSTEM_05C 0c59 c6 46 ed 10 mov byte ptr -13H[bp],10H 0c5d b0 16 mov al,16H 0c5f 50 push ax 0c60 8d 7e ec lea di,-14H[bp] 0c63 16 push ss 0c64 57 push di 0c65 9a 00 00 00 00 call far DOS_001 0c6a 8a 46 ed mov al,-13H[bp] 0c6d c4 7e 0a les di,dword ptr +0aH[bp] 0c70 26 88 05 mov es:[di],al 0c73 8a 46 ec mov al,-14H[bp] 0c76 c4 7e 06 les di,dword ptr +6H[bp] 0c79 26 88 05 mov es:[di],al 0c7c 89 ec mov sp,bp 0c7e 5d pop bp 0c7f ca 08 00 retf 0008H 0c82 FLOPSTFN: 0c82 55 TSUNTG_006 push bp 0c83 89 e5 mov bp,sp 0c85 b8 1a 00 mov ax,001aH 0c88 9a 00 00 00 00 call far SYSTEM_034 0c8d 83 ec 1a sub sp,001aH 0c90 8a 46 06 mov al,+6H[bp] 0c93 50 push ax 0c94 9a 00 00 00 00 call far SYSTEM_05A 0c99 88 46 06 mov +6H[bp],al 0c9c c7 46 fe ff ff mov word ptr -2H[bp],0ffffH 0ca1 8a 46 06 mov al,+6H[bp] 0ca4 3c 41 cmp al,41H 0ca6 74 04 je L75 0ca8 3c 42 cmp al,42H 0caa 75 0d jne L76 0cac 8a 46 06 L75 mov al,+6H[bp] 0caf 30 e4 xor ah,ah 0cb1 2d 41 00 sub ax,0041H 0cb4 89 46 e8 mov -18H[bp],ax 0cb7 eb 02 jmp L77 0cb9 eb 7b L76 jmp L80 0cbb c6 46 e7 00 L77 mov byte ptr -19H[bp],00H 0cbf 8d 7e ea L78 lea di,-16H[bp] 0cc2 16 push ss 0cc3 57 push di 0cc4 b8 14 00 mov ax,0014H 0cc7 50 push ax 0cc8 b0 00 mov al,00H 0cca 50 push ax 0ccb 9a 00 00 00 00 call far SYSTEM_05C 0cd0 c6 46 eb 04 mov byte ptr -15H[bp],04H 0cd4 c6 46 ea 01 mov byte ptr -16H[bp],01H 0cd8 c6 46 ef 01 mov byte ptr -11H[bp],01H 0cdc c6 46 ee 01 mov byte ptr -12H[bp],01H 0ce0 c6 46 f1 01 mov byte ptr -0fH[bp],01H 0ce4 8a 46 e8 mov al,-18H[bp] 0ce7 88 46 f0 mov -10H[bp],al 0cea b0 13 mov al,13H 0cec 50 push ax 0ced 8d 7e ea lea di,-16H[bp] 0cf0 16 push ss 0cf1 57 push di 0cf2 9a 00 00 00 00 call far DOS_001 0cf7 8a 46 eb mov al,-15H[bp] 0cfa 88 46 e6 mov -1aH[bp],al 0cfd 8d 7e ea lea di,-16H[bp] 0d00 16 push ss 0d01 57 push di 0d02 b8 14 00 mov ax,0014H 0d05 50 push ax 0d06 b0 00 mov al,00H 0d08 50 push ax 0d09 9a 00 00 00 00 call far SYSTEM_05C 0d0e c6 46 eb 00 mov byte ptr -15H[bp],00H 0d12 b0 13 mov al,13H 0d14 50 push ax 0d15 8d 7e ea lea di,-16H[bp] 0d18 16 push ss 0d19 57 push di 0d1a 9a 00 00 00 00 call far DOS_001 0d1f fe 46 e7 inc byte ptr -19H[bp] 0d22 80 7e e6 06 cmp byte ptr -1aH[bp],06H 0d26 75 06 jne L79 0d28 80 7e e7 03 cmp byte ptr -19H[bp],03H 0d2c 76 91 jbe L78 0d2e 8a 46 e6 L79 mov al,-1aH[bp] 0d31 30 e4 xor ah,ah 0d33 89 46 fe mov -2H[bp],ax 0d36 8b 46 fe L80 mov ax,-2H[bp] 0d39 89 ec mov sp,bp 0d3b 5d pop bp 0d3c ca 02 00 retf 0002H 0d3f ISUBSTFN: 0d3f 55 TSUNTG_007 push bp 0d40 89 e5 mov bp,sp 0d42 b8 15 00 mov ax,0015H 0d45 9a 00 00 00 00 call far SYSTEM_034 0d4a 83 ec 15 sub sp,0015H 0d4d c6 46 ff 00 mov byte ptr -1H[bp],00H 0d51 9a 00 00 00 00 call far TSUNT45_001 0d56 88 e0 mov al,ah 0d58 30 e4 xor ah,ah 0d5a 50 push ax 0d5b 9a 00 00 00 00 call far TSUNT45_001 0d60 30 e4 xor ah,ah 0d62 b9 64 00 mov cx,0064H 0d65 f7 e9 imul cx 0d67 5a pop dx 0d68 03 c2 add ax,dx 0d6a 3d 36 01 cmp ax,0136H 0d6d 7d 02 jge L81 0d6f eb 75 jmp L88 0d71 8a 46 06 L81 mov al,+6H[bp] 0d74 50 push ax 0d75 9a 00 00 00 00 call far SYSTEM_05A 0d7a 88 46 06 mov +6H[bp],al 0d7d 8d 7e eb lea di,-15H[bp] 0d80 16 push ss 0d81 57 push di 0d82 b8 14 00 mov ax,0014H 0d85 50 push ax 0d86 b0 00 mov al,00H 0d88 50 push ax 0d89 9a 00 00 00 00 call far SYSTEM_05C 0d8e c7 46 eb 09 44 mov word ptr -15H[bp],4409H 0d93 8a 46 06 mov al,+6H[bp] 0d96 3c 41 cmp al,41H 0d98 72 12 jb L82 0d9a 3c 5a cmp al,5aH 0d9c 77 0e ja L82 0d9e 8a 46 06 mov al,+6H[bp] 0da1 30 e4 xor ah,ah 0da3 2d 41 00 sub ax,0041H 0da6 40 inc ax 0da7 88 46 ed mov -13H[bp],al 0daa eb 0c jmp L84 0dac 3c 30 L82 cmp al,30H 0dae 75 06 jne L83 0db0 c6 46 ed 00 mov byte ptr -13H[bp],00H 0db4 eb 02 jmp L84 0db6 eb 2e L83 jmp L88 0db8 8d 7e eb L84 lea di,-15H[bp] 0dbb 16 push ss 0dbc 57 push di 0dbd 9a 00 00 00 00 call far DOS_002 0dc2 8b 46 fd mov ax,-3H[bp] 0dc5 25 01 00 and ax,0001H 0dc8 09 c0 or ax,ax 0dca 74 02 je L85 0dcc eb 18 jmp L88 0dce 8b 46 f1 L85 mov ax,-0fH[bp] 0dd1 b9 0f 00 mov cx,000fH 0dd4 d3 e8 shr ax,cl 0dd6 25 01 00 and ax,0001H 0dd9 09 c0 or ax,ax 0ddb 75 04 jne L86 0ddd b0 00 mov al,00H 0ddf eb 02 jmp L87 0de1 b0 01 L86 mov al,01H 0de3 88 46 ff L87 mov -1H[bp],al 0de6 8a 46 ff L88 mov al,-1H[bp] 0de9 89 ec mov sp,bp 0deb 5d pop bp 0dec ca 02 00 retf 0002H 0def MEDIAFN: 0def 55 TSUNTG_008 push bp 0df0 89 e5 mov bp,sp 0df2 b8 36 00 mov ax,0036H 0df5 9a 00 00 00 00 call far SYSTEM_034 0dfa 83 ec 36 sub sp,0036H 0dfd c6 46 ff 00 mov byte ptr -1H[bp],00H 0e01 9a 00 00 00 00 call far TSUNT45_001 0e06 86 c4 xchg al,ah 0e08 3d 00 02 cmp ax,0200H 0e0b 73 03 jae L89 0e0d e9 9b 00 jmp L94 0e10 8a 46 06 L89 mov al,+6H[bp] 0e13 50 push ax 0e14 9a 00 00 00 00 call far SYSTEM_05A 0e19 88 46 06 mov +6H[bp],al 0e1c 8a 46 06 mov al,+6H[bp] 0e1f 50 push ax 0e20 8d 7e ca lea di,-36H[bp] 0e23 16 push ss 0e24 57 push di 0e25 9a 00 00 00 00 call far SYSTEM_028 0e2a b0 30 mov al,30H 0e2c 50 push ax 0e2d 9a 00 00 00 00 call far SYSTEM_029 0e32 b0 41 mov al,41H 0e34 50 push ax 0e35 b0 5a mov al,5aH 0e37 50 push ax 0e38 9a 00 00 00 00 call far SYSTEM_02A 0e3d 9a 00 00 00 00 call far SYSTEM_018 0e42 75 02 jne L90 0e44 eb 65 jmp L94 0e46 8d 7e eb L90 lea di,-15H[bp] 0e49 16 push ss 0e4a 57 push di 0e4b b8 14 00 mov ax,0014H 0e4e 50 push ax 0e4f b0 00 mov al,00H 0e51 50 push ax 0e52 9a 00 00 00 00 call far SYSTEM_05C 0e57 80 7e 06 30 cmp byte ptr +6H[bp],30H 0e5b 75 04 jne L91 0e5d c6 46 06 40 mov byte ptr +6H[bp],40H 0e61 8a 46 06 L91 mov al,+6H[bp] 0e64 30 e4 xor ah,ah 0e66 2d 40 00 sub ax,0040H 0e69 88 46 f1 mov -0fH[bp],al 0e6c c6 46 ec 1c mov byte ptr -14H[bp],1cH 0e70 b0 21 mov al,21H 0e72 50 push ax 0e73 8d 7e eb lea di,-15H[bp] 0e76 16 push ss 0e77 57 push di 0e78 9a 00 00 00 00 call far DOS_001 0e7d 80 7e eb ff cmp byte ptr -15H[bp],0ffH 0e81 75 02 jne L92 0e83 eb 26 jmp L94 0e85 8b 46 f9 L92 mov ax,-7H[bp] 0e88 50 push ax 0e89 8b 7e ed mov di,-13H[bp] 0e8c 07 pop es 0e8d 26 8a 05 mov al,es:[di] 0e90 88 46 ea mov -16H[bp],al 0e93 80 7e ea f9 cmp byte ptr -16H[bp],0f9H 0e97 75 0c jne L93 0e99 80 7e eb 02 cmp byte ptr -15H[bp],02H 0e9d 75 06 jne L93 0e9f c6 46 ff fa mov byte ptr -1H[bp],0faH 0ea3 eb 06 jmp L94 0ea5 8a 46 ea L93 mov al,-16H[bp] 0ea8 88 46 ff mov -1H[bp],al 0eab 8a 46 ff L94 mov al,-1H[bp] 0eae 89 ec mov sp,bp 0eb0 5d pop bp 0eb1 ca 02 00 retf 0002H 0eb4 ACTDRVFN: 0eb4 55 TSUNTG_009 push bp 0eb5 89 e5 mov bp,sp 0eb7 b8 01 00 mov ax,0001H 0eba 9a 00 00 00 00 call far SYSTEM_034 0ebf 83 ec 01 sub sp,0001H 0ec2 c6 46 ff 30 mov byte ptr -1H[bp],30H 0ec6 9a 00 00 00 00 call far TSUNT45_001 0ecb 86 c4 xchg al,ah 0ecd 3d 14 03 cmp ax,0314H 0ed0 73 02 jae L95 0ed2 eb 3b jmp L100 0ed4 0e L95 push cs 0ed5 e8 00 00 call DRIVESFN 0ed8 30 e4 xor ah,ah 0eda 3d 00 00 cmp ax,0000H 0edd 75 04 jne L96 0edf eb 2e jmp L100 0ee1 eb 0d jmp L98 0ee3 3d 01 00 L96 cmp ax,0001H 0ee6 75 02 jne L97 0ee8 eb 06 jmp L98 0eea c6 46 ff 32 L97 mov byte ptr -1H[bp],32H 0eee eb 1f jmp L100 0ef0 be 50 00 L98 mov si,0050H 0ef3 8e c6 mov es,si 0ef5 26 a0 04 00 mov al,es:[00000004H] 0ef9 30 e4 xor ah,ah 0efb 3d 00 00 cmp ax,0000H 0efe 75 06 jne L99 0f00 c6 46 ff 41 mov byte ptr -1H[bp],41H 0f04 eb 09 jmp L100 0f06 3d 01 00 L99 cmp ax,0001H 0f09 75 04 jne L100 0f0b c6 46 ff 42 mov byte ptr -1H[bp],42H 0f0f 8a 46 ff L100 mov al,-1H[bp] 0f12 89 ec mov sp,bp 0f14 5d pop bp 0f15 cb retf No disassembly errors ------------------------------------------------------------