Power-Programmierung

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

/ Power-Programmierung / CD1.mdf / pascal / library / dos / tsr / tsrtpu / tsr.dis next >

Wrap

Text File | 1994-06-19 | 16.3 KB | 296 lines

Module: TSR.PAS Group: 'DGROUP' _DATA,_BSS Segment: TSR_TEXT PARA 000002b8 bytes 0000 55 TSR_002 push bp 0001 89 e5 mov bp,sp 0003 31 c0 xor ax,ax 0005 9a 00 00 00 00 call far SYSTEM_034 000a ff 5e 04 call dword ptr +4H[bp] 000d 89 ec mov sp,bp 000f 5d pop bp 0010 c2 04 00 ret 0004H 0013 50 TSR_003 push ax 0014 53 push bx 0015 51 push cx 0016 52 push dx 0017 56 push si 0018 57 push di 0019 1e push ds 001a 06 push es 001b 55 push bp 001c 89 e5 mov bp,sp 001e 83 ec 15 sub sp,0015H 0021 b8 00 00 mov ax,seg INSTALLEDPROC 0024 8e d8 mov ds,ax 0026 80 7e 11 00 cmp byte ptr +11H[bp],00H 002a 75 06 jne L1 002c c6 46 ff 01 mov byte ptr -1H[bp],01H 0030 eb 04 jmp L2 0032 c6 46 ff 00 L1 mov byte ptr -1H[bp],00H 0036 8b 46 10 L2 mov ax,+10H[bp] 0039 89 46 eb mov -15H[bp],ax 003c a0 00 00 mov al,L29 003f 50 push ax 0040 8d 7e eb lea di,-15H[bp] 0043 16 push ss 0044 57 push di 0045 9a 00 00 00 00 call far DOS_001 004a 8b 46 fd mov ax,-3H[bp] 004d 89 46 16 mov +16H[bp],ax 0050 8b 46 eb mov ax,-15H[bp] 0053 89 46 10 mov +10H[bp],ax 0056 80 7e ff 00 cmp byte ptr -1H[bp],00H 005a 74 35 je L3 005c 80 3e 00 00 00 cmp byte ptr L30,00H 0061 75 2e jne L3 0063 a0 00 00 mov al,HOTSCANCODE 0066 30 e4 xor ah,ah 0068 b9 08 00 mov cx,0008H 006b d3 e0 shl ax,cl 006d 3b 46 10 cmp ax,+10H[bp] 0070 75 1f jne L3 0072 c6 06 00 00 00 mov byte ptr CRT_BSS,00H 0077 c6 06 00 00 01 mov byte ptr L30,01H 007c ff 36 00 00 push L26 0080 ff 36 00 00 push INSTALLEDPROC 0084 e8 00 00 call TSR_002 0087 c6 06 00 00 00 mov byte ptr L30,00H 008c c6 06 00 00 01 mov byte ptr CRT_BSS,01H 0091 89 ec L3 mov sp,bp 0093 5d pop bp 0094 07 pop es 0095 1f pop ds 0096 5f pop di 0097 5e pop si 0098 5a pop dx 0099 59 pop cx 009a 5b pop bx 009b 58 pop ax 009c cf iret 009d 55 TSR_004 push bp 009e 89 e5 mov bp,sp 00a0 b8 07 00 mov ax,0007H 00a3 9a 00 00 00 00 call far SYSTEM_034 00a8 83 ec 07 sub sp,0007H 00ab c6 46 fa 00 mov byte ptr -6H[bp],00H 00af c6 46 f9 5f mov byte ptr -7H[bp],5fH 00b3 fe 46 f9 L4 inc byte ptr -7H[bp] 00b6 31 c0 xor ax,ax 00b8 50 push ax 00b9 8a 46 f9 mov al,-7H[bp] 00bc 30 e4 xor ah,ah 00be b9 02 00 mov cx,0002H 00c1 d3 e0 shl ax,cl 00c3 05 02 00 add ax,0002H 00c6 8b f8 mov di,ax 00c8 07 pop es 00c9 26 8b 05 mov ax,es:[di] 00cc 89 46 fd mov -3H[bp],ax 00cf 31 c0 xor ax,ax 00d1 50 push ax 00d2 8a 46 f9 mov al,-7H[bp] 00d5 30 e4 xor ah,ah 00d7 b9 02 00 mov cx,0002H 00da d3 e0 shl ax,cl 00dc 8b f8 mov di,ax 00de 07 pop es 00df 26 8b 05 mov ax,es:[di] 00e2 89 46 fb mov -5H[bp],ax 00e5 83 7e fd 00 cmp word ptr -3H[bp],0000H 00e9 75 0a jne L5 00eb 83 7e fb 00 cmp word ptr -5H[bp],0000H 00ef 75 04 jne L5 00f1 c6 46 fa 01 mov byte ptr -6H[bp],01H 00f5 80 7e f9 80 L5 cmp byte ptr -7H[bp],80H 00f9 74 06 je L6 00fb 80 7e fa 00 cmp byte ptr -6H[bp],00H 00ff 74 b2 je L4 0101 80 7e fa 00 L6 cmp byte ptr -6H[bp],00H 0105 74 08 je L7 0107 8a 46 f9 mov al,-7H[bp] 010a 88 46 ff mov -1H[bp],al 010d eb 04 jmp L8 010f c6 46 ff 00 L7 mov byte ptr -1H[bp],00H 0113 8a 46 ff L8 mov al,-1H[bp] 0116 89 ec mov sp,bp 0118 5d pop bp 0119 c3 ret 011a 36 59 L9 pop cx 011c 6f outsw 011d 75 20 jne L10 011f 6e outsb 0120 65 65 64 20 61 74 and fs:+74H[bx+di],ah 0126 20 6c 65 and +65H[si],ch 0129 61 popa 012a 73 74 jae L15 012c 20 4d 53 and +53H[di],cl 012f 2d 44 4f sub ax,4f44H 0132 53 push bx 0133 20 76 65 and +65H[bp],dh 0136 72 73 jb L16 0138 69 6f 6e 20 32 imul bp,+6eH[bx],3220H 013d 20 74 6f and +6fH[si],dh 0140 20 72 75 and +75H[bp+si],dh 0143 6e outsb 0144 20 74 68 and +68H[si],dh 0147 69 73 20 70 72 imul si,+20H[bp+di],7270H 014c 6f outsw 014d 67 72 61 jb L17 0150 6d insw 0151 19 54 68 L11 sbb +68H[si],dx 0154 61 popa 0155 74 27 je L13 0157 73 20 jae L12 0159 61 popa 015a 6c insb 015b 72 65 jb L21 015d 61 popa 015e 64 79 20 jns L14 0161 69 6e 20 6d 65 imul bp,+20H[bp],656dH 0166 6d insw 0167 6f outsw 0168 72 79 jb L22 016a 21 55 89 and -77H[di],dx 016d e5 b8 in ax,0b8H 016f 20 00 and [bx+si],al 0171 9a 00 00 00 00 call far SYSTEM_034 0176 83 ec 20 sub sp,0020H 0179 c6 46 ed 30 L12 mov byte ptr -13H[bp],30H 017d 8d 7e ec lea di,-14H[bp] 0180 16 push ss 0181 57 L14 push di 0182 9a 00 00 00 00 call far DOS_002 0187 80 7e ec 00 cmp byte ptr -14H[bp],00H 018b 75 24 jne L17 018d bf 00 00 mov di,offset SYSTEM_BSS+100H 0190 1e push ds 0191 57 push di 0192 bf 00 00 mov di,offset L9 0195 0e push cs 0196 57 push di 0197 31 c0 xor ax,ax 0199 50 push ax 019a 9a 00 00 00 00 call far SYSTEM_036 019f 9a 00 00 00 00 call far SYSTEM_03B 01a4 9a 00 00 00 00 call far SYSTEM_032 01a9 b8 01 00 mov ax,0001H 01ac 9a 00 00 00 00 call far SYSTEM_003 01b1 c6 46 e7 5f L17 mov byte ptr -19H[bp],5fH 01b5 fe 46 e7 L18 inc byte ptr -19H[bp] 01b8 c6 46 e0 00 mov byte ptr -20H[bp],00H 01bc eb 03 jmp L20 01be fe 46 e0 L19 inc byte ptr -20H[bp] 01c1 31 c0 L20 xor ax,ax 01c3 50 push ax 01c4 8a 46 e0 mov al,-20H[bp] 01c7 30 e4 xor ah,ah 01c9 8b d0 mov dx,ax 01cb 8a 46 e7 mov al,-19H[bp] 01ce 30 e4 xor ah,ah 01d0 b9 02 00 mov cx,0002H 01d3 d3 e0 shl ax,cl 01d5 03 c2 add ax,dx 01d7 8b f8 mov di,ax 01d9 07 pop es 01da 26 8a 15 mov dl,es:[di] 01dd 8a 46 e0 mov al,-20H[bp] 01e0 30 e4 xor ah,ah 01e2 40 inc ax 01e3 8b f8 L22 mov di,ax 01e5 88 53 e1 mov -1fH[bp+di],dl 01e8 80 7e e0 03 cmp byte ptr -20H[bp],03H 01ec 75 d0 jne L19 01ee c6 46 e1 04 mov byte ptr -1fH[bp],04H 01f2 8d 7e e1 lea di,-1fH[bp] 01f5 16 push ss 01f6 57 push di 01f7 bf 00 00 mov di,offset TSRSIGN 01fa 1e push ds 01fb 57 push di 01fc 9a 00 00 00 00 call far SYSTEM_011 0201 75 24 jne L23 0203 bf 00 00 mov di,offset SYSTEM_BSS+100H 0206 1e push ds 0207 57 push di 0208 bf 00 00 mov di,offset L11 020b 0e push cs 020c 57 push di 020d 31 c0 xor ax,ax 020f 50 push ax 0210 9a 00 00 00 00 call far SYSTEM_036 0215 9a 00 00 00 00 call far SYSTEM_03B 021a 9a 00 00 00 00 call far SYSTEM_032 021f b8 02 00 mov ax,0002H 0222 9a 00 00 00 00 call far SYSTEM_003 0227 80 7e e7 80 L23 cmp byte ptr -19H[bp],80H 022b 75 88 jne L18 022d b0 16 mov al,16H 022f 50 push ax 0230 bf 00 00 mov di,offset L27 0233 1e push ds 0234 57 push di 0235 9a 00 00 00 00 call far DOS_011 023a b0 16 mov al,16H 023c 50 push ax 023d b8 00 00 mov ax,offset TSR_003 0240 8c ca mov dx,cs 0242 52 push dx 0243 50 push ax 0244 9a 00 00 00 00 call far DOS_012 0249 e8 00 00 call TSR_004 024c a2 00 00 mov L29,al 024f a0 00 00 mov al,L29 0252 50 push ax 0253 ff 36 00 00 push L28 0257 ff 36 00 00 push L27 025b 9a 00 00 00 00 call far DOS_012 0260 e8 00 00 call TSR_004 0263 88 46 e6 mov -1aH[bp],al 0266 c6 46 e0 00 mov byte ptr -20H[bp],00H 026a eb 03 jmp L25 026c fe 46 e0 L24 inc byte ptr -20H[bp] 026f 8a 46 e0 L25 mov al,-20H[bp] 0272 30 e4 xor ah,ah 0274 40 inc ax 0275 8b f8 mov di,ax 0277 8a 9d 00 00 mov bl,TSRSIGN[di] 027b 31 c0 xor ax,ax 027d 50 push ax 027e 8a 46 e0 mov al,-20H[bp] 0281 30 e4 xor ah,ah 0283 8b d0 mov dx,ax 0285 8a 46 e6 mov al,-1aH[bp] 0288 30 e4 xor ah,ah 028a b9 02 00 mov cx,0002H 028d d3 e0 shl ax,cl 028f 03 c2 add ax,dx 0291 8b f8 mov di,ax 0293 07 pop es 0294 26 88 1d mov es:[di],bl 0297 80 7e e0 03 cmp byte ptr -20H[bp],03H 029b 75 cf jne L24 029d 31 c0 xor ax,ax 029f 50 push ax 02a0 9a 00 00 00 00 call far DOS_013 02a5 89 ec mov sp,bp 02a7 5d pop bp 02a8 cb retf 02a9 TSR_000: 02a9 89 e5 TSR_INIT mov bp,sp 02ab c6 06 00 00 00 mov byte ptr L30,00H 02b0 c6 06 00 00 68 mov byte ptr HOTSCANCODE,68H 02b5 89 ec mov sp,bp 02b7 cb retf No disassembly errors ------------------------------------------------------------ Segment: _BSS WORD 00000014 bytes No disassembly errors ------------------------------------------------------------