home *** CD-ROM | disk | FTP | other *** search
Text File | 1994-06-19 | 111.6 KB | 1,963 lines |
-
- Module: PCBDOORS.PAS
- Group: 'DGROUP' _DATA,_BSS
-
- Segment: PCBDOORS_TEXT PARA 0000123a bytes
- 0000 55 PCBDOORS_00B push bp
- 0001 89 e5 mov bp,sp
- 0003 b8 14 00 mov ax,0014H
- 0006 9a 00 00 00 00 call far SYSTEM_034
- 000b 83 ec 14 sub sp,0014H
- 000e c7 46 ec 00 06 mov word ptr -14H[bp],0600H
- 0013 c7 46 ee 00 07 mov word ptr -12H[bp],0700H
- 0018 8b 46 0a mov ax,+0aH[bp]
- 001b 48 dec ax
- 001c b9 08 00 mov cx,0008H
- 001f d3 e0 shl ax,cl
- 0021 03 46 0c add ax,+0cH[bp]
- 0024 48 dec ax
- 0025 89 46 f0 mov -10H[bp],ax
- 0028 8b 46 06 mov ax,+6H[bp]
- 002b 48 dec ax
- 002c b9 08 00 mov cx,0008H
- 002f d3 e0 shl ax,cl
- 0031 03 46 08 add ax,+8H[bp]
- 0034 48 dec ax
- 0035 89 46 f2 mov -0eH[bp],ax
- 0038 b0 10 mov al,10H
- 003a 50 push ax
- 003b 8d 7e ec lea di,-14H[bp]
- 003e 16 push ss
- 003f 57 push di
- 0040 9a 00 00 00 00 call far DOS_001
- 0045 89 ec mov sp,bp
- 0047 5d pop bp
- 0048 ca 08 00 retf 0008H
- 004b 55 PCBDOORS_00C push bp
- 004c 89 e5 mov bp,sp
- 004e b8 14 00 mov ax,0014H
- 0051 9a 00 00 00 00 call far SYSTEM_034
- 0056 83 ec 14 sub sp,0014H
- 0059 c7 46 ec 00 02 mov word ptr -14H[bp],0200H
- 005e 31 c0 xor ax,ax
- 0060 89 46 ee mov -12H[bp],ax
- 0063 8b 46 06 mov ax,+6H[bp]
- 0066 48 dec ax
- 0067 b9 08 00 mov cx,0008H
- 006a d3 e0 shl ax,cl
- 006c 03 46 08 add ax,+8H[bp]
- 006f 48 dec ax
- 0070 89 46 f2 mov -0eH[bp],ax
- 0073 b0 10 mov al,10H
- 0075 50 push ax
- 0076 8d 7e ec lea di,-14H[bp]
- 0079 16 push ss
- 007a 57 push di
- 007b 9a 00 00 00 00 call far DOS_001
- 0080 89 ec mov sp,bp
- 0082 5d pop bp
- 0083 ca 04 00 retf 0004H
- 0086 GET_SYS:
- 0086 55 PCBDOORS_001 push bp
- 0087 89 e5 mov bp,sp
- 0089 b8 16 04 mov ax,0416H
- 008c 9a 00 00 00 00 call far SYSTEM_034
- 0091 81 ec 16 04 sub sp,0416H
- 0095 c4 7e 12 les di,dword ptr +12H[bp]
- 0098 06 push es
- 0099 57 push di
- 009a 8d be 7f ff lea di,-81H[bp]
- 009e 16 push ss
- 009f 57 push di
- 00a0 b8 80 00 mov ax,0080H
- 00a3 50 push ax
- 00a4 9a 00 00 00 00 call far SYSTEM_00C
- 00a9 c4 7e 0e les di,dword ptr +0eH[bp]
- 00ac 26 c6 05 00 mov byte ptr es:[di],00H
- 00b0 c4 7e 0a les di,dword ptr +0aH[bp]
- 00b3 26 c6 05 00 mov byte ptr es:[di],00H
- 00b7 c4 7e 06 les di,dword ptr +6H[bp]
- 00ba 26 c6 05 00 mov byte ptr es:[di],00H
- 00be c6 86 f2 fd 00 mov byte ptr -20eH[bp],00H
- 00c3 c6 86 f7 fd 00 mov byte ptr -209H[bp],00H
- 00c8 8d be 7f fe lea di,-181H[bp]
- 00cc 16 push ss
- 00cd 57 push di
- 00ce 8d be 7f ff lea di,-81H[bp]
- 00d2 16 push ss
- 00d3 57 push di
- 00d4 9a 00 00 00 00 call far SYSTEM_045
- 00d9 8d be 7f fe lea di,-181H[bp]
- 00dd 16 push ss
- 00de 57 push di
- 00df 9a 00 00 00 00 call far SYSTEM_046
- 00e4 9a 00 00 00 00 call far SYSTEM_031
- 00e9 09 c0 or ax,ax
- 00eb 75 1c jne L1
- 00ed 8d be 7f fe lea di,-181H[bp]
- 00f1 16 push ss
- 00f2 57 push di
- 00f3 8d be fe fd lea di,-202H[bp]
- 00f7 16 push ss
- 00f8 57 push di
- 00f9 b8 80 00 mov ax,0080H
- 00fc 50 push ax
- 00fd 9a 00 00 00 00 call far SYSTEM_03E
- 0102 9a 00 00 00 00 call far SYSTEM_041
- 0107 eb 07 jmp L2
- 0109 31 c0 L1 xor ax,ax
- 010b 9a 00 00 00 00 call far SYSTEM_003
- 0110 8d be 7f fe L2 lea di,-181H[bp]
- 0114 16 push ss
- 0115 57 push di
- 0116 9a 00 00 00 00 call far SYSTEM_048
- 011b 8d be ea fc lea di,-316H[bp]
- 011f 16 push ss
- 0120 57 push di
- 0121 8d be fe fd lea di,-202H[bp]
- 0125 16 push ss
- 0126 57 push di
- 0127 b8 0f 00 mov ax,000fH
- 012a 50 push ax
- 012b b8 19 00 mov ax,0019H
- 012e 50 push ax
- 012f 9a 00 00 00 00 call far SYSTEM_00E
- 0134 c4 7e 0e les di,dword ptr +0eH[bp]
- 0137 06 push es
- 0138 57 push di
- 0139 b8 19 00 mov ax,0019H
- 013c 50 push ax
- 013d 9a 00 00 00 00 call far SYSTEM_00C
- 0142 8d be ea fc lea di,-316H[bp]
- 0146 16 push ss
- 0147 57 push di
- 0148 8d be fe fd lea di,-202H[bp]
- 014c 16 push ss
- 014d 57 push di
- 014e b8 2a 00 mov ax,002aH
- 0151 50 push ax
- 0152 b8 0f 00 mov ax,000fH
- 0155 50 push ax
- 0156 9a 00 00 00 00 call far SYSTEM_00E
- 015b c4 7e 0a les di,dword ptr +0aH[bp]
- 015e 06 push es
- 015f 57 push di
- 0160 b8 0f 00 mov ax,000fH
- 0163 50 push ax
- 0164 9a 00 00 00 00 call far SYSTEM_00C
- 0169 8d be ea fc lea di,-316H[bp]
- 016d 16 push ss
- 016e 57 push di
- 016f 8d be fe fd lea di,-202H[bp]
- 0173 16 push ss
- 0174 57 push di
- 0175 b8 0b 00 mov ax,000bH
- 0178 50 push ax
- 0179 b8 04 00 mov ax,0004H
- 017c 50 push ax
- 017d 9a 00 00 00 00 call far SYSTEM_00E
- 0182 c4 7e 06 les di,dword ptr +6H[bp]
- 0185 06 push es
- 0186 57 push di
- 0187 b8 04 00 mov ax,0004H
- 018a 50 push ax
- 018b 9a 00 00 00 00 call far SYSTEM_00C
- 0190 8d be ea fc lea di,-316H[bp]
- 0194 16 push ss
- 0195 57 push di
- 0196 8d be fe fd lea di,-202H[bp]
- 019a 16 push ss
- 019b 57 push di
- 019c b8 55 00 mov ax,0055H
- 019f 50 push ax
- 01a0 b8 02 00 mov ax,0002H
- 01a3 50 push ax
- 01a4 9a 00 00 00 00 call far SYSTEM_00E
- 01a9 8d be ea fb lea di,-416H[bp]
- 01ad 16 push ss
- 01ae 57 push di
- 01af 8d be fe fd lea di,-202H[bp]
- 01b3 16 push ss
- 01b4 57 push di
- 01b5 b8 58 00 mov ax,0058H
- 01b8 50 push ax
- 01b9 b8 02 00 mov ax,0002H
- 01bc 50 push ax
- 01bd 9a 00 00 00 00 call far SYSTEM_00E
- 01c2 9a 00 00 00 00 call far SYSTEM_00F
- 01c7 8d be f2 fd lea di,-20eH[bp]
- 01cb 16 push ss
- 01cc 57 push di
- 01cd b8 04 00 mov ax,0004H
- 01d0 50 push ax
- 01d1 9a 00 00 00 00 call far SYSTEM_00C
- 01d6 8d be ea fc lea di,-316H[bp]
- 01da 16 push ss
- 01db 57 push di
- 01dc 8d be f2 fd lea di,-20eH[bp]
- 01e0 16 push ss
- 01e1 57 push di
- 01e2 b8 01 00 mov ax,0001H
- 01e5 50 push ax
- 01e6 b8 02 00 mov ax,0002H
- 01e9 50 push ax
- 01ea 9a 00 00 00 00 call far SYSTEM_00E
- 01ef 8d be fc fd lea di,-204H[bp]
- 01f3 16 push ss
- 01f4 57 push di
- 01f5 9a 00 00 00 00 call far SYSTEM_062
- 01fa 89 86 ec fd mov -214H[bp],ax
- 01fe 8d be ea fc lea di,-316H[bp]
- 0202 16 push ss
- 0203 57 push di
- 0204 8d be f2 fd lea di,-20eH[bp]
- 0208 16 push ss
- 0209 57 push di
- 020a b8 03 00 mov ax,0003H
- 020d 50 push ax
- 020e b8 02 00 mov ax,0002H
- 0211 50 push ax
- 0212 9a 00 00 00 00 call far SYSTEM_00E
- 0217 8d be fc fd lea di,-204H[bp]
- 021b 16 push ss
- 021c 57 push di
- 021d 9a 00 00 00 00 call far SYSTEM_062
- 0222 89 86 ea fd mov -216H[bp],ax
- 0226 8b 86 ec fd mov ax,-214H[bp]
- 022a b9 3c 00 mov cx,003cH
- 022d f7 e9 imul cx
- 022f 03 86 ea fd add ax,-216H[bp]
- 0233 89 86 ea fd mov -216H[bp],ax
- 0237 8d be ea fc lea di,-316H[bp]
- 023b 16 push ss
- 023c 57 push di
- 023d 8d be fe fd lea di,-202H[bp]
- 0241 16 push ss
- 0242 57 push di
- 0243 b8 4d 00 mov ax,004dH
- 0246 50 push ax
- 0247 b8 04 00 mov ax,0004H
- 024a 50 push ax
- 024b 9a 00 00 00 00 call far SYSTEM_00E
- 0250 8d be f7 fd lea di,-209H[bp]
- 0254 16 push ss
- 0255 57 push di
- 0256 b8 04 00 mov ax,0004H
- 0259 50 push ax
- 025a 9a 00 00 00 00 call far SYSTEM_00C
- 025f c7 86 f0 fd 01 00 mov word ptr -210H[bp],0001H
- 0265 31 c0 xor ax,ax
- 0267 89 86 ee fd mov -212H[bp],ax
- 026b 8b 86 f0 fd mov ax,-210H[bp]
- 026f b9 3c 00 mov cx,003cH
- 0272 f7 e9 imul cx
- 0274 03 86 ee fd add ax,-212H[bp]
- 0278 89 86 ee fd mov -212H[bp],ax
- 027c 8b 86 ea fd mov ax,-216H[bp]
- 0280 03 86 ee fd add ax,-212H[bp]
- 0284 a3 00 00 mov TIME_OFF,ax
- 0287 c4 7e 0e L3 les di,dword ptr +0eH[bp]
- 028a 26 8a 05 mov al,es:[di]
- 028d 30 e4 xor ah,ah
- 028f c4 7e 0e les di,dword ptr +0eH[bp]
- 0292 03 f8 add di,ax
- 0294 26 80 3d 20 cmp byte ptr es:[di],20H
- 0298 75 2e jne L4
- 029a 8d be ea fc lea di,-316H[bp]
- 029e 16 push ss
- 029f 57 push di
- 02a0 c4 7e 0e les di,dword ptr +0eH[bp]
- 02a3 06 push es
- 02a4 57 push di
- 02a5 b8 01 00 mov ax,0001H
- 02a8 50 push ax
- 02a9 c4 7e 0e les di,dword ptr +0eH[bp]
- 02ac 26 8a 05 mov al,es:[di]
- 02af 30 e4 xor ah,ah
- 02b1 48 dec ax
- 02b2 50 push ax
- 02b3 9a 00 00 00 00 call far SYSTEM_00E
- 02b8 c4 7e 0e les di,dword ptr +0eH[bp]
- 02bb 06 push es
- 02bc 57 push di
- 02bd b8 19 00 mov ax,0019H
- 02c0 50 push ax
- 02c1 9a 00 00 00 00 call far SYSTEM_00C
- 02c6 eb bf jmp L3
- 02c8 c4 7e 0a L4 les di,dword ptr +0aH[bp]
- 02cb 26 8a 05 mov al,es:[di]
- 02ce 30 e4 xor ah,ah
- 02d0 c4 7e 0a les di,dword ptr +0aH[bp]
- 02d3 03 f8 add di,ax
- 02d5 26 80 3d 20 cmp byte ptr es:[di],20H
- 02d9 75 2e jne L5
- 02db 8d be ea fc lea di,-316H[bp]
- 02df 16 push ss
- 02e0 57 push di
- 02e1 c4 7e 0a les di,dword ptr +0aH[bp]
- 02e4 06 push es
- 02e5 57 push di
- 02e6 b8 01 00 mov ax,0001H
- 02e9 50 push ax
- 02ea c4 7e 0a les di,dword ptr +0aH[bp]
- 02ed 26 8a 05 mov al,es:[di]
- 02f0 30 e4 xor ah,ah
- 02f2 48 dec ax
- 02f3 50 push ax
- 02f4 9a 00 00 00 00 call far SYSTEM_00E
- 02f9 c4 7e 0a les di,dword ptr +0aH[bp]
- 02fc 06 push es
- 02fd 57 push di
- 02fe b8 0f 00 mov ax,000fH
- 0301 50 push ax
- 0302 9a 00 00 00 00 call far SYSTEM_00C
- 0307 eb bf jmp L4
- 0309 89 ec L5 mov sp,bp
- 030b 5d pop bp
- 030c ca 10 00 retf 0010H
- 030f 01 20 L6 add [bx+si],sp
- 0311 GET_CFG:
- 0311 55 PCBDOORS_002 push bp
- 0312 89 e5 mov bp,sp
- 0314 b8 89 02 mov ax,0289H
- 0317 9a 00 00 00 00 call far SYSTEM_034
- 031c 81 ec 89 02 sub sp,0289H
- 0320 c4 7e 22 les di,dword ptr +22H[bp]
- 0323 06 push es
- 0324 57 push di
- 0325 8d be 7f ff lea di,-81H[bp]
- 0329 16 push ss
- 032a 57 push di
- 032b b8 80 00 mov ax,0080H
- 032e 50 push ax
- 032f 9a 00 00 00 00 call far SYSTEM_00C
- 0334 c4 7e 1e les di,dword ptr +1eH[bp]
- 0337 26 c6 05 00 mov byte ptr es:[di],00H
- 033b c4 7e 1a les di,dword ptr +1aH[bp]
- 033e 26 c6 05 00 mov byte ptr es:[di],00H
- 0342 c4 7e 16 les di,dword ptr +16H[bp]
- 0345 31 c0 xor ax,ax
- 0347 26 89 05 mov es:[di],ax
- 034a c4 7e 12 les di,dword ptr +12H[bp]
- 034d 31 c0 xor ax,ax
- 034f 26 89 05 mov es:[di],ax
- 0352 c4 7e 0e les di,dword ptr +0eH[bp]
- 0355 31 c0 xor ax,ax
- 0357 26 89 05 mov es:[di],ax
- 035a c4 7e 0a les di,dword ptr +0aH[bp]
- 035d 31 c0 xor ax,ax
- 035f 26 89 05 mov es:[di],ax
- 0362 c4 7e 06 les di,dword ptr +6H[bp]
- 0365 26 c6 05 00 mov byte ptr es:[di],00H
- 0369 8d be 7f fe lea di,-181H[bp]
- 036d 16 push ss
- 036e 57 push di
- 036f 8d be 7f ff lea di,-81H[bp]
- 0373 16 push ss
- 0374 57 push di
- 0375 9a 00 00 00 00 call far SYSTEM_045
- 037a 8d be 7f fe lea di,-181H[bp]
- 037e 16 push ss
- 037f 57 push di
- 0380 9a 00 00 00 00 call far SYSTEM_046
- 0385 9a 00 00 00 00 call far SYSTEM_031
- 038a 09 c0 or ax,ax
- 038c 75 79 jne L7
- 038e 8d be 7f fe lea di,-181H[bp]
- 0392 16 push ss
- 0393 57 push di
- 0394 c4 7e 1e les di,dword ptr +1eH[bp]
- 0397 06 push es
- 0398 57 push di
- 0399 b8 80 00 mov ax,0080H
- 039c 50 push ax
- 039d 9a 00 00 00 00 call far SYSTEM_03E
- 03a2 9a 00 00 00 00 call far SYSTEM_041
- 03a7 8d be 7f fe lea di,-181H[bp]
- 03ab 16 push ss
- 03ac 57 push di
- 03ad c4 7e 1a les di,dword ptr +1aH[bp]
- 03b0 06 push es
- 03b1 57 push di
- 03b2 b8 01 00 mov ax,0001H
- 03b5 50 push ax
- 03b6 9a 00 00 00 00 call far SYSTEM_03E
- 03bb 9a 00 00 00 00 call far SYSTEM_041
- 03c0 8d be 7f fe lea di,-181H[bp]
- 03c4 16 push ss
- 03c5 57 push di
- 03c6 9a 00 00 00 00 call far SYSTEM_03F
- 03cb c4 7e 16 les di,dword ptr +16H[bp]
- 03ce 26 89 05 mov es:[di],ax
- 03d1 9a 00 00 00 00 call far SYSTEM_041
- 03d6 8d be 7f fe lea di,-181H[bp]
- 03da 16 push ss
- 03db 57 push di
- 03dc 9a 00 00 00 00 call far SYSTEM_03F
- 03e1 c4 7e 0a les di,dword ptr +0aH[bp]
- 03e4 26 89 05 mov es:[di],ax
- 03e7 9a 00 00 00 00 call far SYSTEM_041
- 03ec 8d be 7f fe lea di,-181H[bp]
- 03f0 16 push ss
- 03f1 57 push di
- 03f2 c4 7e 06 les di,dword ptr +6H[bp]
- 03f5 06 push es
- 03f6 57 push di
- 03f7 b8 50 00 mov ax,0050H
- 03fa 50 push ax
- 03fb 9a 00 00 00 00 call far SYSTEM_03E
- 0400 9a 00 00 00 00 call far SYSTEM_041
- 0405 eb 07 jmp L8
- 0407 31 c0 L7 xor ax,ax
- 0409 9a 00 00 00 00 call far SYSTEM_003
- 040e 8d be 7f fe L8 lea di,-181H[bp]
- 0412 16 push ss
- 0413 57 push di
- 0414 9a 00 00 00 00 call far SYSTEM_048
- 0419 bf 00 00 mov di,offset L6
- 041c 0e push cs
- 041d 57 push di
- 041e c4 7e 1e les di,dword ptr +1eH[bp]
- 0421 06 push es
- 0422 57 push di
- 0423 9a 00 00 00 00 call far SYSTEM_010
- 0428 48 dec ax
- 0429 09 c0 or ax,ax
- 042b 7e 33 jle L9
- 042d 8d be 77 fd lea di,-289H[bp]
- 0431 16 push ss
- 0432 57 push di
- 0433 c4 7e 1e les di,dword ptr +1eH[bp]
- 0436 06 push es
- 0437 57 push di
- 0438 b8 01 00 mov ax,0001H
- 043b 50 push ax
- 043c bf 00 00 mov di,offset L6
- 043f 0e push cs
- 0440 57 push di
- 0441 c4 7e 1e les di,dword ptr +1eH[bp]
- 0444 06 push es
- 0445 57 push di
- 0446 9a 00 00 00 00 call far SYSTEM_010
- 044b 48 dec ax
- 044c 50 push ax
- 044d 9a 00 00 00 00 call far SYSTEM_00E
- 0452 c4 7e 1e les di,dword ptr +1eH[bp]
- 0455 06 push es
- 0456 57 push di
- 0457 b8 80 00 mov ax,0080H
- 045a 50 push ax
- 045b 9a 00 00 00 00 call far SYSTEM_00C
- 0460 8d be 77 fd L9 lea di,-289H[bp]
- 0464 16 push ss
- 0465 57 push di
- 0466 c4 7e 1a les di,dword ptr +1aH[bp]
- 0469 26 8a 45 01 mov al,es:+1H[di]
- 046d 50 push ax
- 046e 9a 00 00 00 00 call far SYSTEM_05A
- 0473 50 push ax
- 0474 9a 00 00 00 00 call far SYSTEM_012
- 0479 c4 7e 1a les di,dword ptr +1aH[bp]
- 047c 06 push es
- 047d 57 push di
- 047e b8 01 00 mov ax,0001H
- 0481 50 push ax
- 0482 9a 00 00 00 00 call far SYSTEM_00C
- 0487 c4 7e 0a les di,dword ptr +0aH[bp]
- 048a 26 8b 05 mov ax,es:[di]
- 048d 3d 02 00 cmp ax,0002H
- 0490 74 0a je L10
- 0492 3d 03 00 cmp ax,0003H
- 0495 74 05 je L10
- 0497 3d 04 00 cmp ax,0004H
- 049a 75 0f jne L11
- 049c c4 7e 0a L10 les di,dword ptr +0aH[bp]
- 049f 26 8b 05 mov ax,es:[di]
- 04a2 48 dec ax
- 04a3 c4 7e 0a les di,dword ptr +0aH[bp]
- 04a6 26 89 05 mov es:[di],ax
- 04a9 eb 08 jmp L12
- 04ab c4 7e 0a L11 les di,dword ptr +0aH[bp]
- 04ae 31 c0 xor ax,ax
- 04b0 26 89 05 mov es:[di],ax
- 04b3 8d be 77 fe L12 lea di,-189H[bp]
- 04b7 16 push ss
- 04b8 57 push di
- 04b9 8d be 79 fe lea di,-187H[bp]
- 04bd 16 push ss
- 04be 57 push di
- 04bf 8d be 7b fe lea di,-185H[bp]
- 04c3 16 push ss
- 04c4 57 push di
- 04c5 8d be 7d fe lea di,-183H[bp]
- 04c9 16 push ss
- 04ca 57 push di
- 04cb 9a 00 00 00 00 call far DOS_005
- 04d0 8b 86 77 fe mov ax,-189H[bp]
- 04d4 b9 3c 00 mov cx,003cH
- 04d7 f7 e1 mul cx
- 04d9 03 86 79 fe add ax,-187H[bp]
- 04dd c4 7e 12 les di,dword ptr +12H[bp]
- 04e0 26 89 05 mov es:[di],ax
- 04e3 c4 7e 12 les di,dword ptr +12H[bp]
- 04e6 26 8b 05 mov ax,es:[di]
- 04e9 c4 7e 16 les di,dword ptr +16H[bp]
- 04ec 26 03 05 add ax,es:[di]
- 04ef 99 cwd
- 04f0 b9 a0 05 mov cx,05a0H
- 04f3 f7 f9 idiv cx
- 04f5 92 xchg ax,dx
- 04f6 c4 7e 0e les di,dword ptr +0eH[bp]
- 04f9 26 89 05 mov es:[di],ax
- 04fc 83 3e 00 00 00 cmp word ptr TIME_OFF,0000H
- 0501 7c 14 jl L13
- 0503 a1 00 00 mov ax,TIME_OFF
- 0506 c4 7e 0e les di,dword ptr +0eH[bp]
- 0509 26 3b 05 cmp ax,es:[di]
- 050c 7d 09 jge L13
- 050e a1 00 00 mov ax,TIME_OFF
- 0511 c4 7e 0e les di,dword ptr +0eH[bp]
- 0514 26 89 05 mov es:[di],ax
- 0517 89 ec L13 mov sp,bp
- 0519 5d pop bp
- 051a ca 20 00 retf 0020H
- 051d 01 54 55 L14 add +55H[si],dx
- 0520 89 e5 mov bp,sp
- 0522 b8 69 00 mov ax,0069H
- 0525 9a 00 00 00 00 call far SYSTEM_034
- 052a 83 ec 69 sub sp,0069H
- 052d c4 7e 06 les di,dword ptr +6H[bp]
- 0530 06 push es
- 0531 57 push di
- 0532 8d 7e af lea di,-51H[bp]
- 0535 16 push ss
- 0536 57 push di
- 0537 b8 50 00 mov ax,0050H
- 053a 50 push ax
- 053b 9a 00 00 00 00 call far SYSTEM_00C
- 0540 80 3e 00 00 4c cmp byte ptr L130,4cH
- 0545 74 41 je L17
- 0547 8a 46 af mov al,-51H[bp]
- 054a 30 e4 xor ah,ah
- 054c 89 46 97 mov -69H[bp],ax
- 054f b8 01 00 mov ax,0001H
- 0552 3b 46 97 cmp ax,-69H[bp]
- 0555 7f 31 jg L17
- 0557 89 46 99 mov -67H[bp],ax
- 055a eb 03 jmp L16
- 055c ff 46 99 L15 inc word ptr -67H[bp]
- 055f 8b 7e 99 L16 mov di,-67H[bp]
- 0562 8a 43 af mov al,-51H[bp+di]
- 0565 30 e4 xor ah,ah
- 0567 05 00 01 add ax,0100H
- 056a 89 46 9b mov -65H[bp],ax
- 056d a1 00 00 mov ax,COM
- 0570 89 46 a1 mov -5fH[bp],ax
- 0573 b0 14 mov al,14H
- 0575 50 push ax
- 0576 8d 7e 9b lea di,-65H[bp]
- 0579 16 push ss
- 057a 57 push di
- 057b 9a 00 00 00 00 call far DOS_001
- 0580 8b 46 99 mov ax,-67H[bp]
- 0583 3b 46 97 cmp ax,-69H[bp]
- 0586 75 d4 jne L15
- 0588 80 3e 00 00 4c L17 cmp byte ptr L130,4cH
- 058d 74 11 je L18
- 058f bf 00 00 mov di,offset ECHO
- 0592 1e push ds
- 0593 57 push di
- 0594 bf 00 00 mov di,offset L14
- 0597 0e push cs
- 0598 57 push di
- 0599 9a 00 00 00 00 call far SYSTEM_011
- 059e 75 17 jne L19
- 05a0 bf 00 00 L18 mov di,offset SYSTEM_BSS+100H
- 05a3 1e push ds
- 05a4 57 push di
- 05a5 8d 7e af lea di,-51H[bp]
- 05a8 16 push ss
- 05a9 57 push di
- 05aa 31 c0 xor ax,ax
- 05ac 50 push ax
- 05ad 9a 00 00 00 00 call far SYSTEM_036
- 05b2 9a 00 00 00 00 call far SYSTEM_03B
- 05b7 89 ec L19 mov sp,bp
- 05b9 5d pop bp
- 05ba ca 04 00 retf 0004H
- 05bd 01 0d L20 add [di],cx
- 05bf 01 0a L21 add [bp+si],cx
- 05c1 WRTLN:
- 05c1 55 PCBDOORS_004 push bp
- 05c2 89 e5 mov bp,sp
- 05c4 b8 65 01 mov ax,0165H
- 05c7 9a 00 00 00 00 call far SYSTEM_034
- 05cc 81 ec 65 01 sub sp,0165H
- 05d0 c4 7e 06 les di,dword ptr +6H[bp]
- 05d3 06 push es
- 05d4 57 push di
- 05d5 8d 7e af lea di,-51H[bp]
- 05d8 16 push ss
- 05d9 57 push di
- 05da b8 50 00 mov ax,0050H
- 05dd 50 push ax
- 05de 9a 00 00 00 00 call far SYSTEM_00C
- 05e3 8d 7e af lea di,-51H[bp]
- 05e6 16 push ss
- 05e7 57 push di
- 05e8 0e push cs
- 05e9 e8 00 00 call PCBDOORS_003
- 05ec 8d be 9b fe lea di,-165H[bp]
- 05f0 16 push ss
- 05f1 57 push di
- 05f2 bf 00 00 mov di,offset L20
- 05f5 0e push cs
- 05f6 57 push di
- 05f7 9a 00 00 00 00 call far SYSTEM_00B
- 05fc bf 00 00 mov di,offset L21
- 05ff 0e push cs
- 0600 57 push di
- 0601 9a 00 00 00 00 call far SYSTEM_00F
- 0606 0e push cs
- 0607 e8 00 00 call PCBDOORS_003
- 060a c7 46 9b 01 06 mov word ptr -65H[bp],0601H
- 060f c7 46 9d 00 07 mov word ptr -63H[bp],0700H
- 0614 31 c0 xor ax,ax
- 0616 89 46 9f mov -61H[bp],ax
- 0619 c7 46 a1 4f 15 mov word ptr -5fH[bp],154fH
- 061e b0 10 mov al,10H
- 0620 50 push ax
- 0621 8d 7e 9b lea di,-65H[bp]
- 0624 16 push ss
- 0625 57 push di
- 0626 9a 00 00 00 00 call far DOS_001
- 062b b8 01 00 mov ax,0001H
- 062e 50 push ax
- 062f b8 16 00 mov ax,0016H
- 0632 50 push ax
- 0633 0e push cs
- 0634 e8 00 00 call PCBDOORS_00C
- 0637 89 ec mov sp,bp
- 0639 5d pop bp
- 063a ca 04 00 retf 0004H
- 063d CK_TIME:
- 063d 55 PCBDOORS_005 push bp
- 063e 89 e5 mov bp,sp
- 0640 b8 0d 00 mov ax,000dH
- 0643 9a 00 00 00 00 call far SYSTEM_034
- 0648 83 ec 0d sub sp,000dH
- 064b c6 46 ff 01 mov byte ptr -1H[bp],01H
- 064f 8d 7e f3 lea di,-0dH[bp]
- 0652 16 push ss
- 0653 57 push di
- 0654 8d 7e f5 lea di,-0bH[bp]
- 0657 16 push ss
- 0658 57 push di
- 0659 8d 7e f7 lea di,-9H[bp]
- 065c 16 push ss
- 065d 57 push di
- 065e 8d 7e f9 lea di,-7H[bp]
- 0661 16 push ss
- 0662 57 push di
- 0663 9a 00 00 00 00 call far DOS_005
- 0668 8b 46 f3 mov ax,-0dH[bp]
- 066b b9 3c 00 mov cx,003cH
- 066e f7 e1 mul cx
- 0670 03 46 f5 add ax,-0bH[bp]
- 0673 89 46 fb mov -5H[bp],ax
- 0676 81 7e fb 28 05 cmp word ptr -5H[bp],0528H
- 067b 7e 11 jle L22
- 067d 83 7e 06 78 cmp word ptr +6H[bp],0078H
- 0681 7d 0b jge L22
- 0683 8b 46 06 mov ax,+6H[bp]
- 0686 05 a0 05 add ax,05a0H
- 0689 89 46 fd mov -3H[bp],ax
- 068c eb 06 jmp L23
- 068e 8b 46 06 L22 mov ax,+6H[bp]
- 0691 89 46 fd mov -3H[bp],ax
- 0694 8b 46 fb L23 mov ax,-5H[bp]
- 0697 3b 46 fd cmp ax,-3H[bp]
- 069a 7c 04 jl L24
- 069c c6 46 ff 00 mov byte ptr -1H[bp],00H
- 06a0 8a 46 ff L24 mov al,-1H[bp]
- 06a3 89 ec mov sp,bp
- 06a5 5d pop bp
- 06a6 ca 02 00 retf 0002H
- 06a9 00 0f L25 add [bx],cl
- 06ab 43 inc bx
- 06ac 61 popa
- 06ad 72 72 jb L29
- 06af 69 65 72 20 4c imul sp,+72H[di],4c20H
- 06b4 6f outsw
- 06b5 73 74 jae L31
- 06b7 2e 2e seg
- 06b9 2e 01 46 55 add cs:+55H[bp],ax
- 06bd 89 e5 mov bp,sp
- 06bf b8 35 00 mov ax,0035H
- 06c2 9a 00 00 00 00 call far SYSTEM_034
- 06c7 83 ec 35 sub sp,0035H
- 06ca c6 46 ff 00 mov byte ptr -1H[bp],00H
- 06ce 80 3e 00 00 4c cmp byte ptr L130,4cH
- 06d3 75 03 jne L28
- 06d5 e9 02 01 jmp L36
- 06d8 c7 46 eb 00 03 L28 mov word ptr -15H[bp],0300H
- 06dd a1 00 00 mov ax,COM
- 06e0 89 46 f1 mov -0fH[bp],ax
- 06e3 b0 14 mov al,14H
- 06e5 50 push ax
- 06e6 8d 7e eb lea di,-15H[bp]
- 06e9 16 push ss
- 06ea 57 push di
- 06eb 9a 00 00 00 00 call far DOS_001
- 06f0 8a 46 eb mov al,-15H[bp]
- 06f3 24 80 and al,80H
- 06f5 08 c0 or al,al
- 06f7 75 2b jne L30
- 06f9 bf 00 00 mov di,offset L25
- 06fc 0e push cs
- 06fd 57 push di
- 06fe 0e push cs
- 06ff e8 00 00 call PCBDOORS_004
- 0702 bf 00 00 mov di,offset L25
- 0705 0e push cs
- 0706 57 push di
- 0707 0e push cs
- 0708 e8 00 00 call PCBDOORS_004
- 070b bf 00 00 mov di,offset L26
- 070e 0e push cs
- 070f 57 push di
- 0710 0e push cs
- 0711 e8 00 00 call PCBDOORS_004
- 0714 bf 00 00 mov di,offset L25
- 0717 0e push cs
- 0718 57 push di
- 0719 0e push cs
- 071a e8 00 00 call PCBDOORS_004
- 071d 31 c0 xor ax,ax
- 071f 9a 00 00 00 00 call far SYSTEM_003
- 0724 83 3e 00 00 00 L30 cmp word ptr COM,0000H
- 0729 74 03 je L32
- 072b e9 81 00 L31 jmp L35
- 072e c7 46 eb 06 44 L32 mov word ptr -15H[bp],4406H
- 0733 c7 46 ed 03 00 mov word ptr -13H[bp],0003H
- 0738 8d 7e eb lea di,-15H[bp]
- 073b 16 push ss
- 073c 57 push di
- 073d 9a 00 00 00 00 call far DOS_002
- 0742 80 7e eb ff cmp byte ptr -15H[bp],0ffH
- 0746 75 65 jne L34
- 0748 c7 46 eb 00 03 mov word ptr -15H[bp],0300H
- 074d 8d 7e eb lea di,-15H[bp]
- 0750 16 push ss
- 0751 57 push di
- 0752 9a 00 00 00 00 call far DOS_002
- 0757 8a 46 eb mov al,-15H[bp]
- 075a c4 7e 06 les di,dword ptr +6H[bp]
- 075d 26 88 05 mov es:[di],al
- 0760 c4 7e 06 les di,dword ptr +6H[bp]
- 0763 26 8a 05 mov al,es:[di]
- 0766 50 push ax
- 0767 8d 7e cb lea di,-35H[bp]
- 076a 16 push ss
- 076b 57 push di
- 076c 9a 00 00 00 00 call far SYSTEM_028
- 0771 b0 20 mov al,20H
- 0773 50 push ax
- 0774 b0 7e mov al,7eH
- 0776 50 push ax
- 0777 9a 00 00 00 00 call far SYSTEM_02A
- 077c 9a 00 00 00 00 call far SYSTEM_018
- 0781 74 26 je L33
- 0783 bf 00 00 mov di,offset ECHO
- 0786 1e push ds
- 0787 57 push di
- 0788 bf 00 00 mov di,offset L27
- 078b 0e push cs
- 078c 57 push di
- 078d 9a 00 00 00 00 call far SYSTEM_011
- 0792 75 15 jne L33
- 0794 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 0797 1e push ds
- 0798 57 push di
- 0799 b0 08 mov al,08H
- 079b 50 push ax
- 079c 31 c0 xor ax,ax
- 079e 50 push ax
- 079f 9a 00 00 00 00 call far SYSTEM_039
- 07a4 9a 00 00 00 00 call far SYSTEM_03B
- 07a9 c6 46 ff 01 L33 mov byte ptr -1H[bp],01H
- 07ad eb 2b L34 jmp L36
- 07af c7 46 eb 00 02 L35 mov word ptr -15H[bp],0200H
- 07b4 a1 00 00 mov ax,COM
- 07b7 89 46 f1 mov -0fH[bp],ax
- 07ba b0 14 mov al,14H
- 07bc 50 push ax
- 07bd 8d 7e eb lea di,-15H[bp]
- 07c0 16 push ss
- 07c1 57 push di
- 07c2 9a 00 00 00 00 call far DOS_001
- 07c7 80 7e ec 00 cmp byte ptr -14H[bp],00H
- 07cb 75 0d jne L36
- 07cd 8a 46 eb mov al,-15H[bp]
- 07d0 c4 7e 06 les di,dword ptr +6H[bp]
- 07d3 26 88 05 mov es:[di],al
- 07d6 c6 46 ff 01 mov byte ptr -1H[bp],01H
- 07da 8a 46 ff L36 mov al,-1H[bp]
- 07dd 89 ec mov sp,bp
- 07df 5d pop bp
- 07e0 ca 04 00 retf 0004H
- 07e3 00 12 L37 add [bp+si],dl
- 07e5 53 push bx
- 07e6 79 73 jns L46
- 07e8 6f outsw
- 07e9 70 20 jo L41
- 07eb 49 dec cx
- 07ec 6e outsb
- 07ed 74 65 je L45
- 07ef 72 72 jb L47
- 07f1 75 70 jne L47
- 07f3 74 2e je L42
- 07f5 2e 2e seg
- 07f7 0f 43 L39 ?????
- 07f9 68 61 74 push 7461H
- 07fc 20 6d 6f and +6fH[di],ch
- 07ff 64 65 20 6f 6e and gs:+6eH[bx],ch
- 0804 2e 2e seg
- 0806 2e 10 43 68 adc cs:+68H[bp+di],al
- 080a 61 popa
- 080b 74 20 L41 je L43
- 080d 6d insw
- 080e 6f outsw
- 080f 64 65 20 6f 66 and gs:+66H[bx],ch
- 0814 66 2e 2e seg
- 0817 2e 55 push bp
- 0819 89 e5 mov bp,sp
- 081b b8 15 00 mov ax,0015H
- 081e 9a 00 00 00 00 call far SYSTEM_034
- 0823 83 ec 15 L42 sub sp,0015H
- 0826 c6 46 ff 00 mov byte ptr -1H[bp],00H
- 082a c7 46 eb 00 01 mov word ptr -15H[bp],0100H
- 082f b0 16 mov al,16H
- 0831 50 push ax
- 0832 8d 7e eb lea di,-15H[bp]
- 0835 16 push ss
- 0836 57 push di
- 0837 9a 00 00 00 00 call far DOS_001
- 083c 8a 46 fd mov al,-3H[bp]
- 083f 24 40 and al,40H
- 0841 08 c0 or al,al
- 0843 74 03 je L44
- 0845 e9 c4 00 jmp L50
- 0848 8a 46 eb L44 mov al,-15H[bp]
- 084b c4 7e 06 les di,dword ptr +6H[bp]
- 084e 26 88 05 mov es:[di],al
- 0851 31 c0 xor ax,ax
- 0853 89 46 eb mov -15H[bp],ax
- 0856 b0 16 mov al,16H
- 0858 50 push ax
- 0859 8d 7e eb lea di,-15H[bp]
- 085c 16 push ss
- 085d 57 push di
- 085e 9a 00 00 00 00 call far DOS_001
- 0863 c6 46 ff 01 L47 mov byte ptr -1H[bp],01H
- 0867 80 7e ec 42 cmp byte ptr -14H[bp],42H
- 086b 75 2d jne L48
- 086d bf 00 00 mov di,offset L37
- 0870 0e push cs
- 0871 57 push di
- 0872 0e push cs
- 0873 e8 00 00 call PCBDOORS_004
- 0876 bf 00 00 mov di,offset L37
- 0879 0e push cs
- 087a 57 push di
- 087b 0e push cs
- 087c e8 00 00 call PCBDOORS_004
- 087f bf 00 00 mov di,offset L38
- 0882 0e push cs
- 0883 57 push di
- 0884 0e push cs
- 0885 e8 00 00 call PCBDOORS_004
- 0888 bf 00 00 mov di,offset L37
- 088b 0e push cs
- 088c 57 push di
- 088d 0e push cs
- 088e e8 00 00 call PCBDOORS_004
- 0891 31 c0 xor ax,ax
- 0893 9a 00 00 00 00 call far SYSTEM_003
- 0898 eb 72 jmp L50
- 089a 80 7e ec 44 L48 cmp byte ptr -14H[bp],44H
- 089e 75 36 jne L49
- 08a0 80 3e 00 00 00 cmp byte ptr CHAT,00H
- 08a5 75 2f jne L49
- 08a7 bf 00 00 mov di,offset L37
- 08aa 0e push cs
- 08ab 57 push di
- 08ac 0e push cs
- 08ad e8 00 00 call PCBDOORS_004
- 08b0 bf 00 00 mov di,offset L37
- 08b3 0e push cs
- 08b4 57 push di
- 08b5 0e push cs
- 08b6 e8 00 00 call PCBDOORS_004
- 08b9 bf 00 00 mov di,offset L39
- 08bc 0e push cs
- 08bd 57 push di
- 08be 0e push cs
- 08bf e8 00 00 call PCBDOORS_004
- 08c2 bf 00 00 mov di,offset L37
- 08c5 0e push cs
- 08c6 57 push di
- 08c7 0e push cs
- 08c8 e8 00 00 call PCBDOORS_004
- 08cb c6 06 00 00 01 mov byte ptr CHAT,01H
- 08d0 0e push cs
- 08d1 e8 00 00 call PCBDOORS_00D
- 08d4 eb 36 jmp L50
- 08d6 80 7e ec 01 L49 cmp byte ptr -14H[bp],01H
- 08da 75 30 jne L50
- 08dc 80 3e 00 00 00 cmp byte ptr CHAT,00H
- 08e1 74 29 je L50
- 08e3 bf 00 00 mov di,offset L37
- 08e6 0e push cs
- 08e7 57 push di
- 08e8 0e push cs
- 08e9 e8 00 00 call PCBDOORS_004
- 08ec bf 00 00 mov di,offset L37
- 08ef 0e push cs
- 08f0 57 push di
- 08f1 0e push cs
- 08f2 e8 00 00 call PCBDOORS_004
- 08f5 bf 00 00 mov di,offset L40
- 08f8 0e push cs
- 08f9 57 push di
- 08fa 0e push cs
- 08fb e8 00 00 call PCBDOORS_004
- 08fe bf 00 00 mov di,offset L37
- 0901 0e push cs
- 0902 57 push di
- 0903 0e push cs
- 0904 e8 00 00 call PCBDOORS_004
- 0907 c6 06 00 00 00 mov byte ptr CHAT,00H
- 090c 8a 46 ff L50 mov al,-1H[bp]
- 090f 89 ec mov sp,bp
- 0911 5d pop bp
- 0912 ca 04 00 retf 0004H
- 0915 IO_FLUSH:
- 0915 55 PCBDOORS_006 push bp
- 0916 89 e5 mov bp,sp
- 0918 b8 02 00 mov ax,0002H
- 091b 9a 00 00 00 00 call far SYSTEM_034
- 0920 83 ec 02 sub sp,0002H
- 0923 c6 46 fe 01 mov byte ptr -2H[bp],01H
- 0927 8d 7e ff L51 lea di,-1H[bp]
- 092a 16 push ss
- 092b 57 push di
- 092c 0e push cs
- 092d e8 00 00 call PCBDOORS_00F
- 0930 08 c0 or al,al
- 0932 75 11 jne L52
- 0934 8d 7e ff lea di,-1H[bp]
- 0937 16 push ss
- 0938 57 push di
- 0939 0e push cs
- 093a e8 00 00 call PCBDOORS_00E
- 093d 08 c0 or al,al
- 093f 75 04 jne L52
- 0941 c6 46 fe 00 mov byte ptr -2H[bp],00H
- 0945 80 7e fe 00 L52 cmp byte ptr -2H[bp],00H
- 0949 75 dc jne L51
- 094b 89 ec mov sp,bp
- 094d 5d pop bp
- 094e cb retf
- 094f 00 13 L53 add [bp+di],dl
- 0951 4b dec bx
- 0952 65 79 62 jns L57
- 0955 6f outsw
- 0956 61 popa
- 0957 72 64 jb L58
- 0959 20 74 69 and +69H[si],dh
- 095c 6d insw
- 095d 65 6f outs dx,word ptr gs:[si]
- 095f 75 74 jne L60
- 0961 2e 2e seg
- 0963 2e 01 07 add cs:[bx],ax
- 0966 55 PCBDOORS_010 push bp
- 0967 89 e5 mov bp,sp
- 0969 b8 10 00 mov ax,0010H
- 096c 9a 00 00 00 00 call far SYSTEM_034
- 0971 83 ec 10 sub sp,0010H
- 0974 c6 46 fc 00 mov byte ptr -4H[bp],00H
- 0978 c6 46 fd 01 mov byte ptr -3H[bp],01H
- 097c 8d 7e f0 lea di,-10H[bp]
- 097f 16 push ss
- 0980 57 push di
- 0981 8d 7e f2 lea di,-0eH[bp]
- 0984 16 push ss
- 0985 57 push di
- 0986 8d 7e f4 lea di,-0cH[bp]
- 0989 16 push ss
- 098a 57 push di
- 098b 8d 7e f6 lea di,-0aH[bp]
- 098e 16 push ss
- 098f 57 push di
- 0990 9a 00 00 00 00 call far DOS_005
- 0995 8b 46 f0 mov ax,-10H[bp]
- 0998 b9 3c 00 mov cx,003cH
- 099b f7 e1 mul cx
- 099d 03 46 f2 add ax,-0eH[bp]
- 09a0 89 46 fa mov -6H[bp],ax
- 09a3 8d 7e fe L56 lea di,-2H[bp]
- 09a6 16 push ss
- 09a7 57 push di
- 09a8 0e push cs
- 09a9 e8 00 00 call PCBDOORS_00F
- 09ac 08 c0 or al,al
- 09ae 74 07 je L57
- 09b0 c6 46 fc 01 mov byte ptr -4H[bp],01H
- 09b4 e9 81 00 jmp L64
- 09b7 8d 7e fe L57 lea di,-2H[bp]
- 09ba 16 push ss
- 09bb 57 push di
- 09bc 0e push cs
- 09bd e8 00 00 L58 call PCBDOORS_00E
- 09c0 08 c0 or al,al
- 09c2 74 06 je L59
- 09c4 c6 46 fc 01 mov byte ptr -4H[bp],01H
- 09c8 eb 6e jmp L64
- 09ca 8b 46 fa L59 mov ax,-6H[bp]
- 09cd 05 04 00 add ax,0004H
- 09d0 50 push ax
- 09d1 0e push cs
- 09d2 e8 00 00 call CK_TIME
- 09d5 08 c0 L60 or al,al
- 09d7 75 2d jne L61
- 09d9 bf 00 00 mov di,offset L53
- 09dc 0e push cs
- 09dd 57 push di
- 09de 0e push cs
- 09df e8 00 00 call PCBDOORS_004
- 09e2 bf 00 00 mov di,offset L53
- 09e5 0e push cs
- 09e6 57 push di
- 09e7 0e push cs
- 09e8 e8 00 00 call PCBDOORS_004
- 09eb bf 00 00 mov di,offset L54
- 09ee 0e push cs
- 09ef 57 push di
- 09f0 0e push cs
- 09f1 e8 00 00 call PCBDOORS_004
- 09f4 bf 00 00 mov di,offset L53
- 09f7 0e push cs
- 09f8 57 push di
- 09f9 0e push cs
- 09fa e8 00 00 call PCBDOORS_004
- 09fd 31 c0 xor ax,ax
- 09ff 9a 00 00 00 00 call far SYSTEM_003
- 0a04 eb 32 jmp L64
- 0a06 8b 46 fa L61 mov ax,-6H[bp]
- 0a09 05 03 00 add ax,0003H
- 0a0c 50 push ax
- 0a0d 0e push cs
- 0a0e e8 00 00 call CK_TIME
- 0a11 08 c0 or al,al
- 0a13 75 23 jne L64
- 0a15 80 7e fd 00 cmp byte ptr -3H[bp],00H
- 0a19 74 1d je L64
- 0a1b c7 46 f8 01 00 mov word ptr -8H[bp],0001H
- 0a20 eb 03 jmp L63
- 0a22 ff 46 f8 L62 inc word ptr -8H[bp]
- 0a25 bf 00 00 L63 mov di,offset L55
- 0a28 0e push cs
- 0a29 57 push di
- 0a2a 0e push cs
- 0a2b e8 00 00 call PCBDOORS_003
- 0a2e 83 7e f8 05 cmp word ptr -8H[bp],0005H
- 0a32 75 ee jne L62
- 0a34 c6 46 fd 00 mov byte ptr -3H[bp],00H
- 0a38 80 7e fc 00 L64 cmp byte ptr -4H[bp],00H
- 0a3c 75 03 jne L65
- 0a3e e9 62 ff jmp L56
- 0a41 8a 46 fe L65 mov al,-2H[bp]
- 0a44 88 46 ff mov -1H[bp],al
- 0a47 8a 46 ff mov al,-1H[bp]
- 0a4a 89 ec mov sp,bp
- 0a4c 5d pop bp
- 0a4d cb retf
- 0a4e 00 01 L66 add [bx+di],al
- 0a50 07 pop es
- 0a51 55 PCBDOORS_00D push bp
- 0a52 89 e5 mov bp,sp
- 0a54 b8 23 01 mov ax,0123H
- 0a57 9a 00 00 00 00 call far SYSTEM_034
- 0a5c 81 ec 23 01 sub sp,0123H
- 0a60 31 c0 xor ax,ax
- 0a62 89 46 fd mov -3H[bp],ax
- 0a65 0e L68 push cs
- 0a66 e8 00 00 call PCBDOORS_010
- 0a69 88 46 ff mov -1H[bp],al
- 0a6c 80 7e ff 0d cmp byte ptr -1H[bp],0dH
- 0a70 75 10 jne L69
- 0a72 bf 00 00 mov di,offset L66
- 0a75 0e push cs
- 0a76 57 push di
- 0a77 0e push cs
- 0a78 e8 00 00 call PCBDOORS_004
- 0a7b 31 c0 xor ax,ax
- 0a7d 89 46 fd mov -3H[bp],ax
- 0a80 eb 57 jmp L72
- 0a82 8a 46 ff L69 mov al,-1H[bp]
- 0a85 50 push ax
- 0a86 8d 7e dd lea di,-23H[bp]
- 0a89 16 push ss
- 0a8a 57 push di
- 0a8b 9a 00 00 00 00 call far SYSTEM_028
- 0a90 b0 20 mov al,20H
- 0a92 50 push ax
- 0a93 b0 7e mov al,7eH
- 0a95 50 push ax
- 0a96 9a 00 00 00 00 call far SYSTEM_02A
- 0a9b b0 08 mov al,08H
- 0a9d 50 push ax
- 0a9e 9a 00 00 00 00 call far SYSTEM_029
- 0aa3 9a 00 00 00 00 call far SYSTEM_018
- 0aa8 75 0e jne L70
- 0aaa bf 00 00 mov di,offset L67
- 0aad 0e push cs
- 0aae 57 push di
- 0aaf 0e push cs
- 0ab0 e8 00 00 call PCBDOORS_003
- 0ab3 ff 4e fd dec word ptr -3H[bp]
- 0ab6 eb 21 jmp L72
- 0ab8 8d be dd fe L70 lea di,-123H[bp]
- 0abc 16 push ss
- 0abd 57 push di
- 0abe 8a 46 ff mov al,-1H[bp]
- 0ac1 50 push ax
- 0ac2 9a 00 00 00 00 call far SYSTEM_012
- 0ac7 0e push cs
- 0ac8 e8 00 00 call PCBDOORS_003
- 0acb 80 7e ff 08 cmp byte ptr -1H[bp],08H
- 0acf 74 05 je L71
- 0ad1 ff 46 fd inc word ptr -3H[bp]
- 0ad4 eb 03 jmp L72
- 0ad6 ff 4e fd L71 dec word ptr -3H[bp]
- 0ad9 83 7e fd 4e L72 cmp word ptr -3H[bp],004eH
- 0add 75 0e jne L73
- 0adf 31 c0 xor ax,ax
- 0ae1 89 46 fd mov -3H[bp],ax
- 0ae4 bf 00 00 mov di,offset L66
- 0ae7 0e push cs
- 0ae8 57 push di
- 0ae9 0e push cs
- 0aea e8 00 00 call PCBDOORS_004
- 0aed 80 3e 00 00 00 L73 cmp byte ptr CHAT,00H
- 0af2 74 03 je L74
- 0af4 e9 6e ff jmp L68
- 0af7 89 ec L74 mov sp,bp
- 0af9 5d pop bp
- 0afa cb retf
- 0afb 00 55 89 L75 add -77H[di],dl
- 0afe e5 b8 in ax,0b8H
- 0b00 22 01 and al,[bx+di]
- 0b02 9a 00 00 00 00 call far SYSTEM_034
- 0b07 81 ec 22 01 sub sp,0122H
- 0b0b c6 06 00 00 00 mov byte ptr CHAT,00H
- 0b10 0e push cs
- 0b11 e8 00 00 call PCBDOORS_010
- 0b14 50 push ax
- 0b15 9a 00 00 00 00 call far SYSTEM_05A
- 0b1a 88 46 fe mov -2H[bp],al
- 0b1d 8a 46 fe mov al,-2H[bp]
- 0b20 50 push ax
- 0b21 8d 7e de lea di,-22H[bp]
- 0b24 16 push ss
- 0b25 57 push di
- 0b26 9a 00 00 00 00 call far SYSTEM_028
- 0b2b b0 20 mov al,20H
- 0b2d 50 push ax
- 0b2e b0 7e mov al,7eH
- 0b30 50 push ax
- 0b31 9a 00 00 00 00 call far SYSTEM_02A
- 0b36 9a 00 00 00 00 call far SYSTEM_018
- 0b3b 74 1b je L76
- 0b3d 8d be de fe lea di,-122H[bp]
- 0b41 16 push ss
- 0b42 57 push di
- 0b43 8a 46 fe mov al,-2H[bp]
- 0b46 50 push ax
- 0b47 9a 00 00 00 00 call far SYSTEM_012
- 0b4c 0e push cs
- 0b4d e8 00 00 call PCBDOORS_004
- 0b50 8a 46 fe mov al,-2H[bp]
- 0b53 88 46 ff mov -1H[bp],al
- 0b56 eb 0d jmp L77
- 0b58 c6 46 fe 0d L76 mov byte ptr -2H[bp],0dH
- 0b5c bf 00 00 mov di,offset L75
- 0b5f 0e push cs
- 0b60 57 push di
- 0b61 0e push cs
- 0b62 e8 00 00 call PCBDOORS_004
- 0b65 8a 46 ff L77 mov al,-1H[bp]
- 0b68 89 ec mov sp,bp
- 0b6a 5d pop bp
- 0b6b cb retf
- 0b6c 01 08 L78 add [bx+si],cx
- 0b6e 01 20 L79 add [bx+si],sp
- 0b70 00 01 L80 add [bx+di],al
- 0b72 07 pop es
- 0b73 GETNUM:
- 0b73 55 PCBDOORS_008 push bp
- 0b74 89 e5 mov bp,sp
- 0b76 b8 6e 02 mov ax,026eH
- 0b79 9a 00 00 00 00 call far SYSTEM_034
- 0b7e 81 ec 6e 02 sub sp,026eH
- 0b82 c6 06 00 00 00 mov byte ptr CHAT,00H
- 0b87 c6 46 f7 00 mov byte ptr -9H[bp],00H
- 0b8b c4 7e 06 les di,dword ptr +6H[bp]
- 0b8e 31 c0 xor ax,ax
- 0b90 26 89 05 mov es:[di],ax
- 0b93 c6 46 f2 00 mov byte ptr -0eH[bp],00H
- 0b97 0e L82 push cs
- 0b98 e8 00 00 call PCBDOORS_010
- 0b9b 50 push ax
- 0b9c 9a 00 00 00 00 call far SYSTEM_05A
- 0ba1 88 46 fe mov -2H[bp],al
- 0ba4 80 7e f8 2d cmp byte ptr -8H[bp],2dH
- 0ba8 75 07 jne L83
- 0baa c7 46 f5 06 00 mov word ptr -0bH[bp],0006H
- 0baf eb 05 jmp L84
- 0bb1 c7 46 f5 05 00 L83 mov word ptr -0bH[bp],0005H
- 0bb6 8a 46 fe L84 mov al,-2H[bp]
- 0bb9 50 push ax
- 0bba 8d 7e d2 lea di,-2eH[bp]
- 0bbd 16 push ss
- 0bbe 57 push di
- 0bbf 9a 00 00 00 00 call far SYSTEM_028
- 0bc4 b0 30 mov al,30H
- 0bc6 50 push ax
- 0bc7 b0 39 mov al,39H
- 0bc9 50 push ax
- 0bca 9a 00 00 00 00 call far SYSTEM_02A
- 0bcf b0 2d mov al,2dH
- 0bd1 50 push ax
- 0bd2 9a 00 00 00 00 call far SYSTEM_029
- 0bd7 9a 00 00 00 00 call far SYSTEM_018
- 0bdc 75 03 jne L85
- 0bde e9 f0 00 jmp L89
- 0be1 8a 46 f7 L85 mov al,-9H[bp]
- 0be4 30 e4 xor ah,ah
- 0be6 3b 46 f5 cmp ax,-0bH[bp]
- 0be9 7c 03 jl L86
- 0beb e9 e3 00 jmp L89
- 0bee 80 7e f7 00 L86 cmp byte ptr -9H[bp],00H
- 0bf2 75 6f jne L87
- 0bf4 8a 46 fe mov al,-2H[bp]
- 0bf7 50 push ax
- 0bf8 8d 7e b2 lea di,-4eH[bp]
- 0bfb 16 push ss
- 0bfc 57 push di
- 0bfd 9a 00 00 00 00 call far SYSTEM_028
- 0c02 b0 30 mov al,30H
- 0c04 50 push ax
- 0c05 b0 39 mov al,39H
- 0c07 50 push ax
- 0c08 9a 00 00 00 00 call far SYSTEM_02A
- 0c0d b0 2d mov al,2dH
- 0c0f 50 push ax
- 0c10 9a 00 00 00 00 call far SYSTEM_029
- 0c15 9a 00 00 00 00 call far SYSTEM_018
- 0c1a 74 47 je L87
- 0c1c 8d be b2 fe lea di,-14eH[bp]
- 0c20 16 push ss
- 0c21 57 push di
- 0c22 8a 46 fe mov al,-2H[bp]
- 0c25 50 push ax
- 0c26 9a 00 00 00 00 call far SYSTEM_012
- 0c2b 0e push cs
- 0c2c e8 00 00 call PCBDOORS_003
- 0c2f 8d be b2 fe lea di,-14eH[bp]
- 0c33 16 push ss
- 0c34 57 push di
- 0c35 8d 7e f7 lea di,-9H[bp]
- 0c38 16 push ss
- 0c39 57 push di
- 0c3a 9a 00 00 00 00 call far SYSTEM_00B
- 0c3f 8d be b2 fd lea di,-24eH[bp]
- 0c43 16 push ss
- 0c44 57 push di
- 0c45 8a 46 fe mov al,-2H[bp]
- 0c48 50 push ax
- 0c49 9a 00 00 00 00 call far SYSTEM_012
- 0c4e 9a 00 00 00 00 call far SYSTEM_00F
- 0c53 8d 7e f7 lea di,-9H[bp]
- 0c56 16 push ss
- 0c57 57 push di
- 0c58 b8 06 00 mov ax,0006H
- 0c5b 50 push ax
- 0c5c 9a 00 00 00 00 call far SYSTEM_00C
- 0c61 eb 6b jmp L88
- 0c63 80 7e f7 00 L87 cmp byte ptr -9H[bp],00H
- 0c67 76 65 jbe L88
- 0c69 8a 46 fe mov al,-2H[bp]
- 0c6c 50 push ax
- 0c6d 8d 7e 92 lea di,-6eH[bp]
- 0c70 16 push ss
- 0c71 57 push di
- 0c72 9a 00 00 00 00 call far SYSTEM_028
- 0c77 b0 30 mov al,30H
- 0c79 50 push ax
- 0c7a b0 39 mov al,39H
- 0c7c 50 push ax
- 0c7d 9a 00 00 00 00 call far SYSTEM_02A
- 0c82 9a 00 00 00 00 call far SYSTEM_018
- 0c87 74 45 je L88
- 0c89 8d be 92 fe lea di,-16eH[bp]
- 0c8d 16 push ss
- 0c8e 57 push di
- 0c8f 8a 46 fe mov al,-2H[bp]
- 0c92 50 push ax
- 0c93 9a 00 00 00 00 call far SYSTEM_012
- 0c98 0e push cs
- 0c99 e8 00 00 call PCBDOORS_003
- 0c9c 8d be 92 fe lea di,-16eH[bp]
- 0ca0 16 push ss
- 0ca1 57 push di
- 0ca2 8d 7e f7 lea di,-9H[bp]
- 0ca5 16 push ss
- 0ca6 57 push di
- 0ca7 9a 00 00 00 00 call far SYSTEM_00B
- 0cac 8d be 92 fd lea di,-26eH[bp]
- 0cb0 16 push ss
- 0cb1 57 push di
- 0cb2 8a 46 fe mov al,-2H[bp]
- 0cb5 50 push ax
- 0cb6 9a 00 00 00 00 call far SYSTEM_012
- 0cbb 9a 00 00 00 00 call far SYSTEM_00F
- 0cc0 8d 7e f7 lea di,-9H[bp]
- 0cc3 16 push ss
- 0cc4 57 push di
- 0cc5 b8 06 00 mov ax,0006H
- 0cc8 50 push ax
- 0cc9 9a 00 00 00 00 call far SYSTEM_00C
- 0cce e9 99 00 L88 jmp L92
- 0cd1 80 7e fe 08 L89 cmp byte ptr -2H[bp],08H
- 0cd5 75 59 jne L90
- 0cd7 80 7e f7 00 cmp byte ptr -9H[bp],00H
- 0cdb 76 53 jbe L90
- 0cdd 8d be d2 fe lea di,-12eH[bp]
- 0ce1 16 push ss
- 0ce2 57 push di
- 0ce3 bf 00 00 mov di,offset L78
- 0ce6 0e push cs
- 0ce7 57 push di
- 0ce8 9a 00 00 00 00 call far SYSTEM_00B
- 0ced bf 00 00 mov di,offset L79
- 0cf0 0e push cs
- 0cf1 57 push di
- 0cf2 9a 00 00 00 00 call far SYSTEM_00F
- 0cf7 bf 00 00 mov di,offset L78
- 0cfa 0e push cs
- 0cfb 57 push di
- 0cfc 9a 00 00 00 00 call far SYSTEM_00F
- 0d01 0e push cs
- 0d02 e8 00 00 call PCBDOORS_003
- 0d05 8d be d2 fe lea di,-12eH[bp]
- 0d09 16 push ss
- 0d0a 57 push di
- 0d0b 8d 7e f7 lea di,-9H[bp]
- 0d0e 16 push ss
- 0d0f 57 push di
- 0d10 b8 01 00 mov ax,0001H
- 0d13 50 push ax
- 0d14 8a 46 f7 mov al,-9H[bp]
- 0d17 30 e4 xor ah,ah
- 0d19 48 dec ax
- 0d1a 50 push ax
- 0d1b 9a 00 00 00 00 call far SYSTEM_00E
- 0d20 8d 7e f7 lea di,-9H[bp]
- 0d23 16 push ss
- 0d24 57 push di
- 0d25 b8 06 00 mov ax,0006H
- 0d28 50 push ax
- 0d29 9a 00 00 00 00 call far SYSTEM_00C
- 0d2e eb 3a jmp L92
- 0d30 80 7e fe 0d L90 cmp byte ptr -2H[bp],0dH
- 0d34 75 0b jne L91
- 0d36 bf 00 00 mov di,offset L80
- 0d39 0e push cs
- 0d3a 57 push di
- 0d3b 0e push cs
- 0d3c e8 00 00 call PCBDOORS_004
- 0d3f eb 29 jmp L92
- 0d41 8a 46 fe L91 mov al,-2H[bp]
- 0d44 50 push ax
- 0d45 8d 7e b2 lea di,-4eH[bp]
- 0d48 16 push ss
- 0d49 57 push di
- 0d4a 9a 00 00 00 00 call far SYSTEM_028
- 0d4f b0 30 mov al,30H
- 0d51 50 push ax
- 0d52 b0 39 mov al,39H
- 0d54 50 push ax
- 0d55 9a 00 00 00 00 call far SYSTEM_02A
- 0d5a 9a 00 00 00 00 call far SYSTEM_018
- 0d5f 75 09 jne L92
- 0d61 bf 00 00 mov di,offset L81
- 0d64 0e push cs
- 0d65 57 push di
- 0d66 0e push cs
- 0d67 e8 00 00 call PCBDOORS_003
- 0d6a 80 7e fe 0d L92 cmp byte ptr -2H[bp],0dH
- 0d6e 74 09 je L93
- 0d70 80 7e f2 00 cmp byte ptr -0eH[bp],00H
- 0d74 75 03 jne L93
- 0d76 e9 1e fe jmp L82
- 0d79 80 7e f2 00 L93 cmp byte ptr -0eH[bp],00H
- 0d7d 75 41 jne L96
- 0d7f 80 7e f7 00 cmp byte ptr -9H[bp],00H
- 0d83 75 0e jne L94
- 0d85 c4 7e 06 les di,dword ptr +6H[bp]
- 0d88 31 c0 xor ax,ax
- 0d8a 26 89 05 mov es:[di],ax
- 0d8d c6 46 ff 01 mov byte ptr -1H[bp],01H
- 0d91 eb 2d jmp L96
- 0d93 8d 7e f7 L94 lea di,-9H[bp]
- 0d96 16 push ss
- 0d97 57 push di
- 0d98 8d 7e f3 lea di,-0dH[bp]
- 0d9b 16 push ss
- 0d9c 57 push di
- 0d9d 9a 00 00 00 00 call far SYSTEM_062
- 0da2 c4 7e 06 les di,dword ptr +6H[bp]
- 0da5 26 89 05 mov es:[di],ax
- 0da8 83 7e f3 00 cmp word ptr -0dH[bp],0000H
- 0dac 75 06 jne L95
- 0dae c6 46 ff 01 mov byte ptr -1H[bp],01H
- 0db2 eb 0c jmp L96
- 0db4 c6 46 ff 00 L95 mov byte ptr -1H[bp],00H
- 0db8 c4 7e 06 les di,dword ptr +6H[bp]
- 0dbb 31 c0 xor ax,ax
- 0dbd 26 89 05 mov es:[di],ax
- 0dc0 8a 46 ff L96 mov al,-1H[bp]
- 0dc3 89 ec mov sp,bp
- 0dc5 5d pop bp
- 0dc6 ca 04 00 retf 0004H
- 0dc9 01 08 L97 add [bx+si],cx
- 0dcb 01 20 L98 add [bx+si],sp
- 0dcd 00 01 L99 add [bx+di],al
- 0dcf 07 pop es
- 0dd0 GETSTR:
- 0dd0 55 PCBDOORS_009 push bp
- 0dd1 89 e5 mov bp,sp
- 0dd3 b8 22 02 mov ax,0222H
- 0dd6 9a 00 00 00 00 call far SYSTEM_034
- 0ddb 81 ec 22 02 sub sp,0222H
- 0ddf c6 06 00 00 00 mov byte ptr CHAT,00H
- 0de4 c4 7e 06 les di,dword ptr +6H[bp]
- 0de7 26 c6 05 00 mov byte ptr es:[di],00H
- 0deb 0e L101 push cs
- 0dec e8 00 00 call PCBDOORS_010
- 0def 50 push ax
- 0df0 9a 00 00 00 00 call far SYSTEM_05A
- 0df5 88 46 fe mov -2H[bp],al
- 0df8 8a 46 fe mov al,-2H[bp]
- 0dfb 50 push ax
- 0dfc 8d 7e de lea di,-22H[bp]
- 0dff 16 push ss
- 0e00 57 push di
- 0e01 bf 00 00 mov di,offset STR_RANGE
- 0e04 1e push ds
- 0e05 57 push di
- 0e06 b8 20 00 mov ax,0020H
- 0e09 50 push ax
- 0e0a 9a 00 00 00 00 call far SYSTEM_016
- 0e0f 9a 00 00 00 00 call far SYSTEM_018
- 0e14 74 55 je L102
- 0e16 c4 7e 06 les di,dword ptr +6H[bp]
- 0e19 26 8a 05 mov al,es:[di]
- 0e1c 30 e4 xor ah,ah
- 0e1e 3b 46 0a cmp ax,+0aH[bp]
- 0e21 7d 48 jge L102
- 0e23 8d be de fe lea di,-122H[bp]
- 0e27 16 push ss
- 0e28 57 push di
- 0e29 8a 46 fe mov al,-2H[bp]
- 0e2c 50 push ax
- 0e2d 9a 00 00 00 00 call far SYSTEM_012
- 0e32 0e push cs
- 0e33 e8 00 00 call PCBDOORS_003
- 0e36 8d be de fe lea di,-122H[bp]
- 0e3a 16 push ss
- 0e3b 57 push di
- 0e3c c4 7e 06 les di,dword ptr +6H[bp]
- 0e3f 06 push es
- 0e40 57 push di
- 0e41 9a 00 00 00 00 call far SYSTEM_00B
- 0e46 8d be de fd lea di,-222H[bp]
- 0e4a 16 push ss
- 0e4b 57 push di
- 0e4c 8a 46 fe mov al,-2H[bp]
- 0e4f 50 push ax
- 0e50 9a 00 00 00 00 call far SYSTEM_012
- 0e55 9a 00 00 00 00 call far SYSTEM_00F
- 0e5a c4 7e 06 les di,dword ptr +6H[bp]
- 0e5d 06 push es
- 0e5e 57 push di
- 0e5f b8 50 00 mov ax,0050H
- 0e62 50 push ax
- 0e63 9a 00 00 00 00 call far SYSTEM_00C
- 0e68 e9 9d 00 jmp L105
- 0e6b 80 7e fe 08 L102 cmp byte ptr -2H[bp],08H
- 0e6f 75 5f jne L103
- 0e71 c4 7e 06 les di,dword ptr +6H[bp]
- 0e74 26 80 3d 00 cmp byte ptr es:[di],00H
- 0e78 76 56 jbe L103
- 0e7a 8d be de fe lea di,-122H[bp]
- 0e7e 16 push ss
- 0e7f 57 push di
- 0e80 bf 00 00 mov di,offset L97
- 0e83 0e push cs
- 0e84 57 push di
- 0e85 9a 00 00 00 00 call far SYSTEM_00B
- 0e8a bf 00 00 mov di,offset L98
- 0e8d 0e push cs
- 0e8e 57 push di
- 0e8f 9a 00 00 00 00 call far SYSTEM_00F
- 0e94 bf 00 00 mov di,offset L97
- 0e97 0e push cs
- 0e98 57 push di
- 0e99 9a 00 00 00 00 call far SYSTEM_00F
- 0e9e 0e push cs
- 0e9f e8 00 00 call PCBDOORS_003
- 0ea2 8d be de fe lea di,-122H[bp]
- 0ea6 16 push ss
- 0ea7 57 push di
- 0ea8 c4 7e 06 les di,dword ptr +6H[bp]
- 0eab 06 push es
- 0eac 57 push di
- 0ead b8 01 00 mov ax,0001H
- 0eb0 50 push ax
- 0eb1 c4 7e 06 les di,dword ptr +6H[bp]
- 0eb4 26 8a 05 mov al,es:[di]
- 0eb7 30 e4 xor ah,ah
- 0eb9 48 dec ax
- 0eba 50 push ax
- 0ebb 9a 00 00 00 00 call far SYSTEM_00E
- 0ec0 c4 7e 06 les di,dword ptr +6H[bp]
- 0ec3 06 push es
- 0ec4 57 push di
- 0ec5 b8 50 00 mov ax,0050H
- 0ec8 50 push ax
- 0ec9 9a 00 00 00 00 call far SYSTEM_00C
- 0ece eb 38 jmp L105
- 0ed0 80 7e fe 0d L103 cmp byte ptr -2H[bp],0dH
- 0ed4 75 0b jne L104
- 0ed6 bf 00 00 mov di,offset L99
- 0ed9 0e push cs
- 0eda 57 push di
- 0edb 0e push cs
- 0edc e8 00 00 call PCBDOORS_004
- 0edf eb 27 jmp L105
- 0ee1 8a 46 fe L104 mov al,-2H[bp]
- 0ee4 50 push ax
- 0ee5 8d 7e be lea di,-42H[bp]
- 0ee8 16 push ss
- 0ee9 57 push di
- 0eea bf 00 00 mov di,offset STR_RANGE
- 0eed 1e push ds
- 0eee 57 push di
- 0eef b8 20 00 mov ax,0020H
- 0ef2 50 push ax
- 0ef3 9a 00 00 00 00 call far SYSTEM_016
- 0ef8 9a 00 00 00 00 call far SYSTEM_018
- 0efd 75 09 jne L105
- 0eff bf 00 00 mov di,offset L100
- 0f02 0e push cs
- 0f03 57 push di
- 0f04 0e push cs
- 0f05 e8 00 00 call PCBDOORS_003
- 0f08 80 7e fe 0d L105 cmp byte ptr -2H[bp],0dH
- 0f0c 74 03 je L106
- 0f0e e9 da fe jmp L101
- 0f11 c6 46 ff 01 L106 mov byte ptr -1H[bp],01H
- 0f15 8a 46 ff mov al,-1H[bp]
- 0f18 89 ec mov sp,bp
- 0f1a 5d pop bp
- 0f1b ca 06 00 retf 0006H
- 0f1e 39 50 43 L107 cmp +43H[bx+si],dx
- 0f21 42 inc dx
- 0f22 4f dec di
- 0f23 41 inc cx
- 0f24 52 push dx
- 0f25 44 inc sp
- 0f26 20 44 4f and +4fH[si],al
- 0f29 4f dec di
- 0f2a 52 push dx
- 0f2b 53 push bx
- 0f2c 20 53 55 and +55H[bp+di],dl
- 0f2f 50 push ax
- 0f30 50 push ax
- 0f31 4f dec di
- 0f32 52 push dx
- 0f33 54 push sp
- 0f34 20 52 4f and +4fH[bp+si],dl
- 0f37 55 push bp
- 0f38 54 push sp
- 0f39 49 dec cx
- 0f3a 4e dec si
- 0f3b 45 inc bp
- 0f3c 53 push bx
- 0f3d 20 2d and [di],ch
- 0f3f 20 54 55 and +55H[si],dl
- 0f42 52 push dx
- 0f43 42 inc dx
- 0f44 4f dec di
- 0f45 20 50 41 and +41H[bx+si],dl
- 0f48 53 push bx
- 0f49 43 inc bx
- 0f4a 41 inc cx
- 0f4b 4c dec sp
- 0f4c 20 34 and [si],dh
- 0f4e 2e 30 20 xor cs:[bx+si],ah
- 0f51 56 push si
- 0f52 45 inc bp
- 0f53 52 push dx
- 0f54 53 push bx
- 0f55 49 dec cx
- 0f56 4f dec di
- 0f57 4e dec si
- 0f58 26 43 L108 inc bx
- 0f5a 6f outsw
- 0f5b 70 79 jo L116
- 0f5d 72 69 jb L113
- 0f5f 67 68 74 20 push 2074H
- 0f63 28 43 29 sub +29H[bp+di],al
- 0f66 31 39 xor [bx+di],di
- 0f68 38 38 cmp [bx+si],bh
- 0f6a 20 4a 6f and +6fH[bp+si],cl
- 0f6d 73 65 jae L115
- 0f6f 70 68 jo L117
- 0f71 20 45 2e and +2eH[di],al
- 0f74 20 47 6f and +6fH[bx],al
- 0f77 6f outsw
- 0f78 64 69 6e 20 49 49 imul bp,fs:+20H[bp],4949H
- 0f7e 49 dec cx
- 0f7f 08 43 61 L109 or +61H[bp+di],al
- 0f82 6c insb
- 0f83 6c insb
- 0f84 65 72 3a jb PCBDOORS_00A
- 0f87 20 09 and [bx+di],cl
- 0f89 54 push sp
- 0f8a 69 6d 65 20 6f imul bp,+65H[di],6f20H
- 0f8f 6e outsb
- 0f90 3a 20 cmp ah,[bx+si]
- 0f92 2e 3c 46 L111 cmp al,46H
- 0f95 38 3e 20 45 cmp [00004520H],bh
- 0f99 78 69 js L119
- 0f9b 74 20 je L112
- 0f9d 20 20 and [bx+si],ah
- 0f9f 20 20 and [bx+si],ah
- 0fa1 3c 46 cmp al,46H
- 0fa3 31 30 xor [bx+si],si
- 0fa5 3e 20 43 68 and ds:+68H[bp+di],al
- 0fa9 61 popa
- 0faa 74 20 je L114
- 0fac 4f dec di
- 0fad 4e dec si
- 0fae 20 20 and [bx+si],ah
- 0fb0 20 20 and [bx+si],ah
- 0fb2 20 3c and [si],bh
- 0fb4 45 inc bp
- 0fb5 53 push bx
- 0fb6 43 inc bx
- 0fb7 3e 20 43 68 and ds:+68H[bp+di],al
- 0fbb 61 popa
- 0fbc 74 20 je L118
- 0fbe 4f dec di
- 0fbf 46 inc si
- 0fc0 46 inc si
- 0fc1 SYSOP_WINDOW:
- 0fc1 55 PCBDOORS_00A push bp
- 0fc2 89 e5 mov bp,sp
- 0fc4 b8 0a 00 mov ax,000aH
- 0fc7 9a 00 00 00 00 call far SYSTEM_034
- 0fcc 83 ec 0a L114 sub sp,000aH
- 0fcf b0 00 mov al,00H
- 0fd1 50 push ax
- 0fd2 9a 00 00 00 00 call far CRT_00E
- 0fd7 b0 0f mov al,0fH
- 0fd9 50 L117 push ax
- 0fda 9a 00 00 00 00 call far CRT_00D
- 0fdf b8 01 00 mov ax,0001H
- 0fe2 50 push ax
- 0fe3 b8 01 00 mov ax,0001H
- 0fe6 50 push ax
- 0fe7 b8 50 00 mov ax,0050H
- 0fea 50 push ax
- 0feb b8 19 00 mov ax,0019H
- 0fee 50 push ax
- 0fef 0e push cs
- 0ff0 e8 00 00 call PCBDOORS_00B
- 0ff3 b0 0f mov al,0fH
- 0ff5 50 push ax
- 0ff6 9a 00 00 00 00 call far CRT_00E
- 0ffb b0 00 mov al,00H
- 0ffd 50 push ax
- 0ffe 9a 00 00 00 00 call far CRT_00D
- 1003 b8 02 00 mov ax,0002H
- 1006 50 push ax
- 1007 b8 18 00 mov ax,0018H
- 100a 50 push ax
- 100b 0e push cs
- 100c e8 00 00 call PCBDOORS_00C
- 100f c7 46 fe 02 00 mov word ptr -2H[bp],0002H
- 1014 eb 03 jmp L121
- 1016 ff 46 fe L120 inc word ptr -2H[bp]
- 1019 bf 00 00 L121 mov di,offset SYSTEM_BSS+100H
- 101c 1e push ds
- 101d 57 push di
- 101e b0 20 mov al,20H
- 1020 50 push ax
- 1021 31 c0 xor ax,ax
- 1023 50 push ax
- 1024 9a 00 00 00 00 call far SYSTEM_039
- 1029 9a 00 00 00 00 call far SYSTEM_03B
- 102e 83 7e fe 4f cmp word ptr -2H[bp],004fH
- 1032 75 e2 jne L120
- 1034 b8 02 00 mov ax,0002H
- 1037 50 push ax
- 1038 b8 19 00 mov ax,0019H
- 103b 50 push ax
- 103c 0e push cs
- 103d e8 00 00 call PCBDOORS_00C
- 1040 c7 46 fe 02 00 mov word ptr -2H[bp],0002H
- 1045 eb 03 jmp L123
- 1047 ff 46 fe L122 inc word ptr -2H[bp]
- 104a bf 00 00 L123 mov di,offset SYSTEM_BSS+100H
- 104d 1e push ds
- 104e 57 push di
- 104f b0 20 mov al,20H
- 1051 50 push ax
- 1052 31 c0 xor ax,ax
- 1054 50 push ax
- 1055 9a 00 00 00 00 call far SYSTEM_039
- 105a 9a 00 00 00 00 call far SYSTEM_03B
- 105f 83 7e fe 4f cmp word ptr -2H[bp],004fH
- 1063 75 e2 jne L122
- 1065 b8 0b 00 mov ax,000bH
- 1068 50 push ax
- 1069 b8 18 00 mov ax,0018H
- 106c 50 push ax
- 106d 0e push cs
- 106e e8 00 00 call PCBDOORS_00C
- 1071 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 1074 1e push ds
- 1075 57 push di
- 1076 bf 00 00 mov di,offset L107
- 1079 0e push cs
- 107a 57 push di
- 107b 31 c0 xor ax,ax
- 107d 50 push ax
- 107e 9a 00 00 00 00 call far SYSTEM_036
- 1083 9a 00 00 00 00 call far SYSTEM_03B
- 1088 b8 15 00 mov ax,0015H
- 108b 50 push ax
- 108c b8 19 00 mov ax,0019H
- 108f 50 push ax
- 1090 0e push cs
- 1091 e8 00 00 call PCBDOORS_00C
- 1094 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 1097 1e push ds
- 1098 57 push di
- 1099 bf 00 00 mov di,offset L108
- 109c 0e push cs
- 109d 57 push di
- 109e 31 c0 xor ax,ax
- 10a0 50 push ax
- 10a1 9a 00 00 00 00 call far SYSTEM_036
- 10a6 9a 00 00 00 00 call far SYSTEM_03B
- 10ab b8 e8 03 mov ax,03e8H
- 10ae 50 push ax
- 10af 9a 00 00 00 00 call far CRT_012
- 10b4 b8 02 00 mov ax,0002H
- 10b7 50 push ax
- 10b8 b8 18 00 mov ax,0018H
- 10bb 50 push ax
- 10bc 0e push cs
- 10bd e8 00 00 call PCBDOORS_00C
- 10c0 c7 46 fe 02 00 mov word ptr -2H[bp],0002H
- 10c5 eb 03 jmp L125
- 10c7 ff 46 fe L124 inc word ptr -2H[bp]
- 10ca bf 00 00 L125 mov di,offset SYSTEM_BSS+100H
- 10cd 1e push ds
- 10ce 57 push di
- 10cf b0 20 mov al,20H
- 10d1 50 push ax
- 10d2 31 c0 xor ax,ax
- 10d4 50 push ax
- 10d5 9a 00 00 00 00 call far SYSTEM_039
- 10da 9a 00 00 00 00 call far SYSTEM_03B
- 10df 83 7e fe 4f cmp word ptr -2H[bp],004fH
- 10e3 75 e2 jne L124
- 10e5 b8 02 00 mov ax,0002H
- 10e8 50 push ax
- 10e9 b8 19 00 mov ax,0019H
- 10ec 50 push ax
- 10ed 0e push cs
- 10ee e8 00 00 call PCBDOORS_00C
- 10f1 c7 46 fe 02 00 mov word ptr -2H[bp],0002H
- 10f6 eb 03 jmp L127
- 10f8 ff 46 fe L126 inc word ptr -2H[bp]
- 10fb bf 00 00 L127 mov di,offset SYSTEM_BSS+100H
- 10fe 1e push ds
- 10ff 57 push di
- 1100 b0 20 mov al,20H
- 1102 50 push ax
- 1103 31 c0 xor ax,ax
- 1105 50 push ax
- 1106 9a 00 00 00 00 call far SYSTEM_039
- 110b 9a 00 00 00 00 call far SYSTEM_03B
- 1110 83 7e fe 4f cmp word ptr -2H[bp],004fH
- 1114 75 e2 jne L126
- 1116 b8 05 00 mov ax,0005H
- 1119 50 push ax
- 111a b8 18 00 mov ax,0018H
- 111d 50 push ax
- 111e 0e push cs
- 111f e8 00 00 call PCBDOORS_00C
- 1122 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 1125 1e push ds
- 1126 57 push di
- 1127 bf 00 00 mov di,offset L109
- 112a 0e push cs
- 112b 57 push di
- 112c 31 c0 xor ax,ax
- 112e 50 push ax
- 112f 9a 00 00 00 00 call far SYSTEM_036
- 1134 bf 00 00 mov di,offset NAME
- 1137 1e push ds
- 1138 57 push di
- 1139 31 c0 xor ax,ax
- 113b 50 push ax
- 113c 9a 00 00 00 00 call far SYSTEM_036
- 1141 9a 00 00 00 00 call far SYSTEM_03B
- 1146 b8 3f 00 mov ax,003fH
- 1149 50 push ax
- 114a b8 18 00 mov ax,0018H
- 114d 50 push ax
- 114e 0e push cs
- 114f e8 00 00 call PCBDOORS_00C
- 1152 8d 7e f6 lea di,-0aH[bp]
- 1155 16 push ss
- 1156 57 push di
- 1157 8d 7e f8 lea di,-8H[bp]
- 115a 16 push ss
- 115b 57 push di
- 115c 8d 7e fa lea di,-6H[bp]
- 115f 16 push ss
- 1160 57 push di
- 1161 8d 7e fc lea di,-4H[bp]
- 1164 16 push ss
- 1165 57 push di
- 1166 9a 00 00 00 00 call far DOS_005
- 116b bf 00 00 mov di,offset SYSTEM_BSS+100H
- 116e 1e push ds
- 116f 57 push di
- 1170 bf 00 00 mov di,offset L110
- 1173 0e push cs
- 1174 57 push di
- 1175 31 c0 xor ax,ax
- 1177 50 push ax
- 1178 9a 00 00 00 00 call far SYSTEM_036
- 117d 9a 00 00 00 00 call far SYSTEM_03B
- 1182 83 7e f6 0a cmp word ptr -0aH[bp],000aH
- 1186 73 15 jae L128
- 1188 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 118b 1e push ds
- 118c 57 push di
- 118d b0 30 mov al,30H
- 118f 50 push ax
- 1190 31 c0 xor ax,ax
- 1192 50 push ax
- 1193 9a 00 00 00 00 call far SYSTEM_039
- 1198 9a 00 00 00 00 call far SYSTEM_03B
- 119d bf 00 00 L128 mov di,offset SYSTEM_BSS+100H
- 11a0 1e push ds
- 11a1 57 push di
- 11a2 8b 46 f6 mov ax,-0aH[bp]
- 11a5 31 d2 xor dx,dx
- 11a7 52 push dx
- 11a8 50 push ax
- 11a9 b8 01 00 mov ax,0001H
- 11ac 50 push ax
- 11ad 9a 00 00 00 00 call far SYSTEM_037
- 11b2 b0 3a mov al,3aH
- 11b4 50 push ax
- 11b5 31 c0 xor ax,ax
- 11b7 50 push ax
- 11b8 9a 00 00 00 00 call far SYSTEM_039
- 11bd 9a 00 00 00 00 call far SYSTEM_03B
- 11c2 83 7e f8 0a cmp word ptr -8H[bp],000aH
- 11c6 73 15 jae L129
- 11c8 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 11cb 1e push ds
- 11cc 57 push di
- 11cd b0 30 mov al,30H
- 11cf 50 push ax
- 11d0 31 c0 xor ax,ax
- 11d2 50 push ax
- 11d3 9a 00 00 00 00 call far SYSTEM_039
- 11d8 9a 00 00 00 00 call far SYSTEM_03B
- 11dd bf 00 00 L129 mov di,offset SYSTEM_BSS+100H
- 11e0 1e push ds
- 11e1 57 push di
- 11e2 8b 46 f8 mov ax,-8H[bp]
- 11e5 31 d2 xor dx,dx
- 11e7 52 push dx
- 11e8 50 push ax
- 11e9 b8 01 00 mov ax,0001H
- 11ec 50 push ax
- 11ed 9a 00 00 00 00 call far SYSTEM_037
- 11f2 9a 00 00 00 00 call far SYSTEM_03B
- 11f7 b8 12 00 mov ax,0012H
- 11fa 50 push ax
- 11fb b8 19 00 mov ax,0019H
- 11fe 50 push ax
- 11ff 0e push cs
- 1200 e8 00 00 call PCBDOORS_00C
- 1203 bf 00 00 mov di,offset SYSTEM_BSS+100H
- 1206 1e push ds
- 1207 57 push di
- 1208 bf 00 00 mov di,offset L111
- 120b 0e push cs
- 120c 57 push di
- 120d 31 c0 xor ax,ax
- 120f 50 push ax
- 1210 9a 00 00 00 00 call far SYSTEM_036
- 1215 9a 00 00 00 00 call far SYSTEM_03B
- 121a b0 00 mov al,00H
- 121c 50 push ax
- 121d 9a 00 00 00 00 call far CRT_00E
- 1222 b0 0f mov al,0fH
- 1224 50 push ax
- 1225 9a 00 00 00 00 call far CRT_00D
- 122a b8 01 00 mov ax,0001H
- 122d 50 push ax
- 122e b8 16 00 mov ax,0016H
- 1231 50 push ax
- 1232 0e push cs
- 1233 e8 00 00 call PCBDOORS_00C
- 1236 89 ec mov sp,bp
- 1238 5d pop bp
- 1239 cb retf
-
- No disassembly errors
-
- ------------------------------------------------------------
-
- Segment: _BSS WORD 000001af bytes
-
- No disassembly errors
-
- ------------------------------------------------------------
-