Power-Programmierung

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

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

Wrap

Text File | 1994-06-19 | 12.3 KB | 223 lines

Module: TSUNTC.PAS Group: 'DGROUP' _DATA,_BSS Segment: TSUNTC_TEXT PARA 0000021d bytes 0000 55 TSUNTC_004 push bp 0001 89 e5 mov bp,sp 0003 b8 06 00 mov ax,0006H 0006 9a 00 00 00 00 call far SYSTEM_034 000b 83 ec 06 sub sp,0006H 000e 8b 46 0c mov ax,+0cH[bp] 0011 8b 5e 0e mov bx,+0eH[bp] 0014 8b 56 10 mov dx,+10H[bp] 0017 9a 00 00 00 00 call far SYSTEM_080 001c 8b 4e 06 mov cx,+6H[bp] 001f 8b 76 08 mov si,+8H[bp] 0022 8b 7e 0a mov di,+0aH[bp] 0025 9a 00 00 00 00 call far SYSTEM_070 002a 9a 00 00 00 00 call far SYSTEM_081 002f 89 46 fa mov -6H[bp],ax 0032 89 5e fc mov -4H[bp],bx 0035 89 56 fe mov -2H[bp],dx 0038 8b 46 fa mov ax,-6H[bp] 003b 8b 5e fc mov bx,-4H[bp] 003e 8b 56 fe mov dx,-2H[bp] 0041 89 ec mov sp,bp 0043 5d pop bp 0044 c2 0e 00 ret 000eH 0047 18 63 20 L1 sbb +20H[bp+di],ah 004a 63 23 arpl sp,[bp+di] 004c 64 20 64 23 and fs:+23H[si],ah 0050 65 20 66 20 and gs:+20H[bp],ah 0054 66 23 67 20 and esp,+20H[bx] 0058 67 23 61 20 and sp,+20H[ecx] 005c 61 popa 005d 23 62 20 and sp,+20H[bp+si] 0060 21 50 6c L2 and +6cH[bx+si],dx 0063 61 popa 0064 79 6e jns L7 0066 6f outsw 0067 74 65 je L5 0069 3a 20 cmp ah,[bx+si] 006b 50 push ax 006c 61 popa 006d 72 61 jb L6 006f 6d insw 0070 65 74 65 je L8 0073 72 20 jb L3 0075 6f outsw 0076 75 74 jne L10 0078 20 6f 75 and +75H[bx],ch 007b 66 20 72 61 and +61H[bp+si],dh 007f 6e outsb 0080 67 65 55 push bp 0083 89 e5 mov bp,sp 0085 b8 06 01 mov ax,0106H 0088 9a 00 00 00 00 call far SYSTEM_034 008d 81 ec 06 01 sub sp,0106H 0091 c4 7e 0a les di,dword ptr +0aH[bp] 0094 06 push es 0095 57 L3 push di 0096 8d be 00 ff lea di,-100H[bp] 009a 16 push ss 009b 57 push di 009c b8 ff 00 mov ax,00ffH 009f 50 push ax 00a0 9a 00 00 00 00 call far SYSTEM_00C 00a5 8d be 00 ff lea di,-100H[bp] 00a9 16 push ss 00aa 57 push di 00ab bf 00 00 mov di,offset L1 00ae 0e push cs 00af 57 push di 00b0 9a 00 00 00 00 call far SYSTEM_010 00b5 89 86 fc fe mov -104H[bp],ax 00b9 83 be fc fe 00 cmp word ptr -104H[bp],0000H 00be 74 08 je L4 00c0 8a 86 fc fe mov al,-104H[bp] 00c4 d0 e8 shr al,1 00c6 72 23 jb L9 00c8 bf 00 00 L4 mov di,offset SYSTEM_BSS+100H 00cb 1e push ds 00cc 57 push di 00cd bf 00 00 mov di,offset L2 00d0 0e L6 push cs 00d1 57 push di 00d2 31 c0 xor ax,ax 00d4 50 L7 push ax 00d5 9a 00 00 00 00 call far SYSTEM_036 00da 9a 00 00 00 00 call far SYSTEM_03A 00df 9a 00 00 00 00 call far SYSTEM_032 00e4 31 c0 xor ax,ax 00e6 9a 00 00 00 00 call far SYSTEM_003 00eb 8b 86 fc fe L9 mov ax,-104H[bp] 00ef 99 cwd 00f0 9a 00 00 00 00 call far SYSTEM_073 00f5 b9 82 00 mov cx,0082H 00f8 31 f6 xor si,si 00fa 31 ff xor di,di 00fc 9a 00 00 00 00 call far SYSTEM_071 0101 9a 00 00 00 00 call far SYSTEM_075 0106 52 push dx 0107 50 push ax 0108 8b 46 08 mov ax,+8H[bp] 010b 2d 02 00 sub ax,0002H 010e b9 0c 00 mov cx,000cH 0111 f7 e9 imul cx 0113 99 cwd 0114 59 pop cx 0115 5b pop bx 0116 03 c1 add ax,cx 0118 13 d3 adc dx,bx 011a 89 86 fe fe mov -102H[bp],ax 011e b8 82 00 mov ax,0082H 0121 31 db xor bx,bx 0123 31 d2 xor dx,dx 0125 52 push dx 0126 53 push bx 0127 50 push ax 0128 b8 81 00 mov ax,0081H 012b 31 db xor bx,bx 012d 31 d2 xor dx,dx 012f b9 84 00 mov cx,0084H 0132 31 f6 xor si,si 0134 bf 00 40 mov di,4000H 0137 9a 00 00 00 00 call far SYSTEM_071 013c 52 push dx 013d 53 push bx 013e 50 push ax 013f 55 push bp 0140 e8 00 00 call TSUNTC_004 0143 52 push dx 0144 53 push bx 0145 50 push ax 0146 8b 86 fe fe mov ax,-102H[bp] 014a 99 cwd 014b 9a 00 00 00 00 call far SYSTEM_073 0150 52 push dx 0151 53 push bx 0152 50 push ax 0153 55 push bp 0154 e8 00 00 call TSUNTC_004 0157 b9 86 5c mov cx,5c86H 015a be 8f c2 mov si,0c28fH 015d bf f5 76 mov di,76f5H 0160 9a 00 00 00 00 call far SYSTEM_070 0165 9a 00 00 00 00 call far SYSTEM_074 016a 89 86 fa fe mov -106H[bp],ax 016e ff b6 fa fe push -106H[bp] 0172 9a 00 00 00 00 call far CRT_013 0177 ff 76 06 push +6H[bp] 017a 9a 00 00 00 00 call far CRT_012 017f 9a 00 00 00 00 call far CRT_014 0184 b8 14 00 mov ax,0014H 0187 50 push ax 0188 9a 00 00 00 00 call far CRT_012 018d 89 ec mov sp,bp 018f 5d pop bp 0190 ca 08 00 retf 0008H 0193 REVCOLOR: 0193 55 TSUNTC_002 push bp 0194 89 e5 mov bp,sp 0196 b8 03 00 mov ax,0003H 0199 9a 00 00 00 00 call far SYSTEM_034 019e 83 ec 03 sub sp,0003H 01a1 a0 00 00 mov al,CRT_BSS+6H 01a4 24 07 and al,07H 01a6 88 46 fd mov -3H[bp],al 01a9 a0 00 00 mov al,CRT_BSS+6H 01ac 24 70 and al,70H 01ae 88 46 fe mov -2H[bp],al 01b1 a0 00 00 mov al,CRT_BSS+6H 01b4 24 88 and al,88H 01b6 88 46 ff mov -1H[bp],al 01b9 8a 46 fd mov al,-3H[bp] 01bc 30 e4 xor ah,ah 01be b9 04 00 mov cx,0004H 01c1 d3 e0 shl ax,cl 01c3 8b d8 mov bx,ax 01c5 8a 46 fe mov al,-2H[bp] 01c8 30 e4 xor ah,ah 01ca b9 04 00 mov cx,0004H 01cd d3 e8 shr ax,cl 01cf 8b d0 mov dx,ax 01d1 8a 46 ff mov al,-1H[bp] 01d4 30 e4 xor ah,ah 01d6 03 c2 add ax,dx 01d8 03 c3 add ax,bx 01da a2 00 00 mov CRT_BSS+6H,al 01dd 89 ec mov sp,bp 01df 5d pop bp 01e0 cb retf 01e1 HIBACK: 01e1 55 TSUNTC_003 push bp 01e2 89 e5 mov bp,sp 01e4 b8 14 00 mov ax,0014H 01e7 9a 00 00 00 00 call far SYSTEM_034 01ec 83 ec 14 sub sp,0014H 01ef 8d 7e ec lea di,-14H[bp] 01f2 16 push ss 01f3 57 push di 01f4 b8 14 00 mov ax,0014H 01f7 50 push ax 01f8 b0 00 mov al,00H 01fa 50 push ax 01fb 9a 00 00 00 00 call far SYSTEM_05C 0200 c6 46 ed 10 mov byte ptr -13H[bp],10H 0204 c6 46 ec 03 mov byte ptr -14H[bp],03H 0208 c6 46 ee 00 mov byte ptr -12H[bp],00H 020c b0 10 mov al,10H 020e 50 push ax 020f 8d 7e ec lea di,-14H[bp] 0212 16 push ss 0213 57 push di 0214 9a 00 00 00 00 call far DOS_001 0219 89 ec mov sp,bp 021b 5d pop bp 021c cb retf No disassembly errors ------------------------------------------------------------