Power-Programmierung

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

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

Wrap

Text File | 1994-06-19 | 35.7 KB | 628 lines

Module: TSUNT45.PAS Group: 'DGROUP' _DATA,_BSS Segment: TSUNT45_TEXT PARA 0000063c bytes 0000 DOSVERSION: 0000 55 TSUNT45_001 push bp 0001 89 e5 mov bp,sp 0003 b8 16 00 mov ax,0016H 0006 9a 00 00 00 00 call far SYSTEM_034 000b 83 ec 16 sub sp,0016H 000e 8d 7e ea lea di,-16H[bp] 0011 16 push ss 0012 57 push di 0013 b8 14 00 mov ax,0014H 0016 50 push ax 0017 b0 00 mov al,00H 0019 50 push ax 001a 9a 00 00 00 00 call far SYSTEM_05C 001f c6 46 eb 30 mov byte ptr -15H[bp],30H 0023 b0 21 mov al,21H 0025 50 push ax 0026 8d 7e ea lea di,-16H[bp] 0029 16 push ss 002a 57 push di 002b 9a 00 00 00 00 call far DOS_001 0030 80 7e ea 00 cmp byte ptr -16H[bp],00H 0034 75 07 jne L1 0036 c7 46 fe 01 00 mov word ptr -2H[bp],0001H 003b eb 06 jmp L2 003d 8b 46 ea L1 mov ax,-16H[bp] 0040 89 46 fe mov -2H[bp],ax 0043 8b 46 fe L2 mov ax,-2H[bp] 0046 89 ec mov sp,bp 0048 5d pop bp 0049 cb retf 004a ENVCOUNT: 004a 55 TSUNT45_002 push bp 004b 89 e5 mov bp,sp 004d b8 09 00 mov ax,0009H 0050 9a 00 00 00 00 call far SYSTEM_034 0055 83 ec 09 sub sp,0009H 0058 a1 00 00 mov ax,SYSTEM_BSS+200H 005b 50 push ax 005c bf 2c 00 mov di,002cH 005f 07 pop es 0060 26 8b 05 mov ax,es:[di] 0063 89 46 fc mov -4H[bp],ax 0066 31 c0 xor ax,ax 0068 89 46 f7 mov -9H[bp],ax 006b 31 c0 xor ax,ax 006d 89 46 fa mov -6H[bp],ax 0070 c6 46 f9 00 mov byte ptr -7H[bp],00H 0074 8b 46 fc mov ax,-4H[bp] 0077 50 push ax 0078 8b 7e fa mov di,-6H[bp] 007b 07 pop es 007c 26 80 3d 00 cmp byte ptr es:[di],00H 0080 74 07 je L3 0082 8b 46 f7 mov ax,-9H[bp] 0085 40 inc ax 0086 89 46 f7 mov -9H[bp],ax 0089 8b 46 fc L3 mov ax,-4H[bp] 008c 50 push ax 008d 8b 7e fa mov di,-6H[bp] 0090 07 pop es 0091 26 80 3d 00 cmp byte ptr es:[di],00H 0095 75 1e jne L5 0097 8b 46 fc mov ax,-4H[bp] 009a 50 push ax 009b 8b 46 fa mov ax,-6H[bp] 009e 40 inc ax 009f 8b f8 mov di,ax 00a1 07 pop es 00a2 26 80 3d 00 cmp byte ptr es:[di],00H 00a6 75 06 jne L4 00a8 c6 46 f9 01 mov byte ptr -7H[bp],01H 00ac eb 07 jmp L5 00ae 8b 46 f7 L4 mov ax,-9H[bp] 00b1 40 inc ax 00b2 89 46 f7 mov -9H[bp],ax 00b5 ff 46 fa L5 inc word ptr -6H[bp] 00b8 80 7e f9 00 cmp byte ptr -7H[bp],00H 00bc 74 cb je L3 00be 8b 46 f7 mov ax,-9H[bp] 00c1 89 46 fe mov -2H[bp],ax 00c4 8b 46 fe mov ax,-2H[bp] 00c7 89 ec mov sp,bp 00c9 5d pop bp 00ca cb retf 00cb ENVSTR: 00cb 55 TSUNT45_003 push bp 00cc 89 e5 mov bp,sp 00ce b8 08 03 mov ax,0308H 00d1 9a 00 00 00 00 call far SYSTEM_034 00d6 81 ec 08 03 sub sp,0308H 00da c4 7e 08 les di,dword ptr +8H[bp] 00dd 26 c6 05 00 mov byte ptr es:[di],00H 00e1 83 7e 06 01 cmp word ptr +6H[bp],0001H 00e5 7c 09 jl L6 00e7 0e push cs 00e8 e8 00 00 call ENVCOUNT 00eb 3b 46 06 cmp ax,+6H[bp] 00ee 7d 03 jge L7 00f0 e9 9f 00 L6 jmp L13 00f3 a1 00 00 L7 mov ax,SYSTEM_BSS+200H 00f6 50 push ax 00f7 bf 2c 00 mov di,002cH 00fa 07 pop es 00fb 26 8b 05 mov ax,es:[di] 00fe 89 46 fe mov -2H[bp],ax 0101 31 c0 xor ax,ax 0103 89 46 fa mov -6H[bp],ax 0106 8b 46 06 mov ax,+6H[bp] 0109 89 86 f8 fe mov -108H[bp],ax 010d b8 01 00 mov ax,0001H 0110 3b 86 f8 fe cmp ax,-108H[bp] 0114 77 68 ja L12 0116 89 46 fc mov -4H[bp],ax 0119 eb 03 jmp L9 011b ff 46 fc L8 inc word ptr -4H[bp] 011e c6 86 fa fe 00 L9 mov byte ptr -106H[bp],00H 0123 8b 46 fe L10 mov ax,-2H[bp] 0126 50 push ax 0127 8b 7e fa mov di,-6H[bp] 012a 07 pop es 012b 26 80 3d 00 cmp byte ptr es:[di],00H 012f 74 41 je L11 0131 8d be f8 fc lea di,-308H[bp] 0135 16 push ss 0136 57 push di 0137 8d be fa fe lea di,-106H[bp] 013b 16 push ss 013c 57 push di 013d 9a 00 00 00 00 call far SYSTEM_00B 0142 8d be f8 fd lea di,-208H[bp] 0146 16 push ss 0147 57 push di 0148 8b 46 fe mov ax,-2H[bp] 014b 50 push ax 014c 8b 7e fa mov di,-6H[bp] 014f 07 pop es 0150 26 8a 05 mov al,es:[di] 0153 50 push ax 0154 9a 00 00 00 00 call far SYSTEM_012 0159 9a 00 00 00 00 call far SYSTEM_00F 015e 8d be fa fe lea di,-106H[bp] 0162 16 push ss 0163 57 push di 0164 b8 ff 00 mov ax,00ffH 0167 50 push ax 0168 9a 00 00 00 00 call far SYSTEM_00C 016d ff 46 fa inc word ptr -6H[bp] 0170 eb b1 jmp L10 0172 ff 46 fa L11 inc word ptr -6H[bp] 0175 8b 46 fc mov ax,-4H[bp] 0178 3b 86 f8 fe cmp ax,-108H[bp] 017c 75 9d jne L8 017e 8d be fa fe L12 lea di,-106H[bp] 0182 16 push ss 0183 57 push di 0184 c4 7e 08 les di,dword ptr +8H[bp] 0187 06 push es 0188 57 push di 0189 b8 ff 00 mov ax,00ffH 018c 50 push ax 018d 9a 00 00 00 00 call far SYSTEM_00C 0192 89 ec L13 mov sp,bp 0194 5d pop bp 0195 ca 02 00 retf 0002H 0198 01 3d L14 add [di],di 019a GETENV: 019a 55 TSUNT45_004 push bp 019b 89 e5 mov bp,sp 019d b8 09 05 mov ax,0509H 01a0 9a 00 00 00 00 call far SYSTEM_034 01a5 81 ec 09 05 sub sp,0509H 01a9 c4 7e 06 les di,dword ptr +6H[bp] 01ac 06 push es 01ad 57 push di 01ae 8d be 00 ff lea di,-100H[bp] 01b2 16 push ss 01b3 57 push di 01b4 b8 ff 00 mov ax,00ffH 01b7 50 push ax 01b8 9a 00 00 00 00 call far SYSTEM_00C 01bd a1 00 00 mov ax,SYSTEM_BSS+200H 01c0 50 push ax 01c1 bf 2c 00 mov di,002cH 01c4 07 pop es 01c5 26 8b 05 mov ax,es:[di] 01c8 89 86 fe fe mov -102H[bp],ax 01cc c4 7e 0a les di,dword ptr +0aH[bp] 01cf 26 c6 05 00 mov byte ptr es:[di],00H 01d3 8d be f9 fb lea di,-407H[bp] 01d7 16 push ss 01d8 57 push di 01d9 8d be 00 ff lea di,-100H[bp] 01dd 16 push ss 01de 57 push di 01df 9a 00 00 00 00 call far SYSTEM_00B 01e4 bf 00 00 mov di,offset L14 01e7 0e push cs 01e8 57 push di 01e9 9a 00 00 00 00 call far SYSTEM_00F 01ee 8d be 00 ff lea di,-100H[bp] 01f2 16 push ss 01f3 57 push di 01f4 b8 ff 00 mov ax,00ffH 01f7 50 push ax 01f8 9a 00 00 00 00 call far SYSTEM_00C 01fd 8a 86 00 ff mov al,-100H[bp] 0201 88 86 f8 fc mov -308H[bp],al 0205 b0 01 mov al,01H 0207 3a 86 f8 fc cmp al,-308H[bp] 020b 77 34 ja L17 020d 88 86 f9 fe mov -107H[bp],al 0211 eb 04 jmp L16 0213 fe 86 f9 fe L15 inc byte ptr -107H[bp] 0217 8a 86 f9 fe L16 mov al,-107H[bp] 021b 30 e4 xor ah,ah 021d 8b f8 mov di,ax 021f 8a 83 00 ff mov al,-100H[bp+di] 0223 50 push ax 0224 9a 00 00 00 00 call far SYSTEM_05A 0229 8a d0 mov dl,al 022b 8a 86 f9 fe mov al,-107H[bp] 022f 30 e4 xor ah,ah 0231 8b f8 mov di,ax 0233 88 93 00 ff mov -100H[bp+di],dl 0237 8a 86 f9 fe mov al,-107H[bp] 023b 3a 86 f8 fc cmp al,-308H[bp] 023f 75 d2 jne L15 0241 31 c0 L17 xor ax,ax 0243 89 86 fa fe mov -106H[bp],ax 0247 0e push cs 0248 e8 00 00 call ENVCOUNT 024b 89 86 f7 fc mov -309H[bp],ax 024f b8 01 00 mov ax,0001H 0252 3b 86 f7 fc cmp ax,-309H[bp] 0256 76 03 jbe L18 0258 e9 05 01 jmp L27 025b 89 86 fc fe L18 mov -104H[bp],ax 025f eb 04 jmp L20 0261 ff 86 fc fe L19 inc word ptr -104H[bp] 0265 c6 86 f9 fc 00 L20 mov byte ptr -307H[bp],00H 026a 8b 86 fe fe L21 mov ax,-102H[bp] 026e 50 push ax 026f 8b be fa fe mov di,-106H[bp] 0273 07 pop es 0274 26 80 3d 00 cmp byte ptr es:[di],00H 0278 74 44 je L22 027a 8d be f7 fa lea di,-509H[bp] 027e 16 push ss 027f 57 push di 0280 8d be f9 fc lea di,-307H[bp] 0284 16 push ss 0285 57 push di 0286 9a 00 00 00 00 call far SYSTEM_00B 028b 8d be f7 fb lea di,-409H[bp] 028f 16 push ss 0290 57 push di 0291 8b 86 fe fe mov ax,-102H[bp] 0295 50 push ax 0296 8b be fa fe mov di,-106H[bp] 029a 07 pop es 029b 26 8a 05 mov al,es:[di] 029e 50 push ax 029f 9a 00 00 00 00 call far SYSTEM_012 02a4 9a 00 00 00 00 call far SYSTEM_00F 02a9 8d be f9 fc lea di,-307H[bp] 02ad 16 push ss 02ae 57 push di 02af b8 ff 00 mov ax,00ffH 02b2 50 push ax 02b3 9a 00 00 00 00 call far SYSTEM_00C 02b8 ff 86 fa fe inc word ptr -106H[bp] 02bc eb ac jmp L21 02be 8d be f9 fc L22 lea di,-307H[bp] 02c2 16 push ss 02c3 57 push di 02c4 8d be f9 fd lea di,-207H[bp] 02c8 16 push ss 02c9 57 push di 02ca b8 ff 00 mov ax,00ffH 02cd 50 push ax 02ce 9a 00 00 00 00 call far SYSTEM_00C 02d3 8a 86 f9 fd mov al,-207H[bp] 02d7 88 86 f6 fc mov -30aH[bp],al 02db b0 01 mov al,01H 02dd 3a 86 f6 fc cmp al,-30aH[bp] 02e1 77 2a ja L25 02e3 88 86 f9 fe mov -107H[bp],al 02e7 eb 04 jmp L24 02e9 fe 86 f9 fe L23 inc byte ptr -107H[bp] 02ed 8b be fa fe L24 mov di,-106H[bp] 02f1 8a 83 f9 fd mov al,-207H[bp+di] 02f5 50 push ax 02f6 9a 00 00 00 00 call far SYSTEM_05A 02fb 8b be fa fe mov di,-106H[bp] 02ff 88 83 f9 fd mov -207H[bp+di],al 0303 8a 86 f9 fe mov al,-107H[bp] 0307 3a 86 f6 fc cmp al,-30aH[bp] 030b 75 dc jne L23 030d 8d be 00 ff L25 lea di,-100H[bp] 0311 16 push ss 0312 57 push di 0313 8d be f9 fd lea di,-207H[bp] 0317 16 push ss 0318 57 push di 0319 9a 00 00 00 00 call far SYSTEM_010 031e 3d 01 00 cmp ax,0001H 0321 75 2c jne L26 0323 8d be f9 fc lea di,-307H[bp] 0327 16 push ss 0328 57 push di 0329 b8 01 00 mov ax,0001H 032c 50 push ax 032d 8a 86 00 ff mov al,-100H[bp] 0331 30 e4 xor ah,ah 0333 50 push ax 0334 9a 00 00 00 00 call far SYSTEM_015 0339 8d be f9 fc lea di,-307H[bp] 033d 16 push ss 033e 57 push di 033f c4 7e 0a les di,dword ptr +0aH[bp] 0342 06 push es 0343 57 push di 0344 b8 ff 00 mov ax,00ffH 0347 50 push ax 0348 9a 00 00 00 00 call far SYSTEM_00C 034d eb 11 jmp L27 034f ff 86 fa fe L26 inc word ptr -106H[bp] 0353 8b 86 fc fe mov ax,-104H[bp] 0357 3b 86 f7 fc cmp ax,-309H[bp] 035b 74 03 je L27 035d e9 01 ff jmp L19 0360 89 ec L27 mov sp,bp 0362 5d pop bp 0363 ca 04 00 retf 0004H 0366 PARAMSTR0: 0366 55 TSUNT45_005 push bp 0367 89 e5 mov bp,sp 0369 b8 05 03 mov ax,0305H 036c 9a 00 00 00 00 call far SYSTEM_034 0371 81 ec 05 03 sub sp,0305H 0375 a1 00 00 mov ax,SYSTEM_BSS+200H 0378 50 push ax 0379 bf 2c 00 mov di,002cH 037c 07 pop es 037d 26 8b 05 mov ax,es:[di] 0380 89 46 fe mov -2H[bp],ax 0383 31 c0 xor ax,ax 0385 89 46 fc mov -4H[bp],ax 0388 c6 46 fb 00 mov byte ptr -5H[bp],00H 038c 8b 46 fe L28 mov ax,-2H[bp] 038f 50 push ax 0390 8b 7e fc mov di,-4H[bp] 0393 07 pop es 0394 26 80 3d 00 cmp byte ptr es:[di],00H 0398 75 15 jne L29 039a 8b 46 fe mov ax,-2H[bp] 039d 50 push ax 039e 8b 46 fc mov ax,-4H[bp] 03a1 40 inc ax 03a2 8b f8 mov di,ax 03a4 07 pop es 03a5 26 80 3d 00 cmp byte ptr es:[di],00H 03a9 75 04 jne L29 03ab c6 46 fb 01 mov byte ptr -5H[bp],01H 03af ff 46 fc L29 inc word ptr -4H[bp] 03b2 80 7e fb 00 cmp byte ptr -5H[bp],00H 03b6 74 d4 je L28 03b8 83 46 fc 03 add word ptr -4H[bp],0003H 03bc c6 86 fb fe 00 mov byte ptr -105H[bp],00H 03c1 c6 46 fb 00 mov byte ptr -5H[bp],00H 03c5 8b 46 fe L30 mov ax,-2H[bp] 03c8 50 push ax 03c9 8b 7e fc mov di,-4H[bp] 03cc 07 pop es 03cd 26 80 3d 00 cmp byte ptr es:[di],00H 03d1 75 06 jne L31 03d3 c6 46 fb 01 mov byte ptr -5H[bp],01H 03d7 eb 3f jmp L32 03d9 8d be fb fc L31 lea di,-305H[bp] 03dd 16 push ss 03de 57 push di 03df 8d be fb fe lea di,-105H[bp] 03e3 16 push ss 03e4 57 push di 03e5 9a 00 00 00 00 call far SYSTEM_00B 03ea 8d be fb fd lea di,-205H[bp] 03ee 16 push ss 03ef 57 push di 03f0 8b 46 fe mov ax,-2H[bp] 03f3 50 push ax 03f4 8b 7e fc mov di,-4H[bp] 03f7 07 pop es 03f8 26 8a 05 mov al,es:[di] 03fb 50 push ax 03fc 9a 00 00 00 00 call far SYSTEM_012 0401 9a 00 00 00 00 call far SYSTEM_00F 0406 8d be fb fe lea di,-105H[bp] 040a 16 push ss 040b 57 push di 040c b8 ff 00 mov ax,00ffH 040f 50 push ax 0410 9a 00 00 00 00 call far SYSTEM_00C 0415 ff 46 fc inc word ptr -4H[bp] 0418 80 7e fb 00 L32 cmp byte ptr -5H[bp],00H 041c 74 a7 je L30 041e 8d be fb fe lea di,-105H[bp] 0422 16 push ss 0423 57 push di 0424 c4 7e 06 les di,dword ptr +6H[bp] 0427 06 push es 0428 57 push di 0429 b8 ff 00 mov ax,00ffH 042c 50 push ax 042d 9a 00 00 00 00 call far SYSTEM_00C 0432 89 ec mov sp,bp 0434 5d pop bp 0435 cb retf 0436 00 01 L33 add [bx+di],al 0438 00 55 89 add -77H[di],dl 043b e5 b8 in ax,0b8H 043d b6 01 mov dh,01H 043f 9a 00 00 00 00 call far SYSTEM_034 0444 81 ec b6 01 sub sp,01b6H 0448 c4 7e 06 les di,dword ptr +6H[bp] 044b 06 push es 044c 57 push di 044d 8d 7e b0 lea di,-50H[bp] 0450 16 push ss 0451 57 push di 0452 b8 4f 00 mov ax,004fH 0455 50 push ax 0456 9a 00 00 00 00 call far SYSTEM_00C 045b 8d 7e b0 lea di,-50H[bp] 045e 16 push ss 045f 57 push di 0460 bf 00 00 mov di,offset L33 0463 0e push cs 0464 57 push di 0465 9a 00 00 00 00 call far SYSTEM_011 046a 75 0a jne L35 046c c4 7e 0a les di,dword ptr +0aH[bp] 046f 26 c6 05 00 mov byte ptr es:[di],00H 0473 e9 c6 00 jmp L38 0476 8d be 4a fe L35 lea di,-1b6H[bp] 047a 16 push ss 047b 57 push di 047c 8d 7e b0 lea di,-50H[bp] 047f 16 push ss 0480 57 push di 0481 9a 00 00 00 00 call far SYSTEM_00B 0486 bf 00 00 mov di,offset L34 0489 0e push cs 048a 57 push di 048b 9a 00 00 00 00 call far SYSTEM_00F 0490 8d be 5f ff lea di,-0a1H[bp] 0494 16 push ss 0495 57 push di 0496 b8 50 00 mov ax,0050H 0499 50 push ax 049a 9a 00 00 00 00 call far SYSTEM_00C 049f 8d be 4b ff lea di,-0b5H[bp] 04a3 16 push ss 04a4 57 push di 04a5 b8 14 00 mov ax,0014H 04a8 50 push ax 04a9 b0 00 mov al,00H 04ab 50 push ax 04ac 9a 00 00 00 00 call far SYSTEM_05C 04b1 c6 86 4c ff 60 mov byte ptr -0b4H[bp],60H 04b6 8c d0 mov ax,ss 04b8 89 86 59 ff mov -0a7H[bp],ax 04bc 8d 86 60 ff lea ax,-0a0H[bp] 04c0 89 86 55 ff mov -0abH[bp],ax 04c4 8d be 4b ff lea di,-0b5H[bp] 04c8 16 push ss 04c9 57 push di 04ca 9a 00 00 00 00 call far DOS_002 04cf c6 86 5f ff 00 mov byte ptr -0a1H[bp],00H 04d4 c6 86 4a ff 00 mov byte ptr -0b6H[bp],00H 04d9 8b 86 5b ff L36 mov ax,-0a5H[bp] 04dd 50 push ax 04de 8a 86 4a ff mov al,-0b6H[bp] 04e2 30 e4 xor ah,ah 04e4 03 86 57 ff add ax,-0a9H[bp] 04e8 8b f8 mov di,ax 04ea 07 pop es 04eb 26 80 3d 00 cmp byte ptr es:[di],00H 04ef 76 2f jbe L37 04f1 80 be 4a ff 4f cmp byte ptr -0b6H[bp],4fH 04f6 77 28 ja L37 04f8 8b 86 5b ff mov ax,-0a5H[bp] 04fc 50 push ax 04fd 8a 86 4a ff mov al,-0b6H[bp] 0501 30 e4 xor ah,ah 0503 03 86 57 ff add ax,-0a9H[bp] 0507 8b f8 mov di,ax 0509 07 pop es 050a 26 8a 15 mov dl,es:[di] 050d 8a 86 4a ff mov al,-0b6H[bp] 0511 30 e4 xor ah,ah 0513 40 inc ax 0514 8b f8 mov di,ax 0516 88 93 5f ff mov -0a1H[bp+di],dl 051a fe 86 4a ff inc byte ptr -0b6H[bp] 051e eb b9 jmp L36 0520 8a 86 4a ff L37 mov al,-0b6H[bp] 0524 88 86 5f ff mov -0a1H[bp],al 0528 8d be 5f ff lea di,-0a1H[bp] 052c 16 push ss 052d 57 push di 052e c4 7e 0a les di,dword ptr +0aH[bp] 0531 06 push es 0532 57 push di 0533 b8 4f 00 mov ax,004fH 0536 50 push ax 0537 9a 00 00 00 00 call far SYSTEM_00C 053c 89 ec L38 mov sp,bp 053e 5d pop bp 053f ca 04 00 retf 0004H 0542 GETVERIFY: 0542 55 TSUNT45_007 push bp 0543 89 e5 mov bp,sp 0545 b8 14 00 mov ax,0014H 0548 9a 00 00 00 00 call far SYSTEM_034 054d 83 ec 14 sub sp,0014H 0550 8d 7e ec lea di,-14H[bp] 0553 16 push ss 0554 57 push di 0555 b8 14 00 mov ax,0014H 0558 50 push ax 0559 b0 00 mov al,00H 055b 50 push ax 055c 9a 00 00 00 00 call far SYSTEM_05C 0561 c6 46 ed 54 mov byte ptr -13H[bp],54H 0565 8d 7e ec lea di,-14H[bp] 0568 16 push ss 0569 57 push di 056a 9a 00 00 00 00 call far DOS_002 056f 80 7e ec 01 cmp byte ptr -14H[bp],01H 0573 75 09 jne L39 0575 c4 7e 06 les di,dword ptr +6H[bp] 0578 26 c6 05 01 mov byte ptr es:[di],01H 057c eb 07 jmp L40 057e c4 7e 06 L39 les di,dword ptr +6H[bp] 0581 26 c6 05 00 mov byte ptr es:[di],00H 0585 89 ec L40 mov sp,bp 0587 5d pop bp 0588 ca 04 00 retf 0004H 058b SETVERIFY: 058b 55 TSUNT45_008 push bp 058c 89 e5 mov bp,sp 058e b8 14 00 mov ax,0014H 0591 9a 00 00 00 00 call far SYSTEM_034 0596 83 ec 14 sub sp,0014H 0599 8d 7e ec lea di,-14H[bp] 059c 16 push ss 059d 57 push di 059e b8 14 00 mov ax,0014H 05a1 50 push ax 05a2 b0 00 mov al,00H 05a4 50 push ax 05a5 9a 00 00 00 00 call far SYSTEM_05C 05aa c6 46 ed 2e mov byte ptr -13H[bp],2eH 05ae 80 7e 06 00 cmp byte ptr +6H[bp],00H 05b2 74 06 je L41 05b4 c6 46 ec 01 mov byte ptr -14H[bp],01H 05b8 eb 04 jmp L42 05ba c6 46 ec 00 L41 mov byte ptr -14H[bp],00H 05be 8d 7e ec L42 lea di,-14H[bp] 05c1 16 push ss 05c2 57 push di 05c3 9a 00 00 00 00 call far DOS_002 05c8 89 ec mov sp,bp 05ca 5d pop bp 05cb ca 02 00 retf 0002H 05ce GETCBREAK: 05ce 55 TSUNT45_009 push bp 05cf 89 e5 mov bp,sp 05d1 b8 14 00 mov ax,0014H 05d4 9a 00 00 00 00 call far SYSTEM_034 05d9 83 ec 14 sub sp,0014H 05dc c6 46 ed 33 mov byte ptr -13H[bp],33H 05e0 c6 46 ec 00 mov byte ptr -14H[bp],00H 05e4 8d 7e ec lea di,-14H[bp] 05e7 16 push ss 05e8 57 push di 05e9 9a 00 00 00 00 call far DOS_002 05ee 80 7e f2 01 cmp byte ptr -0eH[bp],01H 05f2 74 04 je L43 05f4 b0 00 mov al,00H 05f6 eb 02 jmp L44 05f8 b0 01 L43 mov al,01H 05fa c4 7e 06 L44 les di,dword ptr +6H[bp] 05fd 26 88 05 mov es:[di],al 0600 89 ec mov sp,bp 0602 5d pop bp 0603 ca 04 00 retf 0004H 0606 SETCBREAK: 0606 55 TSUNT45_00A push bp 0607 89 e5 mov bp,sp 0609 b8 14 00 mov ax,0014H 060c 9a 00 00 00 00 call far SYSTEM_034 0611 83 ec 14 sub sp,0014H 0614 c6 46 ed 33 mov byte ptr -13H[bp],33H 0618 c6 46 ec 01 mov byte ptr -14H[bp],01H 061c 80 7e 06 00 cmp byte ptr +6H[bp],00H 0620 74 06 je L45 0622 c6 46 f2 01 mov byte ptr -0eH[bp],01H 0626 eb 04 jmp L46 0628 c6 46 f2 00 L45 mov byte ptr -0eH[bp],00H 062c 8d 7e ec L46 lea di,-14H[bp] 062f 16 push ss 0630 57 push di 0631 9a 00 00 00 00 call far DOS_002 0636 89 ec mov sp,bp 0638 5d pop bp 0639 ca 02 00 retf 0002H No disassembly errors ------------------------------------------------------------