seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-24 17:04:19 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity
Files
f5ed2b0a4d18444304007f20e459be89b797c67b
Digital-Research-Source-Code/CPM OPERATING SYSTEMS/CPM.Z80.DE/PERSONAL/PCPM-86/PCPM 2.1-1/SRC/SYSTRAN.A86
Sepp J Morris 31738079c4 Upload 
Digital Research
2020-11-06 18:50:37 +01:00

6790 lines
458 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

SYSTRAN.LST Sourcer v7.00
PAGE 59,132
;==========================================================================
;== ==
;== SYSTRAN ==
;== ==
;== Created: ==
;== Code type: special ==
;== Passes: 9 Analysis Options on: QRSUX ==
;== ==
;==========================================================================
target EQU 'T3' ; Target assembler: TASM-3.0
; The following equates show data references outside the range of the program.
= 013C data_1e equ 13Ch ; (0000:013C=0EF6Fh)
;------------------------------------------------------------ seg_a ----
seg_a segment byte public
assume cs:seg_a , ds:seg_a
3BE9:0000 01 data_2 db 1 ; xref 3BE9:06FB, 0716, 0762, 077D
3BE9:0001 09 02 00 00 09 db 9, 2, 0, 0, 9
3BE9:0006 02 data_3 db 2 ; xref 3BE9:07C1
3BE9:0007 00 00 02 C4 04 00 db 00h, 00h, 02h,0C4h, 04h, 00h
3BE9:000D 00 C4 04 00 00 03 db 00h,0C4h, 04h, 00h, 00h, 03h
3BE9:0013 03 00 db 03h, 00h
3BE9:0015 0000 data_4 dw 0
3BE9:0017 80 02 FF FF 04 10 db 80h, 02h,0FFh,0FFh, 04h, 10h
3BE9:001D 00 00 00 10 00 db 00h, 00h, 00h, 10h, 00h
3BE9:0022 00 00 00 00 00 00 db 0, 0, 0, 0, 0, 0
3BE9:0028 0000 data_6 dw 0 ; xref 3BE9:09F2, 0A2D
3BE9:002A 0000 data_7 dw 0 ; xref 3BE9:09F9, 0A34
3BE9:002C 0022[00] db 34 dup (0)
3BE9:004E 0000 data_8 dw 0 ; Data table (indexed access)
; xref 3BE9:0A3B
3BE9:0050 00 00 00 00 db 0, 0, 0, 0
3BE9:0054 0000 data_9 dw 0 ; xref 3BE9:0A1C
3BE9:0056 00 00 00 00 00 00 db 0, 0, 0, 0, 0, 0
3BE9:005C 00 db 0
3BE9:005D 0000 data_10 dw 0
3BE9:005F 0021[00] db 33 dup (0)
3BE9:0080 E9 data_11 db 0E9h ; xref 3BE9:1521, 20C6, 20F0
3BE9:0081 00 00 FA 8E 16 15 db 00h, 00h,0FAh, 8Eh, 16h, 15h
3BE9:0087 00 BC 00 01 FB 8C db 00h,0BCh, 00h, 01h,0FBh, 8Ch
3BE9:008D D8 8E C0 A3 86 02 db 0D8h, 8Eh,0C0h,0A3h, 86h, 02h
3BE9:0093 80 3E 80 00 00 74 db 80h, 3Eh, 80h, 00h, 00h, 74h
3BE9:0099 1F 81 3E 5D 00 2D db 1Fh, 81h, 3Eh, 5Dh, 00h, 2Dh
3BE9:009F 44 74 0A 81 3E 5D db 44h, 74h, 0Ah, 81h, 3Eh, 5Dh
3BE9:00A5 00 2D 64 74 02 EB db 00h, 2Dh, 64h, 74h, 02h,0EBh
3BE9:00AB 0D db 0Dh
3BE9:00AC loc_1:
3BE9:00AC C7 06 0112 019F mov word ptr ds:[112h],19Fh ; (3BE9:0112=63E8h)
3BE9:00B2 ,BB 42E4 mov bx,offset data_217 ; (3BE9:42E4=0)
3BE9:00B5 C7 07 0007 mov word ptr [bx],7
3BE9:00B9 loc_2:
3BE9:00B9 E8 00C8 call sub_3 ; (0184)
3BE9:00BC 80 3E 0102 00 cmp byte ptr ds:[102h],0 ; (3BE9:0102=44h)
3BE9:00C1 74 4A je loc_4 ; Jump if equal
3BE9:00C3 E8 0960 call sub_49 ; (0A26)
3BE9:00C6 E8 08A7 call sub_41 ; (0970)
3BE9:00C9 E8 097D call sub_50 ; (0A49)
3BE9:00CC 06 push es
3BE9:00CD 53 push bx
3BE9:00CE 50 push ax
3BE9:00CF 33 DB xor bx,bx ; Zero register
3BE9:00D1 8E C3 mov es,bx
3BE9:00D3 26: C4 1E 013C les bx,dword ptr es:data_1e ; (0000:013C=0EF6Fh) Load seg:offset p
3BE9:00D8 26: 8A 47 01 mov al,es:[bx+1]
3BE9:00DC A2 0103 mov byte ptr ds:[103h],al ; (3BE9:0103=0B9h)
3BE9:00DF 26: 8A 47 0F mov al,es:[bx+0Fh]
3BE9:00E3 A2 0100 mov byte ptr ds:[100h],al ; (3BE9:0100=0BFh)
3BE9:00E6 26: C6 47 0F 01 mov byte ptr es:[bx+0Fh],1
3BE9:00EB 26: 8A 07 mov al,es:[bx]
3BE9:00EE A2 0101 mov byte ptr ds:[101h],al ; (3BE9:0101=43h)
3BE9:00F1 1E push ds
3BE9:00F2 07 pop es
3BE9:00F3 24 70 and al,70h ; 'p'
3BE9:00F5 3C 40 cmp al,40h ; '@'
3BE9:00F7 72 0F jb loc_3 ; Jump if below
3BE9:00F9 3C 60 cmp al,60h ; '`'
3BE9:00FB 77 0B ja loc_3 ; Jump if above
3BE9:00FD ,BE 444B mov si,offset data_219 ; (3BE9:444B=0)
3BE9:0100 ,BF 4443 mov di,offset data_218 ; (3BE9:4443=0)
3BE9:0103 B9 0008 mov cx,8
3BE9:0106 F3/ A4 rep movsb ; Rep when cx >0 Mov [si] to es:[di]
3BE9:0108 loc_3: ; xref 3BE9:00F7, 00FB
3BE9:0108 58 pop ax
3BE9:0109 5B pop bx
3BE9:010A 07 pop es
3BE9:010B EB 16 jmp short loc_5 ; (0123)
3BE9:010D loc_4: ; xref 3BE9:00C1
3BE9:010D E8 08D8 call sub_48 ; (09E8)
3BE9:0110 B2 96 mov dl,96h
3BE9:0112 E8 0863 call sub_42 ; (0978)
3BE9:0115 E8 0858 call sub_41 ; (0970)
3BE9:0118 E8 0862 call sub_43 ; (097D)
3BE9:011B E8 087F call sub_45 ; (099D)
3BE9:011E B2 C8 mov dl,0C8h
3BE9:0120 E8 0855 call sub_42 ; (0978)
3BE9:0123 loc_5: ; xref 3BE9:010B
3BE9:0123 E8 098A call sub_54 ; (0AB0)
3BE9:0126 E8 03E3 call sub_12 ; (050C)
3BE9:0129 3D 0000 cmp ax,0
3BE9:012C 74 06 je loc_6 ; Jump if equal
3BE9:012E E8 0389 call sub_8 ; (04BA)
3BE9:0131 E8 0376 call sub_7 ; (04AA)
3BE9:0134 loc_6: ; xref 3BE9:012C, 0146
3BE9:0134 ,E8 05A0 call sub_26 ; (06D7)
3BE9:0137 ,BE 42A8 mov si,offset data_216 ; (3BE9:42A8=0)
3BE9:013A E8 0684 call sub_30 ; (07C1)
3BE9:013D D1 E3 shl bx,1 ; Shift w/zeros fill
3BE9:013F FF 97 0104 call word ptr ds:[104h][bx] ;*(3BE9:0104=8)
3BE9:0143 E8 0364 call sub_7 ; (04AA)
3BE9:0146 EB EC jmp short loc_6 ; (0134)
3BE9:0148 E8 5F 09 db 0E8h, 5Fh, 09h
3BE9:014B loc_7: ; xref 3BE9:0182
3BE9:014B ,80 3E 0102 FF cmp byte ptr ds:[102h],0FFh ; (3BE9:0102=44h)
3BE9:0150 74 0C je loc_8 ; Jump if equal
3BE9:0152 E8 088A call sub_47 ; (09DF)
3BE9:0155 E8 0866 call sub_46 ; (09BE)
3BE9:0158 E8 0832 call sub_44 ; (098D)
3BE9:015B E9 0015 jmpn loc_9 ; (0173)
3BE9:015E loc_8: ; xref 3BE9:0150
3BE9:015E 06 push es
3BE9:015F 53 push bx
3BE9:0160 33 DB xor bx,bx ; Zero register
3BE9:0162 8E C3 mov es,bx
3BE9:0164 26: C4 1E 013C les bx,dword ptr es:data_1e ; (0000:013C=0EF6Fh) Load seg:offset p
3BE9:0169 8A 0E 0100 mov cl,byte ptr ds:[100h] ; (3BE9:0100=0BFh)
3BE9:016D 26: 88 4F 0F mov es:[bx+0Fh],cl
3BE9:0171 5B pop bx
3BE9:0172 07 pop es
3BE9:0173 loc_9: ; xref 3BE9:015B
3BE9:0173 33 C9 xor cx,cx ; Zero register
3BE9:0175 33 D2 xor dx,dx ; Zero register
3BE9:0177 E9 07B1 jmp loc_79 ; (092B)
3BE9:017A loc_10: ; xref 3BE9:09B3, 0A79
3BE9:017A ,56 push si
3BE9:017B E8 092C call sub_53 ; (0AAA)
3BE9:017E 5E pop si
3BE9:017F E8 07AC call sub_38 ; (092E)
3BE9:0182 EB C7 jmp short loc_7 ; (014B)
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:00B9
;==========================================================================
3BE9:0184 sub_3 proc near
3BE9:0184 B9 000C mov cx,0Ch
3BE9:0187 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:0189 80 E4 0F and ah,0Fh
3BE9:018C 80 FC 00 cmp ah,0
3BE9:018F 74 1A je loc_12 ; Jump if equal
3BE9:0191 80 FC 04 cmp ah,4
3BE9:0194 74 05 je loc_11 ; Jump if equal
3BE9:0196 80 FC 06 cmp ah,6
3BE9:0199 75 24 jne loc_14 ; Jump if not equal
3BE9:019B loc_11: ; xref 3BE9:0194
3BE9:019B B9 00A3 mov cx,0A3h
3BE9:019E CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:01A0 3D 1431 cmp ax,1431h
3BE9:01A3 75 1A jne loc_14 ; Jump if not equal
3BE9:01A5 C6 06 0102 00 mov byte ptr ds:[102h],0 ; (3BE9:0102=44h)
3BE9:01AA C3 retn
3BE9:01AB loc_12: ; xref 3BE9:018F
3BE9:01AB C6 06 0102 FF mov byte ptr ds:[102h],0FFh ; (3BE9:0102=44h)
3BE9:01B0 3C 41 cmp al,41h ; 'A'
3BE9:01B2 77 01 ja loc_13 ; Jump if above
3BE9:01B4 C3 retn
3BE9:01B5 loc_13: ; xref 3BE9:01B2
3BE9:01B5 BA 489A mov dx,489Ah
3BE9:01B8 B9 0009 mov cx,9
3BE9:01BB CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:01BD EB 08 jmp short loc_15 ; (01C7)
3BE9:01BF loc_14: ; xref 3BE9:0199, 01A3
3BE9:01BF BA 486C mov dx,486Ch
3BE9:01C2 B9 0009 mov cx,9
3BE9:01C5 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:01C7 loc_15: ; xref 3BE9:01BD
3BE9:01C7 33 C9 xor cx,cx ; Zero register
3BE9:01C9 33 D2 xor dx,dx ; Zero register
3BE9:01CB CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:01CD C7 06 0134 4984 mov word ptr ds:[134h],4984h ; (3BE9:0134=0A0E8h)
3BE9:01D3 C7 06 013A 4B1B mov word ptr ds:[13Ah],4B1Bh ; (3BE9:013A=84E8h)
3BE9:01D9 C7 06 0140 0142 mov word ptr ds:[140h],142h ; (3BE9:0140=497h)
3BE9:01DF BE 0120 mov si,120h
3BE9:01E2 E8 05D7 call sub_29 ; (07BC)
3BE9:01E5 ,BE 0114 mov si,114h ; (3BE9:0114=8)
3BE9:01E8 C7 06 0118 4B6F mov word ptr ds:[118h],4B6Fh ; (3BE9:0118=62E8h)
3BE9:01EE E8 069C call sub_34 ; (088D)
3BE9:01F1 E8 02A4 call sub_4 ; (0498)
3BE9:01F4 B4 20 mov ah,20h ; ' '
3BE9:01F6 B0 0A mov al,0Ah
3BE9:01F8 E8 0882 call sub_51 ; (0A7D)
3BE9:01FB BA 0000 mov dx,0
3BE9:01FE ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:0201 B1 14 mov cl,14h
3BE9:0203 E8 040F call sub_22 ; (0615)
3BE9:0206 9C pushf ; Push flags
3BE9:0207 E8 029C call sub_6 ; (04A6)
3BE9:020A 9D popf ; Pop flags
3BE9:020B 73 03 jnc loc_16 ; Jump if carry=0
3BE9:020D E9 02A1 jmp loc_26 ; (04B1)
3BE9:0210 loc_16: ; xref 3BE9:020B
3BE9:0210 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:0213 E8 02E3 call sub_11 ; (04F9)
3BE9:0216 E8 02B3 call sub_9 ; (04CC)
3BE9:0219 E8 089B call sub_55 ; (0AB7)
3BE9:021C E9 029B jmp loc_27 ; (04BA)
;* No entry point to code
3BE9:021F E8 02EA call sub_12 ; (050C)
3BE9:0222 3D 0000 cmp ax,0
3BE9:0225 74 03 je loc_17 ; Jump if equal
3BE9:0227 E9 0287 jmp loc_26 ; (04B1)
3BE9:022A loc_17: ; xref 3BE9:0225
3BE9:022A C7 06 0134 49B6 mov word ptr ds:[134h],49B6h ; (3BE9:0134=0A0E8h)
3BE9:0230 C7 06 013A 4B5A mov word ptr ds:[13Ah],4B5Ah ; (3BE9:013A=84E8h)
3BE9:0236 C7 06 0140 0142 mov word ptr ds:[140h],142h ; (3BE9:0140=497h)
3BE9:023C BE 0120 mov si,120h
3BE9:023F E8 057A call sub_29 ; (07BC)
3BE9:0242 E8 0253 call sub_4 ; (0498)
3BE9:0245 B4 20 mov ah,20h ; ' '
3BE9:0247 B0 0A mov al,0Ah
3BE9:0249 E8 0831 call sub_51 ; (0A7D)
3BE9:024C BA 0000 mov dx,0
3BE9:024F ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:0252 B1 14 mov cl,14h
3BE9:0254 E8 03BE call sub_22 ; (0615)
3BE9:0257 9C pushf ; Push flags
3BE9:0258 E8 024B call sub_6 ; (04A6)
3BE9:025B 9D popf ; Pop flags
3BE9:025C 73 03 jnc loc_18 ; Jump if carry=0
3BE9:025E E9 0250 jmp loc_26 ; (04B1)
3BE9:0261 loc_18: ; xref 3BE9:025C
3BE9:0261 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:0264 E8 0292 call sub_11 ; (04F9)
3BE9:0267 E8 0262 call sub_9 ; (04CC)
3BE9:026A E8 0A97 call sub_70 ; (0D04)
3BE9:026D E9 024A jmp loc_27 ; (04BA)
;* No entry point to code
3BE9:0270 C7 06 0134 49DE mov word ptr ds:[134h],49DEh ; (3BE9:0134=0A0E8h)
3BE9:0276 C7 06 013A 4B45 mov word ptr ds:[13Ah],4B45h ; (3BE9:013A=84E8h)
3BE9:027C C7 06 0140 0142 mov word ptr ds:[140h],142h ; (3BE9:0140=497h)
3BE9:0282 BE 0120 mov si,120h
3BE9:0285 E8 0534 call sub_29 ; (07BC)
3BE9:0288 ,BE 0114 mov si,114h ; (3BE9:0114=8)
3BE9:028B C7 06 0118 4BA9 mov word ptr ds:[118h],4BA9h ; (3BE9:0118=62E8h)
3BE9:0291 E8 05F9 call sub_34 ; (088D)
3BE9:0294 E8 0201 call sub_4 ; (0498)
3BE9:0297 B4 20 mov ah,20h ; ' '
3BE9:0299 B0 0A mov al,0Ah
3BE9:029B E8 07DF call sub_51 ; (0A7D)
3BE9:029E BA 0000 mov dx,0
3BE9:02A1 ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:02A4 B1 14 mov cl,14h
3BE9:02A6 E8 036C call sub_22 ; (0615)
3BE9:02A9 9C pushf ; Push flags
3BE9:02AA E8 01F9 call sub_6 ; (04A6)
3BE9:02AD 9D popf ; Pop flags
3BE9:02AE 73 03 jnc loc_19 ; Jump if carry=0
3BE9:02B0 E9 01FE jmp loc_26 ; (04B1)
3BE9:02B3 loc_19: ; xref 3BE9:02AE
3BE9:02B3 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:02B6 E8 0240 call sub_11 ; (04F9)
3BE9:02B9 E8 0210 call sub_9 ; (04CC)
3BE9:02BC E8 0B16 call sub_75 ; (0DD5)
3BE9:02BF E9 01F8 jmp loc_27 ; (04BA)
;* No entry point to code
3BE9:02C2 C7 06 0134 4A0A mov word ptr ds:[134h],4A0Ah ; (3BE9:0134=0A0E8h)
3BE9:02C8 C7 06 013A 4B30 mov word ptr ds:[13Ah],4B30h ; (3BE9:013A=84E8h)
3BE9:02CE C7 06 0140 4B1B mov word ptr ds:[140h],4B1Bh ; (3BE9:0140=497h)
3BE9:02D4 BE 0120 mov si,120h
3BE9:02D7 E8 04E2 call sub_29 ; (07BC)
3BE9:02DA ,BE 0114 mov si,114h ; (3BE9:0114=8)
3BE9:02DD C7 06 0118 4B6F mov word ptr ds:[118h],4B6Fh ; (3BE9:0118=62E8h)
3BE9:02E3 E8 05A7 call sub_34 ; (088D)
3BE9:02E6 E8 01AF call sub_4 ; (0498)
3BE9:02E9 B4 20 mov ah,20h ; ' '
3BE9:02EB B0 0A mov al,0Ah
3BE9:02ED E8 078D call sub_51 ; (0A7D)
3BE9:02F0 BA 0000 mov dx,0
3BE9:02F3 ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:02F6 B1 14 mov cl,14h
3BE9:02F8 E8 031A call sub_22 ; (0615)
3BE9:02FB 73 06 jnc loc_20 ; Jump if carry=0
3BE9:02FD E8 01A6 call sub_6 ; (04A6)
3BE9:0300 E9 01AE jmp loc_26 ; (04B1)
3BE9:0303 loc_20: ; xref 3BE9:02FB
3BE9:0303 B4 20 mov ah,20h ; ' '
3BE9:0305 B0 0D mov al,0Dh
3BE9:0307 E8 0773 call sub_51 ; (0A7D)
3BE9:030A BA 0000 mov dx,0
3BE9:030D ,BB 024A mov bx,24Ah ; (3BE9:024A=31h)
3BE9:0310 B1 14 mov cl,14h
3BE9:0312 E8 0300 call sub_22 ; (0615)
3BE9:0315 9C pushf ; Push flags
3BE9:0316 E8 018D call sub_6 ; (04A6)
3BE9:0319 9D popf ; Pop flags
3BE9:031A 73 03 jnc loc_21 ; Jump if carry=0
3BE9:031C E9 0192 jmp loc_26 ; (04B1)
3BE9:031F loc_21: ; xref 3BE9:031A
3BE9:031F ,BF 024A mov di,24Ah ; (3BE9:024A=31h)
3BE9:0322 E8 01D4 call sub_11 ; (04F9)
3BE9:0325 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:0328 E8 01CE call sub_11 ; (04F9)
3BE9:032B BE 0268 mov si,268h
3BE9:032E ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:0331 E8 01BB call sub_10 ; (04EF)
3BE9:0334 BE 024A mov si,24Ah
3BE9:0337 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:033A E8 01B2 call sub_10 ; (04EF)
3BE9:033D E8 018C call sub_9 ; (04CC)
3BE9:0340 E8 0DA3 call sub_96 ; (10E6)
3BE9:0343 E9 0174 jmp loc_27 ; (04BA)
;* No entry point to code
3BE9:0346 C7 06 0134 4A38 mov word ptr ds:[134h],4A38h ; (3BE9:0134=0A0E8h)
3BE9:034C C7 06 013A 4B30 mov word ptr ds:[13Ah],4B30h ; (3BE9:013A=84E8h)
3BE9:0352 C7 06 0140 4B1B mov word ptr ds:[140h],4B1Bh ; (3BE9:0140=497h)
3BE9:0358 BE 0120 mov si,120h
3BE9:035B E8 045E call sub_29 ; (07BC)
3BE9:035E ,BE 0114 mov si,114h ; (3BE9:0114=8)
3BE9:0361 C7 06 0118 4B6F mov word ptr ds:[118h],4B6Fh ; (3BE9:0118=62E8h)
3BE9:0367 E8 0523 call sub_34 ; (088D)
3BE9:036A E8 012B call sub_4 ; (0498)
3BE9:036D B4 20 mov ah,20h ; ' '
3BE9:036F B0 0A mov al,0Ah
3BE9:0371 E8 0709 call sub_51 ; (0A7D)
3BE9:0374 BA 0000 mov dx,0
3BE9:0377 ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:037A B1 14 mov cl,14h
3BE9:037C E8 0296 call sub_22 ; (0615)
3BE9:037F 73 06 jnc loc_22 ; Jump if carry=0
3BE9:0381 E8 0122 call sub_6 ; (04A6)
3BE9:0384 E9 012A jmp loc_26 ; (04B1)
3BE9:0387 loc_22: ; xref 3BE9:037F
3BE9:0387 B4 20 mov ah,20h ; ' '
3BE9:0389 B0 0D mov al,0Dh
3BE9:038B E8 06EF call sub_51 ; (0A7D)
3BE9:038E BA 0000 mov dx,0
3BE9:0391 ,BB 024A mov bx,24Ah ; (3BE9:024A=31h)
3BE9:0394 B1 14 mov cl,14h
3BE9:0396 E8 027C call sub_22 ; (0615)
3BE9:0399 9C pushf ; Push flags
3BE9:039A E8 0109 call sub_6 ; (04A6)
3BE9:039D 9D popf ; Pop flags
3BE9:039E 73 03 jnc loc_23 ; Jump if carry=0
3BE9:03A0 E9 010E jmp loc_26 ; (04B1)
3BE9:03A3 loc_23: ; xref 3BE9:039E
3BE9:03A3 ,BF 024A mov di,24Ah ; (3BE9:024A=31h)
3BE9:03A6 E8 0150 call sub_11 ; (04F9)
3BE9:03A9 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:03AC E8 014A call sub_11 ; (04F9)
3BE9:03AF BE 0268 mov si,268h
3BE9:03B2 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:03B5 E8 0137 call sub_10 ; (04EF)
3BE9:03B8 BE 024A mov si,24Ah
3BE9:03BB ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:03BE E8 012E call sub_10 ; (04EF)
3BE9:03C1 E8 0108 call sub_9 ; (04CC)
3BE9:03C4 E8 0FF2 call sub_110 ; (13B9)
3BE9:03C7 E9 00F0 jmp loc_27 ; (04BA)
;* No entry point to code
3BE9:03CA C7 06 0134 4A66 mov word ptr ds:[134h],4A66h ; (3BE9:0134=0A0E8h)
3BE9:03D0 C7 06 013A 4B45 mov word ptr ds:[13Ah],4B45h ; (3BE9:013A=84E8h)
3BE9:03D6 C7 06 0140 0142 mov word ptr ds:[140h],142h ; (3BE9:0140=497h)
3BE9:03DC BE 0120 mov si,120h
3BE9:03DF E8 03DA call sub_29 ; (07BC)
3BE9:03E2 ,BE 0114 mov si,114h ; (3BE9:0114=8)
3BE9:03E5 C7 06 0118 4BA9 mov word ptr ds:[118h],4BA9h ; (3BE9:0118=62E8h)
3BE9:03EB E8 049F call sub_34 ; (088D)
3BE9:03EE E8 00A7 call sub_4 ; (0498)
3BE9:03F1 B4 20 mov ah,20h ; ' '
3BE9:03F3 B0 0A mov al,0Ah
3BE9:03F5 E8 0685 call sub_51 ; (0A7D)
3BE9:03F8 BA 0000 mov dx,0
3BE9:03FB ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:03FE B1 14 mov cl,14h
3BE9:0400 E8 0212 call sub_22 ; (0615)
3BE9:0403 9C pushf ; Push flags
3BE9:0404 E8 009F call sub_6 ; (04A6)
3BE9:0407 9D popf ; Pop flags
3BE9:0408 73 03 jnc loc_24 ; Jump if carry=0
3BE9:040A E9 00A4 jmp loc_26 ; (04B1)
3BE9:040D loc_24: ; xref 3BE9:0408
3BE9:040D ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:0410 E8 00E6 call sub_11 ; (04F9)
3BE9:0413 E8 00B6 call sub_9 ; (04CC)
3BE9:0416 E8 0A7E call sub_82 ; (0E97)
3BE9:0419 E9 009E jmp loc_27 ; (04BA)
;* No entry point to code
3BE9:041C C7 06 0134 4A8D mov word ptr ds:[134h],4A8Dh ; (3BE9:0134=0A0E8h)
3BE9:0422 C7 06 013A 4AB8 mov word ptr ds:[13Ah],4AB8h ; (3BE9:013A=84E8h)
3BE9:0428 C7 06 0140 0142 mov word ptr ds:[140h],142h ; (3BE9:0140=497h)
3BE9:042E BE 0120 mov si,120h
3BE9:0431 E8 0388 call sub_29 ; (07BC)
3BE9:0434 ,BE 011A mov si,11Ah ; (3BE9:011A=8)
3BE9:0437 C7 06 011E 4AD3 mov word ptr ds:[11Eh],4AD3h ; (3BE9:011E=0C8B2h)
3BE9:043D E8 044D call sub_34 ; (088D)
3BE9:0440 E8 0055 call sub_4 ; (0498)
3BE9:0443 B4 24 mov ah,24h ; '$'
3BE9:0445 B0 0A mov al,0Ah
3BE9:0447 E8 0633 call sub_51 ; (0A7D)
3BE9:044A BA 0000 mov dx,0
3BE9:044D ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:0450 B1 01 mov cl,1
3BE9:0452 E8 01C0 call sub_22 ; (0615)
3BE9:0455 9C pushf ; Push flags
3BE9:0456 E8 004D call sub_6 ; (04A6)
3BE9:0459 9D popf ; Pop flags
3BE9:045A E8 0042 call sub_5 ; (049F)
3BE9:045D C3 retn
;* No entry point to code
3BE9:045E ,BE 011A mov si,11Ah ; (3BE9:011A=8)
3BE9:0461 C7 06 011E 4AB8 mov word ptr ds:[11Eh],4AB8h ; (3BE9:011E=0C8B2h)
3BE9:0467 E8 0423 call sub_34 ; (088D)
3BE9:046A E8 002B call sub_4 ; (0498)
3BE9:046D B4 20 mov ah,20h ; ' '
3BE9:046F B0 0A mov al,0Ah
3BE9:0471 E8 0609 call sub_51 ; (0A7D)
3BE9:0474 BA 0000 mov dx,0
3BE9:0477 ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:047A B1 14 mov cl,14h
3BE9:047C E8 0196 call sub_22 ; (0615)
3BE9:047F 9C pushf ; Push flags
3BE9:0480 E8 0023 call sub_6 ; (04A6)
3BE9:0483 9D popf ; Pop flags
3BE9:0484 73 03 jnc loc_25 ; Jump if carry=0
3BE9:0486 E9 0028 jmpn loc_26 ; (04B1)
3BE9:0489 loc_25: ; xref 3BE9:0484
3BE9:0489 ,BF 0182 mov di,182h ; (3BE9:0182=0EBh)
3BE9:048C E8 006A call sub_11 ; (04F9)
3BE9:048F E8 003A call sub_9 ; (04CC)
3BE9:0492 E8 0B89 call sub_93 ; (101E)
3BE9:0495 E9 0022 jmpn loc_27 ; (04BA)
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:01F1, 0242, 0294, 02E6, 036A, 03EE, 0440
; 046A
3BE9:0498 sub_4:
3BE9:0498 ,BE 016C mov si,16Ch ; (3BE9:016C=1)
3BE9:049B E8 0490 call sub_38 ; (092E)
3BE9:049E C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:045A, 04C8
3BE9:049F sub_5:
3BE9:049F ,BE 0172 mov si,172h ; (3BE9:0172=7)
3BE9:04A2 E8 0489 call sub_38 ; (092E)
3BE9:04A5 C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:0207, 0258, 02AA, 02FD, 0316, 0381, 039A
; 0404, 0456, 0480
3BE9:04A6 sub_6:
3BE9:04A6 E8 0001 call sub_7 ; (04AA)
3BE9:04A9 C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:0131, 0143, 04A6
3BE9:04AA sub_7:
3BE9:04AA ,BE 0178 mov si,178h ; (3BE9:0178=0B1h)
3BE9:04AD E8 047E call sub_38 ; (092E)
3BE9:04B0 C3 retn
3BE9:04B1 loc_26: ; xref 3BE9:020D, 0227, 025E, 02B0
; 0300, 031C, 0384, 03A0
; 040A, 0486
3BE9:04B1 BA 4C25 mov dx,4C25h
3BE9:04B4 E8 009E call sub_17 ; (0555)
3BE9:04B7 E9 0000 jmpn loc_27 ; (04BA)
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:012E
3BE9:04BA sub_8:
3BE9:04BA loc_27: ; xref 3BE9:021C, 026D, 02BF, 0343
; 03C7, 0419, 0495, 04B7
3BE9:04BA E8 16CF call sub_152 ; (1B8C)
3BE9:04BD BA 4BF1 mov dx,4BF1h
3BE9:04C0 E8 0092 call sub_17 ; (0555)
3BE9:04C3 loc_28: ; xref 3BE9:04C6
3BE9:04C3 E8 01E8 call sub_24 ; (06AE)
3BE9:04C6 72 FB jc loc_28 ; Jump if carry Set
3BE9:04C8 E8 FFD4 call sub_5 ; (049F)
3BE9:04CB C3 retn
sub_3 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0216, 0267, 02B9, 033D, 03C1, 0413, 048F
;==========================================================================
3BE9:04CC sub_9 proc near
3BE9:04CC ,BB 0182 mov bx,182h ; (3BE9:0182=0EBh)
3BE9:04CF B9 0000 mov cx,0
3BE9:04D2 loc_29: ; xref 3BE9:04D9
3BE9:04D2 ,80 3F 00 cmp byte ptr [bx],0
3BE9:04D5 74 05 je loc_30 ; Jump if equal
3BE9:04D7 41 inc cx
3BE9:04D8 43 inc bx
3BE9:04D9 E9 FFF6 ;* jmp loc_29 ; (04D2)
3BE9:04D9 db 0E9h,0F6h,0FFh ; Fixup - byte match
3BE9:04DC loc_30: ; xref 3BE9:04D5
3BE9:04DC 83 C1 01 add cx,1
3BE9:04DF 88 0E 0180 mov byte ptr ds:[180h],cl ; (3BE9:0180=0ACh)
3BE9:04E3 C3 retn
sub_9 endp
3BE9:04E4 loc_31: ; xref 3BE9:04EC, 04F3
3BE9:04E4 8A 04 mov al,[si]
3BE9:04E6 88 05 mov [di],al
3BE9:04E8 47 inc di
3BE9:04E9 46 inc si
3BE9:04EA 3C 00 cmp al,0
3BE9:04EC 75 F6 jne loc_31 ; Jump if not equal
3BE9:04EE C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0331, 033A, 03B5, 03BE
;==========================================================================
3BE9:04EF sub_10 proc near
3BE9:04EF loc_32: ; xref 3BE9:04F6
3BE9:04EF ,8A 05 mov al,[di]
3BE9:04F1 3C 00 cmp al,0
3BE9:04F3 74 EF je loc_31 ; Jump if equal
3BE9:04F5 47 inc di
3BE9:04F6 E9 FFF6 ;* jmp loc_32 ; (04EF)
sub_10 endp
3BE9:04F6 db 0E9h,0F6h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0213, 0264, 02B6, 0322, 0328, 03A6, 03AC
; 0410, 048C
;==========================================================================
3BE9:04F9 sub_11 proc near
3BE9:04F9 loc_33: ; xref 3BE9:0504
3BE9:04F9 ,8A 05 mov al,[di]
3BE9:04FB 3C 00 cmp al,0
3BE9:04FD 74 0C je loc_ret_35 ; Jump if equal
3BE9:04FF 3C 0D cmp al,0Dh
3BE9:0501 74 04 je loc_34 ; Jump if equal
3BE9:0503 47 inc di
3BE9:0504 E9 FFF2 ;* jmp loc_33 ; (04F9)
3BE9:0504 db 0E9h,0F2h,0FFh ; Fixup - byte match
3BE9:0507 loc_34: ; xref 3BE9:0501
3BE9:0507 B0 00 mov al,0
3BE9:0509 88 05 mov [di],al
3BE9:050B loc_ret_35: ; xref 3BE9:04FD
3BE9:050B C3 retn
sub_11 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0126, 021F
;==========================================================================
3BE9:050C sub_12 proc near
3BE9:050C 8B C4 mov ax,sp
3BE9:050E 05 0002 add ax,2
3BE9:0511 A3 026A mov word ptr ds:[26Ah],ax ; (3BE9:026A=97E8h)
3BE9:0514 58 pop ax
3BE9:0515 50 push ax
3BE9:0516 A3 026C mov word ptr ds:[26Ch],ax ; (3BE9:026C=0E90Ah)
3BE9:0519 B8 0000 mov ax,0
3BE9:051C C3 retn
sub_12 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:15FC, 16EF
;==========================================================================
3BE9:051D sub_13 proc near
3BE9:051D loc_36: ; xref 3BE9:0AC2, 0D27, 0DE8, 0EBD
; 10A9, 116B, 144A
3BE9:051D ,A1 026A mov ax,word ptr ds:[26Ah] ; (3BE9:026A=97E8h)
3BE9:0520 8B E0 mov sp,ax
3BE9:0522 A1 026C mov ax,word ptr ds:[26Ch] ; (3BE9:026C=0E90Ah)
3BE9:0525 50 push ax
3BE9:0526 B8 0001 mov ax,1
3BE9:0529 C3 retn
sub_13 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D08
;==========================================================================
3BE9:052A sub_14 proc near
3BE9:052A 50 push ax
3BE9:052B 53 push bx
3BE9:052C 51 push cx
3BE9:052D 8B DA mov bx,dx
3BE9:052F 8A 0F mov cl,[bx]
3BE9:0531 B5 00 mov ch,0
3BE9:0533 43 inc bx
3BE9:0534 locloop_37: ; xref 3BE9:053A
3BE9:0534 8A 07 mov al,[bx]
3BE9:0536 E8 0030 call sub_18 ; (0569)
3BE9:0539 43 inc bx
3BE9:053A E2 F8 loop locloop_37 ; Loop if cx > 0
3BE9:053C 59 pop cx
3BE9:053D 5B pop bx
3BE9:053E 58 pop ax
3BE9:053F C3 retn
sub_14 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0609, 0610, 0AB7, 0B4D, 0D60, 0DB5, 0DD5
; 0E97, 0EEA, 0EF2, 1002, 1174, 126A, 128B
; 1304, 1341, 1453, 1533, 1556, 1F7A, 2104
;==========================================================================
3BE9:0540 sub_15 proc near
3BE9:0540 50 push ax
3BE9:0541 B0 0D mov al,0Dh
3BE9:0543 E8 0023 call sub_18 ; (0569)
3BE9:0546 B0 0A mov al,0Ah
3BE9:0548 E8 001E call sub_18 ; (0569)
3BE9:054B 58 pop ax
3BE9:054C C3 retn
sub_15 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0B3C
;==========================================================================
3BE9:054D sub_16 proc near
3BE9:054D 50 push ax
3BE9:054E B0 20 mov al,20h ; ' '
3BE9:0550 E8 0016 call sub_18 ; (0569)
3BE9:0553 58 pop ax
3BE9:0554 C3 retn
sub_16 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:04B4, 04C0, 05E4, 061B, 0B0D, 0B1D, 0B32
; 0D50, 0D8F, 0D99, 0DC6, 0E1F, 0E33, 0F81
; 0FB3, 0FBD, 0FF1, 0FFB, 1017, 10AC, 10D7
; 116E, 1229, 1266, 1284, 144D, 1509, 152C
; 154F, 15F9, 16EC, 1ECD, 1F72, 1F90, 20D7
; 20FD
;==========================================================================
3BE9:0555 sub_17 proc near
3BE9:0555 50 push ax
3BE9:0556 53 push bx
3BE9:0557 8B DA mov bx,dx
3BE9:0559 loc_38: ; xref 3BE9:0563
3BE9:0559 ,8A 07 mov al,[bx]
3BE9:055B 3C 00 cmp al,0
3BE9:055D 74 07 je loc_39 ; Jump if equal
3BE9:055F E8 0007 call sub_18 ; (0569)
3BE9:0562 43 inc bx
3BE9:0563 E9 FFF3 ;* jmp loc_38 ; (0559)
3BE9:0563 db 0E9h,0F3h,0FFh ; Fixup - byte match
3BE9:0566 loc_39: ; xref 3BE9:055D
3BE9:0566 5B pop bx
3BE9:0567 58 pop ax
3BE9:0568 C3 retn
sub_17 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0536, 0543, 0548, 0550, 055F, 065D, 0696
; 069B, 06A0, 06A9, 0B2C, 0B5C, 0B63, 0B6C
; 0DA1, 0DA6, 0E40, 2032, 2037, 2047, 2062
;==========================================================================
3BE9:0569 sub_18 proc near
3BE9:0569 loc_40: ; xref 3BE9:1365
3BE9:0569 ,3C 0A cmp al,0Ah
3BE9:056B 74 55 je loc_45 ; Jump if equal
3BE9:056D 3C 0D cmp al,0Dh
3BE9:056F 75 08 jne loc_41 ; Jump if not equal
3BE9:0571 C6 06 026E 00 mov byte ptr ds:[26Eh],0 ; (3BE9:026E=4Ah)
3BE9:0576 E9 0049 jmpn loc_45 ; (05C2)
3BE9:0579 loc_41: ; xref 3BE9:056F
3BE9:0579 3C 09 cmp al,9
3BE9:057B 75 1D jne loc_43 ; Jump if not equal
3BE9:057D 50 push ax
3BE9:057E 51 push cx
3BE9:057F A0 026E mov al,byte ptr ds:[26Eh] ; (3BE9:026E=4Ah)
3BE9:0582 B4 00 mov ah,0
3BE9:0584 B1 08 mov cl,8
3BE9:0586 F6 F1 div cl ; al, ah rem = ax/reg
3BE9:0588 2A CC sub cl,ah
3BE9:058A 00 0E 026E add byte ptr ds:[26Eh],cl ; (3BE9:026E=4Ah)
3BE9:058E B5 00 mov ch,0
3BE9:0590 locloop_42: ; xref 3BE9:0595
3BE9:0590 B0 20 mov al,20h ; ' '
3BE9:0592 E8 002D call sub_19 ; (05C2)
3BE9:0595 E2 F9 loop locloop_42 ; Loop if cx > 0
3BE9:0597 59 pop cx
3BE9:0598 58 pop ax
3BE9:0599 C3 retn
3BE9:059A loc_43: ; xref 3BE9:057B
3BE9:059A 3C 08 cmp al,8
3BE9:059C 75 0E jne loc_44 ; Jump if not equal
3BE9:059E 80 3E 026E 00 cmp byte ptr ds:[26Eh],0 ; (3BE9:026E=4Ah)
3BE9:05A3 74 23 je loc_ret_46 ; Jump if equal
3BE9:05A5 FE 0E 026E dec byte ptr ds:[26Eh] ; (3BE9:026E=4Ah)
3BE9:05A9 E9 0016 jmpn loc_45 ; (05C2)
3BE9:05AC loc_44: ; xref 3BE9:059C
3BE9:05AC 3C 1B cmp al,1Bh
3BE9:05AE 74 12 je loc_45 ; Jump if equal
3BE9:05B0 FE 06 026E inc byte ptr ds:[26Eh] ; (3BE9:026E=4Ah)
3BE9:05B4 50 push ax
3BE9:05B5 2C 20 sub al,20h ; ' '
3BE9:05B7 3C 5F cmp al,5Fh ; '_'
3BE9:05B9 58 pop ax
3BE9:05BA 72 06 jc loc_45 ; Jump if carry Set
3BE9:05BC FE 0E 026E dec byte ptr ds:[26Eh] ; (3BE9:026E=4Ah)
3BE9:05C0 F9 stc ; Set carry flag
3BE9:05C1 C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:0592
3BE9:05C2 sub_19:
3BE9:05C2 loc_45: ; xref 3BE9:056B, 0576, 05A9, 05AE
; 05BA, 05C5
3BE9:05C2 E8 0004 call sub_20 ; (05C9)
3BE9:05C5 72 FB jc loc_45 ; Jump if carry Set
3BE9:05C7 F8 clc ; Clear carry flag
3BE9:05C8 loc_ret_46: ; xref 3BE9:05A3
3BE9:05C8 C3 retn
sub_18 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:05C2
;==========================================================================
3BE9:05C9 sub_20 proc near
3BE9:05C9 50 push ax
3BE9:05CA 53 push bx
3BE9:05CB 51 push cx
3BE9:05CC 52 push dx
3BE9:05CD 57 push di
3BE9:05CE 56 push si
3BE9:05CF 06 push es
3BE9:05D0 8A D0 mov dl,al
3BE9:05D2 B1 06 mov cl,6
3BE9:05D4 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:05D6 07 pop es
3BE9:05D7 5E pop si
3BE9:05D8 5F pop di
3BE9:05D9 5A pop dx
3BE9:05DA 59 pop cx
3BE9:05DB 5B pop bx
3BE9:05DC 58 pop ax
3BE9:05DD F8 clc ; Clear carry flag
3BE9:05DE C3 retn
sub_20 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0FC7, 103F
;==========================================================================
3BE9:05DF sub_21 proc near
3BE9:05DF 83 FA 00 cmp dx,0
3BE9:05E2 74 03 je loc_47 ; Jump if equal
3BE9:05E4 E8 FF6E call sub_17 ; (0555)
3BE9:05E7 loc_47: ; xref 3BE9:05E2
3BE9:05E7 52 push dx
3BE9:05E8 53 push bx
3BE9:05E9 51 push cx
3BE9:05EA BA 44DC mov dx,44DCh
3BE9:05ED ,BB 026F mov bx,26Fh ; (3BE9:026F=2)
3BE9:05F0 B1 01 mov cl,1
3BE9:05F2 E8 0020 call sub_22 ; (0615)
3BE9:05F5 59 pop cx
3BE9:05F6 5B pop bx
3BE9:05F7 5A pop dx
3BE9:05F8 72 0F jc loc_48 ; Jump if carry Set
3BE9:05FA A0 026F mov al,byte ptr ds:[26Fh] ; (3BE9:026F=2)
3BE9:05FD 3A 06 44DA cmp al,data_220 ; (3BE9:44DA=0)
3BE9:0601 74 0B je loc_49 ; Jump if equal
3BE9:0603 3A 06 44DB cmp al,data_221 ; (3BE9:44DB=0)
3BE9:0607 74 05 je loc_49 ; Jump if equal
3BE9:0609 loc_48: ; xref 3BE9:05F8
3BE9:0609 E8 FF34 call sub_15 ; (0540)
3BE9:060C F9 stc ; Set carry flag
3BE9:060D C3 retn
3BE9:060E loc_49: ; xref 3BE9:0601, 0607
3BE9:060E B0 00 mov al,0
3BE9:0610 E8 FF2D call sub_15 ; (0540)
3BE9:0613 F8 clc ; Clear carry flag
3BE9:0614 C3 retn
sub_21 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0203, 0254, 02A6, 02F8, 0312, 037C, 0396
; 0400, 0452, 047C, 05F2, 0D5D
;==========================================================================
3BE9:0615 sub_22 proc near
3BE9:0615 53 push bx
3BE9:0616 83 FA 00 cmp dx,0
3BE9:0619 74 03 je loc_50 ; Jump if equal
3BE9:061B E8 FF37 call sub_17 ; (0555)
3BE9:061E loc_50: ; xref 3BE9:0619
3BE9:061E 8A E9 mov ch,cl
3BE9:0620 loc_51: ; xref 3BE9:0626
3BE9:0620 C6 07 20 mov byte ptr [bx],20h ; ' '
3BE9:0623 43 inc bx
3BE9:0624 FE CD dec ch
3BE9:0626 75 F8 jnz loc_51 ; Jump if not zero
3BE9:0628 C6 07 00 mov byte ptr [bx],0
3BE9:062B 5B pop bx
3BE9:062C 53 push bx
3BE9:062D B5 00 mov ch,0
3BE9:062F loc_52: ; xref 3BE9:0632, 064E, 0656, 0660
; 066B, 0670, 0676
3BE9:062F ,E8 007C call sub_24 ; (06AE)
3BE9:0632 72 FB jc loc_52 ; Jump if carry Set
3BE9:0634 3C 0D cmp al,0Dh
3BE9:0636 74 2B je loc_53 ; Jump if equal
3BE9:0638 3C 0A cmp al,0Ah
3BE9:063A 74 27 je loc_53 ; Jump if equal
3BE9:063C 3C 08 cmp al,8
3BE9:063E 74 28 je loc_54 ; Jump if equal
3BE9:0640 3C 5F cmp al,5Fh ; '_'
3BE9:0642 74 24 je loc_54 ; Jump if equal
3BE9:0644 3C 18 cmp al,18h
3BE9:0646 74 2B je loc_55 ; Jump if equal
3BE9:0648 3C 03 cmp al,3
3BE9:064A 74 32 je loc_56 ; Jump if equal
3BE9:064C 3A E9 cmp ch,cl
3BE9:064E 73 DF jae loc_52 ; Jump if above or =
3BE9:0650 50 push ax
3BE9:0651 2C 20 sub al,20h ; ' '
3BE9:0653 3C 7F cmp al,7Fh
3BE9:0655 58 pop ax
3BE9:0656 73 D7 jnc loc_52 ; Jump if carry=0
3BE9:0658 88 07 mov [bx],al
3BE9:065A 43 inc bx
3BE9:065B FE C5 inc ch
3BE9:065D E8 FF09 call sub_18 ; (0569)
3BE9:0660 E9 FFCC ;* jmp loc_52 ; (062F)
3BE9:0660 db 0E9h,0CCh,0FFh ; Fixup - byte match
3BE9:0663 loc_53: ; xref 3BE9:0636, 063A
3BE9:0663 5B pop bx
3BE9:0664 B0 0D mov al,0Dh
3BE9:0666 F8 clc ; Clear carry flag
3BE9:0667 C3 retn
3BE9:0668 loc_54: ; xref 3BE9:063E, 0642
3BE9:0668 80 FD 00 cmp ch,0
3BE9:066B 74 C2 je loc_52 ; Jump if equal
3BE9:066D E8 001E call sub_23 ; (068E)
3BE9:0670 E9 FFBC ;* jmp loc_52 ; (062F)
3BE9:0670 db 0E9h,0BCh,0FFh ; Fixup - byte match
3BE9:0673 loc_55: ; xref 3BE9:0646, 067B
3BE9:0673 ,80 FD 00 cmp ch,0
3BE9:0676 74 B7 je loc_52 ; Jump if equal
3BE9:0678 E8 0013 call sub_23 ; (068E)
3BE9:067B E9 FFF5 ;* jmp loc_55 ; (0673)
3BE9:067B db 0E9h,0F5h,0FFh ; Fixup - byte match
3BE9:067E loc_56: ; xref 3BE9:064A, 0686
3BE9:067E ,80 FD 00 cmp ch,0
3BE9:0681 74 06 je loc_57 ; Jump if equal
3BE9:0683 E8 0008 call sub_23 ; (068E)
3BE9:0686 E9 FFF5 ;* jmp loc_56 ; (067E)
3BE9:0686 db 0E9h,0F5h,0FFh ; Fixup - byte match
3BE9:0689 loc_57: ; xref 3BE9:0681
3BE9:0689 B0 03 mov al,3
3BE9:068B 5B pop bx
3BE9:068C F9 stc ; Set carry flag
3BE9:068D C3 retn
sub_22 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:066D, 0678, 0683
;==========================================================================
3BE9:068E sub_23 proc near
3BE9:068E 4B dec bx
3BE9:068F FE CD dec ch
3BE9:0691 C6 07 20 mov byte ptr [bx],20h ; ' '
3BE9:0694 B0 08 mov al,8
3BE9:0696 E8 FED0 call sub_18 ; (0569)
3BE9:0699 B0 20 mov al,20h ; ' '
3BE9:069B E8 FECB call sub_18 ; (0569)
3BE9:069E B0 08 mov al,8
3BE9:06A0 E8 FEC6 call sub_18 ; (0569)
3BE9:06A3 C3 retn
sub_23 endp
3BE9:06A4 loc_58: ; xref 3BE9:06A7
3BE9:06A4 E8 0007 call sub_24 ; (06AE)
3BE9:06A7 72 FB jc loc_58 ; Jump if carry Set
3BE9:06A9 E8 FEBD call sub_18 ; (0569)
3BE9:06AC F8 clc ; Clear carry flag
3BE9:06AD C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:04C3, 062F, 06A4, 0E80, 0E8F, 100B, 126F
; 153A
;==========================================================================
3BE9:06AE sub_24 proc near
3BE9:06AE 53 push bx
3BE9:06AF 51 push cx
3BE9:06B0 52 push dx
3BE9:06B1 57 push di
3BE9:06B2 56 push si
3BE9:06B3 06 push es
3BE9:06B4 B1 06 mov cl,6
3BE9:06B6 B2 FE mov dl,0FEh
3BE9:06B8 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:06BA 3C 00 cmp al,0
3BE9:06BC F9 stc ; Set carry flag
3BE9:06BD 74 11 jz loc_60 ; Jump if zero
3BE9:06BF B1 06 mov cl,6
3BE9:06C1 B2 FF mov dl,0FFh
3BE9:06C3 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:06C5 50 push ax
3BE9:06C6 2C 61 sub al,61h ; 'a'
3BE9:06C8 3C 67 cmp al,67h ; 'g'
3BE9:06CA 58 pop ax
3BE9:06CB 73 02 jnc loc_59 ; Jump if carry=0
3BE9:06CD 2C 20 sub al,20h ; ' '
3BE9:06CF loc_59: ; xref 3BE9:06CB
3BE9:06CF F8 clc ; Clear carry flag
3BE9:06D0 loc_60: ; xref 3BE9:06BD
3BE9:06D0 07 pop es
3BE9:06D1 5E pop si
3BE9:06D2 5F pop di
3BE9:06D3 5A pop dx
3BE9:06D4 59 pop cx
3BE9:06D5 5B pop bx
3BE9:06D6 C3 retn
sub_24 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0134
;==========================================================================
3BE9:06D7 sub_26 proc near
3BE9:06D7 06 push es
3BE9:06D8 B1 9A mov cl,9Ah
3BE9:06DA CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:06DC ,BB 0C3E mov bx,0C3Eh ; (3BE9:0C3E=28h)
3BE9:06DF 26: 8A 07 mov al,es:[bx]
3BE9:06E2 A2 027B mov byte ptr ds:[27Bh],al ; (3BE9:027B=4Bh)
3BE9:06E5 07 pop es
3BE9:06E6 A8 10 test al,10h
3BE9:06E8 74 6B jz loc_63 ; Jump if zero
3BE9:06EA A8 80 test al,80h
3BE9:06EC 74 67 jz loc_63 ; Jump if zero
3BE9:06EE B0 C4 mov al,0C4h
3BE9:06F0 B9 004E mov cx,4Eh
3BE9:06F3 ,BF 029F mov di,29Fh ; (3BE9:029F=0)
3BE9:06F6 F3/ AA rep stosb ; Rep when cx >0 Store al to es:[di]
3BE9:06F8 ,BE 028A mov si,28Ah ; (3BE9:028A=1)
3BE9:06FB ,BB 0000 mov bx,offset data_2 ; (3BE9:0000=1)
3BE9:06FE E8 00EF call sub_32 ; (07F0)
3BE9:0701 B8 0102 mov ax,102h
3BE9:0704 E8 0036 call sub_27 ; (073D)
3BE9:0707 B8 5002 mov ax,5002h
3BE9:070A E8 0030 call sub_27 ; (073D)
3BE9:070D B8 0118 mov ax,118h
3BE9:0710 E8 036A call sub_51 ; (0A7D)
3BE9:0713 ,BE 0292 mov si,292h ; (3BE9:0292=0F9h)
3BE9:0716 ,BB 0000 mov bx,offset data_2 ; (3BE9:0000=1)
3BE9:0719 E8 00D4 call sub_32 ; (07F0)
3BE9:071C BE 4941 mov si,4941h
3BE9:071F 80 3E 0102 FF cmp byte ptr ds:[102h],0FFh ; (3BE9:0102=44h)
3BE9:0724 74 03 je loc_61 ; Jump if equal
3BE9:0726 ,BE 48FE mov si,offset data_223 ; (3BE9:48FE=0)
3BE9:0729 loc_61: ; xref 3BE9:0724
3BE9:0729 E8 0161 call sub_34 ; (088D)
3BE9:072C ,BF 02FF mov di,2FFh ; (3BE9:02FF=1)
3BE9:072F B0 CD mov al,0CDh
3BE9:0731 B9 004E mov cx,4Eh
3BE9:0734 F3/ AA rep stosb ; Rep when cx >0 Store al to es:[di]
3BE9:0736 ,BE 02F6 mov si,2F6h ; (3BE9:02F6=0B1h)
3BE9:0739 E8 0151 call sub_34 ; (088D)
3BE9:073C C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:0704, 070A
3BE9:073D sub_27:
3BE9:073D A3 0272 mov word ptr ds:[272h],ax ; (3BE9:0272=134h)
3BE9:0740 E8 033A call sub_51 ; (0A7D)
3BE9:0743 B9 0016 mov cx,16h
3BE9:0746 locloop_62: ; xref 3BE9:0752
3BE9:0746 51 push cx
3BE9:0747 B2 B3 mov dl,0B3h
3BE9:0749 B1 02 mov cl,2
3BE9:074B E8 01DD call sub_37 ; (092B)
3BE9:074E E8 01CF call sub_36 ; (0920)
3BE9:0751 59 pop cx
3BE9:0752 E2 F2 loop locloop_62 ; Loop if cx > 0
3BE9:0754 C3 retn
3BE9:0755 loc_63: ; xref 3BE9:06E8, 06EC
3BE9:0755 B0 91 mov al,91h
3BE9:0757 B9 004E mov cx,4Eh
3BE9:075A ,BF 0363 mov di,363h ; (3BE9:0363=18h)
3BE9:075D F3/ AA rep stosb ; Rep when cx >0 Store al to es:[di]
3BE9:075F ,BE 034E mov si,34Eh ; (3BE9:034E=3Ah)
3BE9:0762 ,BB 0000 mov bx,offset data_2 ; (3BE9:0000=1)
3BE9:0765 E8 0088 call sub_32 ; (07F0)
3BE9:0768 B8 0102 mov ax,102h
3BE9:076B E8 0036 call sub_28 ; (07A4)
3BE9:076E B8 5002 mov ax,5002h
3BE9:0771 E8 0030 call sub_28 ; (07A4)
3BE9:0774 B8 0118 mov ax,118h
3BE9:0777 E8 0303 call sub_51 ; (0A7D)
3BE9:077A ,BE 0356 mov si,356h ; (3BE9:0356=1Bh)
3BE9:077D ,BB 0000 mov bx,offset data_2 ; (3BE9:0000=1)
3BE9:0780 E8 006D call sub_32 ; (07F0)
3BE9:0783 BE 4941 mov si,4941h
3BE9:0786 80 3E 0102 FF cmp byte ptr ds:[102h],0FFh ; (3BE9:0102=44h)
3BE9:078B 74 03 je loc_64 ; Jump if equal
3BE9:078D ,BE 48FE mov si,offset data_223 ; (3BE9:48FE=0)
3BE9:0790 loc_64: ; xref 3BE9:078B
3BE9:0790 E8 00FA call sub_34 ; (088D)
3BE9:0793 ,BF 03C3 mov di,3C3h ; (3BE9:03C3=1)
3BE9:0796 B0 84 mov al,84h
3BE9:0798 B9 004E mov cx,4Eh
3BE9:079B F3/ AA rep stosb ; Rep when cx >0 Store al to es:[di]
3BE9:079D ,BE 03BA mov si,3BAh ; (3BE9:03BA=2)
3BE9:07A0 E8 00EA call sub_34 ; (088D)
3BE9:07A3 C3 retn
sub_26 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:076B, 0771
;==========================================================================
3BE9:07A4 sub_28 proc near
3BE9:07A4 A3 0272 mov word ptr ds:[272h],ax ; (3BE9:0272=134h)
3BE9:07A7 E8 02D3 call sub_51 ; (0A7D)
3BE9:07AA B9 0016 mov cx,16h
3BE9:07AD locloop_65: ; xref 3BE9:07B9
3BE9:07AD 51 push cx
3BE9:07AE B2 98 mov dl,98h
3BE9:07B0 B1 02 mov cl,2
3BE9:07B2 E8 0176 call sub_37 ; (092B)
3BE9:07B5 E8 0168 call sub_36 ; (0920)
3BE9:07B8 59 pop cx
3BE9:07B9 E2 F2 loop locloop_65 ; Loop if cx > 0
3BE9:07BB C3 retn
sub_28 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:01E2, 023F, 0285, 02D7, 035B, 03DF, 0431
;==========================================================================
3BE9:07BC sub_29 proc near
3BE9:07BC 56 push si
3BE9:07BD E8 0144 call sub_35 ; (0904)
3BE9:07C0 5E pop si
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:013A
3BE9:07C1 sub_30:
3BE9:07C1 ,BB 0006 mov bx,offset data_3 ; (3BE9:0006=2)
3BE9:07C4 E8 000A call sub_31 ; (07D1)
3BE9:07C7 33 DB xor bx,bx ; Zero register
3BE9:07C9 8A 1E 0277 mov bl,byte ptr ds:[277h] ; (3BE9:0277=6)
3BE9:07CD A0 0278 mov al,byte ptr ds:[278h] ; (3BE9:0278=3Ah)
3BE9:07D0 C3 retn
sub_29 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:07C4
;==========================================================================
3BE9:07D1 sub_31 proc near
3BE9:07D1 89 1E 0275 mov word ptr ds:[275h],bx ; (3BE9:0275=0C749h)
3BE9:07D5 33 DB xor bx,bx ; Zero register
3BE9:07D7 loc_66: ; xref 3BE9:07ED
3BE9:07D7 ,AD lodsw ; String [si] to ax
3BE9:07D8 0B C0 or ax,ax ; Zero ?
3BE9:07DA 74 09 jz loc_67 ; Jump if zero
3BE9:07DC 56 push si
3BE9:07DD 53 push bx
3BE9:07DE 8B F0 mov si,ax
3BE9:07E0 E8 000D call sub_32 ; (07F0)
3BE9:07E3 5B pop bx
3BE9:07E4 5E pop si
3BE9:07E5 loc_67: ; xref 3BE9:07DA
3BE9:07E5 3B 1E 0275 cmp bx,word ptr ds:[275h] ; (3BE9:0275=0C749h)
3BE9:07E9 74 04 je loc_ret_68 ; Jump if equal
3BE9:07EB 43 inc bx
3BE9:07EC 43 inc bx
3BE9:07ED EB E8 jmp short loc_66 ; (07D7)
3BE9:07EF loc_ret_68: ; xref 3BE9:07E9
3BE9:07EF C3 retn
sub_31 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:06FE, 0719, 0765, 0780, 07E0
;==========================================================================
3BE9:07F0 sub_32 proc near
3BE9:07F0 AD lodsw ; String [si] to ax
3BE9:07F1 8B C8 mov cx,ax
3BE9:07F3 locloop_69: ; xref 3BE9:0800
3BE9:07F3 51 push cx
3BE9:07F4 53 push bx
3BE9:07F5 AD lodsw ; String [si] to ax
3BE9:07F6 56 push si
3BE9:07F7 8B F0 mov si,ax
3BE9:07F9 FF 97 027C call word ptr ds:[27Ch][bx] ;*(3BE9:027C=6C7h)
3BE9:07FD 5E pop si
3BE9:07FE 5B pop bx
3BE9:07FF 59 pop cx
3BE9:0800 E2 F1 loop locloop_69 ; Loop if cx > 0
3BE9:0802 C3 retn
sub_32 endp
;* No entry point to code
3BE9:0803 AD lodsw ; String [si] to ax
3BE9:0804 A3 0272 mov word ptr ds:[272h],ax ; (3BE9:0272=134h)
3BE9:0807 56 push si
3BE9:0808 E8 0272 call sub_51 ; (0A7D)
3BE9:080B 5E pop si
3BE9:080C E8 001E call sub_33 ; (082D)
3BE9:080F AD lodsw ; String [si] to ax
3BE9:0810 8B C8 mov cx,ax
3BE9:0812 AD lodsw ; String [si] to ax
3BE9:0813 A3 0272 mov word ptr ds:[272h],ax ; (3BE9:0272=134h)
3BE9:0816 56 push si
3BE9:0817 51 push cx
3BE9:0818 E8 0262 call sub_51 ; (0A7D)
3BE9:081B 59 pop cx
3BE9:081C 5E pop si
3BE9:081D locloop_70: ; xref 3BE9:082A
3BE9:081D 51 push cx
3BE9:081E AD lodsw ; String [si] to ax
3BE9:081F 8B F0 mov si,ax
3BE9:0821 56 push si
3BE9:0822 E8 0109 call sub_38 ; (092E)
3BE9:0825 E8 00F8 call sub_36 ; (0920)
3BE9:0828 5E pop si
3BE9:0829 59 pop cx
3BE9:082A E2 F1 loop locloop_70 ; Loop if cx > 0
3BE9:082C C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:080C
;==========================================================================
3BE9:082D sub_33 proc near
3BE9:082D 50 push ax
3BE9:082E A0 027B mov al,byte ptr ds:[27Bh] ; (3BE9:027B=4Bh)
3BE9:0831 A8 10 test al,10h
3BE9:0833 74 2E jz loc_71 ; Jump if zero
3BE9:0835 A8 80 test al,80h
3BE9:0837 74 2A jz loc_71 ; Jump if zero
3BE9:0839 58 pop ax
3BE9:083A ,BF 041E mov di,41Eh ; (3BE9:041E=34h)
3BE9:083D B9 0003 mov cx,3
3BE9:0840 06 push es
3BE9:0841 8C D8 mov ax,ds
3BE9:0843 8E C0 mov es,ax
3BE9:0845 F3/ A4 rep movsb ; Rep when cx >0 Mov [si] to es:[di]
3BE9:0847 07 pop es
3BE9:0848 56 push si
3BE9:0849 ,BE 0412 mov si,412h ; (3BE9:0412=0)
3BE9:084C E8 00DF call sub_38 ; (092E)
3BE9:084F E8 00CE call sub_36 ; (0920)
3BE9:0852 ,BE 041A mov si,41Ah ; (3BE9:041A=9Eh)
3BE9:0855 E8 00D6 call sub_38 ; (092E)
3BE9:0858 E8 00C5 call sub_36 ; (0920)
3BE9:085B ,BE 0422 mov si,422h ; (3BE9:0422=0C7h)
3BE9:085E E8 00CD call sub_38 ; (092E)
3BE9:0861 5E pop si
3BE9:0862 C3 retn
3BE9:0863 loc_71: ; xref 3BE9:0833, 0837
3BE9:0863 58 pop ax
3BE9:0864 ,BF 0436 mov di,436h ; (3BE9:0436=1)
3BE9:0867 B9 0003 mov cx,3
3BE9:086A 06 push es
3BE9:086B 8C D8 mov ax,ds
3BE9:086D 8E C0 mov es,ax
3BE9:086F F3/ A4 rep movsb ; Rep when cx >0 Mov [si] to es:[di]
3BE9:0871 07 pop es
3BE9:0872 56 push si
3BE9:0873 ,BE 042A mov si,42Ah ; (3BE9:042A=40h)
3BE9:0876 E8 00B5 call sub_38 ; (092E)
3BE9:0879 E8 00A4 call sub_36 ; (0920)
3BE9:087C ,BE 0432 mov si,432h ; (3BE9:0432=88h)
3BE9:087F E8 00AC call sub_38 ; (092E)
3BE9:0882 E8 009B call sub_36 ; (0920)
3BE9:0885 ,BE 043A mov si,43Ah ; (3BE9:043A=1)
3BE9:0888 E8 00A3 call sub_38 ; (092E)
3BE9:088B 5E pop si
3BE9:088C C3 retn
sub_33 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:01EE, 0291, 02E3, 0367, 03EB, 043D, 0467
; 0729, 0739, 0790, 07A0
;==========================================================================
3BE9:088D sub_34 proc near
3BE9:088D AD lodsw ; String [si] to ax
3BE9:088E 56 push si
3BE9:088F E8 01EB call sub_51 ; (0A7D)
3BE9:0892 5E pop si
3BE9:0893 AD lodsw ; String [si] to ax
3BE9:0894 56 push si
3BE9:0895 88 26 0274 mov byte ptr ds:[274h],ah ; (3BE9:0274=0DEh)
3BE9:0899 E8 0205 call sub_52 ; (0AA1)
3BE9:089C 5E pop si
3BE9:089D 8B 34 mov si,[si]
3BE9:089F E8 008C call sub_38 ; (092E)
3BE9:08A2 A0 0274 mov al,byte ptr ds:[274h] ; (3BE9:0274=0DEh)
3BE9:08A5 E8 01F9 call sub_52 ; (0AA1)
3BE9:08A8 C3 retn
sub_34 endp
;* No entry point to code
3BE9:08A9 33 C0 xor ax,ax ; Zero register
3BE9:08AB AC lodsb ; String [si] to al
3BE9:08AC A3 0279 mov word ptr ds:[279h],ax ; (3BE9:0279=4501h)
3BE9:08AF 87 F7 xchg si,di
3BE9:08B1 loc_72: ; xref 3BE9:08F3
3BE9:08B1 ,57 push di
3BE9:08B2 57 push di
3BE9:08B3 loc_73: ; xref 3BE9:08B8
3BE9:08B3 E8 009C call sub_40 ; (0952)
3BE9:08B6 0A C0 or al,al ; Zero ?
3BE9:08B8 74 F9 jz loc_73 ; Jump if zero
3BE9:08BA 8B 0E 0279 mov cx,word ptr ds:[279h] ; (3BE9:0279=4501h)
3BE9:08BE E3 35 jcxz loc_76 ; Jump if cx=0
3BE9:08C0 3C 1B cmp al,1Bh
3BE9:08C2 75 3D jne loc_77 ; Jump if not equal
3BE9:08C4 E8 008B call sub_40 ; (0952)
3BE9:08C7 0A C0 or al,al ; Zero ?
3BE9:08C9 74 36 jz loc_77 ; Jump if zero
3BE9:08CB E8 0084 call sub_40 ; (0952)
3BE9:08CE 0A C0 or al,al ; Zero ?
3BE9:08D0 74 2F jz loc_77 ; Jump if zero
3BE9:08D2 A2 0278 mov byte ptr ds:[278h],al ; (3BE9:0278=3Ah)
3BE9:08D5 8B 0E 0279 mov cx,word ptr ds:[279h] ; (3BE9:0279=4501h)
3BE9:08D9 5F pop di
3BE9:08DA F2/ AE repne scasb ; Rep zf=0+cx >0 Scan es:[di] for al
3BE9:08DC 75 11 jnz loc_75 ; Jump if not zero
3BE9:08DE loc_74: ; xref 3BE9:08FF
3BE9:08DE ,5F pop di
3BE9:08DF A1 0279 mov ax,word ptr ds:[279h] ; (3BE9:0279=4501h)
3BE9:08E2 2B C1 sub ax,cx
3BE9:08E4 FE C8 dec al
3BE9:08E6 A2 0277 mov byte ptr ds:[277h],al ; (3BE9:0277=6)
3BE9:08E9 8A D8 mov bl,al
3BE9:08EB A0 0278 mov al,byte ptr ds:[278h] ; (3BE9:0278=3Ah)
3BE9:08EE C3 retn
3BE9:08EF loc_75: ; xref 3BE9:08DC, 0902
3BE9:08EF ,E8 0053 call sub_39 ; (0945)
3BE9:08F2 5F pop di
3BE9:08F3 EB BC jmp short loc_72 ; (08B1)
3BE9:08F5 loc_76: ; xref 3BE9:08BE
3BE9:08F5 A2 0278 mov byte ptr ds:[278h],al ; (3BE9:0278=3Ah)
3BE9:08F8 E8 0057 call sub_40 ; (0952)
3BE9:08FB E8 0054 call sub_40 ; (0952)
3BE9:08FE 5F pop di
3BE9:08FF EB DD jmp short loc_74 ; (08DE)
3BE9:0901 loc_77: ; xref 3BE9:08C2, 08C9, 08D0
3BE9:0901 5F pop di
3BE9:0902 EB EB jmp short loc_75 ; (08EF)
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:07BD
;==========================================================================
3BE9:0904 sub_35 proc near
3BE9:0904 B8 0804 mov ax,804h
3BE9:0907 B9 0014 mov cx,14h
3BE9:090A 51 push cx
3BE9:090B A3 0272 mov word ptr ds:[272h],ax ; (3BE9:0272=134h)
3BE9:090E E8 016C call sub_51 ; (0A7D)
3BE9:0911 59 pop cx
3BE9:0912 locloop_78: ; xref 3BE9:091D
3BE9:0912 51 push cx
3BE9:0913 ,BE 046F mov si,46Fh ; (3BE9:046F=0B0h)
3BE9:0916 E8 0015 call sub_38 ; (092E)
3BE9:0919 E8 0004 call sub_36 ; (0920)
3BE9:091C 59 pop cx
3BE9:091D E2 F3 loop locloop_78 ; Loop if cx > 0
3BE9:091F C3 retn
sub_35 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:074E, 07B5, 0825, 084F, 0858, 0879, 0882
; 0919
;==========================================================================
3BE9:0920 sub_36 proc near
3BE9:0920 FE 06 0272 inc byte ptr ds:[272h] ; (3BE9:0272=34h)
3BE9:0924 A1 0272 mov ax,word ptr ds:[272h] ; (3BE9:0272=134h)
3BE9:0927 E8 0153 call sub_51 ; (0A7D)
3BE9:092A C3 retn
sub_36 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:074B, 07B2, 09D3, 09DB, 09E4, 09EB, 0A02
; 0A12, 0A2A, 0A50, 0A6A
;==========================================================================
3BE9:092B sub_37 proc near
3BE9:092B loc_79: ; xref 3BE9:0177, 093B, 0942, 094F
; 0956, 0975, 097A
3BE9:092B ,CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:092D C3 retn
sub_37 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:017F, 049B, 04A2, 04AD, 0822, 084C, 0855
; 085E, 0876, 087F, 0888, 089F, 0916, 0AB3
;==========================================================================
3BE9:092E sub_38 proc near
3BE9:092E loc_80: ; xref 3BE9:0948, 0A9E, 0AA7, 0AAD
3BE9:092E ,AD lodsw ; String [si] to ax
3BE9:092F A3 0288 mov word ptr ds:[288h],ax ; (3BE9:0288=14BEh)
3BE9:0932 89 36 0284 mov word ptr ds:[284h],si ; (3BE9:0284=0E801h)
3BE9:0936 B1 6F mov cl,6Fh ; 'o'
3BE9:0938 BA 0284 mov dx,284h
3BE9:093B E9 FFED ;* jmp loc_79 ; (092B)
sub_38 endp
3BE9:093B db 0E9h,0EDh,0FFh ; Fixup - byte match
;* No entry point to code
3BE9:093E B1 09 mov cl,9
3BE9:0940 8B D6 mov dx,si
3BE9:0942 E9 FFE6 ;* jmp loc_79 ; (092B)
3BE9:0942 db 0E9h,0E6h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:08EF
;==========================================================================
3BE9:0945 sub_39 proc near
3BE9:0945 BE 046B mov si,46Bh
3BE9:0948 E9 FFE3 ;* jmp loc_80 ; (092E)
sub_39 endp
3BE9:0948 db 0E9h,0E3h,0FFh ; Fixup - byte match
;* No entry point to code
3BE9:094B B2 FD mov dl,0FDh
3BE9:094D B1 06 mov cl,6
3BE9:094F E9 FFD9 ;* jmp loc_79 ; (092B)
3BE9:094F db 0E9h,0D9h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:08B3, 08C4, 08CB, 08F8, 08FB
;==========================================================================
3BE9:0952 sub_40 proc near
3BE9:0952 B2 FF mov dl,0FFh
3BE9:0954 B1 06 mov cl,6
3BE9:0956 E9 FFD2 ;* jmp loc_79 ; (092B)
sub_40 endp
3BE9:0956 db 0E9h,0D2h,0FFh ; Fixup - byte match
;* No entry point to code
3BE9:0959 4F dec di
3BE9:095A 03 F9 add di,cx
3BE9:095C BB 000A mov bx,0Ah
3BE9:095F locloop_81: ; xref 3BE9:096D
3BE9:095F 2B D2 sub dx,dx
3BE9:0961 F7 F3 div bx ; ax,dx rem=dx:ax/reg
3BE9:0963 80 C2 30 add dl,30h ; '0'
3BE9:0966 88 15 mov [di],dl
3BE9:0968 4F dec di
3BE9:0969 85 C0 test ax,ax
3BE9:096B 74 02 jz loc_ret_82 ; Jump if zero
3BE9:096D E2 F0 loop locloop_81 ; Loop if cx > 0
3BE9:096F loc_ret_82: ; xref 3BE9:096B
3BE9:096F C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:00C6, 0115
;==========================================================================
3BE9:0970 sub_41 proc near
3BE9:0970 B1 6D mov cl,6Dh ; 'm'
3BE9:0972 BA 0009 mov dx,9
3BE9:0975 E9 FFB3 ;* jmp loc_79 ; (092B)
sub_41 endp
3BE9:0975 db 0E9h,0B3h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0112, 0120
;==========================================================================
3BE9:0978 sub_42 proc near
3BE9:0978 B1 91 mov cl,91h
3BE9:097A E9 FFAE ;* jmp loc_79 ; (092B)
sub_42 endp
3BE9:097A db 0E9h,0AEh,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0118
;==========================================================================
3BE9:097D sub_43 proc near
3BE9:097D 8B 1E 04B4 mov bx,word ptr ds:[4B4h] ; (3BE9:04B4=9EE8h)
3BE9:0981 1E push ds
3BE9:0982 8E 1E 04B6 mov ds,word ptr ds:[4B6h] ; (3BE9:04B6=0E900h)
3BE9:0986 81 4F 06 0002 ;* or word ptr [bx+6],2
3BE9:0986 db 81h, 4Fh, 06h, 02h, 00h ; Fixup - byte match
3BE9:098B 1F pop ds
3BE9:098C C3 retn
sub_43 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0158
;==========================================================================
3BE9:098D sub_44 proc near
3BE9:098D 8B 1E 04B4 mov bx,word ptr ds:[4B4h] ; (3BE9:04B4=9EE8h)
3BE9:0991 1E push ds
3BE9:0992 8E 1E 04B6 mov ds,word ptr ds:[4B6h] ; (3BE9:04B6=0E900h)
3BE9:0996 81 67 06 FFFD ;* and word ptr [bx+6],0FFFDh
3BE9:0996 db 81h, 67h, 06h,0FDh,0FFh ; Fixup - byte match
3BE9:099B 1F pop ds
3BE9:099C C3 retn
sub_44 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:011B
;==========================================================================
3BE9:099D sub_45 proc near
3BE9:099D 8B 1E 04B8 mov bx,word ptr ds:[4B8h] ; (3BE9:04B8=0)
3BE9:09A1 1E push ds
3BE9:09A2 8E 1E 04B6 mov ds,word ptr ds:[4B6h] ; (3BE9:04B6=0E900h)
3BE9:09A6 9C pushf ; Push flags
3BE9:09A7 FA cli ; Disable interrupts
3BE9:09A8 83 7F 0E 00 cmp word ptr [bx+0Eh],0
3BE9:09AC 74 08 je loc_83 ; Jump if equal
3BE9:09AE 9D popf ; Pop flags
3BE9:09AF 1F pop ds
3BE9:09B0 BE 4801 mov si,4801h
3BE9:09B3 E9 F7C4 jmp loc_10 ; (017A)
3BE9:09B6 loc_83: ; xref 3BE9:09AC
3BE9:09B6 81 4F 0E 0008 ;* or word ptr [bx+0Eh],8
3BE9:09B6 db 81h, 4Fh, 0Eh, 08h, 00h ; Fixup - byte match
3BE9:09BB 9D popf ; Pop flags
3BE9:09BC 1F pop ds
3BE9:09BD C3 retn
sub_45 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0155
;==========================================================================
3BE9:09BE sub_46 proc near
3BE9:09BE 8B 1E 04B8 mov bx,word ptr ds:[4B8h] ; (3BE9:04B8=0)
3BE9:09C2 1E push ds
3BE9:09C3 8E 1E 04B6 mov ds,word ptr ds:[4B6h] ; (3BE9:04B6=0E900h)
3BE9:09C7 81 67 0E FFF7 ;* and word ptr [bx+0Eh],0FFF7h
3BE9:09C7 db 81h, 67h, 0Eh,0F7h,0FFh ; Fixup - byte match
3BE9:09CC 1F pop ds
3BE9:09CD C3 retn
sub_46 endp
;* No entry point to code
3BE9:09CE B1 87 mov cl,87h
3BE9:09D0 BA 47F1 mov dx,47F1h
3BE9:09D3 E8 FF55 call sub_37 ; (092B)
3BE9:09D6 B1 89 mov cl,89h
3BE9:09D8 BA 47F1 mov dx,47F1h
3BE9:09DB E8 FF4D call sub_37 ; (092B)
3BE9:09DE C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0152
;==========================================================================
3BE9:09DF sub_47 proc near
3BE9:09DF B1 8B mov cl,8Bh
3BE9:09E1 BA 47F1 mov dx,47F1h
3BE9:09E4 E8 FF44 call sub_37 ; (092B)
3BE9:09E7 C3 retn
sub_47 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:010D
;==========================================================================
3BE9:09E8 sub_48 proc near
3BE9:09E8 06 push es
3BE9:09E9 B1 9A mov cl,9Ah
3BE9:09EB E8 FF3D call sub_37 ; (092B)
3BE9:09EE 8C 06 04B6 mov word ptr ds:[4B6h],es ; (3BE9:04B6=0E900h)
3BE9:09F2 26: A1 0028 mov ax,es:data_6 ; (3BE9:0028=0)
3BE9:09F6 A3 04BC mov word ptr ds:[4BCh],ax ; (3BE9:04BC=0BA16h)
3BE9:09F9 26: A1 002A mov ax,es:data_7 ; (3BE9:002A=0)
3BE9:09FD A3 04BE mov word ptr ds:[4BEh],ax ; (3BE9:04BE=4BF1h)
3BE9:0A00 B1 9C mov cl,9Ch
3BE9:0A02 E8 FF26 call sub_37 ; (092B)
3BE9:0A05 89 1E 04B4 mov word ptr ds:[4B4h],bx ; (3BE9:04B4=9EE8h)
3BE9:0A09 26: 8B 47 10 mov ax,es:[bx+10h]
3BE9:0A0D A3 04BA mov word ptr ds:[4BAh],ax ; (3BE9:04BA=0CFE8h)
3BE9:0A10 B1 99 mov cl,99h
3BE9:0A12 E8 FF16 call sub_37 ; (092B)
3BE9:0A15 32 E4 xor ah,ah ; Zero register
3BE9:0A17 BB 002C mov bx,2Ch
3BE9:0A1A F7 E3 mul bx ; dx:ax = reg * ax
3BE9:0A1C 26: 03 06 0054 add ax,es:data_9 ; (3BE9:0054=0)
3BE9:0A21 A3 04B8 mov word ptr ds:[4B8h],ax ; (3BE9:04B8=0)
3BE9:0A24 07 pop es
3BE9:0A25 C3 retn
sub_48 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:00C3
;==========================================================================
3BE9:0A26 sub_49 proc near
3BE9:0A26 1E push ds
3BE9:0A27 06 push es
3BE9:0A28 B1 1F mov cl,1Fh
3BE9:0A2A E8 FEFE call sub_37 ; (092B)
3BE9:0A2D 26: A1 0028 mov ax,es:data_6 ; (3BE9:0028=0)
3BE9:0A31 A3 04BC mov word ptr ds:[4BCh],ax ; (3BE9:04BC=0BA16h)
3BE9:0A34 26: A1 002A mov ax,es:data_7 ; (3BE9:002A=0)
3BE9:0A38 A3 04BE mov word ptr ds:[4BEh],ax ; (3BE9:04BE=4BF1h)
3BE9:0A3B 26: A1 004E mov ax,es:data_8 ; (3BE9:004E=0)
3BE9:0A3F A3 04BA mov word ptr ds:[4BAh],ax ; (3BE9:04BA=0CFE8h)
3BE9:0A42 8C 06 04B6 mov word ptr ds:[4B6h],es ; (3BE9:04B6=0E900h)
3BE9:0A46 07 pop es
3BE9:0A47 1F pop ds
3BE9:0A48 C3 retn
sub_49 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:00C9
;==========================================================================
3BE9:0A49 sub_50 proc near
3BE9:0A49 1E push ds
3BE9:0A4A 06 push es
3BE9:0A4B BA 04C0 mov dx,4C0h
3BE9:0A4E B1 3C mov cl,3Ch ; '<'
3BE9:0A50 E8 FED8 call sub_37 ; (092B)
3BE9:0A53 07 pop es
3BE9:0A54 1F pop ds
3BE9:0A55 3D FFFF cmp ax,0FFFFh
3BE9:0A58 75 1C jne loc_84 ; Jump if not equal
3BE9:0A5A 1E push ds
3BE9:0A5B 06 push es
3BE9:0A5C BB 04C3 mov bx,4C3h
3BE9:0A5F C6 07 89 mov byte ptr [bx],89h
3BE9:0A62 C6 47 01 00 mov byte ptr [bx+1],0
3BE9:0A66 8B D3 mov dx,bx
3BE9:0A68 B1 31 mov cl,31h ; '1'
3BE9:0A6A E8 FEBE call sub_37 ; (092B)
3BE9:0A6D 07 pop es
3BE9:0A6E 1F pop ds
3BE9:0A6F 80 3E 04C5 01 cmp byte ptr ds:[4C5h],1 ; (3BE9:04C5=1)
3BE9:0A74 74 06 je loc_ret_85 ; Jump if equal
3BE9:0A76 loc_84: ; xref 3BE9:0A58
3BE9:0A76 BE 482B mov si,482Bh
3BE9:0A79 E9 F6FE jmp loc_10 ; (017A)
3BE9:0A7C loc_ret_85: ; xref 3BE9:0A74
3BE9:0A7C C3 retn
sub_50 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:01F8, 0249, 029B, 02ED, 0307, 0371, 038B
; 03F5, 0447, 0471, 0710, 0740, 0777, 07A7
; 0808, 0818, 088F, 090E, 0927
;==========================================================================
3BE9:0A7D sub_51 proc near
3BE9:0A7D 8B D8 mov bx,ax
3BE9:0A7F ,BE 04CA mov si,4CAh ; (3BE9:04CA=0FFh)
3BE9:0A82 D4 0A aam ; Ascii adjust
3BE9:0A84 86 C4 xchg al,ah
3BE9:0A86 0D 3030 or ax,3030h
3BE9:0A89 89 04 mov [si],ax
3BE9:0A8B ,BE 04CD mov si,4CDh ; (3BE9:04CD=82h)
3BE9:0A8E 8B C3 mov ax,bx
3BE9:0A90 86 C4 xchg al,ah
3BE9:0A92 D4 0A aam ; Ascii adjust
3BE9:0A94 0D 3030 or ax,3030h
3BE9:0A97 86 C4 xchg al,ah
3BE9:0A99 89 04 mov [si],ax
3BE9:0A9B BE 04C6 mov si,4C6h
3BE9:0A9E E9 FE8D jmp loc_80 ; (092E)
sub_51 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0899, 08A5
;==========================================================================
3BE9:0AA1 sub_52 proc near
3BE9:0AA1 A2 04F0 mov byte ptr ds:[4F0h],al ; (3BE9:04F0=5)
3BE9:0AA4 BE 04EC mov si,4ECh
3BE9:0AA7 E9 FE84 jmp loc_80 ; (092E)
sub_52 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:017B
;==========================================================================
3BE9:0AAA sub_53 proc near
3BE9:0AAA BE 04E3 mov si,4E3h
3BE9:0AAD E9 FE7E jmp loc_80 ; (092E)
sub_53 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0123
;==========================================================================
3BE9:0AB0 sub_54 proc near
3BE9:0AB0 ,BE 04D0 mov si,4D0h ; (3BE9:04D0=0)
3BE9:0AB3 E8 FE78 call sub_38 ; (092E)
3BE9:0AB6 C3 retn
sub_54 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0219
;==========================================================================
3BE9:0AB7 sub_55 proc near
3BE9:0AB7 E8 FA86 call sub_15 ; (0540)
3BE9:0ABA E8 0008 call sub_56 ; (0AC5)
3BE9:0ABD 72 03 jc loc_86 ; Jump if carry Set
3BE9:0ABF E8 0050 call sub_57 ; (0B12)
3BE9:0AC2 loc_86: ; xref 3BE9:0ABD
3BE9:0AC2 E9 FA58 jmp loc_36 ; (051D)
sub_55 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0ABA
;==========================================================================
3BE9:0AC5 sub_56 proc near
3BE9:0AC5 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:0AC9 8A 07 mov al,[bx]
3BE9:0ACB 43 inc bx
3BE9:0ACC B4 00 mov ah,0
3BE9:0ACE 53 push bx
3BE9:0ACF 03 D8 add bx,ax
3BE9:0AD1 C6 07 0D mov byte ptr [bx],0Dh
3BE9:0AD4 5B pop bx
3BE9:0AD5 E8 01C3 call sub_67 ; (0C9B)
3BE9:0AD8 72 30 jc loc_90 ; Jump if carry Set
3BE9:0ADA BA 04F6 mov dx,4F6h
3BE9:0ADD E8 00BA call sub_61 ; (0B9A)
3BE9:0AE0 73 21 jnc loc_89 ; Jump if carry=0
3BE9:0AE2 E8 008D call sub_59 ; (0B72)
3BE9:0AE5 72 23 jc loc_90 ; Jump if carry Set
3BE9:0AE7 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:0AEC 75 04 jne loc_87 ; Jump if not equal
3BE9:0AEE 3C 01 cmp al,1
3BE9:0AF0 75 18 jne loc_90 ; Jump if not equal
3BE9:0AF2 loc_87: ; xref 3BE9:0AEC
3BE9:0AF2 53 push bx
3BE9:0AF3 A2 04F6 mov byte ptr ds:[4F6h],al ; (3BE9:04F6=0E9h)
3BE9:0AF6 B9 000B mov cx,0Bh
3BE9:0AF9 ,BB 04F7 mov bx,4F7h ; (3BE9:04F7=0F6h)
3BE9:0AFC locloop_88: ; xref 3BE9:0B00
3BE9:0AFC C6 07 3F mov byte ptr [bx],3Fh ; '?'
3BE9:0AFF 43 inc bx
3BE9:0B00 E2 FA loop locloop_88 ; Loop if cx > 0
3BE9:0B02 5B pop bx
3BE9:0B03 loc_89: ; xref 3BE9:0AE0
3BE9:0B03 E8 01AE call sub_68 ; (0CB4)
3BE9:0B06 72 02 jc loc_90 ; Jump if carry Set
3BE9:0B08 F8 clc ; Clear carry flag
3BE9:0B09 C3 retn
3BE9:0B0A loc_90: ; xref 3BE9:0AD8, 0AE5, 0AF0, 0B06
3BE9:0B0A BA 455C mov dx,455Ch
3BE9:0B0D E8 FA45 call sub_17 ; (0555)
3BE9:0B10 F9 stc ; Set carry flag
3BE9:0B11 C3 retn
sub_56 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0ABF
;==========================================================================
3BE9:0B12 sub_57 proc near
3BE9:0B12 BA 04F6 mov dx,4F6h
3BE9:0B15 E8 0EB2 call sub_140 ; (19CA)
3BE9:0B18 73 08 jnc loc_91 ; Jump if carry=0
3BE9:0B1A BA 4569 mov dx,4569h
3BE9:0B1D E8 FA35 call sub_17 ; (0555)
3BE9:0B20 F9 stc ; Set carry flag
3BE9:0B21 C3 retn
3BE9:0B22 loc_91: ; xref 3BE9:0B18, 0B50
3BE9:0B22 ,C6 06 04F5 04 mov byte ptr ds:[4F5h],4 ; (3BE9:04F5=47h)
3BE9:0B27 A0 04F6 mov al,byte ptr ds:[4F6h] ; (3BE9:04F6=0E9h)
3BE9:0B2A 04 40 add al,40h ; '@'
3BE9:0B2C E8 FA3A call sub_18 ; (0569)
3BE9:0B2F loc_92: ; xref 3BE9:0B4B
3BE9:0B2F BA 04F2 mov dx,4F2h
3BE9:0B32 E8 FA20 call sub_17 ; (0555)
3BE9:0B35 8B 16 0B70 mov dx,word ptr ds:[0B70h] ; (3BE9:0B70=0C3F8h)
3BE9:0B39 E8 0018 call sub_58 ; (0B54)
3BE9:0B3C E8 FA0E call sub_16 ; (054D)
3BE9:0B3F BA 04F6 mov dx,4F6h
3BE9:0B42 E8 0E8B call sub_141 ; (19D0)
3BE9:0B45 72 0C jc loc_ret_93 ; Jump if carry Set
3BE9:0B47 FE 0E 04F5 dec byte ptr ds:[4F5h] ; (3BE9:04F5=47h)
3BE9:0B4B 75 E2 jnz loc_92 ; Jump if not zero
3BE9:0B4D E8 F9F0 call sub_15 ; (0540)
3BE9:0B50 E9 FFCF ;* jmp loc_91 ; (0B22)
3BE9:0B50 db 0E9h,0CFh,0FFh ; Fixup - byte match
3BE9:0B53 loc_ret_93: ; xref 3BE9:0B45
3BE9:0B53 C3 retn
sub_57 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0B39
;==========================================================================
3BE9:0B54 sub_58 proc near
3BE9:0B54 8B DA mov bx,dx
3BE9:0B56 B9 0008 mov cx,8
3BE9:0B59 locloop_94: ; xref 3BE9:0B5F
3BE9:0B59 8A 07 mov al,[bx]
3BE9:0B5B 43 inc bx
3BE9:0B5C E8 FA0A call sub_18 ; (0569)
3BE9:0B5F E2 F8 loop locloop_94 ; Loop if cx > 0
3BE9:0B61 B0 2E mov al,2Eh ; '.'
3BE9:0B63 E8 FA03 call sub_18 ; (0569)
3BE9:0B66 B9 0003 mov cx,3
3BE9:0B69 locloop_95: ; xref 3BE9:0B6F
3BE9:0B69 8A 07 mov al,[bx]
3BE9:0B6B 43 inc bx
3BE9:0B6C E8 F9FA call sub_18 ; (0569)
3BE9:0B6F E2 F8 loop locloop_95 ; Loop if cx > 0
3BE9:0B71 C3 retn
sub_58 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0AE2, 0BAC, 0D3F, 10C6, 11E7, 14C7
;==========================================================================
3BE9:0B72 sub_59 proc near
3BE9:0B72 8A 47 01 mov al,[bx+1]
3BE9:0B75 3C 3A cmp al,3Ah ; ':'
3BE9:0B77 75 0F jne loc_96 ; Jump if not equal
3BE9:0B79 8A 07 mov al,[bx]
3BE9:0B7B 2C 41 sub al,41h ; 'A'
3BE9:0B7D 3C 10 cmp al,10h
3BE9:0B7F 73 07 jae loc_96 ; Jump if above or =
3BE9:0B81 FE C0 inc al
3BE9:0B83 83 C3 02 add bx,2
3BE9:0B86 F8 clc ; Clear carry flag
3BE9:0B87 C3 retn
3BE9:0B88 loc_96: ; xref 3BE9:0B77, 0B7F
3BE9:0B88 B0 00 mov al,0
3BE9:0B8A F9 stc ; Set carry flag
3BE9:0B8B C3 retn
sub_59 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0BA6
;==========================================================================
3BE9:0B8C sub_60 proc near
3BE9:0B8C C6 05 00 mov byte ptr [di],0
3BE9:0B8F 47 inc di
3BE9:0B90 B9 000B mov cx,0Bh
3BE9:0B93 locloop_97: ; xref 3BE9:0B97
3BE9:0B93 C6 05 20 mov byte ptr [di],20h ; ' '
3BE9:0B96 47 inc di
3BE9:0B97 E2 FA loop locloop_97 ; Loop if cx > 0
3BE9:0B99 C3 retn
sub_60 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0ADD, 0E02, 0F40, 119E, 11C6, 11FF, 147E
; 14A6, 14DF
;==========================================================================
3BE9:0B9A sub_61 proc near
3BE9:0B9A 57 push di
3BE9:0B9B 51 push cx
3BE9:0B9C 50 push ax
3BE9:0B9D 53 push bx
3BE9:0B9E C6 06 0527 00 mov byte ptr ds:[527h],0 ; (3BE9:0527=1)
3BE9:0BA3 BF 0528 mov di,528h
3BE9:0BA6 E8 FFE3 call sub_60 ; (0B8C)
3BE9:0BA9 BF 0528 mov di,528h
3BE9:0BAC E8 FFC3 call sub_59 ; (0B72)
3BE9:0BAF 72 02 jc loc_98 ; Jump if carry Set
3BE9:0BB1 88 05 mov [di],al
3BE9:0BB3 loc_98: ; xref 3BE9:0BAF
3BE9:0BB3 47 inc di
3BE9:0BB4 B9 0009 mov cx,9
3BE9:0BB7 E8 006D call sub_63 ; (0C27)
3BE9:0BBA 72 56 jc loc_106 ; Jump if carry Set
3BE9:0BBC 3C 24 cmp al,24h ; '$'
3BE9:0BBE 74 52 je loc_106 ; Jump if equal
3BE9:0BC0 loc_99: ; xref 3BE9:0BD9
3BE9:0BC0 49 dec cx
3BE9:0BC1 74 4F jz loc_106 ; Jump if zero
3BE9:0BC3 3C 2A cmp al,2Ah ; '*'
3BE9:0BC5 75 03 jne loc_100 ; Jump if not equal
3BE9:0BC7 E8 004E call sub_62 ; (0C18)
3BE9:0BCA loc_100: ; xref 3BE9:0BC5
3BE9:0BCA 3C 3F cmp al,3Fh ; '?'
3BE9:0BCC 75 05 jne loc_101 ; Jump if not equal
3BE9:0BCE 80 0E 0527 01 or byte ptr ds:[527h],1 ; (3BE9:0527=1)
3BE9:0BD3 loc_101: ; xref 3BE9:0BCC
3BE9:0BD3 88 05 mov [di],al
3BE9:0BD5 47 inc di
3BE9:0BD6 E8 004E call sub_63 ; (0C27)
3BE9:0BD9 73 E5 jnc loc_99 ; Jump if carry=0
3BE9:0BDB 3C 2E cmp al,2Eh ; '.'
3BE9:0BDD 75 27 jne loc_105 ; Jump if not equal
3BE9:0BDF 43 inc bx
3BE9:0BE0 ,BF 0531 mov di,531h ; (3BE9:0531=0B5h)
3BE9:0BE3 E8 0041 call sub_63 ; (0C27)
3BE9:0BE6 72 2A jc loc_106 ; Jump if carry Set
3BE9:0BE8 B9 0004 mov cx,4
3BE9:0BEB loc_102: ; xref 3BE9:0C04
3BE9:0BEB 49 dec cx
3BE9:0BEC 74 24 jz loc_106 ; Jump if zero
3BE9:0BEE 3C 2A cmp al,2Ah ; '*'
3BE9:0BF0 75 03 jne loc_103 ; Jump if not equal
3BE9:0BF2 E8 0023 call sub_62 ; (0C18)
3BE9:0BF5 loc_103: ; xref 3BE9:0BF0
3BE9:0BF5 3C 3F cmp al,3Fh ; '?'
3BE9:0BF7 75 05 jne loc_104 ; Jump if not equal
3BE9:0BF9 80 0E 0527 01 or byte ptr ds:[527h],1 ; (3BE9:0527=1)
3BE9:0BFE loc_104: ; xref 3BE9:0BF7
3BE9:0BFE 88 05 mov [di],al
3BE9:0C00 47 inc di
3BE9:0C01 E8 0023 call sub_63 ; (0C27)
3BE9:0C04 73 E5 jnc loc_102 ; Jump if carry=0
3BE9:0C06 loc_105: ; xref 3BE9:0BDD
3BE9:0C06 E8 0033 call sub_64 ; (0C3C)
3BE9:0C09 58 pop ax
3BE9:0C0A 58 pop ax
3BE9:0C0B 59 pop cx
3BE9:0C0C 5F pop di
3BE9:0C0D A0 0527 mov al,byte ptr ds:[527h] ; (3BE9:0527=1)
3BE9:0C10 F8 clc ; Clear carry flag
3BE9:0C11 C3 retn
3BE9:0C12 loc_106: ; xref 3BE9:0BBA, 0BBE, 0BC1, 0BE6
; 0BEC
3BE9:0C12 5B pop bx
3BE9:0C13 58 pop ax
3BE9:0C14 59 pop cx
3BE9:0C15 5F pop di
3BE9:0C16 F9 stc ; Set carry flag
3BE9:0C17 C3 retn
sub_61 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0BC7, 0BF2
;==========================================================================
3BE9:0C18 sub_62 proc near
3BE9:0C18 loc_107: ; xref 3BE9:0C23
3BE9:0C18 ,B0 3F mov al,3Fh ; '?'
3BE9:0C1A 83 F9 02 cmp cx,2
3BE9:0C1D 72 07 jb loc_ret_108 ; Jump if below
3BE9:0C1F 88 05 mov [di],al
3BE9:0C21 47 inc di
3BE9:0C22 49 dec cx
3BE9:0C23 E9 FFF2 ;* jmp loc_107 ; (0C18)
3BE9:0C23 db 0E9h,0F2h,0FFh ; Fixup - byte match
3BE9:0C26 loc_ret_108: ; xref 3BE9:0C1D
3BE9:0C26 C3 retn
sub_62 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0BB7, 0BD6, 0BE3, 0C01
;==========================================================================
3BE9:0C27 sub_63 proc near
3BE9:0C27 8A 07 mov al,[bx]
3BE9:0C29 3C 21 cmp al,21h ; '!'
3BE9:0C2B 72 0D jb loc_109 ; Jump if below
3BE9:0C2D 3C 7F cmp al,7Fh
3BE9:0C2F 73 09 jae loc_109 ; Jump if above or =
3BE9:0C31 52 push dx
3BE9:0C32 BA 051C mov dx,51Ch
3BE9:0C35 E8 0036 call sub_65 ; (0C6E)
3BE9:0C38 5A pop dx
3BE9:0C39 C3 retn
3BE9:0C3A loc_109: ; xref 3BE9:0C2B, 0C2F
3BE9:0C3A F9 stc ; Set carry flag
3BE9:0C3B C3 retn
sub_63 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0C06
;==========================================================================
3BE9:0C3C sub_64 proc near
3BE9:0C3C 53 push bx
3BE9:0C3D ,BB 0528 mov bx,528h ; (3BE9:0528=0)
3BE9:0C40 8B FA mov di,dx
3BE9:0C42 8A 07 mov al,[bx]
3BE9:0C44 43 inc bx
3BE9:0C45 3C 00 cmp al,0
3BE9:0C47 74 02 je loc_110 ; Jump if equal
3BE9:0C49 88 05 mov [di],al
3BE9:0C4B loc_110: ; xref 3BE9:0C47
3BE9:0C4B 47 inc di
3BE9:0C4C 80 3F 20 cmp byte ptr [bx],20h ; ' '
3BE9:0C4F 74 1B je loc_113 ; Jump if equal
3BE9:0C51 B9 0008 mov cx,8
3BE9:0C54 locloop_111: ; xref 3BE9:0C5A
3BE9:0C54 8A 07 mov al,[bx]
3BE9:0C56 88 05 mov [di],al
3BE9:0C58 43 inc bx
3BE9:0C59 47 inc di
3BE9:0C5A E2 F8 loop locloop_111 ; Loop if cx > 0
3BE9:0C5C 80 3F 20 cmp byte ptr [bx],20h ; ' '
3BE9:0C5F 74 0B je loc_113 ; Jump if equal
3BE9:0C61 B9 0003 mov cx,3
3BE9:0C64 locloop_112: ; xref 3BE9:0C6A
3BE9:0C64 8A 07 mov al,[bx]
3BE9:0C66 88 05 mov [di],al
3BE9:0C68 43 inc bx
3BE9:0C69 47 inc di
3BE9:0C6A E2 F8 loop locloop_112 ; Loop if cx > 0
3BE9:0C6C loc_113: ; xref 3BE9:0C4F, 0C5F
3BE9:0C6C 5B pop bx
3BE9:0C6D C3 retn
sub_64 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0C35
;==========================================================================
3BE9:0C6E sub_65 proc near
3BE9:0C6E 57 push di
3BE9:0C6F 51 push cx
3BE9:0C70 8B FA mov di,dx
3BE9:0C72 8A 0D mov cl,[di]
3BE9:0C74 B5 00 mov ch,0
3BE9:0C76 47 inc di
3BE9:0C77 8A 07 mov al,[bx]
3BE9:0C79 locloop_114: ; xref 3BE9:0C7F
3BE9:0C79 3A 05 cmp al,[di]
3BE9:0C7B F9 stc ; Set carry flag
3BE9:0C7C 74 05 jz loc_115 ; Jump if zero
3BE9:0C7E 47 inc di
3BE9:0C7F E2 F8 loop locloop_114 ; Loop if cx > 0
3BE9:0C81 43 inc bx
3BE9:0C82 F8 clc ; Clear carry flag
3BE9:0C83 loc_115: ; xref 3BE9:0C7C
3BE9:0C83 59 pop cx
3BE9:0C84 5F pop di
3BE9:0C85 C3 retn
sub_65 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0C92, 0CC6, 0D79, 0D80, 0F8C, 0F93, 0F9A
; 11BB, 11F4, 149B, 14D4
;==========================================================================
3BE9:0C86 sub_66 proc near
3BE9:0C86 3A 07 cmp al,[bx]
3BE9:0C88 75 03 jne loc_116 ; Jump if not equal
3BE9:0C8A 43 inc bx
3BE9:0C8B F8 clc ; Clear carry flag
3BE9:0C8C C3 retn
3BE9:0C8D loc_116: ; xref 3BE9:0C88
3BE9:0C8D F9 stc ; Set carry flag
3BE9:0C8E C3 retn
sub_66 endp
;* No entry point to code
3BE9:0C8F 50 push ax
3BE9:0C90 B0 2C mov al,2Ch ; ','
3BE9:0C92 E8 FFF1 call sub_66 ; (0C86)
3BE9:0C95 73 03 jnc loc_ret_117 ; Jump if carry=0
3BE9:0C97 E8 0001 call sub_67 ; (0C9B)
3BE9:0C9A loc_ret_117: ; xref 3BE9:0C95
3BE9:0C9A C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0AD5, 0C97, 0CB5, 0D3A, 0D66, 0DFA, 0F38
; 0F64, 0F87, 10C1, 1193, 11B6, 11C0, 11EF
; 11F9, 1473, 1496, 14A0, 14CF, 14D9
;==========================================================================
3BE9:0C9B sub_67 proc near
3BE9:0C9B 80 3F 20 cmp byte ptr [bx],20h ; ' '
3BE9:0C9E 74 05 je loc_118 ; Jump if equal
3BE9:0CA0 80 3F 09 cmp byte ptr [bx],9
3BE9:0CA3 75 0D jne loc_119 ; Jump if not equal
3BE9:0CA5 loc_118: ; xref 3BE9:0C9E, 0CA9, 0CAE
3BE9:0CA5 43 inc bx
3BE9:0CA6 80 3F 20 cmp byte ptr [bx],20h ; ' '
3BE9:0CA9 74 FA je loc_118 ; Jump if equal
3BE9:0CAB 80 3F 09 cmp byte ptr [bx],9
3BE9:0CAE 74 F5 je loc_118 ; Jump if equal
3BE9:0CB0 F8 clc ; Clear carry flag
3BE9:0CB1 C3 retn
3BE9:0CB2 loc_119: ; xref 3BE9:0CA3
3BE9:0CB2 F9 stc ; Set carry flag
3BE9:0CB3 C3 retn
sub_67 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0B03, 0D45, 0D6F, 0D85, 0F5B, 0F6C, 0F75
; 10CC, 11DE, 1208, 121D, 14BE, 14E8, 14FD
;==========================================================================
3BE9:0CB4 sub_68 proc near
3BE9:0CB4 53 push bx
3BE9:0CB5 E8 FFE3 call sub_67 ; (0C9B)
3BE9:0CB8 8A 07 mov al,[bx]
3BE9:0CBA 3C 20 cmp al,20h ; ' '
3BE9:0CBC 73 03 jae loc_120 ; Jump if above or =
3BE9:0CBE 58 pop ax
3BE9:0CBF F8 clc ; Clear carry flag
3BE9:0CC0 C3 retn
3BE9:0CC1 loc_120: ; xref 3BE9:0CBC
3BE9:0CC1 5B pop bx
3BE9:0CC2 F9 stc ; Set carry flag
3BE9:0CC3 C3 retn
sub_68 endp
;* No entry point to code
3BE9:0CC4 B0 24 mov al,24h ; '$'
3BE9:0CC6 E8 FFBD call sub_66 ; (0C86)
3BE9:0CC9 B0 00 mov al,0
3BE9:0CCB 73 02 jnc loc_121 ; Jump if carry=0
3BE9:0CCD F9 stc ; Set carry flag
3BE9:0CCE C3 retn
3BE9:0CCF loc_121: ; xref 3BE9:0CCB
3BE9:0CCF E8 000E call sub_69 ; (0CE0)
3BE9:0CD2 73 05 jnc loc_122 ; Jump if carry=0
3BE9:0CD4 4B dec bx
3BE9:0CD5 B0 00 mov al,0
3BE9:0CD7 F9 stc ; Set carry flag
3BE9:0CD8 C3 retn
3BE9:0CD9 loc_122: ; xref 3BE9:0CD2, 0CDC
3BE9:0CD9 E8 0004 call sub_69 ; (0CE0)
3BE9:0CDC 73 FB jnc loc_122 ; Jump if carry=0
3BE9:0CDE F8 clc ; Clear carry flag
3BE9:0CDF C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0CCF, 0CD9
;==========================================================================
3BE9:0CE0 sub_69 proc near
3BE9:0CE0 57 push di
3BE9:0CE1 51 push cx
3BE9:0CE2 8A 27 mov ah,[bx]
3BE9:0CE4 8B FA mov di,dx
3BE9:0CE6 8A 0D mov cl,[di]
3BE9:0CE8 B5 01 mov ch,1
3BE9:0CEA loc_123: ; xref 3BE9:0CF3
3BE9:0CEA 47 inc di
3BE9:0CEB 3A 25 cmp ah,[di]
3BE9:0CED 74 0A je loc_125 ; Jump if equal
3BE9:0CEF loc_124: ; xref 3BE9:0CFB
3BE9:0CEF D0 E5 shl ch,1 ; Shift w/zeros fill
3BE9:0CF1 FE C9 dec cl
3BE9:0CF3 75 F5 jnz loc_123 ; Jump if not zero
3BE9:0CF5 59 pop cx
3BE9:0CF6 5F pop di
3BE9:0CF7 F9 stc ; Set carry flag
3BE9:0CF8 C3 retn
3BE9:0CF9 loc_125: ; xref 3BE9:0CED
3BE9:0CF9 84 C5 test al,ch
3BE9:0CFB 75 F2 jnz loc_124 ; Jump if not zero
3BE9:0CFD 0A C5 or al,ch
3BE9:0CFF 43 inc bx
3BE9:0D00 59 pop cx
3BE9:0D01 5F pop di
3BE9:0D02 F8 clc ; Clear carry flag
3BE9:0D03 C3 retn
sub_69 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:026A
;==========================================================================
3BE9:0D04 sub_70 proc near
3BE9:0D04 8B 16 017E mov dx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:0D08 E8 F81F call sub_14 ; (052A)
3BE9:0D0B E8 001C call sub_71 ; (0D2A)
3BE9:0D0E 72 17 jc loc_127 ; Jump if carry Set
3BE9:0D10 8A C8 mov cl,al
3BE9:0D12 51 push cx
3BE9:0D13 E8 08B3 call sub_117 ; (15C9)
3BE9:0D16 59 pop cx
3BE9:0D17 loc_126: ; xref 3BE9:0D1F, 0D24
3BE9:0D17 ,E8 003B call sub_72 ; (0D55)
3BE9:0D1A 72 0B jc loc_127 ; Jump if carry Set
3BE9:0D1C E8 0076 call sub_73 ; (0D95)
3BE9:0D1F 72 F6 jc loc_126 ; Jump if carry Set
3BE9:0D21 E8 00A7 call sub_74 ; (0DCB)
3BE9:0D24 E9 FFF0 ;* jmp loc_126 ; (0D17)
3BE9:0D24 db 0E9h,0F0h,0FFh ; Fixup - byte match
3BE9:0D27 loc_127: ; xref 3BE9:0D0E, 0D1A
3BE9:0D27 E9 F7F3 jmp loc_36 ; (051D)
sub_70 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D0B
;==========================================================================
3BE9:0D2A sub_71 proc near
3BE9:0D2A 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:0D2E 8A 07 mov al,[bx]
3BE9:0D30 43 inc bx
3BE9:0D31 B4 00 mov ah,0
3BE9:0D33 53 push bx
3BE9:0D34 03 D8 add bx,ax
3BE9:0D36 C6 07 0D mov byte ptr [bx],0Dh
3BE9:0D39 5B pop bx
3BE9:0D3A E8 FF5E call sub_67 ; (0C9B)
3BE9:0D3D 72 0E jc loc_128 ; Jump if carry Set
3BE9:0D3F E8 FE30 call sub_59 ; (0B72)
3BE9:0D42 72 09 jc loc_128 ; Jump if carry Set
3BE9:0D44 50 push ax
3BE9:0D45 E8 FF6C call sub_68 ; (0CB4)
3BE9:0D48 58 pop ax
3BE9:0D49 72 02 jc loc_128 ; Jump if carry Set
3BE9:0D4B F8 clc ; Clear carry flag
3BE9:0D4C C3 retn
3BE9:0D4D loc_128: ; xref 3BE9:0D3D, 0D42, 0D49
3BE9:0D4D BA 4581 mov dx,4581h
3BE9:0D50 E8 F802 call sub_17 ; (0555)
3BE9:0D53 F9 stc ; Set carry flag
3BE9:0D54 C3 retn
sub_71 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D17
;==========================================================================
3BE9:0D55 sub_72 proc near
3BE9:0D55 loc_129: ; xref 3BE9:0D92
3BE9:0D55 ,BA 45B9 mov dx,45B9h
3BE9:0D58 B1 04 mov cl,4
3BE9:0D5A ,BB 05B8 mov bx,5B8h ; (3BE9:05B8=5Fh)
3BE9:0D5D E8 F8B5 call sub_22 ; (0615)
3BE9:0D60 E8 F7DD call sub_15 ; (0540)
3BE9:0D63 ,BB 05B8 mov bx,5B8h ; (3BE9:05B8=5Fh)
3BE9:0D66 E8 FF32 call sub_67 ; (0C9B)
3BE9:0D69 E8 0621 call sub_109 ; (138D)
3BE9:0D6C 72 09 jc loc_130 ; Jump if carry Set
3BE9:0D6E 50 push ax
3BE9:0D6F E8 FF42 call sub_68 ; (0CB4)
3BE9:0D72 5A pop dx
3BE9:0D73 72 17 jc loc_132 ; Jump if carry Set
3BE9:0D75 F8 clc ; Clear carry flag
3BE9:0D76 C3 retn
3BE9:0D77 loc_130: ; xref 3BE9:0D6C
3BE9:0D77 B0 51 mov al,51h ; 'Q'
3BE9:0D79 E8 FF0A call sub_66 ; (0C86)
3BE9:0D7C 73 07 jnc loc_131 ; Jump if carry=0
3BE9:0D7E B0 71 mov al,71h ; 'q'
3BE9:0D80 E8 FF03 call sub_66 ; (0C86)
3BE9:0D83 72 07 jc loc_132 ; Jump if carry Set
3BE9:0D85 loc_131: ; xref 3BE9:0D7C
3BE9:0D85 E8 FF2C call sub_68 ; (0CB4)
3BE9:0D88 72 02 jc loc_132 ; Jump if carry Set
3BE9:0D8A F9 stc ; Set carry flag
3BE9:0D8B C3 retn
3BE9:0D8C loc_132: ; xref 3BE9:0D73, 0D83, 0D88
3BE9:0D8C BA 4599 mov dx,4599h
3BE9:0D8F E8 F7C3 call sub_17 ; (0555)
3BE9:0D92 E9 FFC0 ;* jmp loc_129 ; (0D55)
sub_72 endp
3BE9:0D92 db 0E9h,0C0h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D1C
;==========================================================================
3BE9:0D95 sub_73 proc near
3BE9:0D95 52 push dx
3BE9:0D96 BA 45EF mov dx,45EFh
3BE9:0D99 E8 F7B9 call sub_17 ; (0555)
3BE9:0D9C A0 08CA mov al,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:0D9F 04 40 add al,40h ; '@'
3BE9:0DA1 E8 F7C5 call sub_18 ; (0569)
3BE9:0DA4 B0 3A mov al,3Ah ; ':'
3BE9:0DA6 E8 F7C0 call sub_18 ; (0569)
3BE9:0DA9 5A pop dx
3BE9:0DAA 52 push dx
3BE9:0DAB 8A C6 mov al,dh
3BE9:0DAD E8 059B call sub_105 ; (134B)
3BE9:0DB0 8A C2 mov al,dl
3BE9:0DB2 E8 0596 call sub_105 ; (134B)
3BE9:0DB5 E8 F788 call sub_15 ; (0540)
3BE9:0DB8 5A pop dx
3BE9:0DB9 BB 0536 mov bx,536h
3BE9:0DBC E8 08FA call sub_121 ; (16B9)
3BE9:0DBF 72 02 jc loc_133 ; Jump if carry Set
3BE9:0DC1 F8 clc ; Clear carry flag
3BE9:0DC2 C3 retn
3BE9:0DC3 loc_133: ; xref 3BE9:0DBF
3BE9:0DC3 BA 460D mov dx,460Dh
3BE9:0DC6 E8 F78C call sub_17 ; (0555)
3BE9:0DC9 F9 stc ; Set carry flag
3BE9:0DCA C3 retn
sub_73 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D21
;==========================================================================
3BE9:0DCB sub_74 proc near
3BE9:0DCB BB 0536 mov bx,536h
3BE9:0DCE BA 0000 mov dx,0
3BE9:0DD1 E8 0530 call sub_104 ; (1304)
3BE9:0DD4 C3 retn
sub_74 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:02BC
;==========================================================================
3BE9:0DD5 sub_75 proc near
3BE9:0DD5 E8 F768 call sub_15 ; (0540)
3BE9:0DD8 E8 0010 call sub_76 ; (0DEB)
3BE9:0DDB 72 0B jc loc_134 ; Jump if carry Set
3BE9:0DDD BA 068E mov dx,68Eh
3BE9:0DE0 E8 0041 call sub_77 ; (0E24)
3BE9:0DE3 72 03 jc loc_134 ; Jump if carry Set
3BE9:0DE5 E8 0050 call sub_78 ; (0E38)
3BE9:0DE8 loc_134: ; xref 3BE9:0DDB, 0DE3
3BE9:0DE8 E9 F732 jmp loc_36 ; (051D)
sub_75 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0DD8
;==========================================================================
3BE9:0DEB sub_76 proc near
3BE9:0DEB 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:0DEF 8A 07 mov al,[bx]
3BE9:0DF1 43 inc bx
3BE9:0DF2 98 cbw ; Convrt byte to word
3BE9:0DF3 53 push bx
3BE9:0DF4 03 D8 add bx,ax
3BE9:0DF6 C6 07 0D mov byte ptr [bx],0Dh
3BE9:0DF9 5B pop bx
3BE9:0DFA E8 FE9E call sub_67 ; (0C9B)
3BE9:0DFD 72 1D jc loc_136 ; Jump if carry Set
3BE9:0DFF BA 068E mov dx,68Eh
3BE9:0E02 E8 FD95 call sub_61 ; (0B9A)
3BE9:0E05 72 15 jc loc_136 ; Jump if carry Set
3BE9:0E07 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:0E0C 75 08 jne loc_135 ; Jump if not equal
3BE9:0E0E ,BB 068E mov bx,68Eh ; (3BE9:068E=4Bh)
3BE9:0E11 80 3F 01 cmp byte ptr [bx],1
3BE9:0E14 75 06 jne loc_136 ; Jump if not equal
3BE9:0E16 loc_135: ; xref 3BE9:0E0C
3BE9:0E16 A8 01 test al,1
3BE9:0E18 75 02 jnz loc_136 ; Jump if not zero
3BE9:0E1A F8 clc ; Clear carry flag
3BE9:0E1B C3 retn
3BE9:0E1C loc_136: ; xref 3BE9:0DFD, 0E05, 0E14, 0E18
3BE9:0E1C BA 4622 mov dx,4622h
3BE9:0E1F E8 F733 call sub_17 ; (0555)
3BE9:0E22 F9 stc ; Set carry flag
3BE9:0E23 C3 retn
sub_76 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0DE0
;==========================================================================
3BE9:0E24 sub_77 proc near
3BE9:0E24 52 push dx
3BE9:0E25 E8 0B19 call sub_135 ; (1941)
3BE9:0E28 5A pop dx
3BE9:0E29 72 02 jc loc_137 ; Jump if carry Set
3BE9:0E2B F8 clc ; Clear carry flag
3BE9:0E2C C3 retn
3BE9:0E2D loc_137: ; xref 3BE9:0E29
3BE9:0E2D E8 11FB call sub_187 ; (202B)
3BE9:0E30 BA 4633 mov dx,4633h
3BE9:0E33 E8 F71F call sub_17 ; (0555)
3BE9:0E36 F9 stc ; Set carry flag
3BE9:0E37 C3 retn
sub_77 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0DE5
;==========================================================================
3BE9:0E38 sub_78 proc near
3BE9:0E38 BA 068E mov dx,68Eh
3BE9:0E3B E8 001A call sub_79 ; (0E58)
3BE9:0E3E 72 14 jc loc_140 ; Jump if carry Set
3BE9:0E40 loc_138: ; xref 3BE9:0E52
3BE9:0E40 E8 F726 call sub_18 ; (0569)
3BE9:0E43 3C 0A cmp al,0Ah
3BE9:0E45 75 05 jne loc_139 ; Jump if not equal
3BE9:0E47 E8 0035 call sub_81 ; (0E7F)
3BE9:0E4A 72 0A jc loc_141 ; Jump if carry Set
3BE9:0E4C loc_139: ; xref 3BE9:0E45
3BE9:0E4C BA 068E mov dx,68Eh
3BE9:0E4F E8 0009 call sub_80 ; (0E5B)
3BE9:0E52 73 EC jnc loc_138 ; Jump if carry=0
3BE9:0E54 loc_140: ; xref 3BE9:0E3E
3BE9:0E54 F8 clc ; Clear carry flag
3BE9:0E55 C3 retn
3BE9:0E56 loc_141: ; xref 3BE9:0E4A
3BE9:0E56 F9 stc ; Set carry flag
3BE9:0E57 C3 retn
sub_78 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0E3B
;==========================================================================
3BE9:0E58 sub_79 proc near
3BE9:0E58 E9 000A jmpn loc_142 ; (0E65)
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:0E4F
3BE9:0E5B sub_80:
3BE9:0E5B 8B 1E 060A mov bx,word ptr ds:[60Ah] ; (3BE9:060A=0FF34h)
3BE9:0E5F 81 FB 068C cmp bx,68Ch
3BE9:0E63 72 0B jb loc_143 ; Jump if below
3BE9:0E65 loc_142: ; xref 3BE9:0E58
3BE9:0E65 ,BB 060C mov bx,60Ch ; (3BE9:060C=0F9h)
3BE9:0E68 E8 0BB8 call sub_144 ; (1A23)
3BE9:0E6B 72 10 jc loc_144 ; Jump if carry Set
3BE9:0E6D ,BB 060C mov bx,60Ch ; (3BE9:060C=0F9h)
3BE9:0E70 loc_143: ; xref 3BE9:0E63
3BE9:0E70 8A 07 mov al,[bx]
3BE9:0E72 3C 1A cmp al,1Ah
3BE9:0E74 74 07 je loc_144 ; Jump if equal
3BE9:0E76 43 inc bx
3BE9:0E77 89 1E 060A mov word ptr ds:[60Ah],bx ; (3BE9:060A=0FF34h)
3BE9:0E7B F8 clc ; Clear carry flag
3BE9:0E7C C3 retn
3BE9:0E7D loc_144: ; xref 3BE9:0E6B, 0E74
3BE9:0E7D F9 stc ; Set carry flag
3BE9:0E7E C3 retn
sub_79 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0E47
;==========================================================================
3BE9:0E7F sub_81 proc near
3BE9:0E7F 50 push ax
3BE9:0E80 E8 F82B call sub_24 ; (06AE)
3BE9:0E83 73 03 jnc loc_145 ; Jump if carry=0
3BE9:0E85 58 pop ax
3BE9:0E86 F8 clc ; Clear carry flag
3BE9:0E87 C3 retn
3BE9:0E88 loc_145: ; xref 3BE9:0E83
3BE9:0E88 3C 13 cmp al,13h
3BE9:0E8A 74 03 je loc_146 ; Jump if equal
3BE9:0E8C 58 pop ax
3BE9:0E8D F9 stc ; Set carry flag
3BE9:0E8E C3 retn
3BE9:0E8F loc_146: ; xref 3BE9:0E8A, 0E92
3BE9:0E8F E8 F81C call sub_24 ; (06AE)
3BE9:0E92 72 FB jc loc_146 ; Jump if carry Set
3BE9:0E94 58 pop ax
3BE9:0E95 F8 clc ; Clear carry flag
3BE9:0E96 C3 retn
sub_81 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0416
;==========================================================================
3BE9:0E97 sub_82 proc near
3BE9:0E97 E8 F6A6 call sub_15 ; (0540)
3BE9:0E9A E8 0085 call sub_86 ; (0F22)
3BE9:0E9D 72 1E jc loc_149 ; Jump if carry Set
3BE9:0E9F 3C 00 cmp al,0
3BE9:0EA1 75 06 jne loc_147 ; Jump if not equal
3BE9:0EA3 E8 001A call sub_83 ; (0EC0)
3BE9:0EA6 E9 0014 jmpn loc_149 ; (0EBD)
3BE9:0EA9 loc_147: ; xref 3BE9:0EA1
3BE9:0EA9 3C 01 cmp al,1
3BE9:0EAB 75 06 jne loc_148 ; Jump if not equal
3BE9:0EAD E8 0020 call sub_84 ; (0ED0)
3BE9:0EB0 E9 000A jmpn loc_149 ; (0EBD)
3BE9:0EB3 loc_148: ; xref 3BE9:0EAB
3BE9:0EB3 3C 02 cmp al,2
3BE9:0EB5 75 06 jne loc_149 ; Jump if not equal
3BE9:0EB7 E8 0047 call sub_85 ; (0F01)
3BE9:0EBA E9 0000 jmpn loc_149 ; (0EBD)
3BE9:0EBD loc_149: ; xref 3BE9:0E9D, 0EA6, 0EB0, 0EB5
; 0EBA
3BE9:0EBD E9 F65D jmp loc_36 ; (051D)
sub_82 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0EA3
;==========================================================================
3BE9:0EC0 sub_83 proc near
3BE9:0EC0 BA 06EC mov dx,6ECh
3BE9:0EC3 E8 00DF call sub_88 ; (0FA5)
3BE9:0EC6 72 07 jc loc_ret_150 ; Jump if carry Set
3BE9:0EC8 BA 06EC mov dx,6ECh
3BE9:0ECB E8 00FD call sub_90 ; (0FCB)
3BE9:0ECE F8 clc ; Clear carry flag
3BE9:0ECF loc_ret_150: ; xref 3BE9:0EC6
3BE9:0ECF C3 retn
sub_83 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0EAD
;==========================================================================
3BE9:0ED0 sub_84 proc near
3BE9:0ED0 BA 06EC mov dx,6ECh
3BE9:0ED3 E8 00CF call sub_88 ; (0FA5)
3BE9:0ED6 72 27 jc loc_155 ; Jump if carry Set
3BE9:0ED8 loc_151: ; xref 3BE9:0EFB
3BE9:0ED8 BA 06EC mov dx,6ECh
3BE9:0EDB E8 00DB call sub_89 ; (0FB9)
3BE9:0EDE 73 07 jnc loc_152 ; Jump if carry=0
3BE9:0EE0 3C 03 cmp al,3
3BE9:0EE2 75 11 jne loc_153 ; Jump if not equal
3BE9:0EE4 E9 0016 jmpn loc_154 ; (0EFD)
3BE9:0EE7 loc_152: ; xref 3BE9:0EDE
3BE9:0EE7 BA 06EC mov dx,6ECh
3BE9:0EEA E8 F653 call sub_15 ; (0540)
3BE9:0EED E8 00DB call sub_90 ; (0FCB)
3BE9:0EF0 72 0D jc loc_155 ; Jump if carry Set
3BE9:0EF2 E8 F64B call sub_15 ; (0540)
3BE9:0EF5 loc_153: ; xref 3BE9:0EE2
3BE9:0EF5 BA 06EC mov dx,6ECh
3BE9:0EF8 E8 010C call sub_91 ; (1007)
3BE9:0EFB 73 DB jnc loc_151 ; Jump if carry=0
3BE9:0EFD loc_154: ; xref 3BE9:0EE4
3BE9:0EFD F8 clc ; Clear carry flag
3BE9:0EFE C3 retn
3BE9:0EFF loc_155: ; xref 3BE9:0ED6, 0EF0
3BE9:0EFF F9 stc ; Set carry flag
3BE9:0F00 C3 retn
sub_84 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0EB7
;==========================================================================
3BE9:0F01 sub_85 proc near
3BE9:0F01 BA 06EC mov dx,6ECh
3BE9:0F04 E8 009E call sub_88 ; (0FA5)
3BE9:0F07 72 17 jc loc_157 ; Jump if carry Set
3BE9:0F09 loc_156: ; xref 3BE9:0F1C
3BE9:0F09 E8 00FF call sub_92 ; (100B)
3BE9:0F0C 72 12 jc loc_157 ; Jump if carry Set
3BE9:0F0E BA 06EC mov dx,6ECh
3BE9:0F11 E8 00B7 call sub_90 ; (0FCB)
3BE9:0F14 72 0A jc loc_157 ; Jump if carry Set
3BE9:0F16 BA 06EC mov dx,6ECh
3BE9:0F19 E8 00EB call sub_91 ; (1007)
3BE9:0F1C 73 EB jnc loc_156 ; Jump if carry=0
3BE9:0F1E F8 clc ; Clear carry flag
3BE9:0F1F C3 retn
3BE9:0F20 loc_157: ; xref 3BE9:0F07, 0F0C, 0F14
3BE9:0F20 F9 stc ; Set carry flag
3BE9:0F21 C3 retn
sub_85 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0E9A
;==========================================================================
3BE9:0F22 sub_86 proc near
3BE9:0F22 E8 1071 call sub_180 ; (1F96)
3BE9:0F25 A2 06EC mov byte ptr ds:[6ECh],al ; (3BE9:06EC=74h)
3BE9:0F28 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:0F2C 8A 07 mov al,[bx]
3BE9:0F2E 43 inc bx
3BE9:0F2F B4 00 mov ah,0
3BE9:0F31 53 push bx
3BE9:0F32 03 D8 add bx,ax
3BE9:0F34 C6 07 0D mov byte ptr [bx],0Dh
3BE9:0F37 5B pop bx
3BE9:0F38 E8 FD60 call sub_67 ; (0C9B)
3BE9:0F3B 72 41 jc loc_161 ; Jump if carry Set
3BE9:0F3D BA 06EC mov dx,6ECh
3BE9:0F40 E8 FC57 call sub_61 ; (0B9A)
3BE9:0F43 72 39 jc loc_161 ; Jump if carry Set
3BE9:0F45 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:0F4A 75 08 jne loc_158 ; Jump if not equal
3BE9:0F4C ,BB 06EC mov bx,6ECh ; (3BE9:06EC=74h)
3BE9:0F4F 80 3F 01 cmp byte ptr [bx],1
3BE9:0F52 75 2A jne loc_161 ; Jump if not equal
3BE9:0F54 loc_158: ; xref 3BE9:0F4A
3BE9:0F54 A8 01 test al,1
3BE9:0F56 75 0C jnz loc_159 ; Jump if not zero
3BE9:0F58 E8 002B call sub_87 ; (0F86)
3BE9:0F5B E8 FD56 call sub_68 ; (0CB4)
3BE9:0F5E 72 1E jc loc_161 ; Jump if carry Set
3BE9:0F60 B0 00 mov al,0
3BE9:0F62 F8 clc ; Clear carry flag
3BE9:0F63 C3 retn
3BE9:0F64 loc_159: ; xref 3BE9:0F56
3BE9:0F64 E8 FD34 call sub_67 ; (0C9B)
3BE9:0F67 E8 001C call sub_87 ; (0F86)
3BE9:0F6A 73 09 jnc loc_160 ; Jump if carry=0
3BE9:0F6C E8 FD45 call sub_68 ; (0CB4)
3BE9:0F6F 72 0D jc loc_161 ; Jump if carry Set
3BE9:0F71 B0 01 mov al,1
3BE9:0F73 F8 clc ; Clear carry flag
3BE9:0F74 C3 retn
3BE9:0F75 loc_160: ; xref 3BE9:0F6A
3BE9:0F75 E8 FD3C call sub_68 ; (0CB4)
3BE9:0F78 72 04 jc loc_161 ; Jump if carry Set
3BE9:0F7A B0 02 mov al,2
3BE9:0F7C F8 clc ; Clear carry flag
3BE9:0F7D C3 retn
3BE9:0F7E loc_161: ; xref 3BE9:0F3B, 0F43, 0F52, 0F5E
; 0F6F, 0F78
3BE9:0F7E BA 4622 mov dx,4622h
3BE9:0F81 E8 F5D1 call sub_17 ; (0555)
3BE9:0F84 F9 stc ; Set carry flag
3BE9:0F85 C3 retn
sub_86 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0F58, 0F67
;==========================================================================
3BE9:0F86 sub_87 proc near
3BE9:0F86 53 push bx
3BE9:0F87 E8 FD11 call sub_67 ; (0C9B)
3BE9:0F8A B0 24 mov al,24h ; '$'
3BE9:0F8C E8 FCF7 call sub_66 ; (0C86)
3BE9:0F8F 72 11 jc loc_163 ; Jump if carry Set
3BE9:0F91 B0 59 mov al,59h ; 'Y'
3BE9:0F93 E8 FCF0 call sub_66 ; (0C86)
3BE9:0F96 73 07 jnc loc_162 ; Jump if carry=0
3BE9:0F98 B0 79 mov al,79h ; 'y'
3BE9:0F9A E8 FCE9 call sub_66 ; (0C86)
3BE9:0F9D 72 03 jc loc_163 ; Jump if carry Set
3BE9:0F9F loc_162: ; xref 3BE9:0F96
3BE9:0F9F 58 pop ax
3BE9:0FA0 F8 clc ; Clear carry flag
3BE9:0FA1 C3 retn
3BE9:0FA2 loc_163: ; xref 3BE9:0F8F, 0F9D
3BE9:0FA2 5B pop bx
3BE9:0FA3 F9 stc ; Set carry flag
3BE9:0FA4 C3 retn
sub_87 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0EC3, 0ED3, 0F04
;==========================================================================
3BE9:0FA5 sub_88 proc near
3BE9:0FA5 E8 0999 call sub_135 ; (1941)
3BE9:0FA8 72 02 jc loc_164 ; Jump if carry Set
3BE9:0FAA F8 clc ; Clear carry flag
3BE9:0FAB C3 retn
3BE9:0FAC loc_164: ; xref 3BE9:0FA8
3BE9:0FAC 52 push dx
3BE9:0FAD E8 107B call sub_187 ; (202B)
3BE9:0FB0 BA 4633 mov dx,4633h
3BE9:0FB3 E8 F59F call sub_17 ; (0555)
3BE9:0FB6 5A pop dx
3BE9:0FB7 F9 stc ; Set carry flag
3BE9:0FB8 C3 retn
sub_88 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0EDB
;==========================================================================
3BE9:0FB9 sub_89 proc near
3BE9:0FB9 52 push dx
3BE9:0FBA BA 4646 mov dx,4646h
3BE9:0FBD E8 F595 call sub_17 ; (0555)
3BE9:0FC0 5A pop dx
3BE9:0FC1 E8 1067 call sub_187 ; (202B)
3BE9:0FC4 BA 4651 mov dx,4651h
3BE9:0FC7 E8 F615 call sub_21 ; (05DF)
3BE9:0FCA C3 retn
sub_89 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0ECB, 0EED, 0F11
;==========================================================================
3BE9:0FCB sub_90 proc near
3BE9:0FCB 8B DA mov bx,dx
3BE9:0FCD ,BF 06BA mov di,6BAh ; (3BE9:06BA=3Ch)
3BE9:0FD0 B9 000C mov cx,0Ch
3BE9:0FD3 locloop_165: ; xref 3BE9:0FD9
3BE9:0FD3 8A 07 mov al,[bx]
3BE9:0FD5 88 05 mov [di],al
3BE9:0FD7 43 inc bx
3BE9:0FD8 47 inc di
3BE9:0FD9 E2 F8 loop locloop_165 ; Loop if cx > 0
3BE9:0FDB 8B DA mov bx,dx
3BE9:0FDD C7 47 1D 0000 mov word ptr [bx+1Dh],0
3BE9:0FE2 E8 09A0 call sub_138 ; (1985)
3BE9:0FE5 72 10 jc loc_166 ; Jump if carry Set
3BE9:0FE7 52 push dx
3BE9:0FE8 BA 06BA mov dx,6BAh
3BE9:0FEB E8 103D call sub_187 ; (202B)
3BE9:0FEE BA 4654 mov dx,4654h
3BE9:0FF1 E8 F561 call sub_17 ; (0555)
3BE9:0FF4 5A pop dx
3BE9:0FF5 F8 clc ; Clear carry flag
3BE9:0FF6 C3 retn
3BE9:0FF7 loc_166: ; xref 3BE9:0FE5
3BE9:0FF7 52 push dx
3BE9:0FF8 BA 4661 mov dx,4661h
3BE9:0FFB E8 F557 call sub_17 ; (0555)
3BE9:0FFE 5A pop dx
3BE9:0FFF E8 1029 call sub_187 ; (202B)
3BE9:1002 E8 F53B call sub_15 ; (0540)
3BE9:1005 F9 stc ; Set carry flag
3BE9:1006 C3 retn
sub_90 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0EF8, 0F19
;==========================================================================
3BE9:1007 sub_91 proc near
3BE9:1007 E8 095F call sub_137 ; (1969)
3BE9:100A C3 retn
sub_91 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0F09
;==========================================================================
3BE9:100B sub_92 proc near
3BE9:100B E8 F6A0 call sub_24 ; (06AE)
3BE9:100E 72 0C jc loc_167 ; Jump if carry Set
3BE9:1010 3C 03 cmp al,3
3BE9:1012 75 08 jne loc_167 ; Jump if not equal
3BE9:1014 BA 467B mov dx,467Bh
3BE9:1017 E8 F53B call sub_17 ; (0555)
3BE9:101A F9 stc ; Set carry flag
3BE9:101B C3 retn
3BE9:101C loc_167: ; xref 3BE9:100E, 1012
3BE9:101C F8 clc ; Clear carry flag
3BE9:101D C3 retn
sub_92 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0492
;==========================================================================
3BE9:101E sub_93 proc near
3BE9:101E E8 0091 call sub_94 ; (10B2)
3BE9:1021 73 03 jnc loc_168 ; Jump if carry=0
3BE9:1023 E9 0083 jmp loc_173 ; (10A9)
3BE9:1026 loc_168: ; xref 3BE9:1021
3BE9:1026 8A C8 mov cl,al
3BE9:1028 51 push cx
3BE9:1029 E8 0B6C call sub_153 ; (1B98)
3BE9:102C 59 pop cx
3BE9:102D 73 06 jnc loc_169 ; Jump if carry=0
3BE9:102F BA 4696 mov dx,4696h
3BE9:1032 E9 0077 jmpn loc_174 ; (10AC)
3BE9:1035 loc_169: ; xref 3BE9:102D
3BE9:1035 80 C1 40 add cl,40h ; '@'
3BE9:1038 88 0E 46E4 mov data_222,cl ; (3BE9:46E4=0)
3BE9:103C BA 46BA mov dx,46BAh
3BE9:103F E8 F59D call sub_21 ; (05DF)
3BE9:1042 72 65 jc loc_173 ; Jump if carry Set
3BE9:1044 BB 0718 mov bx,718h
3BE9:1047 BA 0000 mov dx,0
3BE9:104A E8 0684 call sub_122 ; (16D1)
3BE9:104D 8A 0E 0B65 mov cl,byte ptr ds:[0B65h] ; (3BE9:0B65=0FAh)
3BE9:1051 B5 00 mov ch,0
3BE9:1053 8B 16 0B62 mov dx,word ptr ds:[0B62h] ; (3BE9:0B62=0E82Eh)
3BE9:1057 locloop_170: ; xref 3BE9:108C
3BE9:1057 51 push cx
3BE9:1058 B0 00 mov al,0
3BE9:105A ,BF 0798 mov di,798h ; (3BE9:0798=0B9h)
3BE9:105D B9 0080 mov cx,80h
3BE9:1060 E8 0079 call sub_95 ; (10DC)
3BE9:1063 A0 0B66 mov al,byte ptr ds:[0B66h] ; (3BE9:0B66=0B9h)
3BE9:1066 A2 0798 mov byte ptr ds:[798h],al ; (3BE9:0798=0B9h)
3BE9:1069 B8 FFFF mov ax,0FFFFh
3BE9:106C A3 0799 mov word ptr ds:[799h],ax ; (3BE9:0799=4Eh)
3BE9:106F 8A 0E 0B64 mov cl,byte ptr ds:[0B64h] ; (3BE9:0B64=3)
3BE9:1073 B5 00 mov ch,0
3BE9:1075 locloop_171: ; xref 3BE9:1089
3BE9:1075 BB 0798 mov bx,798h
3BE9:1078 51 push cx
3BE9:1079 E8 0655 call sub_122 ; (16D1)
3BE9:107C B0 00 mov al,0
3BE9:107E B9 0080 mov cx,80h
3BE9:1081 ,BF 0798 mov di,798h ; (3BE9:0798=0B9h)
3BE9:1084 E8 0055 call sub_95 ; (10DC)
3BE9:1087 59 pop cx
3BE9:1088 42 inc dx
3BE9:1089 E2 EA loop locloop_171 ; Loop if cx > 0
3BE9:108B 59 pop cx
3BE9:108C E2 C9 loop locloop_170 ; Loop if cx > 0
3BE9:108E ,BF 0798 mov di,798h ; (3BE9:0798=0B9h)
3BE9:1091 B9 0080 mov cx,80h
3BE9:1094 B0 00 mov al,0
3BE9:1096 E8 0043 call sub_95 ; (10DC)
3BE9:1099 loc_172: ; xref 3BE9:10A4
3BE9:1099 BB 0798 mov bx,798h
3BE9:109C E8 0632 call sub_122 ; (16D1)
3BE9:109F 42 inc dx
3BE9:10A0 3B 16 0B68 cmp dx,word ptr ds:[0B68h] ; (3BE9:0B68=8A00h)
3BE9:10A4 72 F3 jb loc_172 ; Jump if below
3BE9:10A6 E8 0649 call sub_123 ; (16F2)
3BE9:10A9 loc_173: ; xref 3BE9:1023, 1042, 10AF
3BE9:10A9 ,E9 F471 jmp loc_36 ; (051D)
3BE9:10AC loc_174: ; xref 3BE9:1032
3BE9:10AC E8 F4A6 call sub_17 ; (0555)
3BE9:10AF E9 FFF7 ;* jmp loc_173 ; (10A9)
sub_93 endp
3BE9:10AF db 0E9h,0F7h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:101E
;==========================================================================
3BE9:10B2 sub_94 proc near
3BE9:10B2 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:10B6 8A 07 mov al,[bx]
3BE9:10B8 43 inc bx
3BE9:10B9 98 cbw ; Convrt byte to word
3BE9:10BA 53 push bx
3BE9:10BB 03 D8 add bx,ax
3BE9:10BD C6 07 0D mov byte ptr [bx],0Dh
3BE9:10C0 5B pop bx
3BE9:10C1 E8 FBD7 call sub_67 ; (0C9B)
3BE9:10C4 72 0E jc loc_175 ; Jump if carry Set
3BE9:10C6 E8 FAA9 call sub_59 ; (0B72)
3BE9:10C9 72 09 jc loc_175 ; Jump if carry Set
3BE9:10CB 50 push ax
3BE9:10CC E8 FBE5 call sub_68 ; (0CB4)
3BE9:10CF 58 pop ax
3BE9:10D0 72 02 jc loc_175 ; Jump if carry Set
3BE9:10D2 F8 clc ; Clear carry flag
3BE9:10D3 C3 retn
3BE9:10D4 loc_175: ; xref 3BE9:10C4, 10C9, 10D0
3BE9:10D4 BA 4696 mov dx,4696h
3BE9:10D7 E8 F47B call sub_17 ; (0555)
3BE9:10DA F9 stc ; Set carry flag
3BE9:10DB C3 retn
sub_94 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1060, 1084, 1096
;==========================================================================
3BE9:10DC sub_95 proc near
3BE9:10DC 57 push di
3BE9:10DD 51 push cx
3BE9:10DE locloop_176: ; xref 3BE9:10E1
3BE9:10DE 88 05 mov [di],al
3BE9:10E0 47 inc di
3BE9:10E1 E2 FB loop locloop_176 ; Loop if cx > 0
3BE9:10E3 59 pop cx
3BE9:10E4 5F pop di
3BE9:10E5 C3 retn
sub_95 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0340
;==========================================================================
3BE9:10E6 sub_96 proc near
3BE9:10E6 E8 008B call sub_97 ; (1174)
3BE9:10E9 E8 0F7E call sub_189 ; (206A)
3BE9:10EC E8 0089 call sub_98 ; (1178)
3BE9:10EF A2 081A mov byte ptr ds:[81Ah],al ; (3BE9:081A=2)
3BE9:10F2 73 03 jnc loc_177 ; Jump if carry=0
3BE9:10F4 E9 0074 jmpn loc_184 ; (116B)
3BE9:10F7 loc_177: ; xref 3BE9:10F2
3BE9:10F7 A0 081B mov al,byte ptr ds:[81Bh] ; (3BE9:081B=59h)
3BE9:10FA 3A 06 0845 cmp al,byte ptr ds:[845h] ; (3BE9:0845=0F3h)
3BE9:10FE 75 06 jne loc_178 ; Jump if not equal
3BE9:1100 BA 46EC mov dx,46ECh
3BE9:1103 E9 0068 jmpn loc_185 ; (116E)
3BE9:1106 loc_178: ; xref 3BE9:10FE
3BE9:1106 BA 0845 mov dx,845h
3BE9:1109 E8 014A call sub_100 ; (1256)
3BE9:110C 73 03 jnc loc_179 ; Jump if carry=0
3BE9:110E E9 005A jmpn loc_184 ; (116B)
3BE9:1111 loc_179: ; xref 3BE9:110C, 1168
3BE9:1111 ,80 3E 081A 00 cmp byte ptr ds:[81Ah],0 ; (3BE9:081A=2)
3BE9:1116 74 0C je loc_180 ; Jump if equal
3BE9:1118 ,BF 081C mov di,81Ch ; (3BE9:081C=5Eh)
3BE9:111B ,BB 0846 mov bx,846h ; (3BE9:0846=0A4h)
3BE9:111E B9 000B mov cx,0Bh
3BE9:1121 E8 0D45 call sub_173 ; (1E69)
3BE9:1124 loc_180: ; xref 3BE9:1116
3BE9:1124 BA 081B mov dx,81Bh
3BE9:1127 E8 0156 call sub_102 ; (1280)
3BE9:112A BA 081B mov dx,81Bh
3BE9:112D E8 0E0D call sub_178 ; (1F3D)
3BE9:1130 73 03 jnc loc_181 ; Jump if carry=0
3BE9:1132 E9 0036 jmpn loc_184 ; (116B)
3BE9:1135 loc_181: ; xref 3BE9:1130, 1146
3BE9:1135 E8 0F32 call sub_189 ; (206A)
3BE9:1138 BA 0845 mov dx,845h
3BE9:113B E8 00F0 call sub_99 ; (122E)
3BE9:113E 72 0B jc loc_182 ; Jump if carry Set
3BE9:1140 BA 081B mov dx,81Bh
3BE9:1143 E8 0F97 call sub_192 ; (20DD)
3BE9:1146 73 ED jnc loc_181 ; Jump if carry=0
3BE9:1148 E9 0020 jmpn loc_184 ; (116B)
3BE9:114B loc_182: ; xref 3BE9:113E
3BE9:114B BA 081B mov dx,81Bh
3BE9:114E E8 0E2F call sub_179 ; (1F80)
3BE9:1151 73 03 jnc loc_183 ; Jump if carry=0
3BE9:1153 E9 0015 jmpn loc_184 ; (116B)
3BE9:1156 loc_183: ; xref 3BE9:1151
3BE9:1156 80 3E 081A 00 cmp byte ptr ds:[81Ah],0 ; (3BE9:081A=2)
3BE9:115B 74 0E je loc_184 ; Jump if equal
3BE9:115D E8 010F call sub_101 ; (126F)
3BE9:1160 BA 0845 mov dx,845h
3BE9:1163 E8 07FE call sub_136 ; (1964)
3BE9:1166 72 03 jc loc_184 ; Jump if carry Set
3BE9:1168 E9 FFA6 ;* jmp loc_179 ; (1111)
3BE9:1168 db 0E9h,0A6h,0FFh ; Fixup - byte match
3BE9:116B loc_184: ; xref 3BE9:10F4, 110E, 1132, 1148
; 1153, 115B, 1166, 1171
3BE9:116B ,E9 F3AF jmp loc_36 ; (051D)
3BE9:116E loc_185: ; xref 3BE9:1103, 127B
3BE9:116E ,E8 F3E4 call sub_17 ; (0555)
3BE9:1171 E9 FFF7 ;* jmp loc_184 ; (116B)
sub_96 endp
3BE9:1171 db 0E9h,0F7h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:10E6
;==========================================================================
3BE9:1174 sub_97 proc near
3BE9:1174 E8 F3C9 call sub_15 ; (0540)
3BE9:1177 C3 retn
sub_97 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:10EC
;==========================================================================
3BE9:1178 sub_98 proc near
3BE9:1178 E8 0114 call sub_103 ; (128F)
3BE9:117B E8 0E18 call sub_180 ; (1F96)
3BE9:117E A2 081B mov byte ptr ds:[81Bh],al ; (3BE9:081B=59h)
3BE9:1181 A2 0845 mov byte ptr ds:[845h],al ; (3BE9:0845=0F3h)
3BE9:1184 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:1188 8A 07 mov al,[bx]
3BE9:118A 43 inc bx
3BE9:118B 98 cbw ; Convrt byte to word
3BE9:118C 53 push bx
3BE9:118D 03 D8 add bx,ax
3BE9:118F C6 07 0D mov byte ptr [bx],0Dh
3BE9:1192 5B pop bx
3BE9:1193 E8 FB05 call sub_67 ; (0C9B)
3BE9:1196 73 03 jnc loc_186 ; Jump if carry=0
3BE9:1198 E9 008B jmp loc_191 ; (1226)
3BE9:119B loc_186: ; xref 3BE9:1196
3BE9:119B BA 081B mov dx,81Bh
3BE9:119E E8 F9F9 call sub_61 ; (0B9A)
3BE9:11A1 72 44 jc loc_189 ; Jump if carry Set
3BE9:11A3 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:11A8 75 08 jne loc_187 ; Jump if not equal
3BE9:11AA ,BB 081B mov bx,81Bh ; (3BE9:081B=59h)
3BE9:11AD 80 3F 02 cmp byte ptr [bx],2
3BE9:11B0 75 35 jne loc_189 ; Jump if not equal
3BE9:11B2 loc_187: ; xref 3BE9:11A8
3BE9:11B2 A8 01 test al,1
3BE9:11B4 75 70 jnz loc_191 ; Jump if not zero
3BE9:11B6 E8 FAE2 call sub_67 ; (0C9B)
3BE9:11B9 B0 3D mov al,3Dh ; '='
3BE9:11BB E8 FAC8 call sub_66 ; (0C86)
3BE9:11BE 72 66 jc loc_191 ; Jump if carry Set
3BE9:11C0 E8 FAD8 call sub_67 ; (0C9B)
3BE9:11C3 BA 0845 mov dx,845h
3BE9:11C6 E8 F9D1 call sub_61 ; (0B9A)
3BE9:11C9 72 5B jc loc_191 ; Jump if carry Set
3BE9:11CB 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:11D0 75 08 jne loc_188 ; Jump if not equal
3BE9:11D2 ,BB 0845 mov bx,845h ; (3BE9:0845=0F3h)
3BE9:11D5 80 3F 01 cmp byte ptr [bx],1
3BE9:11D8 75 4C jne loc_191 ; Jump if not equal
3BE9:11DA loc_188: ; xref 3BE9:11D0
3BE9:11DA A8 01 test al,1
3BE9:11DC 75 48 jnz loc_191 ; Jump if not zero
3BE9:11DE E8 FAD3 call sub_68 ; (0CB4)
3BE9:11E1 72 43 jc loc_191 ; Jump if carry Set
3BE9:11E3 B0 00 mov al,0
3BE9:11E5 F8 clc ; Clear carry flag
3BE9:11E6 C3 retn
3BE9:11E7 loc_189: ; xref 3BE9:11A1, 11B0
3BE9:11E7 E8 F988 call sub_59 ; (0B72)
3BE9:11EA 72 3A jc loc_191 ; Jump if carry Set
3BE9:11EC A2 081B mov byte ptr ds:[81Bh],al ; (3BE9:081B=59h)
3BE9:11EF E8 FAA9 call sub_67 ; (0C9B)
3BE9:11F2 B0 3D mov al,3Dh ; '='
3BE9:11F4 E8 FA8F call sub_66 ; (0C86)
3BE9:11F7 72 2D jc loc_191 ; Jump if carry Set
3BE9:11F9 E8 FA9F call sub_67 ; (0C9B)
3BE9:11FC BA 0845 mov dx,845h
3BE9:11FF E8 F998 call sub_61 ; (0B9A)
3BE9:1202 72 22 jc loc_191 ; Jump if carry Set
3BE9:1204 A8 01 test al,1
3BE9:1206 75 15 jnz loc_190 ; Jump if not zero
3BE9:1208 E8 FAA9 call sub_68 ; (0CB4)
3BE9:120B 72 19 jc loc_191 ; Jump if carry Set
3BE9:120D ,BF 081C mov di,81Ch ; (3BE9:081C=5Eh)
3BE9:1210 ,BB 0846 mov bx,846h ; (3BE9:0846=0A4h)
3BE9:1213 B9 000B mov cx,0Bh
3BE9:1216 E8 0C50 call sub_173 ; (1E69)
3BE9:1219 B0 00 mov al,0
3BE9:121B F8 clc ; Clear carry flag
3BE9:121C C3 retn
3BE9:121D loc_190: ; xref 3BE9:1206
3BE9:121D E8 FA94 call sub_68 ; (0CB4)
3BE9:1220 72 04 jc loc_191 ; Jump if carry Set
3BE9:1222 B0 01 mov al,1
3BE9:1224 F8 clc ; Clear carry flag
3BE9:1225 C3 retn
3BE9:1226 loc_191: ; xref 3BE9:1198, 11B4, 11BE, 11C9
; 11D8, 11DC, 11E1, 11EA
; 11F7, 1202, 120B, 1220
3BE9:1226 BA 4622 mov dx,4622h
3BE9:1229 E8 F329 call sub_17 ; (0555)
3BE9:122C F9 stc ; Set carry flag
3BE9:122D C3 retn
sub_98 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:113B
;==========================================================================
3BE9:122E sub_99 proc near
3BE9:122E 8B 1E 1E9B mov bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:1232 loc_192: ; xref 3BE9:1249
3BE9:1232 ,89 1E 1E9F mov word ptr ds:[1E9Fh],bx ; (3BE9:1E9F=5B01h)
3BE9:1236 3B 1E 1E9D cmp bx,word ptr ds:[1E9Dh] ; (3BE9:1E9D=3CE8h)
3BE9:123A 73 10 jae loc_193 ; Jump if above or =
3BE9:123C 53 push bx
3BE9:123D 52 push dx
3BE9:123E E8 07E2 call sub_144 ; (1A23)
3BE9:1241 5A pop dx
3BE9:1242 5B pop bx
3BE9:1243 72 07 jc loc_193 ; Jump if carry Set
3BE9:1245 81 C3 0080 add bx,80h
3BE9:1249 E9 FFE6 ;* jmp loc_192 ; (1232)
3BE9:1249 db 0E9h,0E6h,0FFh ; Fixup - byte match
3BE9:124C loc_193: ; xref 3BE9:123A, 1243
3BE9:124C 8B 1E 1E9B mov bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:1250 3B 1E 1E9F cmp bx,word ptr ds:[1E9Fh] ; (3BE9:1E9F=5B01h)
3BE9:1254 F5 cmc ; Complement carry
3BE9:1255 C3 retn
sub_99 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1109
;==========================================================================
3BE9:1256 sub_100 proc near
3BE9:1256 52 push dx
3BE9:1257 E8 06E7 call sub_135 ; (1941)
3BE9:125A 5A pop dx
3BE9:125B 72 02 jc loc_194 ; Jump if carry Set
3BE9:125D F8 clc ; Clear carry flag
3BE9:125E C3 retn
3BE9:125F loc_194: ; xref 3BE9:125B
3BE9:125F E8 0DC9 call sub_187 ; (202B)
3BE9:1262 52 push dx
3BE9:1263 BA 4633 mov dx,4633h
3BE9:1266 E8 F2EC call sub_17 ; (0555)
3BE9:1269 5A pop dx
3BE9:126A E8 F2D3 call sub_15 ; (0540)
3BE9:126D F9 stc ; Set carry flag
3BE9:126E C3 retn
sub_100 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:115D
;==========================================================================
3BE9:126F sub_101 proc near
3BE9:126F E8 F43C call sub_24 ; (06AE)
3BE9:1272 72 0A jc loc_195 ; Jump if carry Set
3BE9:1274 3C 03 cmp al,3
3BE9:1276 75 06 jne loc_195 ; Jump if not equal
3BE9:1278 BA 4725 mov dx,4725h
3BE9:127B E9 FEF0 jmp loc_185 ; (116E)
3BE9:127E loc_195: ; xref 3BE9:1272, 1276
3BE9:127E F8 clc ; Clear carry flag
3BE9:127F C3 retn
sub_101 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1127
;==========================================================================
3BE9:1280 sub_102 proc near
3BE9:1280 52 push dx
3BE9:1281 BA 4746 mov dx,4746h
3BE9:1284 E8 F2CE call sub_17 ; (0555)
3BE9:1287 5A pop dx
3BE9:1288 E8 0DA0 call sub_187 ; (202B)
3BE9:128B E8 F2B2 call sub_15 ; (0540)
3BE9:128E C3 retn
sub_102 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1178
;==========================================================================
3BE9:128F sub_103 proc near
3BE9:128F C6 06 0846 20 mov byte ptr ds:[846h],20h ; (3BE9:0846=0A4h) ' '
3BE9:1294 C6 06 0847 20 mov byte ptr ds:[847h],20h ; (3BE9:0847=7) ' '
3BE9:1299 C6 06 0848 20 mov byte ptr ds:[848h],20h ; (3BE9:0848=56h) ' '
3BE9:129E C6 06 0849 20 mov byte ptr ds:[849h],20h ; (3BE9:0849=0BEh) ' '
3BE9:12A3 C6 06 084A 20 mov byte ptr ds:[84Ah],20h ; (3BE9:084A=12h) ' '
3BE9:12A8 C6 06 084B 20 mov byte ptr ds:[84Bh],20h ; (3BE9:084B=4) ' '
3BE9:12AD C6 06 084C 20 mov byte ptr ds:[84Ch],20h ; (3BE9:084C=0E8h) ' '
3BE9:12B2 C6 06 084D 20 mov byte ptr ds:[84Dh],20h ; (3BE9:084D=0DFh) ' '
3BE9:12B7 C6 06 084E 20 mov byte ptr ds:[84Eh],20h ; (3BE9:084E=0) ' '
3BE9:12BC C6 06 084F 20 mov byte ptr ds:[84Fh],20h ; (3BE9:084F=0E8h) ' '
3BE9:12C1 C6 06 0850 20 mov byte ptr ds:[850h],20h ; (3BE9:0850=0CEh) ' '
3BE9:12C6 C6 06 081C 20 mov byte ptr ds:[81Ch],20h ; (3BE9:081C=5Eh) ' '
3BE9:12CB C6 06 081D 20 mov byte ptr ds:[81Dh],20h ; (3BE9:081D=51h) ' '
3BE9:12D0 C6 06 081E 20 mov byte ptr ds:[81Eh],20h ; (3BE9:081E=0ADh) ' '
3BE9:12D5 C6 06 081F 20 mov byte ptr ds:[81Fh],20h ; (3BE9:081F=8Bh) ' '
3BE9:12DA C6 06 0820 20 mov byte ptr ds:[820h],20h ; (3BE9:0820=0F0h) ' '
3BE9:12DF C6 06 0821 20 mov byte ptr ds:[821h],20h ; (3BE9:0821=56h) ' '
3BE9:12E4 C6 06 0822 20 mov byte ptr ds:[822h],20h ; (3BE9:0822=0E8h) ' '
3BE9:12E9 C6 06 0823 20 mov byte ptr ds:[823h],20h ; (3BE9:0823=9) ' '
3BE9:12EE C6 06 0824 20 mov byte ptr ds:[824h],20h ; (3BE9:0824=1) ' '
3BE9:12F3 C6 06 0825 20 mov byte ptr ds:[825h],20h ; (3BE9:0825=0E8h) ' '
3BE9:12F8 C6 06 0826 20 mov byte ptr ds:[826h],20h ; (3BE9:0826=0F8h) ' '
3BE9:12FD C3 retn
sub_103 endp
;* No entry point to code
3BE9:12FE B9 0001 mov cx,1
3BE9:1301 E9 0006 jmpn locloop_196 ; (130A)
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0DD1
;==========================================================================
3BE9:1304 sub_104 proc near
3BE9:1304 E8 F239 call sub_15 ; (0540)
3BE9:1307 B9 0008 mov cx,8
3BE9:130A locloop_196: ; xref 3BE9:1301, 1348
3BE9:130A 51 push cx
3BE9:130B 8A C6 mov al,dh
3BE9:130D E8 003B call sub_105 ; (134B)
3BE9:1310 8A C2 mov al,dl
3BE9:1312 E8 0036 call sub_105 ; (134B)
3BE9:1315 53 push bx
3BE9:1316 B9 0010 mov cx,10h
3BE9:1319 locloop_197: ; xref 3BE9:1324
3BE9:1319 B0 20 mov al,20h ; ' '
3BE9:131B E8 0047 call sub_107 ; (1365)
3BE9:131E 8A 07 mov al,[bx]
3BE9:1320 43 inc bx
3BE9:1321 E8 0027 call sub_105 ; (134B)
3BE9:1324 E2 F3 loop locloop_197 ; Loop if cx > 0
3BE9:1326 5B pop bx
3BE9:1327 B0 20 mov al,20h ; ' '
3BE9:1329 E8 0039 call sub_107 ; (1365)
3BE9:132C B9 0010 mov cx,10h
3BE9:132F locloop_198: ; xref 3BE9:133F
3BE9:132F 8A 07 mov al,[bx]
3BE9:1331 43 inc bx
3BE9:1332 50 push ax
3BE9:1333 2C 20 sub al,20h ; ' '
3BE9:1335 3C 5F cmp al,5Fh ; '_'
3BE9:1337 58 pop ax
3BE9:1338 72 02 jc loc_199 ; Jump if carry Set
3BE9:133A B0 2E mov al,2Eh ; '.'
3BE9:133C loc_199: ; xref 3BE9:1338
3BE9:133C E8 0026 call sub_107 ; (1365)
3BE9:133F E2 EE loop locloop_198 ; Loop if cx > 0
3BE9:1341 E8 F1FC call sub_15 ; (0540)
3BE9:1344 59 pop cx
3BE9:1345 83 C2 10 add dx,10h
3BE9:1348 E2 C0 loop locloop_196 ; Loop if cx > 0
3BE9:134A C3 retn
sub_104 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0DAD, 0DB2, 130D, 1312, 1321
;==========================================================================
3BE9:134B sub_105 proc near
3BE9:134B 50 push ax
3BE9:134C D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:134E D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1350 D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1352 D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1354 E8 0003 call sub_106 ; (135A)
3BE9:1357 58 pop ax
3BE9:1358 24 0F and al,0Fh
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:1354
3BE9:135A sub_106:
3BE9:135A 3C 0A cmp al,0Ah
3BE9:135C 72 02 jb loc_200 ; Jump if below
3BE9:135E 04 07 add al,7
3BE9:1360 loc_200: ; xref 3BE9:135C
3BE9:1360 04 30 add al,30h ; '0'
3BE9:1362 E9 0000 jmpn loc_201 ; (1365)
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:131B, 1329, 133C
3BE9:1365 sub_107:
3BE9:1365 loc_201: ; xref 3BE9:1362
3BE9:1365 E9 F201 jmp loc_40 ; (0569)
sub_105 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1393, 13A8
;==========================================================================
3BE9:1368 sub_108 proc near
3BE9:1368 8A 07 mov al,[bx]
3BE9:136A 2C 30 sub al,30h ; '0'
3BE9:136C 3C 0A cmp al,0Ah
3BE9:136E 72 16 jb loc_203 ; Jump if below
3BE9:1370 3C 11 cmp al,11h
3BE9:1372 72 15 jb loc_204 ; Jump if below
3BE9:1374 3C 17 cmp al,17h
3BE9:1376 72 0A jb loc_202 ; Jump if below
3BE9:1378 3C 31 cmp al,31h ; '1'
3BE9:137A 72 0D jb loc_204 ; Jump if below
3BE9:137C 3C 37 cmp al,37h ; '7'
3BE9:137E 73 09 jae loc_204 ; Jump if above or =
3BE9:1380 2C 20 sub al,20h ; ' '
3BE9:1382 loc_202: ; xref 3BE9:1376
3BE9:1382 2C 07 sub al,7
3BE9:1384 24 0F and al,0Fh
3BE9:1386 loc_203: ; xref 3BE9:136E
3BE9:1386 43 inc bx
3BE9:1387 F8 clc ; Clear carry flag
3BE9:1388 C3 retn
3BE9:1389 loc_204: ; xref 3BE9:1372, 137A, 137E
3BE9:1389 8A 07 mov al,[bx]
3BE9:138B F9 stc ; Set carry flag
3BE9:138C C3 retn
sub_108 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D69
;==========================================================================
3BE9:138D sub_109 proc near
3BE9:138D 52 push dx
3BE9:138E 53 push bx
3BE9:138F 50 push ax
3BE9:1390 BA 0000 mov dx,0
3BE9:1393 E8 FFD2 call sub_108 ; (1368)
3BE9:1396 72 1C jc loc_206 ; Jump if carry Set
3BE9:1398 loc_205: ; xref 3BE9:13AB
3BE9:1398 F7 C2 F000 test dx,0F000h
3BE9:139C 75 16 jnz loc_206 ; Jump if not zero
3BE9:139E D1 E2 shl dx,1 ; Shift w/zeros fill
3BE9:13A0 D1 E2 shl dx,1 ; Shift w/zeros fill
3BE9:13A2 D1 E2 shl dx,1 ; Shift w/zeros fill
3BE9:13A4 D1 E2 shl dx,1 ; Shift w/zeros fill
3BE9:13A6 02 D0 add dl,al
3BE9:13A8 E8 FFBD call sub_108 ; (1368)
3BE9:13AB 73 EB jnc loc_205 ; Jump if carry=0
3BE9:13AD 8B C2 mov ax,dx
3BE9:13AF 5A pop dx
3BE9:13B0 5A pop dx
3BE9:13B1 5A pop dx
3BE9:13B2 F8 clc ; Clear carry flag
3BE9:13B3 C3 retn
3BE9:13B4 loc_206: ; xref 3BE9:1396, 139C
3BE9:13B4 58 pop ax
3BE9:13B5 5B pop bx
3BE9:13B6 5A pop dx
3BE9:13B7 F9 stc ; Set carry flag
3BE9:13B8 C3 retn
sub_109 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:03C4
;==========================================================================
3BE9:13B9 sub_110 proc near
3BE9:13B9 E8 0097 call sub_111 ; (1453)
3BE9:13BC E8 0CAB call sub_189 ; (206A)
3BE9:13BF E8 0095 call sub_112 ; (1457)
3BE9:13C2 A2 0872 mov byte ptr ds:[872h],al ; (3BE9:0872=56h)
3BE9:13C5 73 03 jnc loc_207 ; Jump if carry=0
3BE9:13C7 E9 0080 jmp loc_214 ; (144A)
3BE9:13CA loc_207: ; xref 3BE9:13C5
3BE9:13CA A0 0873 mov al,byte ptr ds:[873h] ; (3BE9:0873=0BEh)
3BE9:13CD 3A 06 089D cmp al,byte ptr ds:[89Dh] ; (3BE9:089D=8Bh)
3BE9:13D1 75 06 jne loc_208 ; Jump if not equal
3BE9:13D3 BA 46EC mov dx,46ECh
3BE9:13D6 E9 0074 jmpn loc_215 ; (144D)
3BE9:13D9 loc_208: ; xref 3BE9:13D1
3BE9:13D9 BA 089D mov dx,89Dh
3BE9:13DC E8 0AA7 call sub_174 ; (1E86)
3BE9:13DF 73 03 jnc loc_209 ; Jump if carry=0
3BE9:13E1 E9 0066 jmpn loc_214 ; (144A)
3BE9:13E4 loc_209: ; xref 3BE9:13DF, 1447
3BE9:13E4 ,80 3E 0872 00 cmp byte ptr ds:[872h],0 ; (3BE9:0872=56h)
3BE9:13E9 74 0C je loc_210 ; Jump if equal
3BE9:13EB ,BF 0874 mov di,874h ; (3BE9:0874=2Ah)
3BE9:13EE ,BB 089E mov bx,89Eh ; (3BE9:089E=34h)
3BE9:13F1 B9 000B mov cx,0Bh
3BE9:13F4 E8 0BF2 call sub_183 ; (1FE9)
3BE9:13F7 loc_210: ; xref 3BE9:13E9
3BE9:13F7 BA 0873 mov dx,873h
3BE9:13FA E8 014E call sub_115 ; (154B)
3BE9:13FD BA 0873 mov dx,873h
3BE9:1400 E8 0595 call sub_139 ; (1998)
3BE9:1403 73 06 jnc loc_211 ; Jump if carry=0
3BE9:1405 BA 4752 mov dx,4752h
3BE9:1408 E9 0042 jmpn loc_215 ; (144D)
3BE9:140B loc_211: ; xref 3BE9:1403, 141C
3BE9:140B E8 0C5C call sub_189 ; (206A)
3BE9:140E BA 089D mov dx,89Dh
3BE9:1411 E8 0C75 call sub_190 ; (2089)
3BE9:1414 72 0B jc loc_212 ; Jump if carry Set
3BE9:1416 BA 0873 mov dx,873h
3BE9:1419 E8 00F2 call sub_113 ; (150E)
3BE9:141C 73 ED jnc loc_211 ; Jump if carry=0
3BE9:141E E9 0029 jmpn loc_214 ; (144A)
3BE9:1421 loc_212: ; xref 3BE9:1414
3BE9:1421 BA 089D mov dx,89Dh
3BE9:1424 E8 0B59 call sub_179 ; (1F80)
3BE9:1427 BA 0873 mov dx,873h
3BE9:142A E8 0558 call sub_138 ; (1985)
3BE9:142D 73 06 jnc loc_213 ; Jump if carry=0
3BE9:142F BA 4782 mov dx,4782h
3BE9:1432 E9 0018 jmpn loc_215 ; (144D)
3BE9:1435 loc_213: ; xref 3BE9:142D
3BE9:1435 80 3E 0872 00 cmp byte ptr ds:[872h],0 ; (3BE9:0872=56h)
3BE9:143A 74 0E je loc_214 ; Jump if equal
3BE9:143C E8 00FB call sub_114 ; (153A)
3BE9:143F BA 089D mov dx,89Dh
3BE9:1442 E8 0ADC call sub_177 ; (1F21)
3BE9:1445 72 03 jc loc_214 ; Jump if carry Set
3BE9:1447 E9 FF9A ;* jmp loc_209 ; (13E4)
3BE9:1447 db 0E9h, 9Ah,0FFh ; Fixup - byte match
3BE9:144A loc_214: ; xref 3BE9:13C7, 13E1, 141E, 143A
; 1445, 1450
3BE9:144A ,E9 F0D0 jmp loc_36 ; (051D)
3BE9:144D loc_215: ; xref 3BE9:13D6, 1408, 1432, 1546
3BE9:144D ,E8 F105 call sub_17 ; (0555)
3BE9:1450 E9 FFF7 ;* jmp loc_214 ; (144A)
sub_110 endp
3BE9:1450 db 0E9h,0F7h,0FFh ; Fixup - byte match
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:13B9
;==========================================================================
3BE9:1453 sub_111 proc near
3BE9:1453 E8 F0EA call sub_15 ; (0540)
3BE9:1456 C3 retn
sub_111 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:13BF
;==========================================================================
3BE9:1457 sub_112 proc near
3BE9:1457 E8 0100 call sub_116 ; (155A)
3BE9:145A E8 0B39 call sub_180 ; (1F96)
3BE9:145D A2 0873 mov byte ptr ds:[873h],al ; (3BE9:0873=0BEh)
3BE9:1460 A2 089D mov byte ptr ds:[89Dh],al ; (3BE9:089D=8Bh)
3BE9:1463 8B 1E 017E mov bx,word ptr ds:[17Eh] ; (3BE9:017E=0E85Eh)
3BE9:1467 8A 07 mov al,[bx]
3BE9:1469 43 inc bx
3BE9:146A B4 00 mov ah,0
3BE9:146C 53 push bx
3BE9:146D 03 D8 add bx,ax
3BE9:146F C6 07 0D mov byte ptr [bx],0Dh
3BE9:1472 5B pop bx
3BE9:1473 E8 F825 call sub_67 ; (0C9B)
3BE9:1476 73 03 jnc loc_216 ; Jump if carry=0
3BE9:1478 E9 008B jmp loc_221 ; (1506)
3BE9:147B loc_216: ; xref 3BE9:1476
3BE9:147B BA 0873 mov dx,873h
3BE9:147E E8 F719 call sub_61 ; (0B9A)
3BE9:1481 72 44 jc loc_219 ; Jump if carry Set
3BE9:1483 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:1488 75 08 jne loc_217 ; Jump if not equal
3BE9:148A ,BB 0873 mov bx,873h ; (3BE9:0873=0BEh)
3BE9:148D 80 3F 01 cmp byte ptr [bx],1
3BE9:1490 75 35 jne loc_219 ; Jump if not equal
3BE9:1492 loc_217: ; xref 3BE9:1488
3BE9:1492 A8 01 test al,1
3BE9:1494 75 70 jnz loc_221 ; Jump if not zero
3BE9:1496 E8 F802 call sub_67 ; (0C9B)
3BE9:1499 B0 3D mov al,3Dh ; '='
3BE9:149B E8 F7E8 call sub_66 ; (0C86)
3BE9:149E 72 66 jc loc_221 ; Jump if carry Set
3BE9:14A0 E8 F7F8 call sub_67 ; (0C9B)
3BE9:14A3 BA 089D mov dx,89Dh
3BE9:14A6 E8 F6F1 call sub_61 ; (0B9A)
3BE9:14A9 72 5B jc loc_221 ; Jump if carry Set
3BE9:14AB 80 3E 0103 00 cmp byte ptr ds:[103h],0 ; (3BE9:0103=0B9h)
3BE9:14B0 75 08 jne loc_218 ; Jump if not equal
3BE9:14B2 ,BB 089D mov bx,89Dh ; (3BE9:089D=8Bh)
3BE9:14B5 80 3F 02 cmp byte ptr [bx],2
3BE9:14B8 75 4C jne loc_221 ; Jump if not equal
3BE9:14BA loc_218: ; xref 3BE9:14B0
3BE9:14BA A8 01 test al,1
3BE9:14BC 75 48 jnz loc_221 ; Jump if not zero
3BE9:14BE E8 F7F3 call sub_68 ; (0CB4)
3BE9:14C1 72 43 jc loc_221 ; Jump if carry Set
3BE9:14C3 B0 00 mov al,0
3BE9:14C5 F8 clc ; Clear carry flag
3BE9:14C6 C3 retn
3BE9:14C7 loc_219: ; xref 3BE9:1481, 1490
3BE9:14C7 E8 F6A8 call sub_59 ; (0B72)
3BE9:14CA 72 3A jc loc_221 ; Jump if carry Set
3BE9:14CC A2 0873 mov byte ptr ds:[873h],al ; (3BE9:0873=0BEh)
3BE9:14CF E8 F7C9 call sub_67 ; (0C9B)
3BE9:14D2 B0 3D mov al,3Dh ; '='
3BE9:14D4 E8 F7AF call sub_66 ; (0C86)
3BE9:14D7 72 2D jc loc_221 ; Jump if carry Set
3BE9:14D9 E8 F7BF call sub_67 ; (0C9B)
3BE9:14DC BA 089D mov dx,89Dh
3BE9:14DF E8 F6B8 call sub_61 ; (0B9A)
3BE9:14E2 72 22 jc loc_221 ; Jump if carry Set
3BE9:14E4 A8 01 test al,1
3BE9:14E6 75 15 jnz loc_220 ; Jump if not zero
3BE9:14E8 E8 F7C9 call sub_68 ; (0CB4)
3BE9:14EB 72 19 jc loc_221 ; Jump if carry Set
3BE9:14ED ,BF 0874 mov di,874h ; (3BE9:0874=2Ah)
3BE9:14F0 ,BB 089E mov bx,89Eh ; (3BE9:089E=34h)
3BE9:14F3 B9 000B mov cx,0Bh
3BE9:14F6 E8 0970 call sub_173 ; (1E69)
3BE9:14F9 B0 00 mov al,0
3BE9:14FB F8 clc ; Clear carry flag
3BE9:14FC C3 retn
3BE9:14FD loc_220: ; xref 3BE9:14E6
3BE9:14FD E8 F7B4 call sub_68 ; (0CB4)
3BE9:1500 72 04 jc loc_221 ; Jump if carry Set
3BE9:1502 B0 01 mov al,1
3BE9:1504 F8 clc ; Clear carry flag
3BE9:1505 C3 retn
3BE9:1506 loc_221: ; xref 3BE9:1478, 1494, 149E, 14A9
; 14B8, 14BC, 14C1, 14CA
; 14D7, 14E2, 14EB, 1500
3BE9:1506 BA 4622 mov dx,4622h
3BE9:1509 E8 F049 call sub_17 ; (0555)
3BE9:150C F9 stc ; Set carry flag
3BE9:150D C3 retn
sub_112 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1419
;==========================================================================
3BE9:150E sub_113 proc near
3BE9:150E 8B 1E 1E9B mov bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:1512 loc_222: ; xref 3BE9:1525
3BE9:1512 ,3B 1E 1E9F cmp bx,word ptr ds:[1E9Fh] ; (3BE9:1E9F=5B01h)
3BE9:1516 73 20 jae loc_224 ; Jump if above or =
3BE9:1518 53 push bx
3BE9:1519 52 push dx
3BE9:151A E8 0546 call sub_145 ; (1A63)
3BE9:151D 5A pop dx
3BE9:151E 5B pop bx
3BE9:151F 72 07 jc loc_223 ; Jump if carry Set
3BE9:1521 ,81 C3 0080 add bx,offset data_11 ; (3BE9:0080=0E9h)
3BE9:1525 E9 FFEA ;* jmp loc_222 ; (1512)
3BE9:1525 db 0E9h,0EAh,0FFh ; Fixup - byte match
3BE9:1528 loc_223: ; xref 3BE9:151F
3BE9:1528 52 push dx
3BE9:1529 BA 47A9 mov dx,47A9h
3BE9:152C E8 F026 call sub_17 ; (0555)
3BE9:152F 5A pop dx
3BE9:1530 E8 0AF8 call sub_187 ; (202B)
3BE9:1533 E8 F00A call sub_15 ; (0540)
3BE9:1536 F9 stc ; Set carry flag
3BE9:1537 C3 retn
3BE9:1538 loc_224: ; xref 3BE9:1516
3BE9:1538 F8 clc ; Clear carry flag
3BE9:1539 C3 retn
sub_113 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:143C
;==========================================================================
3BE9:153A sub_114 proc near
3BE9:153A E8 F171 call sub_24 ; (06AE)
3BE9:153D 72 0A jc loc_225 ; Jump if carry Set
3BE9:153F 3C 03 cmp al,3
3BE9:1541 75 06 jne loc_225 ; Jump if not equal
3BE9:1543 BA 47BE mov dx,47BEh
3BE9:1546 E9 FF04 jmp loc_215 ; (144D)
3BE9:1549 loc_225: ; xref 3BE9:153D, 1541
3BE9:1549 F8 clc ; Clear carry flag
3BE9:154A C3 retn
sub_114 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:13FA
;==========================================================================
3BE9:154B sub_115 proc near
3BE9:154B 52 push dx
3BE9:154C BA 47E7 mov dx,47E7h
3BE9:154F E8 F003 call sub_17 ; (0555)
3BE9:1552 5A pop dx
3BE9:1553 E8 0AD5 call sub_187 ; (202B)
3BE9:1556 E8 EFE7 call sub_15 ; (0540)
3BE9:1559 C3 retn
sub_115 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1457
;==========================================================================
3BE9:155A sub_116 proc near
3BE9:155A C6 06 089E 20 mov byte ptr ds:[89Eh],20h ; (3BE9:089E=34h) ' '
3BE9:155F C6 06 089F 20 mov byte ptr ds:[89Fh],20h ; (3BE9:089F=0E8h) ' '
3BE9:1564 C6 06 08A0 20 mov byte ptr ds:[8A0h],20h ; (3BE9:08A0=8Ch) ' '
3BE9:1569 C6 06 08A1 20 mov byte ptr ds:[8A1h],20h ; (3BE9:08A1=0) ' '
3BE9:156E C6 06 08A2 20 mov byte ptr ds:[8A2h],20h ; (3BE9:08A2=0A0h) ' '
3BE9:1573 C6 06 08A3 20 mov byte ptr ds:[8A3h],20h ; (3BE9:08A3=74h) ' '
3BE9:1578 C6 06 08A4 20 mov byte ptr ds:[8A4h],20h ; (3BE9:08A4=2) ' '
3BE9:157D C6 06 08A5 20 mov byte ptr ds:[8A5h],20h ; (3BE9:08A5=0E8h) ' '
3BE9:1582 C6 06 08A6 20 mov byte ptr ds:[8A6h],20h ; (3BE9:08A6=0F9h) ' '
3BE9:1587 C6 06 08A7 20 mov byte ptr ds:[8A7h],20h ; (3BE9:08A7=1) ' '
3BE9:158C C6 06 08A8 20 mov byte ptr ds:[8A8h],20h ; (3BE9:08A8=0C3h) ' '
3BE9:1591 C6 06 0874 20 mov byte ptr ds:[874h],20h ; (3BE9:0874=2Ah) ' '
3BE9:1596 C6 06 0875 20 mov byte ptr ds:[875h],20h ; (3BE9:0875=4) ' '
3BE9:159B C6 06 0876 20 mov byte ptr ds:[876h],20h ; (3BE9:0876=0E8h) ' '
3BE9:15A0 C6 06 0877 20 mov byte ptr ds:[877h],20h ; (3BE9:0877=0B5h) ' '
3BE9:15A5 C6 06 0878 20 mov byte ptr ds:[878h],20h ; (3BE9:0878=0) ' '
3BE9:15AA C6 06 0879 20 mov byte ptr ds:[879h],20h ; (3BE9:0879=0E8h) ' '
3BE9:15AF C6 06 087A 20 mov byte ptr ds:[87Ah],20h ; (3BE9:087A=0A4h) ' '
3BE9:15B4 C6 06 087B 20 mov byte ptr ds:[87Bh],20h ; (3BE9:087B=0) ' '
3BE9:15B9 C6 06 087C 20 mov byte ptr ds:[87Ch],20h ; (3BE9:087C=0BEh) ' '
3BE9:15BE C6 06 087D 20 mov byte ptr ds:[87Dh],20h ; (3BE9:087D=32h) ' '
3BE9:15C3 C6 06 087E 20 mov byte ptr ds:[87Eh],20h ; (3BE9:087E=4) ' '
3BE9:15C8 C3 retn
sub_116 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0D13, 1B98
;==========================================================================
3BE9:15C9 sub_117 proc near
3BE9:15C9 80 F9 00 cmp cl,0
3BE9:15CC 74 28 je loc_227 ; Jump if equal
3BE9:15CE 3A 0E 08CA cmp cl,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:15D2 75 03 jne loc_226 ; Jump if not equal
3BE9:15D4 B1 00 mov cl,0
3BE9:15D6 C3 retn
3BE9:15D7 loc_226: ; xref 3BE9:15D2
3BE9:15D7 88 0E 08CA mov byte ptr ds:[8CAh],cl ; (3BE9:08CA=36h)
3BE9:15DB 50 push ax
3BE9:15DC 53 push bx
3BE9:15DD 52 push dx
3BE9:15DE 56 push si
3BE9:15DF 57 push di
3BE9:15E0 06 push es
3BE9:15E1 E8 015C call sub_127 ; (1740)
3BE9:15E4 72 10 jc loc_227 ; Jump if carry Set
3BE9:15E6 E8 0016 call sub_118 ; (15FF)
3BE9:15E9 72 0B jc loc_227 ; Jump if carry Set
3BE9:15EB E8 00B0 call sub_120 ; (169E)
3BE9:15EE 07 pop es
3BE9:15EF 5F pop di
3BE9:15F0 5E pop si
3BE9:15F1 5A pop dx
3BE9:15F2 5B pop bx
3BE9:15F3 58 pop ax
3BE9:15F4 F8 clc ; Clear carry flag
3BE9:15F5 C3 retn
3BE9:15F6 loc_227: ; xref 3BE9:15CC, 15E4, 15E9
3BE9:15F6 BA 4515 mov dx,4515h
3BE9:15F9 E8 EF59 call sub_17 ; (0555)
3BE9:15FC E8 EF1E call sub_13 ; (051D)
sub_117 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:15E6
;==========================================================================
3BE9:15FF sub_118 proc near
3BE9:15FF C6 06 0B2B 03 mov byte ptr ds:[0B2Bh],3 ; (3BE9:0B2B=40h)
3BE9:1604 loc_228: ; xref 3BE9:161F
3BE9:1604 A0 08CA mov al,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:1607 2C 01 sub al,1
3BE9:1609 E8 00F8 call sub_124 ; (1704)
3BE9:160C 73 03 jnc loc_229 ; Jump if carry=0
3BE9:160E E9 0075 jmpn loc_236 ; (1686)
3BE9:1611 loc_229: ; xref 3BE9:160C
3BE9:1611 B0 00 mov al,0
3BE9:1613 BA 0001 mov dx,1
3BE9:1616 E8 0071 call sub_119 ; (168A)
3BE9:1619 73 09 jnc loc_230 ; Jump if carry=0
3BE9:161B FE 0E 0B2B dec byte ptr ds:[0B2Bh] ; (3BE9:0B2B=40h)
3BE9:161F 75 E3 jnz loc_228 ; Jump if not zero
3BE9:1621 E9 0062 jmpn loc_236 ; (1686)
3BE9:1624 loc_230: ; xref 3BE9:1619
3BE9:1624 83 3E 08D3 FE ;* cmp word ptr ds:[8D3h],0FFFEh ; (3BE9:08D3=278h)
3BE9:1624 db 83h, 3Eh,0D3h, 08h,0FEh ; Fixup - byte match
3BE9:1629 9C pushf ; Push flags
3BE9:162A 80 3E 0102 FF cmp byte ptr ds:[102h],0FFh ; (3BE9:0102=44h)
3BE9:162F 75 12 jne loc_231 ; Jump if not equal
3BE9:1631 06 push es
3BE9:1632 53 push bx
3BE9:1633 33 DB xor bx,bx ; Zero register
3BE9:1635 8E C3 mov es,bx
3BE9:1637 26: C4 1E 013C les bx,dword ptr es:data_1e ; (0000:013C=0EF6Fh) Load seg:offset p
3BE9:163C 26: C6 47 0F 01 mov byte ptr es:[bx+0Fh],1
3BE9:1641 5B pop bx
3BE9:1642 07 pop es
3BE9:1643 loc_231: ; xref 3BE9:162F
3BE9:1643 9D popf ; Pop flags
3BE9:1644 75 1F jnz loc_233 ; Jump if not zero
3BE9:1646 B1 09 mov cl,9
3BE9:1648 9C pushf ; Push flags
3BE9:1649 80 3E 0102 FF cmp byte ptr ds:[102h],0FFh ; (3BE9:0102=44h)
3BE9:164E 75 12 jne loc_232 ; Jump if not equal
3BE9:1650 06 push es
3BE9:1651 53 push bx
3BE9:1652 33 DB xor bx,bx ; Zero register
3BE9:1654 8E C3 mov es,bx
3BE9:1656 26: C4 1E 013C les bx,dword ptr es:data_1e ; (0000:013C=0EF6Fh) Load seg:offset p
3BE9:165B 26: C6 47 0F 02 mov byte ptr es:[bx+0Fh],2
3BE9:1660 5B pop bx
3BE9:1661 07 pop es
3BE9:1662 loc_232: ; xref 3BE9:164E
3BE9:1662 9D popf ; Pop flags
3BE9:1663 F8 clc ; Clear carry flag
3BE9:1664 C3 retn
3BE9:1665 loc_233: ; xref 3BE9:1644
3BE9:1665 83 3E 08D3 FD ;* cmp word ptr ds:[8D3h],0FFFDh ; (3BE9:08D3=278h)
3BE9:1665 db 83h, 3Eh,0D3h, 08h,0FDh ; Fixup - byte match
3BE9:166A 75 04 jnz loc_234 ; Jump if not zero
3BE9:166C B1 07 mov cl,7
3BE9:166E F8 clc ; Clear carry flag
3BE9:166F C3 retn
3BE9:1670 loc_234: ; xref 3BE9:166A
3BE9:1670 83 3E 08D3 FC ;* cmp word ptr ds:[8D3h],0FFFCh ; (3BE9:08D3=278h)
3BE9:1670 db 83h, 3Eh,0D3h, 08h,0FCh ; Fixup - byte match
3BE9:1675 75 04 jnz loc_235 ; Jump if not zero
3BE9:1677 B1 06 mov cl,6
3BE9:1679 F8 clc ; Clear carry flag
3BE9:167A C3 retn
3BE9:167B loc_235: ; xref 3BE9:1675
3BE9:167B 83 3E 08D3 FF ;* cmp word ptr ds:[8D3h],0FFFFh ; (3BE9:08D3=278h)
3BE9:167B db 83h, 3Eh,0D3h, 08h,0FFh ; Fixup - byte match
3BE9:1680 75 04 jnz loc_236 ; Jump if not zero
3BE9:1682 B1 04 mov cl,4
3BE9:1684 F8 clc ; Clear carry flag
3BE9:1685 C3 retn
3BE9:1686 loc_236: ; xref 3BE9:160E, 1621, 1680
3BE9:1686 B1 00 mov cl,0
3BE9:1688 F9 stc ; Set carry flag
3BE9:1689 C3 retn
sub_118 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1616
;==========================================================================
3BE9:168A sub_119 proc near
3BE9:168A 06 push es
3BE9:168B 8B DA mov bx,dx
3BE9:168D BA 08D3 mov dx,8D3h
3BE9:1690 1E push ds
3BE9:1691 07 pop es
3BE9:1692 8A 2E 08CA mov ch,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:1696 80 ED 01 sub ch,1
3BE9:1699 E8 01E2 call sub_131 ; (187E)
3BE9:169C 07 pop es
3BE9:169D C3 retn
sub_119 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:15EB
;==========================================================================
3BE9:169E sub_120 proc near
3BE9:169E 8A D9 mov bl,cl
3BE9:16A0 80 EB 01 sub bl,1
3BE9:16A3 B7 00 mov bh,0
3BE9:16A5 D1 E3 shl bx,1 ; Shift w/zeros fill
3BE9:16A7 D1 E3 shl bx,1 ; Shift w/zeros fill
3BE9:16A9 8B 87 0B2C mov ax,word ptr ds:[0B2Ch][bx] ; (3BE9:0B2C=3AE8h)
3BE9:16AD A3 08CF mov word ptr ds:[8CFh],ax ; (3BE9:08CF=74C0h)
3BE9:16B0 8B 87 0B2E mov ax,word ptr ds:[0B2Eh][bx] ; (3BE9:0B2E=0BAFAh)
3BE9:16B4 A3 08D1 mov word ptr ds:[8D1h],ax ; (3BE9:08D1=0A22Fh)
3BE9:16B7 F8 clc ; Clear carry flag
3BE9:16B8 C3 retn
sub_120 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0DBC, 1A50, 1CE4, 1D35
;==========================================================================
3BE9:16B9 sub_121 proc near
3BE9:16B9 50 push ax
3BE9:16BA 53 push bx
3BE9:16BB 51 push cx
3BE9:16BC 52 push dx
3BE9:16BD 56 push si
3BE9:16BE 57 push di
3BE9:16BF A0 08CA mov al,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:16C2 FE C8 dec al
3BE9:16C4 E8 0050 call sub_125 ; (1717)
3BE9:16C7 72 20 jc loc_237 ; Jump if carry Set
3BE9:16C9 5F pop di
3BE9:16CA 5E pop si
3BE9:16CB 5A pop dx
3BE9:16CC 59 pop cx
3BE9:16CD 5B pop bx
3BE9:16CE 58 pop ax
3BE9:16CF F8 clc ; Clear carry flag
3BE9:16D0 C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:104A, 1079, 109C, 1A93, 1CBB, 1E56
3BE9:16D1 sub_122:
3BE9:16D1 50 push ax
3BE9:16D2 53 push bx
3BE9:16D3 51 push cx
3BE9:16D4 52 push dx
3BE9:16D5 56 push si
3BE9:16D6 57 push di
3BE9:16D7 A0 08CA mov al,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:16DA FE C8 dec al
3BE9:16DC E8 0045 call sub_126 ; (1724)
3BE9:16DF 72 08 jc loc_237 ; Jump if carry Set
3BE9:16E1 5F pop di
3BE9:16E2 5E pop si
3BE9:16E3 5A pop dx
3BE9:16E4 59 pop cx
3BE9:16E5 5B pop bx
3BE9:16E6 58 pop ax
3BE9:16E7 F8 clc ; Clear carry flag
3BE9:16E8 C3 retn
3BE9:16E9 loc_237: ; xref 3BE9:16C7, 16DF, 16FB
3BE9:16E9 BA 453A mov dx,453Ah
3BE9:16EC E8 EE66 call sub_17 ; (0555)
3BE9:16EF E8 EE2B call sub_13 ; (051D)
sub_121 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:10A6, 198D, 1B8C
;==========================================================================
3BE9:16F2 sub_123 proc near
3BE9:16F2 50 push ax
3BE9:16F3 53 push bx
3BE9:16F4 51 push cx
3BE9:16F5 52 push dx
3BE9:16F6 56 push si
3BE9:16F7 57 push di
3BE9:16F8 E8 0045 call sub_127 ; (1740)
3BE9:16FB 72 EC jc loc_237 ; Jump if carry Set
3BE9:16FD 5F pop di
3BE9:16FE 5E pop si
3BE9:16FF 5A pop dx
3BE9:1700 59 pop cx
3BE9:1701 5B pop bx
3BE9:1702 58 pop ax
3BE9:1703 C3 retn
sub_123 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1609
;==========================================================================
3BE9:1704 sub_124 proc near
3BE9:1704 50 push ax
3BE9:1705 8A E8 mov ch,al
3BE9:1707 C7 06 08CC FFFF mov word ptr ds:[8CCh],0FFFFh ; (3BE9:08CC=84h)
3BE9:170D C6 06 08CE 00 mov byte ptr ds:[8CEh],0 ; (3BE9:08CE=0Ah)
3BE9:1712 E8 0142 call sub_130 ; (1857)
3BE9:1715 58 pop ax
3BE9:1716 C3 retn
sub_124 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:16C4
;==========================================================================
3BE9:1717 sub_125 proc near
3BE9:1717 1E push ds
3BE9:1718 06 push es
3BE9:1719 E8 0043 call sub_128 ; (175F)
3BE9:171C 72 03 jc loc_238 ; Jump if carry Set
3BE9:171E F3/ A4 rep movsb ; Rep when cx >0 Mov [si] to es:[di]
3BE9:1720 F8 clc ; Clear carry flag
3BE9:1721 loc_238: ; xref 3BE9:171C
3BE9:1721 07 pop es
3BE9:1722 1F pop ds
3BE9:1723 C3 retn
sub_125 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:16DC
;==========================================================================
3BE9:1724 sub_126 proc near
3BE9:1724 06 push es
3BE9:1725 1E push ds
3BE9:1726 E8 0036 call sub_128 ; (175F)
3BE9:1729 72 11 jc loc_239 ; Jump if carry Set
3BE9:172B 87 F7 xchg si,di
3BE9:172D 06 push es
3BE9:172E 1E push ds
3BE9:172F 07 pop es
3BE9:1730 1F pop ds
3BE9:1731 F3/ A4 rep movsb ; Rep when cx >0 Mov [si] to es:[di]
3BE9:1733 1F pop ds
3BE9:1734 07 pop es
3BE9:1735 C6 06 08CE 01 mov byte ptr ds:[8CEh],1 ; (3BE9:08CE=0Ah)
3BE9:173A F8 clc ; Clear carry flag
3BE9:173B C3 retn
3BE9:173C loc_239: ; xref 3BE9:1729
3BE9:173C 1F pop ds
3BE9:173D 07 pop es
3BE9:173E F9 stc ; Set carry flag
3BE9:173F C3 retn
sub_126 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:15E1, 16F8, 1776
;==========================================================================
3BE9:1740 sub_127 proc near
3BE9:1740 B0 00 mov al,0
3BE9:1742 86 06 08CE xchg byte ptr ds:[8CEh],al ; (3BE9:08CE=0Ah)
3BE9:1746 3C 01 cmp al,1
3BE9:1748 F8 clc ; Clear carry flag
3BE9:1749 75 13 jnz loc_ret_240 ; Jump if not zero
3BE9:174B 8A 2E 08CB mov ch,byte ptr ds:[8CBh] ; (3BE9:08CB=0E8h)
3BE9:174F 8B 1E 08CC mov bx,word ptr ds:[8CCh] ; (3BE9:08CC=84h)
3BE9:1753 BA 08D3 mov dx,8D3h
3BE9:1756 06 push es
3BE9:1757 1E push ds
3BE9:1758 07 pop es
3BE9:1759 FF 16 08D1 call word ptr ds:[8D1h] ; (3BE9:08D1=0A22Fh)
3BE9:175D 07 pop es
3BE9:175E loc_ret_240: ; xref 3BE9:1749
3BE9:175E C3 retn
sub_127 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1719, 1726
;==========================================================================
3BE9:175F sub_128 proc near
3BE9:175F 8B FB mov di,bx
3BE9:1761 E8 0054 call sub_129 ; (17B8)
3BE9:1764 72 45 jc loc_243 ; Jump if carry Set
3BE9:1766 3A 06 08CB cmp al,byte ptr ds:[8CBh] ; (3BE9:08CB=0E8h)
3BE9:176A 75 06 jne loc_241 ; Jump if not equal
3BE9:176C 3B 16 08CC cmp dx,word ptr ds:[8CCh] ; (3BE9:08CC=84h)
3BE9:1770 74 2D je loc_242 ; Jump if equal
3BE9:1772 loc_241: ; xref 3BE9:176A
3BE9:1772 50 push ax
3BE9:1773 52 push dx
3BE9:1774 56 push si
3BE9:1775 57 push di
3BE9:1776 E8 FFC7 call sub_127 ; (1740)
3BE9:1779 5F pop di
3BE9:177A 5E pop si
3BE9:177B 5A pop dx
3BE9:177C 58 pop ax
3BE9:177D 72 2C jc loc_243 ; Jump if carry Set
3BE9:177F 89 16 08CC mov word ptr ds:[8CCh],dx ; (3BE9:08CC=84h)
3BE9:1783 A2 08CB mov byte ptr ds:[8CBh],al ; (3BE9:08CB=0E8h)
3BE9:1786 56 push si
3BE9:1787 57 push di
3BE9:1788 8B 1E 08CC mov bx,word ptr ds:[8CCh] ; (3BE9:08CC=84h)
3BE9:178C 8A 2E 08CB mov ch,byte ptr ds:[8CBh] ; (3BE9:08CB=0E8h)
3BE9:1790 BA 08D3 mov dx,8D3h
3BE9:1793 06 push es
3BE9:1794 1E push ds
3BE9:1795 07 pop es
3BE9:1796 FF 16 08CF call word ptr ds:[8CFh] ; (3BE9:08CF=74C0h)
3BE9:179A 07 pop es
3BE9:179B 5F pop di
3BE9:179C 5E pop si
3BE9:179D 72 0C jc loc_243 ; Jump if carry Set
3BE9:179F loc_242: ; xref 3BE9:1770
3BE9:179F 81 C6 08D3 add si,8D3h
3BE9:17A3 B9 0080 mov cx,80h
3BE9:17A6 1E push ds
3BE9:17A7 07 pop es
3BE9:17A8 FC cld ; Clear direction
3BE9:17A9 F8 clc ; Clear carry flag
3BE9:17AA C3 retn
3BE9:17AB loc_243: ; xref 3BE9:1764, 177D, 179D
3BE9:17AB C7 06 08CC FFFF mov word ptr ds:[8CCh],0FFFFh ; (3BE9:08CC=84h)
3BE9:17B1 C6 06 08CE 00 mov byte ptr ds:[8CEh],0 ; (3BE9:08CE=0Ah)
3BE9:17B6 F9 stc ; Set carry flag
3BE9:17B7 C3 retn
sub_128 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1761
;==========================================================================
3BE9:17B8 sub_129 proc near
3BE9:17B8 50 push ax
3BE9:17B9 51 push cx
3BE9:17BA 8B C2 mov ax,dx
3BE9:17BC BA 0000 mov dx,0
3BE9:17BF B9 0004 mov cx,4
3BE9:17C2 F7 F1 div cx ; ax,dx rem=dx:ax/reg
3BE9:17C4 92 xchg dx,ax
3BE9:17C5 B1 80 mov cl,80h
3BE9:17C7 F6 E1 mul cl ; ax = reg * al
3BE9:17C9 8B F0 mov si,ax
3BE9:17CB 59 pop cx
3BE9:17CC 58 pop ax
3BE9:17CD F8 clc ; Clear carry flag
3BE9:17CE C3 retn
sub_129 endp
;* No entry point to code
3BE9:17CF 50 push ax
3BE9:17D0 8B C3 mov ax,bx
3BE9:17D2 43 inc bx
3BE9:17D3 3D 027F cmp ax,27Fh
3BE9:17D6 72 08 jb loc_245 ; Jump if below
3BE9:17D8 74 03 jz loc_244 ; Jump if zero
3BE9:17DA 58 pop ax
3BE9:17DB F9 stc ; Set carry flag
3BE9:17DC C3 retn
3BE9:17DD loc_244: ; xref 3BE9:17D8
3BE9:17DD BB FFFF mov bx,0FFFFh
3BE9:17E0 loc_245: ; xref 3BE9:17D6
3BE9:17E0 8B D3 mov dx,bx
3BE9:17E2 B3 10 mov bl,10h
3BE9:17E4 F6 F3 div bl ; al, ah rem = ax/reg
3BE9:17E6 8A D8 mov bl,al
3BE9:17E8 B7 00 mov bh,0
3BE9:17EA 8A CC mov cl,ah
3BE9:17EC B5 00 mov ch,0
3BE9:17EE 58 pop ax
3BE9:17EF F8 clc ; Clear carry flag
3BE9:17F0 C3 retn
;* No entry point to code
3BE9:17F1 50 push ax
3BE9:17F2 8B C3 mov ax,bx
3BE9:17F4 43 inc bx
3BE9:17F5 3D 0167 cmp ax,167h
3BE9:17F8 72 08 jb loc_247 ; Jump if below
3BE9:17FA 74 03 jz loc_246 ; Jump if zero
3BE9:17FC 58 pop ax
3BE9:17FD F9 stc ; Set carry flag
3BE9:17FE C3 retn
3BE9:17FF loc_246: ; xref 3BE9:17FA
3BE9:17FF BB FFFF mov bx,0FFFFh
3BE9:1802 loc_247: ; xref 3BE9:17F8
3BE9:1802 8B D3 mov dx,bx
3BE9:1804 B3 09 mov bl,9
3BE9:1806 F6 F3 div bl ; al, ah rem = ax/reg
3BE9:1808 8A D8 mov bl,al
3BE9:180A B7 00 mov bh,0
3BE9:180C 8A CC mov cl,ah
3BE9:180E B5 00 mov ch,0
3BE9:1810 58 pop ax
3BE9:1811 F8 clc ; Clear carry flag
3BE9:1812 C3 retn
;* No entry point to code
3BE9:1813 50 push ax
3BE9:1814 8B C3 mov ax,bx
3BE9:1816 43 inc bx
3BE9:1817 3D 02CF cmp ax,2CFh
3BE9:181A 72 08 jb loc_249 ; Jump if below
3BE9:181C 74 03 jz loc_248 ; Jump if zero
3BE9:181E 58 pop ax
3BE9:181F F9 stc ; Set carry flag
3BE9:1820 C3 retn
3BE9:1821 loc_248: ; xref 3BE9:181C
3BE9:1821 BB FFFF mov bx,0FFFFh
3BE9:1824 loc_249: ; xref 3BE9:181A
3BE9:1824 8B D3 mov dx,bx
3BE9:1826 B3 12 mov bl,12h
3BE9:1828 F6 F3 div bl ; al, ah rem = ax/reg
3BE9:182A 8A D8 mov bl,al
3BE9:182C B7 00 mov bh,0
3BE9:182E 8A CC mov cl,ah
3BE9:1830 B5 00 mov ch,0
3BE9:1832 58 pop ax
3BE9:1833 F8 clc ; Clear carry flag
3BE9:1834 C3 retn
;* No entry point to code
3BE9:1835 50 push ax
3BE9:1836 8B C3 mov ax,bx
3BE9:1838 43 inc bx
3BE9:1839 3D 059F cmp ax,59Fh
3BE9:183C 72 08 jb loc_251 ; Jump if below
3BE9:183E 74 03 jz loc_250 ; Jump if zero
3BE9:1840 58 pop ax
3BE9:1841 F9 stc ; Set carry flag
3BE9:1842 C3 retn
3BE9:1843 loc_250: ; xref 3BE9:183E
3BE9:1843 BB FFFF mov bx,0FFFFh
3BE9:1846 loc_251: ; xref 3BE9:183C
3BE9:1846 8B D3 mov dx,bx
3BE9:1848 B3 12 mov bl,12h
3BE9:184A F6 F3 div bl ; al, ah rem = ax/reg
3BE9:184C 8A D8 mov bl,al
3BE9:184E B7 00 mov bh,0
3BE9:1850 8A CC mov cl,ah
3BE9:1852 B5 00 mov ch,0
3BE9:1854 58 pop ax
3BE9:1855 F8 clc ; Clear carry flag
3BE9:1856 C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1712
;==========================================================================
3BE9:1857 sub_130 proc near
3BE9:1857 E9 0000 jmpn loc_252 ; (185A)
3BE9:185A loc_252: ; xref 3BE9:1857
3BE9:185A 88 2E 0B51 mov byte ptr ds:[0B51h],ch ; (3BE9:0B51=0CFh)
3BE9:185E E8 006B call sub_132 ; (18CC)
3BE9:1861 8A 2E 0B51 mov ch,byte ptr ds:[0B51h] ; (3BE9:0B51=0CFh)
3BE9:1865 C3 retn
sub_130 endp
;* No entry point to code
3BE9:1866 BF 0B5A mov di,0B5Ah
3BE9:1869 E9 002A jmpn loc_253 ; (1896)
;* No entry point to code
3BE9:186C BF 0B5A mov di,0B5Ah
3BE9:186F E9 002E jmpn loc_254 ; (18A0)
;* No entry point to code
3BE9:1872 BF 0B5C mov di,0B5Ch
3BE9:1875 E9 001E jmpn loc_253 ; (1896)
;* No entry point to code
3BE9:1878 BF 0B5C mov di,0B5Ch
3BE9:187B E9 0022 jmpn loc_254 ; (18A0)
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1699
;==========================================================================
3BE9:187E sub_131 proc near
3BE9:187E BF 0B5E mov di,0B5Eh
3BE9:1881 E9 0012 jmpn loc_253 ; (1896)
;* No entry point to code
3BE9:1884 BF 0B5E mov di,0B5Eh
3BE9:1887 E9 0016 jmpn loc_254 ; (18A0)
;* No entry point to code
3BE9:188A BF 0B60 mov di,0B60h
3BE9:188D E9 0006 jmpn loc_253 ; (1896)
;* No entry point to code
3BE9:1890 ,BF 0B60 mov di,0B60h ; (3BE9:0B60=0F8h)
3BE9:1893 E9 000A jmpn loc_254 ; (18A0)
3BE9:1896 loc_253: ; xref 3BE9:1869, 1875, 1881, 188D
3BE9:1896 B0 0A mov al,0Ah
3BE9:1898 E8 004B call sub_133 ; (18E6)
3BE9:189B 73 17 jnc loc_256 ; Jump if carry=0
3BE9:189D E9 000A jmpn loc_255 ; (18AA)
3BE9:18A0 loc_254: ; xref 3BE9:186F, 187B, 1887, 1893
3BE9:18A0 B0 0B mov al,0Bh
3BE9:18A2 E8 0041 call sub_133 ; (18E6)
3BE9:18A5 73 0D jnc loc_256 ; Jump if carry=0
3BE9:18A7 E9 0000 jmpn loc_255 ; (18AA)
3BE9:18AA loc_255: ; xref 3BE9:189D, 18A7
3BE9:18AA 8B 1E 0B54 mov bx,word ptr ds:[0B54h] ; (3BE9:0B54=0DA8Bh)
3BE9:18AE 8A 2E 0B51 mov ch,byte ptr ds:[0B51h] ; (3BE9:0B51=0CFh)
3BE9:18B2 F9 stc ; Set carry flag
3BE9:18B3 C3 retn
3BE9:18B4 loc_256: ; xref 3BE9:189B, 18A5
3BE9:18B4 8B 16 0B52 mov dx,word ptr ds:[0B52h] ; (3BE9:0B52=0C3FFh)
3BE9:18B8 81 C2 0200 add dx,200h
3BE9:18BC 8B 1E 0B58 mov bx,word ptr ds:[0B58h] ; (3BE9:0B58=8A00h)
3BE9:18C0 8A 2E 0B51 mov ch,byte ptr ds:[0B51h] ; (3BE9:0B51=0CFh)
3BE9:18C4 88 2E 0B50 mov byte ptr ds:[0B50h],ch ; (3BE9:0B50=0E9h)
3BE9:18C8 B0 00 mov al,0
3BE9:18CA F8 clc ; Clear carry flag
3BE9:18CB C3 retn
sub_131 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:185E
;==========================================================================
3BE9:18CC sub_132 proc near
3BE9:18CC 1E push ds
3BE9:18CD 06 push es
3BE9:18CE 55 push bp
3BE9:18CF 8A CD mov cl,ch
3BE9:18D1 BA 0000 mov dx,0
3BE9:18D4 B0 09 mov al,9
3BE9:18D6 0E E8 005A callf sub_134 ; (1934)
3BE9:18DA 5D pop bp
3BE9:18DB 07 pop es
3BE9:18DC 1F pop ds
3BE9:18DD 83 FB 00 cmp bx,0
3BE9:18E0 74 02 je loc_257 ; Jump if equal
3BE9:18E2 F8 clc ; Clear carry flag
3BE9:18E3 C3 retn
3BE9:18E4 loc_257: ; xref 3BE9:18E0
3BE9:18E4 F9 stc ; Set carry flag
3BE9:18E5 C3 retn
sub_132 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1898, 18A2
;==========================================================================
3BE9:18E6 sub_133 proc near
3BE9:18E6 89 1E 0B54 mov word ptr ds:[0B54h],bx ; (3BE9:0B54=0DA8Bh)
3BE9:18EA 88 2E 0B51 mov byte ptr ds:[0B51h],ch ; (3BE9:0B51=0CFh)
3BE9:18EE 89 16 0B52 mov word ptr ds:[0B52h],dx ; (3BE9:0B52=0C3FFh)
3BE9:18F2 80 FD 02 cmp ch,2
3BE9:18F5 73 39 jae loc_261 ; Jump if above or =
3BE9:18F7 1E push ds
3BE9:18F8 06 push es
3BE9:18F9 55 push bp
3BE9:18FA 8A CD mov cl,ch
3BE9:18FC B5 01 mov ch,1
3BE9:18FE 51 push cx
3BE9:18FF 52 push dx
3BE9:1900 FF 15 call word ptr [di] ;*
3BE9:1902 5F pop di
3BE9:1903 72 24 jc loc_260 ; Jump if carry Set
3BE9:1905 89 16 0B58 mov word ptr ds:[0B58h],dx ; (3BE9:0B58=8A00h)
3BE9:1909 53 push bx
3BE9:190A 51 push cx
3BE9:190B 06 push es
3BE9:190C 57 push di
3BE9:190D 0E E8 0023 callf sub_134 ; (1934)
3BE9:1911 83 C4 0A add sp,0Ah
3BE9:1914 5D pop bp
3BE9:1915 07 pop es
3BE9:1916 1F pop ds
3BE9:1917 3C 00 cmp al,0
3BE9:1919 75 02 jne loc_258 ; Jump if not equal
3BE9:191B F8 clc ; Clear carry flag
3BE9:191C C3 retn
3BE9:191D loc_258: ; xref 3BE9:1919
3BE9:191D 3C 02 cmp al,2
3BE9:191F 75 04 jne loc_259 ; Jump if not equal
3BE9:1921 B0 01 mov al,1
3BE9:1923 F9 stc ; Set carry flag
3BE9:1924 C3 retn
3BE9:1925 loc_259: ; xref 3BE9:191F
3BE9:1925 B0 03 mov al,3
3BE9:1927 F9 stc ; Set carry flag
3BE9:1928 C3 retn
3BE9:1929 loc_260: ; xref 3BE9:1903
3BE9:1929 83 C4 08 add sp,8
3BE9:192C B0 05 mov al,5
3BE9:192E F9 stc ; Set carry flag
3BE9:192F C3 retn
3BE9:1930 loc_261: ; xref 3BE9:18F5
3BE9:1930 B0 02 mov al,2
3BE9:1932 F9 stc ; Set carry flag
3BE9:1933 C3 retn
sub_133 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:18D6, 190D
;==========================================================================
3BE9:1934 sub_134 proc near
3BE9:1934 FF 36 04BE push word ptr ds:[4BEh] ; (3BE9:04BE=4BF1h)
3BE9:1938 FF 36 04BC push word ptr ds:[4BCh] ; (3BE9:04BC=0BA16h)
3BE9:193C 8E 1E 04B6 mov ds,word ptr ds:[4B6h] ; (3BE9:04B6=0E900h)
3BE9:1940 CB retf ; Return far
sub_134 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0E25, 0FA5, 1257
;==========================================================================
3BE9:1941 sub_135 proc near
3BE9:1941 E8 009A call sub_142 ; (19DE)
3BE9:1944 ,BF 0B75 mov di,0B75h ; (3BE9:0B75=3Ch)
3BE9:1947 8B DA mov bx,dx
3BE9:1949 B9 000C mov cx,0Ch
3BE9:194C E8 051A call sub_173 ; (1E69)
3BE9:194F E8 0409 call sub_167 ; (1D5B)
3BE9:1952 72 0C jc loc_262 ; Jump if carry Set
3BE9:1954 F6 C4 18 test ah,18h
3BE9:1957 75 07 jnz loc_262 ; Jump if not zero
3BE9:1959 E8 046A call sub_170 ; (1DC6)
3BE9:195C B0 00 mov al,0
3BE9:195E F8 clc ; Clear carry flag
3BE9:195F C3 retn
3BE9:1960 loc_262: ; xref 3BE9:1952, 1957, 1967, 1977
3BE9:1960 B0 FF mov al,0FFh
3BE9:1962 F9 stc ; Set carry flag
3BE9:1963 C3 retn
sub_135 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1163
;==========================================================================
3BE9:1964 sub_136 proc near
3BE9:1964 E8 03F4 call sub_167 ; (1D5B)
3BE9:1967 72 F7 jc loc_262 ; Jump if carry Set
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:1007
3BE9:1969 sub_137:
3BE9:1969 loc_263: ; xref 3BE9:197C
3BE9:1969 8B FA mov di,dx
3BE9:196B ,BB 0B75 mov bx,0B75h ; (3BE9:0B75=3Ch)
3BE9:196E B9 000C mov cx,0Ch
3BE9:1971 E8 04F5 call sub_173 ; (1E69)
3BE9:1974 E8 03D4 call sub_166 ; (1D4B)
3BE9:1977 72 E7 jc loc_262 ; Jump if carry Set
3BE9:1979 F6 C4 18 test ah,18h
3BE9:197C 75 EB jnz loc_263 ; Jump if not zero
3BE9:197E E8 0445 call sub_170 ; (1DC6)
3BE9:1981 B0 00 mov al,0
3BE9:1983 F8 clc ; Clear carry flag
3BE9:1984 C3 retn
sub_136 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0FE2, 142A
;==========================================================================
3BE9:1985 sub_138 proc near
3BE9:1985 E8 03D3 call sub_167 ; (1D5B)
3BE9:1988 72 0A jc loc_264 ; Jump if carry Set
3BE9:198A E8 0158 call sub_148 ; (1AE5)
3BE9:198D E8 FD62 call sub_123 ; (16F2)
3BE9:1990 B0 00 mov al,0
3BE9:1992 F8 clc ; Clear carry flag
3BE9:1993 C3 retn
3BE9:1994 loc_264: ; xref 3BE9:1988
3BE9:1994 B0 FF mov al,0FFh
3BE9:1996 F9 stc ; Set carry flag
3BE9:1997 C3 retn
sub_138 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1400
;==========================================================================
3BE9:1998 sub_139 proc near
3BE9:1998 E8 0043 call sub_142 ; (19DE)
3BE9:199B E8 0053 call sub_143 ; (19F1)
3BE9:199E 72 26 jc loc_267 ; Jump if carry Set
3BE9:19A0 E8 01DB call sub_151 ; (1B7E)
3BE9:19A3 E8 03B5 call sub_167 ; (1D5B)
3BE9:19A6 72 0B jc loc_265 ; Jump if carry Set
3BE9:19A8 F6 C4 18 test ah,18h
3BE9:19AB 75 19 jnz loc_267 ; Jump if not zero
3BE9:19AD E8 0416 call sub_170 ; (1DC6)
3BE9:19B0 E9 0008 jmpn loc_266 ; (19BB)
3BE9:19B3 loc_265: ; xref 3BE9:19A6
3BE9:19B3 E8 03FC call sub_169 ; (1DB2)
3BE9:19B6 72 0E jc loc_267 ; Jump if carry Set
3BE9:19B8 E8 0453 call sub_171 ; (1E0E)
3BE9:19BB loc_266: ; xref 3BE9:19B0
3BE9:19BB 8B DA mov bx,dx
3BE9:19BD C7 47 1D 0000 mov word ptr [bx+1Dh],0
3BE9:19C2 B0 00 mov al,0
3BE9:19C4 F8 clc ; Clear carry flag
3BE9:19C5 C3 retn
3BE9:19C6 loc_267: ; xref 3BE9:199E, 19AB, 19B6
3BE9:19C6 B0 FF mov al,0FFh
3BE9:19C8 F9 stc ; Set carry flag
3BE9:19C9 C3 retn
sub_139 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0B15
;==========================================================================
3BE9:19CA sub_140 proc near
3BE9:19CA E8 038E call sub_167 ; (1D5B)
3BE9:19CD 73 06 jnc loc_269 ; Jump if carry=0
3BE9:19CF C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:0B42
3BE9:19D0 sub_141:
3BE9:19D0 loc_268: ; xref 3BE9:19D8
3BE9:19D0 E8 0378 call sub_166 ; (1D4B)
3BE9:19D3 72 07 jc loc_270 ; Jump if carry Set
3BE9:19D5 loc_269: ; xref 3BE9:19CD
3BE9:19D5 F6 C4 18 test ah,18h
3BE9:19D8 75 F6 jnz loc_268 ; Jump if not zero
3BE9:19DA F8 clc ; Clear carry flag
3BE9:19DB C3 retn
3BE9:19DC loc_270: ; xref 3BE9:19D3
3BE9:19DC F9 stc ; Set carry flag
3BE9:19DD C3 retn
sub_140 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1941, 1998
;==========================================================================
3BE9:19DE sub_142 proc near
3BE9:19DE 57 push di
3BE9:19DF 51 push cx
3BE9:19E0 8B FA mov di,dx
3BE9:19E2 83 C7 01 add di,1
3BE9:19E5 B9 000B mov cx,0Bh
3BE9:19E8 locloop_271: ; xref 3BE9:19EC
3BE9:19E8 80 25 7F and byte ptr [di],7Fh
3BE9:19EB 47 inc di
3BE9:19EC E2 FA loop locloop_271 ; Loop if cx > 0
3BE9:19EE 59 pop cx
3BE9:19EF 5F pop di
3BE9:19F0 C3 retn
sub_142 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:199B
;==========================================================================
3BE9:19F1 sub_143 proc near
3BE9:19F1 52 push dx
3BE9:19F2 53 push bx
3BE9:19F3 8B DA mov bx,dx
3BE9:19F5 8A 0F mov cl,[bx]
3BE9:19F7 E8 019E call sub_153 ; (1B98)
3BE9:19FA 72 23 jc loc_273 ; Jump if carry Set
3BE9:19FC 80 3E 0B74 01 cmp byte ptr ds:[0B74h],1 ; (3BE9:0B74=1)
3BE9:1A01 74 05 je loc_272 ; Jump if equal
3BE9:1A03 E8 02CD call sub_162 ; (1CD3)
3BE9:1A06 72 17 jc loc_273 ; Jump if carry Set
3BE9:1A08 loc_272: ; xref 3BE9:1A01
3BE9:1A08 8B 16 0B84 mov dx,word ptr ds:[0B84h] ; (3BE9:0B84=2C3h)
3BE9:1A0C 83 FA FF ;* cmp dx,0FFFFh
3BE9:1A0C db 83h,0FAh,0FFh ; Fixup - byte match
3BE9:1A0F 75 0E jnz loc_273 ; Jump if not zero
3BE9:1A11 8A 16 0B83 mov dl,byte ptr ds:[0B83h] ; (3BE9:0B83=83h)
3BE9:1A15 3A 16 0B66 cmp dl,byte ptr ds:[0B66h] ; (3BE9:0B66=0B9h)
3BE9:1A19 75 04 jne loc_273 ; Jump if not equal
3BE9:1A1B 5B pop bx
3BE9:1A1C 5A pop dx
3BE9:1A1D F8 clc ; Clear carry flag
3BE9:1A1E C3 retn
3BE9:1A1F loc_273: ; xref 3BE9:19FA, 1A06, 1A0F, 1A19
3BE9:1A1F 5B pop bx
3BE9:1A20 5A pop dx
3BE9:1A21 F9 stc ; Set carry flag
3BE9:1A22 C3 retn
sub_143 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0E68, 123E
;==========================================================================
3BE9:1A23 sub_144 proc near
3BE9:1A23 89 1E 0B6E mov word ptr ds:[0B6Eh],bx ; (3BE9:0B6E=0E2F9h)
3BE9:1A27 89 16 0B6C mov word ptr ds:[0B6Ch],dx ; (3BE9:0B6C=0FAE8h)
3BE9:1A2B 8B DA mov bx,dx
3BE9:1A2D 8A 0F mov cl,[bx]
3BE9:1A2F E8 0166 call sub_153 ; (1B98)
3BE9:1A32 72 27 jc loc_274 ; Jump if carry Set
3BE9:1A34 8B 47 0C mov ax,[bx+0Ch]
3BE9:1A37 3B 47 1D cmp ax,[bx+1Dh]
3BE9:1A3A 73 1F jae loc_274 ; Jump if above or =
3BE9:1A3C 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A40 E8 006A call sub_146 ; (1AAD)
3BE9:1A43 72 16 jc loc_274 ; Jump if carry Set
3BE9:1A45 8B 1E 0B6C mov bx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A49 FF 47 0C inc word ptr [bx+0Ch]
3BE9:1A4C 8B 1E 0B6E mov bx,word ptr ds:[0B6Eh] ; (3BE9:0B6E=0E2F9h)
3BE9:1A50 E8 FC66 call sub_121 ; (16B9)
3BE9:1A53 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A57 B0 00 mov al,0
3BE9:1A59 F8 clc ; Clear carry flag
3BE9:1A5A C3 retn
3BE9:1A5B loc_274: ; xref 3BE9:1A32, 1A3A, 1A43
3BE9:1A5B 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A5F B0 01 mov al,1
3BE9:1A61 F9 stc ; Set carry flag
3BE9:1A62 C3 retn
sub_144 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:151A
;==========================================================================
3BE9:1A63 sub_145 proc near
3BE9:1A63 89 1E 0B6E mov word ptr ds:[0B6Eh],bx ; (3BE9:0B6E=0E2F9h)
3BE9:1A67 89 16 0B6C mov word ptr ds:[0B6Ch],dx ; (3BE9:0B6C=0FAE8h)
3BE9:1A6B 8B DA mov bx,dx
3BE9:1A6D 8A 0F mov cl,[bx]
3BE9:1A6F E8 0126 call sub_153 ; (1B98)
3BE9:1A72 72 31 jc loc_276 ; Jump if carry Set
3BE9:1A74 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A78 E8 0032 call sub_146 ; (1AAD)
3BE9:1A7B 73 12 jnc loc_275 ; Jump if carry=0
3BE9:1A7D 8B 1E 0B6C mov bx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A81 E8 003F call sub_147 ; (1AC3)
3BE9:1A84 72 1F jc loc_276 ; Jump if carry Set
3BE9:1A86 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A8A E8 0020 call sub_146 ; (1AAD)
3BE9:1A8D 72 16 jc loc_276 ; Jump if carry Set
3BE9:1A8F loc_275: ; xref 3BE9:1A7B
3BE9:1A8F 8B 1E 0B6E mov bx,word ptr ds:[0B6Eh] ; (3BE9:0B6E=0E2F9h)
3BE9:1A93 E8 FC3B call sub_122 ; (16D1)
3BE9:1A96 8B 1E 0B6C mov bx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1A9A FF 47 0C inc word ptr [bx+0Ch]
3BE9:1A9D 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1AA1 B0 00 mov al,0
3BE9:1AA3 F8 clc ; Clear carry flag
3BE9:1AA4 C3 retn
3BE9:1AA5 loc_276: ; xref 3BE9:1A72, 1A84, 1A8D
3BE9:1AA5 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1AA9 B0 01 mov al,1
3BE9:1AAB F9 stc ; Set carry flag
3BE9:1AAC C3 retn
sub_145 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1A40, 1A78, 1A8A
;==========================================================================
3BE9:1AAD sub_146 proc near
3BE9:1AAD 8B DA mov bx,dx
3BE9:1AAF 8B 57 0C mov dx,[bx+0Ch]
3BE9:1AB2 E8 0127 call sub_155 ; (1BDC)
3BE9:1AB5 E8 015C call sub_158 ; (1C14)
3BE9:1AB8 72 07 jc loc_277 ; Jump if carry Set
3BE9:1ABA E8 0139 call sub_156 ; (1BF6)
3BE9:1ABD 03 D0 add dx,ax
3BE9:1ABF F8 clc ; Clear carry flag
3BE9:1AC0 C3 retn
3BE9:1AC1 loc_277: ; xref 3BE9:1AB8
3BE9:1AC1 F9 stc ; Set carry flag
3BE9:1AC2 C3 retn
sub_146 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1A81
;==========================================================================
3BE9:1AC3 sub_147 proc near
3BE9:1AC3 E8 0097 call sub_150 ; (1B5D)
3BE9:1AC6 72 1B jc loc_279 ; Jump if carry Set
3BE9:1AC8 52 push dx
3BE9:1AC9 50 push ax
3BE9:1ACA 8B D0 mov dx,ax
3BE9:1ACC B8 0FFF mov ax,0FFFh
3BE9:1ACF E8 0194 call sub_160 ; (1C66)
3BE9:1AD2 58 pop ax
3BE9:1AD3 5A pop dx
3BE9:1AD4 83 FA 00 cmp dx,0
3BE9:1AD7 74 05 je loc_278 ; Jump if equal
3BE9:1AD9 E8 018A call sub_160 ; (1C66)
3BE9:1ADC F8 clc ; Clear carry flag
3BE9:1ADD C3 retn
3BE9:1ADE loc_278: ; xref 3BE9:1AD7
3BE9:1ADE 89 47 18 mov [bx+18h],ax
3BE9:1AE1 F8 clc ; Clear carry flag
3BE9:1AE2 C3 retn
3BE9:1AE3 loc_279: ; xref 3BE9:1AC6
3BE9:1AE3 F9 stc ; Set carry flag
3BE9:1AE4 C3 retn
sub_147 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:198A
;==========================================================================
3BE9:1AE5 sub_148 proc near
3BE9:1AE5 52 push dx
3BE9:1AE6 8B DA mov bx,dx
3BE9:1AE8 8B 57 1D mov dx,[bx+1Dh]
3BE9:1AEB 3B 57 0C cmp dx,[bx+0Ch]
3BE9:1AEE 73 06 jae loc_280 ; Jump if above or =
3BE9:1AF0 8B 57 0C mov dx,[bx+0Ch]
3BE9:1AF3 89 57 1D mov [bx+1Dh],dx
3BE9:1AF6 loc_280: ; xref 3BE9:1AEE
3BE9:1AF6 83 EA 01 sub dx,1
3BE9:1AF9 73 11 jnc loc_281 ; Jump if carry=0
3BE9:1AFB 5A pop dx
3BE9:1AFC 8B 47 18 mov ax,[bx+18h]
3BE9:1AFF C7 47 18 0000 mov word ptr [bx+18h],0
3BE9:1B04 3D 0000 cmp ax,0
3BE9:1B07 75 1A jne loc_283 ; Jump if not equal
3BE9:1B09 E9 0025 jmpn loc_284 ; (1B31)
3BE9:1B0C loc_281: ; xref 3BE9:1AF9
3BE9:1B0C E8 00CD call sub_155 ; (1BDC)
3BE9:1B0F E8 0102 call sub_158 ; (1C14)
3BE9:1B12 73 03 jnc loc_282 ; Jump if carry=0
3BE9:1B14 5A pop dx
3BE9:1B15 F9 stc ; Set carry flag
3BE9:1B16 C3 retn
3BE9:1B17 loc_282: ; xref 3BE9:1B12
3BE9:1B17 E8 0122 call sub_159 ; (1C3C)
3BE9:1B1A 50 push ax
3BE9:1B1B B8 0FFF mov ax,0FFFh
3BE9:1B1E E8 0145 call sub_160 ; (1C66)
3BE9:1B21 58 pop ax
3BE9:1B22 5A pop dx
3BE9:1B23 loc_283: ; xref 3BE9:1B07
3BE9:1B23 E8 001E call sub_149 ; (1B44)
3BE9:1B26 E8 017F call sub_161 ; (1CA8)
3BE9:1B29 8B FA mov di,dx
3BE9:1B2B 83 7D 18 00 cmp word ptr [di+18h],0
3BE9:1B2F 75 0E jne loc_285 ; Jump if not equal
3BE9:1B31 loc_284: ; xref 3BE9:1B09
3BE9:1B31 8B FA mov di,dx
3BE9:1B33 B9 0025 mov cx,25h
3BE9:1B36 E8 0322 call sub_172 ; (1E5B)
3BE9:1B39 8B FA mov di,dx
3BE9:1B3B C6 45 01 E5 mov byte ptr [di+1],0E5h
3BE9:1B3F loc_285: ; xref 3BE9:1B2F
3BE9:1B3F E8 02CC call sub_171 ; (1E0E)
3BE9:1B42 F8 clc ; Clear carry flag
3BE9:1B43 C3 retn
sub_148 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1B23
;==========================================================================
3BE9:1B44 sub_149 proc near
3BE9:1B44 52 push dx
3BE9:1B45 loc_286: ; xref 3BE9:1B58
3BE9:1B45 ,8B D0 mov dx,ax
3BE9:1B47 81 FA 0FF8 cmp dx,0FF8h
3BE9:1B4B 73 0E jae loc_287 ; Jump if above or =
3BE9:1B4D E8 00EC call sub_159 ; (1C3C)
3BE9:1B50 50 push ax
3BE9:1B51 B8 0000 mov ax,0
3BE9:1B54 E8 010F call sub_160 ; (1C66)
3BE9:1B57 58 pop ax
3BE9:1B58 E9 FFEA ;* jmp loc_286 ; (1B45)
3BE9:1B58 db 0E9h,0EAh,0FFh ; Fixup - byte match
3BE9:1B5B loc_287: ; xref 3BE9:1B4B
3BE9:1B5B 5A pop dx
3BE9:1B5C C3 retn
sub_149 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1AC3
;==========================================================================
3BE9:1B5D sub_150 proc near
3BE9:1B5D 52 push dx
3BE9:1B5E 53 push bx
3BE9:1B5F BA 0002 mov dx,2
3BE9:1B62 loc_288: ; xref 3BE9:1B6F
3BE9:1B62 E8 00D7 call sub_159 ; (1C3C)
3BE9:1B65 3D 0000 cmp ax,0
3BE9:1B68 74 0E je loc_289 ; Jump if equal
3BE9:1B6A 42 inc dx
3BE9:1B6B 3B 16 0B6A cmp dx,word ptr ds:[0B6Ah] ; (3BE9:0B6A=4307h)
3BE9:1B6F 72 F1 jb loc_288 ; Jump if below
3BE9:1B71 B8 0000 mov ax,0
3BE9:1B74 5B pop bx
3BE9:1B75 5A pop dx
3BE9:1B76 F9 stc ; Set carry flag
3BE9:1B77 C3 retn
3BE9:1B78 loc_289: ; xref 3BE9:1B68
3BE9:1B78 8B C2 mov ax,dx
3BE9:1B7A 5B pop bx
3BE9:1B7B 5A pop dx
3BE9:1B7C F8 clc ; Clear carry flag
3BE9:1B7D C3 retn
sub_150 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:19A0
;==========================================================================
3BE9:1B7E sub_151 proc near
3BE9:1B7E 57 push di
3BE9:1B7F 8B FA mov di,dx
3BE9:1B81 83 C7 0C add di,0Ch
3BE9:1B84 B9 0019 mov cx,19h
3BE9:1B87 E8 02D1 call sub_172 ; (1E5B)
3BE9:1B8A 5F pop di
3BE9:1B8B C3 retn
sub_151 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:04BA
;==========================================================================
3BE9:1B8C sub_152 proc near
3BE9:1B8C E8 FB63 call sub_123 ; (16F2)
3BE9:1B8F C6 06 08CA 00 mov byte ptr ds:[8CAh],0 ; (3BE9:08CA=36h)
3BE9:1B94 E8 0032 call sub_154 ; (1BC9)
3BE9:1B97 C3 retn
sub_152 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1029, 19F7, 1A2F, 1A6F, 1D53, 1D63
;==========================================================================
3BE9:1B98 sub_153 proc near
3BE9:1B98 E8 FA2E call sub_117 ; (15C9)
3BE9:1B9B 80 E9 01 sub cl,1
3BE9:1B9E 72 27 jc loc_291 ; Jump if carry Set
3BE9:1BA0 3A 0E 1D9A cmp cl,byte ptr ds:[1D9Ah] ; (3BE9:1D9A=6Ch)
3BE9:1BA4 72 02 jb loc_290 ; Jump if below
3BE9:1BA6 F9 stc ; Set carry flag
3BE9:1BA7 C3 retn
3BE9:1BA8 loc_290: ; xref 3BE9:1BA4
3BE9:1BA8 E8 001E call sub_154 ; (1BC9)
3BE9:1BAB 57 push di
3BE9:1BAC 53 push bx
3BE9:1BAD 51 push cx
3BE9:1BAE 50 push ax
3BE9:1BAF B0 0A mov al,0Ah
3BE9:1BB1 F6 E1 mul cl ; ax = reg * al
3BE9:1BB3 B4 00 mov ah,0
3BE9:1BB5 ,BB 1D9B mov bx,1D9Bh ; (3BE9:1D9B=0Bh)
3BE9:1BB8 03 D8 add bx,ax
3BE9:1BBA 58 pop ax
3BE9:1BBB B9 000A mov cx,0Ah
3BE9:1BBE ,BF 0B62 mov di,0B62h ; (3BE9:0B62=2Eh)
3BE9:1BC1 E8 02A5 call sub_173 ; (1E69)
3BE9:1BC4 59 pop cx
3BE9:1BC5 5B pop bx
3BE9:1BC6 5F pop di
3BE9:1BC7 loc_291: ; xref 3BE9:1B9E
3BE9:1BC7 F8 clc ; Clear carry flag
3BE9:1BC8 C3 retn
sub_153 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1B94, 1BA8
;==========================================================================
3BE9:1BC9 sub_154 proc near
3BE9:1BC9 50 push ax
3BE9:1BCA 53 push bx
3BE9:1BCB B0 00 mov al,0
3BE9:1BCD ,BB 0B70 mov bx,0B70h ; (3BE9:0B70=0F8h)
3BE9:1BD0 loc_292: ; xref 3BE9:1BD7
3BE9:1BD0 88 07 mov [bx],al
3BE9:1BD2 43 inc bx
3BE9:1BD3 81 FB 0B75 cmp bx,0B75h
3BE9:1BD7 75 F7 jne loc_292 ; Jump if not equal
3BE9:1BD9 5B pop bx
3BE9:1BDA 58 pop ax
3BE9:1BDB C3 retn
sub_154 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1AB2, 1B0C
;==========================================================================
3BE9:1BDC sub_155 proc near
3BE9:1BDC A0 0B67 mov al,byte ptr ds:[0B67h] ; (3BE9:0B67=3)
3BE9:1BDF 2C 01 sub al,1
3BE9:1BE1 B4 00 mov ah,0
3BE9:1BE3 23 C2 and ax,dx
3BE9:1BE5 50 push ax
3BE9:1BE6 A0 0B67 mov al,byte ptr ds:[0B67h] ; (3BE9:0B67=3)
3BE9:1BE9 D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1BEB 72 06 jc loc_294 ; Jump if carry Set
3BE9:1BED loc_293: ; xref 3BE9:1BF1
3BE9:1BED D1 EA shr dx,1 ; Shift w/zeros fill
3BE9:1BEF D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1BF1 73 FA jnc loc_293 ; Jump if carry=0
3BE9:1BF3 loc_294: ; xref 3BE9:1BEB
3BE9:1BF3 58 pop ax
3BE9:1BF4 F8 clc ; Clear carry flag
3BE9:1BF5 C3 retn
sub_155 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1ABA
;==========================================================================
3BE9:1BF6 sub_156 proc near
3BE9:1BF6 83 EA 02 sub dx,2
3BE9:1BF9 50 push ax
3BE9:1BFA A0 0B67 mov al,byte ptr ds:[0B67h] ; (3BE9:0B67=3)
3BE9:1BFD D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1BFF 72 06 jc loc_296 ; Jump if carry Set
3BE9:1C01 loc_295: ; xref 3BE9:1C05
3BE9:1C01 D1 E2 shl dx,1 ; Shift w/zeros fill
3BE9:1C03 D0 E8 shr al,1 ; Shift w/zeros fill
3BE9:1C05 73 FA jnc loc_295 ; Jump if carry=0
3BE9:1C07 loc_296: ; xref 3BE9:1BFF
3BE9:1C07 58 pop ax
3BE9:1C08 03 16 0B68 add dx,word ptr ds:[0B68h] ; (3BE9:0B68=8A00h)
3BE9:1C0C C3 retn
sub_156 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1C49, 1C73
;==========================================================================
3BE9:1C0D sub_157 proc near
3BE9:1C0D 8B DA mov bx,dx
3BE9:1C0F D1 E3 shl bx,1 ; Shift w/zeros fill
3BE9:1C11 03 DA add bx,dx
3BE9:1C13 C3 retn
sub_157 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1AB5, 1B0F
;==========================================================================
3BE9:1C14 sub_158 proc near
3BE9:1C14 51 push cx
3BE9:1C15 53 push bx
3BE9:1C16 50 push ax
3BE9:1C17 8B CA mov cx,dx
3BE9:1C19 8B 57 18 mov dx,[bx+18h]
3BE9:1C1C 83 FA 00 cmp dx,0
3BE9:1C1F 74 16 je loc_299 ; Jump if equal
3BE9:1C21 83 F9 00 cmp cx,0
3BE9:1C24 74 0C je loc_298 ; Jump if equal
3BE9:1C26 locloop_297: ; xref 3BE9:1C30
3BE9:1C26 E8 0013 call sub_159 ; (1C3C)
3BE9:1C29 3D 0FF8 cmp ax,0FF8h
3BE9:1C2C 73 09 jae loc_299 ; Jump if above or =
3BE9:1C2E 8B D0 mov dx,ax
3BE9:1C30 E2 F4 loop locloop_297 ; Loop if cx > 0
3BE9:1C32 loc_298: ; xref 3BE9:1C24
3BE9:1C32 58 pop ax
3BE9:1C33 5B pop bx
3BE9:1C34 59 pop cx
3BE9:1C35 F8 clc ; Clear carry flag
3BE9:1C36 C3 retn
3BE9:1C37 loc_299: ; xref 3BE9:1C1F, 1C2C
3BE9:1C37 58 pop ax
3BE9:1C38 5B pop bx
3BE9:1C39 59 pop cx
3BE9:1C3A F9 stc ; Set carry flag
3BE9:1C3B C3 retn
sub_158 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1B17, 1B4D, 1B62, 1C26
;==========================================================================
3BE9:1C3C sub_159 proc near
3BE9:1C3C 80 3E 0B74 01 cmp byte ptr ds:[0B74h],1 ; (3BE9:0B74=1)
3BE9:1C41 74 03 je loc_300 ; Jump if equal
3BE9:1C43 E8 008D call sub_162 ; (1CD3)
3BE9:1C46 loc_300: ; xref 3BE9:1C41
3BE9:1C46 53 push bx
3BE9:1C47 51 push cx
3BE9:1C48 52 push dx
3BE9:1C49 E8 FFC1 call sub_157 ; (1C0D)
3BE9:1C4C 8B CB mov cx,bx
3BE9:1C4E D1 EB shr bx,1 ; Shift w/zeros fill
3BE9:1C50 ,81 C3 0B83 add bx,0B83h ; (3BE9:0B83=83h)
3BE9:1C54 8B 07 mov ax,[bx]
3BE9:1C56 80 E1 01 and cl,1
3BE9:1C59 D0 E1 shl cl,1 ; Shift w/zeros fill
3BE9:1C5B D0 E1 shl cl,1 ; Shift w/zeros fill
3BE9:1C5D D3 E8 shr ax,cl ; Shift w/zeros fill
3BE9:1C5F 25 0FFF and ax,0FFFh
3BE9:1C62 5A pop dx
3BE9:1C63 59 pop cx
3BE9:1C64 5B pop bx
3BE9:1C65 C3 retn
sub_159 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1ACF, 1AD9, 1B1E, 1B54
;==========================================================================
3BE9:1C66 sub_160 proc near
3BE9:1C66 80 3E 0B74 01 cmp byte ptr ds:[0B74h],1 ; (3BE9:0B74=1)
3BE9:1C6B 74 02 je loc_301 ; Jump if equal
3BE9:1C6D F9 stc ; Set carry flag
3BE9:1C6E C3 retn
3BE9:1C6F loc_301: ; xref 3BE9:1C6B
3BE9:1C6F 52 push dx
3BE9:1C70 51 push cx
3BE9:1C71 53 push bx
3BE9:1C72 50 push ax
3BE9:1C73 E8 FF97 call sub_157 ; (1C0D)
3BE9:1C76 58 pop ax
3BE9:1C77 50 push ax
3BE9:1C78 25 0FFF and ax,0FFFh
3BE9:1C7B D1 EB shr bx,1 ; Shift w/zeros fill
3BE9:1C7D 73 15 jnc loc_302 ; Jump if carry=0
3BE9:1C7F ,81 C3 0B83 add bx,0B83h ; (3BE9:0B83=83h)
3BE9:1C83 8B 0F mov cx,[bx]
3BE9:1C85 D1 E0 shl ax,1 ; Shift w/zeros fill
3BE9:1C87 D1 E0 shl ax,1 ; Shift w/zeros fill
3BE9:1C89 D1 E0 shl ax,1 ; Shift w/zeros fill
3BE9:1C8B D1 E0 shl ax,1 ; Shift w/zeros fill
3BE9:1C8D 81 E1 000F ;* and cx,0Fh
3BE9:1C8D db 81h,0E1h, 0Fh, 00h ; Fixup - byte match
3BE9:1C91 E9 000A jmpn loc_303 ; (1C9E)
3BE9:1C94 loc_302: ; xref 3BE9:1C7D
3BE9:1C94 ,81 C3 0B83 add bx,0B83h ; (3BE9:0B83=83h)
3BE9:1C98 8B 0F mov cx,[bx]
3BE9:1C9A 81 E1 F000 and cx,0F000h
3BE9:1C9E loc_303: ; xref 3BE9:1C91
3BE9:1C9E 0B C1 or ax,cx
3BE9:1CA0 89 07 mov [bx],ax
3BE9:1CA2 58 pop ax
3BE9:1CA3 5B pop bx
3BE9:1CA4 59 pop cx
3BE9:1CA5 5A pop dx
3BE9:1CA6 F8 clc ; Clear carry flag
3BE9:1CA7 C3 retn
sub_160 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1B26
;==========================================================================
3BE9:1CA8 sub_161 proc near
3BE9:1CA8 52 push dx
3BE9:1CA9 8A 0E 0B65 mov cl,byte ptr ds:[0B65h] ; (3BE9:0B65=0FAh)
3BE9:1CAD 8B 16 0B62 mov dx,word ptr ds:[0B62h] ; (3BE9:0B62=0E82Eh)
3BE9:1CB1 loc_304: ; xref 3BE9:1CCE
3BE9:1CB1 51 push cx
3BE9:1CB2 8A 0E 0B64 mov cl,byte ptr ds:[0B64h] ; (3BE9:0B64=3)
3BE9:1CB6 BB 0B83 mov bx,0B83h
3BE9:1CB9 loc_305: ; xref 3BE9:1CC9
3BE9:1CB9 51 push cx
3BE9:1CBA 53 push bx
3BE9:1CBB E8 FA13 call sub_122 ; (16D1)
3BE9:1CBE 5B pop bx
3BE9:1CBF 59 pop cx
3BE9:1CC0 83 C2 01 add dx,1
3BE9:1CC3 81 C3 0080 add bx,80h
3BE9:1CC7 FE C9 dec cl
3BE9:1CC9 75 EE jnz loc_305 ; Jump if not zero
3BE9:1CCB 59 pop cx
3BE9:1CCC FE C9 dec cl
3BE9:1CCE 75 E1 jnz loc_304 ; Jump if not zero
3BE9:1CD0 5A pop dx
3BE9:1CD1 F8 clc ; Clear carry flag
3BE9:1CD2 C3 retn
sub_161 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1A03, 1C43
;==========================================================================
3BE9:1CD3 sub_162 proc near
3BE9:1CD3 52 push dx
3BE9:1CD4 51 push cx
3BE9:1CD5 53 push bx
3BE9:1CD6 50 push ax
3BE9:1CD7 8A 0E 0B64 mov cl,byte ptr ds:[0B64h] ; (3BE9:0B64=3)
3BE9:1CDB BB 0B83 mov bx,0B83h
3BE9:1CDE 8B 16 0B62 mov dx,word ptr ds:[0B62h] ; (3BE9:0B62=0E82Eh)
3BE9:1CE2 loc_306: ; xref 3BE9:1CF2
3BE9:1CE2 51 push cx
3BE9:1CE3 53 push bx
3BE9:1CE4 E8 F9D2 call sub_121 ; (16B9)
3BE9:1CE7 5B pop bx
3BE9:1CE8 59 pop cx
3BE9:1CE9 83 C2 01 add dx,1
3BE9:1CEC 81 C3 0080 add bx,80h
3BE9:1CF0 FE C9 dec cl
3BE9:1CF2 75 EE jnz loc_306 ; Jump if not zero
3BE9:1CF4 C6 06 0B74 01 mov byte ptr ds:[0B74h],1 ; (3BE9:0B74=1)
3BE9:1CF9 58 pop ax
3BE9:1CFA 5B pop bx
3BE9:1CFB 59 pop cx
3BE9:1CFC 5A pop dx
3BE9:1CFD F8 clc ; Clear carry flag
3BE9:1CFE C3 retn
sub_162 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1D68, 1DB3
;==========================================================================
3BE9:1CFF sub_163 proc near
3BE9:1CFF 8B 16 0B62 mov dx,word ptr ds:[0B62h] ; (3BE9:0B62=0E82Eh)
3BE9:1D03 50 push ax
3BE9:1D04 A0 0B65 mov al,byte ptr ds:[0B65h] ; (3BE9:0B65=0FAh)
3BE9:1D07 loc_307: ; xref 3BE9:1D10
3BE9:1D07 02 16 0B64 add dl,byte ptr ds:[0B64h] ; (3BE9:0B64=3)
3BE9:1D0B 80 D6 00 adc dh,0
3BE9:1D0E FE C8 dec al
3BE9:1D10 75 F5 jnz loc_307 ; Jump if not zero
3BE9:1D12 58 pop ax
3BE9:1D13 E9 0012 jmpn loc_308 ; (1D28)
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:1D84, 1DBB
3BE9:1D16 sub_164:
3BE9:1D16 8B 1E 0B70 mov bx,word ptr ds:[0B70h] ; (3BE9:0B70=0C3F8h)
3BE9:1D1A 83 C3 20 add bx,20h
3BE9:1D1D 81 FB 1D97 cmp bx,1D97h
3BE9:1D21 72 18 jb loc_309 ; Jump if below
3BE9:1D23 8B 16 0B72 mov dx,word ptr ds:[0B72h] ; (3BE9:0B72=478Ah)
3BE9:1D27 42 inc dx
3BE9:1D28 loc_308: ; xref 3BE9:1D13
3BE9:1D28 3B 16 0B68 cmp dx,word ptr ds:[0B68h] ; (3BE9:0B68=8A00h)
3BE9:1D2C 73 13 jae loc_310 ; Jump if above or =
3BE9:1D2E 89 16 0B72 mov word ptr ds:[0B72h],dx ; (3BE9:0B72=478Ah)
3BE9:1D32 BB 1D17 mov bx,1D17h
3BE9:1D35 E8 F981 call sub_121 ; (16B9)
3BE9:1D38 BB 1D17 mov bx,1D17h
3BE9:1D3B loc_309: ; xref 3BE9:1D21
3BE9:1D3B 89 1E 0B70 mov word ptr ds:[0B70h],bx ; (3BE9:0B70=0C3F8h)
3BE9:1D3F F8 clc ; Clear carry flag
3BE9:1D40 C3 retn
3BE9:1D41 loc_310: ; xref 3BE9:1D2C
3BE9:1D41 F9 stc ; Set carry flag
3BE9:1D42 C3 retn
sub_163 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1DB6
;==========================================================================
3BE9:1D43 sub_165 proc near
3BE9:1D43 8A 07 mov al,[bx]
3BE9:1D45 2C 21 sub al,21h ; '!'
3BE9:1D47 3C 5E cmp al,5Eh ; '^'
3BE9:1D49 F5 cmc ; Complement carry
3BE9:1D4A C3 retn
sub_165 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1974, 19D0
;==========================================================================
3BE9:1D4B sub_166 proc near
3BE9:1D4B 89 16 0B6C mov word ptr ds:[0B6Ch],dx ; (3BE9:0B6C=0FAE8h)
3BE9:1D4F 8B DA mov bx,dx
3BE9:1D51 8A 0F mov cl,[bx]
3BE9:1D53 E8 FE42 call sub_153 ; (1B98)
3BE9:1D56 72 33 jc loc_313 ; Jump if carry Set
3BE9:1D58 E9 0029 jmpn loc_312 ; (1D84)
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:194F, 1964, 1985, 19A3, 19CA
3BE9:1D5B sub_167:
3BE9:1D5B 89 16 0B6C mov word ptr ds:[0B6Ch],dx ; (3BE9:0B6C=0FAE8h)
3BE9:1D5F 8B DA mov bx,dx
3BE9:1D61 8A 0F mov cl,[bx]
3BE9:1D63 E8 FE32 call sub_153 ; (1B98)
3BE9:1D66 72 23 jc loc_313 ; Jump if carry Set
3BE9:1D68 E8 FF94 call sub_163 ; (1CFF)
3BE9:1D6B loc_311: ; xref 3BE9:1D87
3BE9:1D6B 80 3F 00 cmp byte ptr [bx],0
3BE9:1D6E 74 1B je loc_313 ; Jump if equal
3BE9:1D70 80 3F 80 cmp byte ptr [bx],80h
3BE9:1D73 73 0F jae loc_312 ; Jump if above or =
3BE9:1D75 8B 3E 0B6C mov di,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1D79 83 C7 01 add di,1
3BE9:1D7C B9 000B mov cx,0Bh
3BE9:1D7F E8 001E call sub_168 ; (1DA0)
3BE9:1D82 74 0D jz loc_314 ; Jump if zero
3BE9:1D84 loc_312: ; xref 3BE9:1D58, 1D73
3BE9:1D84 E8 FF8F call sub_164 ; (1D16)
3BE9:1D87 73 E2 jnc loc_311 ; Jump if carry=0
3BE9:1D89 B0 02 mov al,2
3BE9:1D8B loc_313: ; xref 3BE9:1D56, 1D66, 1D6E
3BE9:1D8B 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1D8F F9 stc ; Set carry flag
3BE9:1D90 C3 retn
3BE9:1D91 loc_314: ; xref 3BE9:1D82
3BE9:1D91 8B 1E 0B70 mov bx,word ptr ds:[0B70h] ; (3BE9:0B70=0C3F8h)
3BE9:1D95 8A 67 0B mov ah,[bx+0Bh]
3BE9:1D98 8B 16 0B6C mov dx,word ptr ds:[0B6Ch] ; (3BE9:0B6C=0FAE8h)
3BE9:1D9C B0 00 mov al,0
3BE9:1D9E F8 clc ; Clear carry flag
3BE9:1D9F C3 retn
sub_166 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1D7F
;==========================================================================
3BE9:1DA0 sub_168 proc near
3BE9:1DA0 locloop_315: ; xref 3BE9:1DAC
3BE9:1DA0 8A 05 mov al,[di]
3BE9:1DA2 47 inc di
3BE9:1DA3 3C 3F cmp al,3Fh ; '?'
3BE9:1DA5 74 04 je loc_316 ; Jump if equal
3BE9:1DA7 3A 07 cmp al,[bx]
3BE9:1DA9 75 06 jne loc_ret_317 ; Jump if not equal
3BE9:1DAB loc_316: ; xref 3BE9:1DA5
3BE9:1DAB 43 inc bx
3BE9:1DAC E2 F2 loop locloop_315 ; Loop if cx > 0
3BE9:1DAE 83 F9 00 cmp cx,0
3BE9:1DB1 loc_ret_317: ; xref 3BE9:1DA9
3BE9:1DB1 C3 retn
sub_168 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:19B3
;==========================================================================
3BE9:1DB2 sub_169 proc near
3BE9:1DB2 52 push dx
3BE9:1DB3 E8 FF49 call sub_163 ; (1CFF)
3BE9:1DB6 loc_318: ; xref 3BE9:1DBE
3BE9:1DB6 E8 FF8A call sub_165 ; (1D43)
3BE9:1DB9 72 08 jc loc_319 ; Jump if carry Set
3BE9:1DBB E8 FF58 call sub_164 ; (1D16)
3BE9:1DBE 73 F6 jnc loc_318 ; Jump if carry=0
3BE9:1DC0 5A pop dx
3BE9:1DC1 F9 stc ; Set carry flag
3BE9:1DC2 C3 retn
3BE9:1DC3 loc_319: ; xref 3BE9:1DB9
3BE9:1DC3 5A pop dx
3BE9:1DC4 F8 clc ; Clear carry flag
3BE9:1DC5 C3 retn
sub_169 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1959, 197E, 19AD
;==========================================================================
3BE9:1DC6 sub_170 proc near
3BE9:1DC6 8B FA mov di,dx
3BE9:1DC8 B9 0025 mov cx,25h
3BE9:1DCB E8 008D call sub_172 ; (1E5B)
3BE9:1DCE A0 08CA mov al,byte ptr ds:[8CAh] ; (3BE9:08CA=36h)
3BE9:1DD1 88 05 mov [di],al
3BE9:1DD3 57 push di
3BE9:1DD4 83 C7 01 add di,1
3BE9:1DD7 B9 000B mov cx,0Bh
3BE9:1DDA 8B 1E 0B70 mov bx,word ptr ds:[0B70h] ; (3BE9:0B70=0C3F8h)
3BE9:1DDE E8 0088 call sub_173 ; (1E69)
3BE9:1DE1 5F pop di
3BE9:1DE2 52 push dx
3BE9:1DE3 8B 47 1C mov ax,[bx+1Ch]
3BE9:1DE6 8B 57 1E mov dx,[bx+1Eh]
3BE9:1DE9 B9 0080 mov cx,80h
3BE9:1DEC F7 F1 div cx ; ax,dx rem=dx:ax/reg
3BE9:1DEE 83 FA 00 cmp dx,0
3BE9:1DF1 74 01 je loc_320 ; Jump if equal
3BE9:1DF3 40 inc ax
3BE9:1DF4 loc_320: ; xref 3BE9:1DF1
3BE9:1DF4 5A pop dx
3BE9:1DF5 89 45 1D mov [di+1Dh],ax
3BE9:1DF8 8B 47 18 mov ax,[bx+18h]
3BE9:1DFB 89 45 14 mov [di+14h],ax
3BE9:1DFE 8B 47 16 mov ax,[bx+16h]
3BE9:1E01 89 45 16 mov [di+16h],ax
3BE9:1E04 8B 47 1A mov ax,[bx+1Ah]
3BE9:1E07 89 45 18 mov [di+18h],ax
3BE9:1E0A B0 00 mov al,0
3BE9:1E0C F8 clc ; Clear carry flag
3BE9:1E0D C3 retn
sub_170 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:19B8, 1B3F
;==========================================================================
3BE9:1E0E sub_171 proc near
3BE9:1E0E 8B 3E 0B70 mov di,word ptr ds:[0B70h] ; (3BE9:0B70=0C3F8h)
3BE9:1E12 B9 0020 mov cx,20h
3BE9:1E15 E8 0043 call sub_172 ; (1E5B)
3BE9:1E18 8B DA mov bx,dx
3BE9:1E1A 83 C3 01 add bx,1
3BE9:1E1D B9 000B mov cx,0Bh
3BE9:1E20 E8 0046 call sub_173 ; (1E69)
3BE9:1E23 8B DA mov bx,dx
3BE9:1E25 52 push dx
3BE9:1E26 8B 47 0C mov ax,[bx+0Ch]
3BE9:1E29 BA 0000 mov dx,0
3BE9:1E2C B9 0080 mov cx,80h
3BE9:1E2F F7 E1 mul cx ; dx:ax = reg * ax
3BE9:1E31 89 45 1C mov [di+1Ch],ax
3BE9:1E34 89 55 1E mov [di+1Eh],dx
3BE9:1E37 5A pop dx
3BE9:1E38 8B 47 14 mov ax,[bx+14h]
3BE9:1E3B 89 45 18 mov [di+18h],ax
3BE9:1E3E 8B 47 16 mov ax,[bx+16h]
3BE9:1E41 89 45 16 mov [di+16h],ax
3BE9:1E44 8B 47 18 mov ax,[bx+18h]
3BE9:1E47 89 45 1A mov [di+1Ah],ax
3BE9:1E4A 80 4D 0B 20 or byte ptr [di+0Bh],20h ; ' '
3BE9:1E4E 52 push dx
3BE9:1E4F 8B 16 0B72 mov dx,word ptr ds:[0B72h] ; (3BE9:0B72=478Ah)
3BE9:1E53 BB 1D17 mov bx,1D17h
3BE9:1E56 E8 F878 call sub_122 ; (16D1)
3BE9:1E59 5A pop dx
3BE9:1E5A C3 retn
sub_171 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1B36, 1B87, 1DCB, 1E15
;==========================================================================
3BE9:1E5B sub_172 proc near
3BE9:1E5B 57 push di
3BE9:1E5C 51 push cx
3BE9:1E5D 50 push ax
3BE9:1E5E B0 00 mov al,0
3BE9:1E60 locloop_321: ; xref 3BE9:1E63
3BE9:1E60 88 05 mov [di],al
3BE9:1E62 47 inc di
3BE9:1E63 E2 FB loop locloop_321 ; Loop if cx > 0
3BE9:1E65 58 pop ax
3BE9:1E66 59 pop cx
3BE9:1E67 5F pop di
3BE9:1E68 C3 retn
sub_172 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1121, 1216, 14F6, 194C, 1971, 1BC1, 1DDE
; 1E20
;==========================================================================
3BE9:1E69 sub_173 proc near
3BE9:1E69 57 push di
3BE9:1E6A 53 push bx
3BE9:1E6B locloop_322: ; xref 3BE9:1E71
3BE9:1E6B 8A 07 mov al,[bx]
3BE9:1E6D 88 05 mov [di],al
3BE9:1E6F 43 inc bx
3BE9:1E70 47 inc di
3BE9:1E71 E2 F8 loop locloop_322 ; Loop if cx > 0
3BE9:1E73 5B pop bx
3BE9:1E74 5F pop di
3BE9:1E75 C3 retn
sub_173 endp
3BE9:1E76 57 53 db 57h, 53h
3BE9:1E78 loc_323: ; xref 3BE9:1E81
3BE9:1E78 8A 05 mov al,[di]
3BE9:1E7A 3A 07 cmp al,[bx]
3BE9:1E7C 75 05 jne loc_324 ; Jump if not equal
3BE9:1E7E 47 inc di
3BE9:1E7F 43 inc bx
3BE9:1E80 49 dec cx
3BE9:1E81 75 F5 jnz loc_323 ; Jump if not zero
3BE9:1E83 loc_324: ; xref 3BE9:1E7C
3BE9:1E83 5B pop bx
3BE9:1E84 5F pop di
3BE9:1E85 C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:13DC
;==========================================================================
3BE9:1E86 sub_174 proc near
3BE9:1E86 8B FA mov di,dx
3BE9:1E88 80 3D 00 cmp byte ptr [di],0
3BE9:1E8B 75 07 jne loc_325 ; Jump if not equal
3BE9:1E8D E8 0106 call sub_180 ; (1F96)
3BE9:1E90 8B FA mov di,dx
3BE9:1E92 88 05 mov [di],al
3BE9:1E94 loc_325: ; xref 3BE9:1E8B
3BE9:1E94 53 push bx
3BE9:1E95 8B DA mov bx,dx
3BE9:1E97 B9 000C mov cx,0Ch
3BE9:1E9A ,BF 1DF6 mov di,1DF6h ; (3BE9:1DF6=45h)
3BE9:1E9D E8 013C call sub_182 ; (1FDC)
3BE9:1EA0 5B pop bx
3BE9:1EA1 E8 0042 call sub_175 ; (1EE6)
3BE9:1EA4 72 20 jc loc_327 ; Jump if carry Set
3BE9:1EA6 loc_326: ; xref 3BE9:1F36
3BE9:1EA6 ,8B FA mov di,dx
3BE9:1EA8 83 C7 01 add di,1
3BE9:1EAB 83 C3 01 add bx,1
3BE9:1EAE B9 000B mov cx,0Bh
3BE9:1EB1 E8 0128 call sub_182 ; (1FDC)
3BE9:1EB4 52 push dx
3BE9:1EB5 B1 0F mov cl,0Fh
3BE9:1EB7 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1EB9 5A pop dx
3BE9:1EBA 3C FF cmp al,0FFh
3BE9:1EBC 74 08 je loc_327 ; Jump if equal
3BE9:1EBE 8B FA mov di,dx
3BE9:1EC0 C6 45 20 00 mov byte ptr [di+20h],0
3BE9:1EC4 F8 clc ; Clear carry flag
3BE9:1EC5 C3 retn
3BE9:1EC6 loc_327: ; xref 3BE9:1EA4, 1EBC
3BE9:1EC6 52 push dx
3BE9:1EC7 E8 0161 call sub_187 ; (202B)
3BE9:1ECA BA 4453 mov dx,4453h
3BE9:1ECD E8 E685 call sub_17 ; (0555)
3BE9:1ED0 5A pop dx
3BE9:1ED1 F9 stc ; Set carry flag
3BE9:1ED2 C3 retn
sub_174 endp
;* No entry point to code
3BE9:1ED3 57 push di
3BE9:1ED4 51 push cx
3BE9:1ED5 8B FA mov di,dx
3BE9:1ED7 83 C7 01 add di,1
3BE9:1EDA B9 000B mov cx,0Bh
3BE9:1EDD locloop_328: ; xref 3BE9:1EE1
3BE9:1EDD 80 25 7F and byte ptr [di],7Fh
3BE9:1EE0 47 inc di
3BE9:1EE1 E2 FA loop locloop_328 ; Loop if cx > 0
3BE9:1EE3 59 pop cx
3BE9:1EE4 5F pop di
3BE9:1EE5 C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1EA1, 1F21
;==========================================================================
3BE9:1EE6 sub_175 proc near
3BE9:1EE6 BB 1E05 mov bx,1E05h
3BE9:1EE9 E8 012E call sub_186 ; (201A)
3BE9:1EEC E8 00B0 call sub_181 ; (1F9F)
3BE9:1EEF 52 push dx
3BE9:1EF0 B1 11 mov cl,11h
3BE9:1EF2 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1EF4 5A pop dx
3BE9:1EF5 3C F0 cmp al,0F0h
3BE9:1EF7 72 02 jb loc_329 ; Jump if below
3BE9:1EF9 F9 stc ; Set carry flag
3BE9:1EFA C3 retn
3BE9:1EFB loc_329: ; xref 3BE9:1EF7, 1F1D
3BE9:1EFB B1 20 mov cl,20h ; ' '
3BE9:1EFD F6 E1 mul cl ; ax = reg * al
3BE9:1EFF ,BB 1E05 mov bx,1E05h ; (3BE9:1E05=47h)
3BE9:1F02 03 D8 add bx,ax
3BE9:1F04 F6 47 0A 80 test byte ptr [bx+0Ah],80h
3BE9:1F08 75 02 jnz loc_330 ; Jump if not zero
3BE9:1F0A F8 clc ; Clear carry flag
3BE9:1F0B C3 retn
;==== External Entry into Subroutine ======================================
;
; Called from: 3BE9:1F31
3BE9:1F0C sub_176:
3BE9:1F0C loc_330: ; xref 3BE9:1F08
3BE9:1F0C BB 1E05 mov bx,1E05h
3BE9:1F0F E8 0108 call sub_186 ; (201A)
3BE9:1F12 E8 008A call sub_181 ; (1F9F)
3BE9:1F15 52 push dx
3BE9:1F16 B1 12 mov cl,12h
3BE9:1F18 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1F1A 5A pop dx
3BE9:1F1B 3C F0 cmp al,0F0h
3BE9:1F1D 72 DC jb loc_329 ; Jump if below
3BE9:1F1F F9 stc ; Set carry flag
3BE9:1F20 C3 retn
sub_175 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1442
;==========================================================================
3BE9:1F21 sub_177 proc near
3BE9:1F21 E8 FFC2 call sub_175 ; (1EE6)
3BE9:1F24 72 13 jc loc_331 ; Jump if carry Set
3BE9:1F26 8B FA mov di,dx
3BE9:1F28 ,BB 1DF6 mov bx,1DF6h ; (3BE9:1DF6=45h)
3BE9:1F2B B9 000C mov cx,0Ch
3BE9:1F2E E8 00AB call sub_182 ; (1FDC)
3BE9:1F31 E8 FFD8 call sub_176 ; (1F0C)
3BE9:1F34 72 03 jc loc_331 ; Jump if carry Set
3BE9:1F36 E9 FF6D jmp loc_326 ; (1EA6)
3BE9:1F39 loc_331: ; xref 3BE9:1F24, 1F34
3BE9:1F39 B0 FF mov al,0FFh
3BE9:1F3B F9 stc ; Set carry flag
3BE9:1F3C C3 retn
sub_177 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:112D
;==========================================================================
3BE9:1F3D sub_178 proc near
3BE9:1F3D 8B FA mov di,dx
3BE9:1F3F 80 3D 00 cmp byte ptr [di],0
3BE9:1F42 75 0C jne loc_332 ; Jump if not equal
3BE9:1F44 52 push dx
3BE9:1F45 B1 19 mov cl,19h
3BE9:1F47 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1F49 5A pop dx
3BE9:1F4A 8B FA mov di,dx
3BE9:1F4C FE C0 inc al
3BE9:1F4E 88 05 mov [di],al
3BE9:1F50 loc_332: ; xref 3BE9:1F42
3BE9:1F50 E8 004C call sub_181 ; (1F9F)
3BE9:1F53 52 push dx
3BE9:1F54 B1 13 mov cl,13h
3BE9:1F56 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1F58 5A pop dx
3BE9:1F59 E8 0043 call sub_181 ; (1F9F)
3BE9:1F5C 52 push dx
3BE9:1F5D B1 16 mov cl,16h
3BE9:1F5F CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1F61 5A pop dx
3BE9:1F62 3C FF cmp al,0FFh
3BE9:1F64 74 08 je loc_333 ; Jump if equal
3BE9:1F66 8B FA mov di,dx
3BE9:1F68 C6 45 20 00 mov byte ptr [di+20h],0
3BE9:1F6C F8 clc ; Clear carry flag
3BE9:1F6D C3 retn
3BE9:1F6E loc_333: ; xref 3BE9:1F64
3BE9:1F6E 52 push dx
3BE9:1F6F BA 4466 mov dx,4466h
3BE9:1F72 E8 E5E0 call sub_17 ; (0555)
3BE9:1F75 5A pop dx
3BE9:1F76 52 push dx
3BE9:1F77 E8 00B1 call sub_187 ; (202B)
3BE9:1F7A E8 E5C3 call sub_15 ; (0540)
3BE9:1F7D 5A pop dx
3BE9:1F7E F9 stc ; Set carry flag
3BE9:1F7F C3 retn
sub_178 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:114E, 1424
;==========================================================================
3BE9:1F80 sub_179 proc near
3BE9:1F80 52 push dx
3BE9:1F81 B1 10 mov cl,10h
3BE9:1F83 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1F85 5A pop dx
3BE9:1F86 3C FF cmp al,0FFh
3BE9:1F88 74 02 je loc_334 ; Jump if equal
3BE9:1F8A F8 clc ; Clear carry flag
3BE9:1F8B C3 retn
3BE9:1F8C loc_334: ; xref 3BE9:1F88
3BE9:1F8C 52 push dx
3BE9:1F8D BA 4481 mov dx,4481h
3BE9:1F90 E8 E5C2 call sub_17 ; (0555)
3BE9:1F93 5A pop dx
3BE9:1F94 F9 stc ; Set carry flag
3BE9:1F95 C3 retn
sub_179 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0F22, 117B, 145A, 1E8D
;==========================================================================
3BE9:1F96 sub_180 proc near
3BE9:1F96 52 push dx
3BE9:1F97 B1 19 mov cl,19h
3BE9:1F99 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:1F9B 5A pop dx
3BE9:1F9C FE C0 inc al
3BE9:1F9E C3 retn
sub_180 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1EEC, 1F12, 1F50, 1F59
;==========================================================================
3BE9:1F9F sub_181 proc near
3BE9:1F9F 57 push di
3BE9:1FA0 8B FA mov di,dx
3BE9:1FA2 83 C7 0C add di,0Ch
3BE9:1FA5 B0 00 mov al,0
3BE9:1FA7 B9 0019 mov cx,19h
3BE9:1FAA locloop_335: ; xref 3BE9:1FAD
3BE9:1FAA 88 05 mov [di],al
3BE9:1FAC 47 inc di
3BE9:1FAD E2 FB loop locloop_335 ; Loop if cx > 0
3BE9:1FAF 5F pop di
3BE9:1FB0 C3 retn
sub_181 endp
;* No entry point to code
3BE9:1FB1 8B FA mov di,dx
3BE9:1FB3 8A 07 mov al,[bx]
3BE9:1FB5 43 inc bx
3BE9:1FB6 3C 00 cmp al,0
3BE9:1FB8 74 02 je loc_336 ; Jump if equal
3BE9:1FBA 88 05 mov [di],al
3BE9:1FBC loc_336: ; xref 3BE9:1FB8
3BE9:1FBC 47 inc di
3BE9:1FBD 80 7F 01 20 cmp byte ptr [bx+1],20h ; ' '
3BE9:1FC1 74 06 je loc_337 ; Jump if equal
3BE9:1FC3 B9 0008 mov cx,8
3BE9:1FC6 E8 0013 call sub_182 ; (1FDC)
3BE9:1FC9 loc_337: ; xref 3BE9:1FC1
3BE9:1FC9 83 C7 08 add di,8
3BE9:1FCC 83 C3 08 add bx,8
3BE9:1FCF 80 7F 01 20 cmp byte ptr [bx+1],20h ; ' '
3BE9:1FD3 74 06 je loc_ret_338 ; Jump if equal
3BE9:1FD5 B9 0003 mov cx,3
3BE9:1FD8 E8 0001 call sub_182 ; (1FDC)
3BE9:1FDB loc_ret_338: ; xref 3BE9:1FD3
3BE9:1FDB C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1E9D, 1EB1, 1F2E, 1FC6, 1FD8
;==========================================================================
3BE9:1FDC sub_182 proc near
3BE9:1FDC 57 push di
3BE9:1FDD 53 push bx
3BE9:1FDE locloop_339: ; xref 3BE9:1FE4
3BE9:1FDE 8A 07 mov al,[bx]
3BE9:1FE0 43 inc bx
3BE9:1FE1 88 05 mov [di],al
3BE9:1FE3 47 inc di
3BE9:1FE4 E2 F8 loop locloop_339 ; Loop if cx > 0
3BE9:1FE6 5B pop bx
3BE9:1FE7 5F pop di
3BE9:1FE8 C3 retn
sub_182 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:13F4
;==========================================================================
3BE9:1FE9 sub_183 proc near
3BE9:1FE9 57 push di
3BE9:1FEA 53 push bx
3BE9:1FEB locloop_340: ; xref 3BE9:1FF3
3BE9:1FEB 8A 07 mov al,[bx]
3BE9:1FED 24 7F and al,7Fh
3BE9:1FEF 43 inc bx
3BE9:1FF0 88 05 mov [di],al
3BE9:1FF2 47 inc di
3BE9:1FF3 E2 F6 loop locloop_340 ; Loop if cx > 0
3BE9:1FF5 5B pop bx
3BE9:1FF6 5F pop di
3BE9:1FF7 C3 retn
sub_183 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:2099, 20BC
;==========================================================================
3BE9:1FF8 sub_184 proc near
3BE9:1FF8 E8 001F call sub_186 ; (201A)
3BE9:1FFB 52 push dx
3BE9:1FFC B1 14 mov cl,14h
3BE9:1FFE CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:2000 5A pop dx
3BE9:2001 3C 00 cmp al,0
3BE9:2003 75 02 jne loc_341 ; Jump if not equal
3BE9:2005 F8 clc ; Clear carry flag
3BE9:2006 C3 retn
3BE9:2007 loc_341: ; xref 3BE9:2003
3BE9:2007 F9 stc ; Set carry flag
3BE9:2008 C3 retn
sub_184 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:20E9
;==========================================================================
3BE9:2009 sub_185 proc near
3BE9:2009 E8 000E call sub_186 ; (201A)
3BE9:200C 52 push dx
3BE9:200D B1 15 mov cl,15h
3BE9:200F CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:2011 5A pop dx
3BE9:2012 3C 00 cmp al,0
3BE9:2014 75 02 jne loc_342 ; Jump if not equal
3BE9:2016 F8 clc ; Clear carry flag
3BE9:2017 C3 retn
3BE9:2018 loc_342: ; xref 3BE9:2014
3BE9:2018 F9 stc ; Set carry flag
3BE9:2019 C3 retn
sub_185 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1EE9, 1F0F, 1FF8, 2009
;==========================================================================
3BE9:201A sub_186 proc near
3BE9:201A 52 push dx
3BE9:201B 53 push bx
3BE9:201C 8B D3 mov dx,bx
3BE9:201E B1 1A mov cl,1Ah
3BE9:2020 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:2022 8C DA mov dx,ds
3BE9:2024 B1 33 mov cl,33h ; '3'
3BE9:2026 CD E0 int 0E0h ; ??INT Non-standard interrupt
3BE9:2028 5B pop bx
3BE9:2029 5A pop dx
3BE9:202A C3 retn
sub_186 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:0E2D, 0FAD, 0FC1, 0FEB, 0FFF, 125F, 1288
; 1530, 1553, 1EC7, 1F77, 2101
;==========================================================================
3BE9:202B sub_187 proc near
3BE9:202B 8B FA mov di,dx
3BE9:202D 8A 05 mov al,[di]
3BE9:202F 04 40 add al,40h ; '@'
3BE9:2031 57 push di
3BE9:2032 E8 E534 call sub_18 ; (0569)
3BE9:2035 B0 3A mov al,3Ah ; ':'
3BE9:2037 E8 E52F call sub_18 ; (0569)
3BE9:203A 5F pop di
3BE9:203B 57 push di
3BE9:203C 83 C7 01 add di,1
3BE9:203F B9 0008 mov cx,8
3BE9:2042 E8 0012 call sub_188 ; (2057)
3BE9:2045 B0 2E mov al,2Eh ; '.'
3BE9:2047 E8 E51F call sub_18 ; (0569)
3BE9:204A 5F pop di
3BE9:204B 57 push di
3BE9:204C 83 C7 09 add di,9
3BE9:204F B9 0003 mov cx,3
3BE9:2052 E8 0002 call sub_188 ; (2057)
3BE9:2055 5A pop dx
3BE9:2056 C3 retn
sub_187 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:2042, 2052
;==========================================================================
3BE9:2057 sub_188 proc near
3BE9:2057 locloop_343: ; xref 3BE9:2067
3BE9:2057 8A 05 mov al,[di]
3BE9:2059 24 7F and al,7Fh
3BE9:205B 47 inc di
3BE9:205C 3C 20 cmp al,20h ; ' '
3BE9:205E 74 09 je loc_ret_344 ; Jump if equal
3BE9:2060 57 push di
3BE9:2061 51 push cx
3BE9:2062 E8 E504 call sub_18 ; (0569)
3BE9:2065 59 pop cx
3BE9:2066 5F pop di
3BE9:2067 E2 EE loop locloop_343 ; Loop if cx > 0
3BE9:2069 loc_ret_344: ; xref 3BE9:205E
3BE9:2069 C3 retn
sub_188 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:10E9, 1135, 13BC, 140B
;==========================================================================
3BE9:206A sub_189 proc near
3BE9:206A BB 1EA3 mov bx,1EA3h
3BE9:206D 89 1E 1E9B mov word ptr ds:[1E9Bh],bx ; (3BE9:1E9B=1DF6h)
3BE9:2071 89 1E 1E9F mov word ptr ds:[1E9Fh],bx ; (3BE9:1E9F=5B01h)
3BE9:2075 BB 42A3 mov bx,42A3h
3BE9:2078 2B 1E 1E9B sub bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:207C 81 E3 FF80 ;* and bx,0FF80h
3BE9:207C db 81h,0E3h, 80h,0FFh ; Fixup - byte match
3BE9:2080 03 1E 1E9B add bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:2084 89 1E 1E9D mov word ptr ds:[1E9Dh],bx ; (3BE9:1E9D=3CE8h)
3BE9:2088 C3 retn
sub_189 endp
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1411
;==========================================================================
3BE9:2089 sub_190 proc near
3BE9:2089 8B 1E 1E9B mov bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:208D loc_345: ; xref 3BE9:20A4
3BE9:208D ,89 1E 1E9F mov word ptr ds:[1E9Fh],bx ; (3BE9:1E9F=5B01h)
3BE9:2091 3B 1E 1E9D cmp bx,word ptr ds:[1E9Dh] ; (3BE9:1E9D=3CE8h)
3BE9:2095 73 10 jae loc_346 ; Jump if above or =
3BE9:2097 53 push bx
3BE9:2098 52 push dx
3BE9:2099 E8 FF5C call sub_184 ; (1FF8)
3BE9:209C 5A pop dx
3BE9:209D 5B pop bx
3BE9:209E 72 07 jc loc_346 ; Jump if carry Set
3BE9:20A0 81 C3 0080 add bx,80h
3BE9:20A4 E9 FFE6 ;* jmp loc_345 ; (208D)
3BE9:20A4 db 0E9h,0E6h,0FFh ; Fixup - byte match
3BE9:20A7 loc_346: ; xref 3BE9:2095, 209E
3BE9:20A7 8B 1E 1E9B mov bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:20AB 3B 1E 1E9F cmp bx,word ptr ds:[1E9Fh] ; (3BE9:1E9F=5B01h)
3BE9:20AF F5 cmc ; Complement carry
3BE9:20B0 C3 retn
sub_190 endp
3BE9:20B1 loc_347: ; xref 3BE9:20CE
3BE9:20B1 ,8B 1E 1E9F mov bx,word ptr ds:[1E9Fh] ; (3BE9:1E9F=5B01h)
3BE9:20B5 3B 1E 1E9D cmp bx,word ptr ds:[1E9Dh] ; (3BE9:1E9D=3CE8h)
3BE9:20B9 73 18 jae loc_349 ; Jump if above or =
3BE9:20BB 52 push dx
3BE9:20BC E8 FF39 call sub_184 ; (1FF8)
3BE9:20BF 5A pop dx
3BE9:20C0 72 0F jc loc_348 ; Jump if carry Set
3BE9:20C2 8B 1E 1E9F mov bx,word ptr ds:[1E9Fh] ; (3BE9:1E9F=5B01h)
3BE9:20C6 ,81 C3 0080 add bx,offset data_11 ; (3BE9:0080=0E9h)
3BE9:20CA 89 1E 1E9F mov word ptr ds:[1E9Fh],bx ; (3BE9:1E9F=5B01h)
3BE9:20CE E9 FFE0 ;* jmp loc_347 ; (20B1)
3BE9:20CE db 0E9h,0E0h,0FFh ; Fixup - byte match
3BE9:20D1 loc_348: ; xref 3BE9:20C0
3BE9:20D1 F8 clc ; Clear carry flag
3BE9:20D2 C3 retn
3BE9:20D3 loc_349: ; xref 3BE9:20B9
3BE9:20D3 52 push dx
3BE9:20D4 BA 44AA mov dx,44AAh
3BE9:20D7 E8 E47B call sub_17 ; (0555)
3BE9:20DA 5A pop dx
3BE9:20DB F9 stc ; Set carry flag
3BE9:20DC C3 retn
;==========================================================================
; SUBROUTINE
;
; Called from: 3BE9:1143
;==========================================================================
3BE9:20DD sub_192 proc near
3BE9:20DD 8B 1E 1E9B mov bx,word ptr ds:[1E9Bh] ; (3BE9:1E9B=1DF6h)
3BE9:20E1 loc_350: ; xref 3BE9:20F4
3BE9:20E1 ,3B 1E 1E9F cmp bx,word ptr ds:[1E9Fh] ; (3BE9:1E9F=5B01h)
3BE9:20E5 73 10 jae loc_351 ; Jump if above or =
3BE9:20E7 53 push bx
3BE9:20E8 52 push dx
3BE9:20E9 E8 FF1D call sub_185 ; (2009)
3BE9:20EC 5A pop dx
3BE9:20ED 5B pop bx
3BE9:20EE 72 09 jc loc_352 ; Jump if carry Set
3BE9:20F0 ,81 C3 0080 add bx,offset data_11 ; (3BE9:0080=0E9h)
3BE9:20F4 E9 FFEA ;* jmp loc_350 ; (20E1)
3BE9:20F4 db 0E9h,0EAh,0FFh ; Fixup - byte match
3BE9:20F7 loc_351: ; xref 3BE9:20E5
3BE9:20F7 F8 clc ; Clear carry flag
3BE9:20F8 C3 retn
3BE9:20F9 loc_352: ; xref 3BE9:20EE
3BE9:20F9 52 push dx
3BE9:20FA BA 44C7 mov dx,44C7h
3BE9:20FD E8 E455 call sub_17 ; (0555)
3BE9:2100 5A pop dx
3BE9:2101 E8 FF27 call sub_187 ; (202B)
3BE9:2104 E8 E439 call sub_15 ; (0540)
3BE9:2107 F9 stc ; Set carry flag
3BE9:2108 C3 retn
sub_192 endp
3BE9:2109 010A[00] db 266 dup (0)
3BE9:2213 01 4D 01 F0 01 42 db 01h, 4Dh, 01h,0F0h, 01h, 42h
3BE9:2219 02 C6 02 4A 03 B7 db 02h,0C6h, 02h, 4Ah, 03h,0B7h
3BE9:221F 00 C8 00 B7 00 16 db 00h,0C8h, 00h,0B7h, 00h, 16h
3BE9:2225 0A 30 30 00 00 16 db 0Ah, 30h, 30h, 00h, 00h, 16h
3BE9:222B 06 30 30 00 00 00 db 06h, 30h, 30h, 00h, 00h, 00h
3BE9:2231 00 28 01 00 00 00 db 00h, 28h, 01h, 00h, 00h, 00h
3BE9:2237 00 03 00 30 01 36 db 00h, 03h, 00h, 30h, 01h, 36h
3BE9:223D 01 3C 01 07 0A 30 db 01h, 3Ch, 01h, 07h, 0Ah, 30h
3BE9:2243 30 00 00 0A 0A 30 db 30h, 00h, 00h, 0Ah, 0Ah, 30h
3BE9:2249 30 00 00 0D 0A 30 db 30h, 00h, 00h, 0Dh, 0Ah, 30h
3BE9:224F 30 00 db 30h, 00h
3BE9:2251 002B[00] db 43 dup (0)
3BE9:227C 04 00 1B 5B 30 63 db 04h, 00h, 1Bh, 5Bh, 30h, 63h
3BE9:2282 04 00 1B 5B 34 63 db 04h, 00h, 1Bh, 5Bh, 34h, 63h
3BE9:2288 04 00 1B 5B 32 4A db 04h, 00h, 1Bh, 5Bh, 32h, 4Ah
3BE9:228E 80 01 00 20 00 db 80h, 01h, 00h, 20h, 00h
3BE9:2293 00E5[00] db 229 dup (0)
3BE9:2378 3D 00 00 db 3Dh, 00h, 00h
3BE9:237B 0011[00] db 17 dup (0)
3BE9:238C AE 08 0D 08 83 07 db 0AEh, 08h, 0Dh, 08h, 83h, 07h
3BE9:2392 29 08 00 00 00 00 db 29h, 08h, 00h, 00h, 00h, 00h
3BE9:2398 00 00 03 00 9A 02 db 00h, 00h, 03h, 00h, 9Ah, 02h
3BE9:239E 9D 02 ED 02 03 00 db 9Dh, 02h,0EDh, 02h, 03h, 00h
3BE9:23A4 F0 02 9D 02 F3 02 db 0F0h, 02h, 9Dh, 02h,0F3h, 02h
3BE9:23AA 01 00 DA db 01h, 00h,0DAh
3BE9:23AD 4E db 4Eh
3BE9:23AE 004F[00] db 79 dup (0)
3BE9:23FD 01 00 BF 01 00 C0 db 01h, 00h,0BFh, 01h, 00h,0C0h
3BE9:2403 01 00 D9 03 01 30 db 01h, 00h,0D9h, 03h, 01h, 30h
3BE9:2409 30 FC 02 50 00 C6 db 30h,0FCh, 02h, 50h, 00h,0C6h
3BE9:240F 00 00 db 00h, 00h
3BE9:2411 004C[00] db 76 dup (0)
3BE9:245D B5 03 00 5E 03 61 db 0B5h, 03h, 00h, 5Eh, 03h, 61h
3BE9:2463 03 B1 03 03 00 B4 db 03h,0B1h, 03h, 03h, 00h,0B4h
3BE9:2469 03 61 03 B7 03 01 db 03h, 61h, 03h,0B7h, 03h, 01h
3BE9:246F 00 8C 4E 00 db 00h, 8Ch, 4Eh, 00h
3BE9:2473 004E[00] db 78 dup (0)
3BE9:24C1 01 00 8B 01 00 8D db 01h, 00h, 8Bh, 01h, 00h, 8Dh
3BE9:24C7 01 00 8A 03 01 30 db 01h, 00h, 8Ah, 03h, 01h, 30h
3BE9:24CD 30 C0 03 50 00 99 db 30h,0C0h, 03h, 50h, 00h, 99h
3BE9:24D3 004E[00] db 78 dup (0)
3BE9:2521 9C 06 00 DA C4 C4 db 9Ch, 06h, 00h,0DAh,0C4h,0C4h
3BE9:2527 C4 C4 BF 06 00 B3 db 0C4h,0C4h,0BFh, 06h, 00h,0B3h
3BE9:252D 20 20 20 20 B3 06 db 20h, 20h, 20h, 20h,0B3h, 06h
3BE9:2533 00 C0 C4 C4 C4 C4 db 00h,0C0h,0C4h,0C4h,0C4h,0C4h
3BE9:2539 D9 06 00 8C 91 91 db 0D9h, 06h, 00h, 8Ch, 91h, 91h
3BE9:253F 91 91 8B 06 00 98 db 91h, 91h, 8Bh, 06h, 00h, 98h
3BE9:2545 20 20 20 20 98 06 db 20h, 20h, 20h, 20h, 98h, 06h
3BE9:254B 00 8D 91 91 91 91 db 00h, 8Dh, 91h, 91h, 91h, 91h
3BE9:2551 8A 27 00 db 8Ah, 27h, 00h
3BE9:2554 0D db 0Dh
3BE9:2555 0A 43 4F 4E 46 49 db 0Ah, 'CONFIG requires Concurrent '
3BE9:255B 47 20 72 65 71 75
3BE9:2561 69 72 65 73 20 43
3BE9:2567 6F 6E 63 75 72 72
3BE9:256D 65 6E 74 20
3BE9:2571 43 50 2F 4D 20 32 db 'CP/M 2.0', 0Dh, 0Ah
3BE9:2577 2E 30 0D 0A
3BE9:257B 02 00 07 07 db 2, 0, 7, 7
3BE9:257F 42 00 db 'B', 0
3BE9:2581 20 20 20 20 20 20 db ' '
3BE9:2587 20 20 20 20 20 20
3BE9:258D 20 20 20 20 20 20
3BE9:2593 20 20 20 20 20 20
3BE9:2599 20 20 20 20 20 20
3BE9:259F 20 20
3BE9:25A1 20 20 20 20 20 20 db ' '
3BE9:25A7 20 20 20 20 20 20
3BE9:25AD 20 20 20 20 20 20
3BE9:25B3 20 20 20 20 20 20
3BE9:25B9 20 20 20 20 20 20
3BE9:25BF 20 20
3BE9:25C1 20 20 db ' '
3BE9:25C3 000D[00] db 13 dup (0)
3BE9:25D0 96 00 FF 00 00 00 db 96h, 00h,0FFh, 00h, 00h, 00h
3BE9:25D6 08 00 1B 5B 00 00 db 08h, 00h, 1Bh, 5Bh, 00h, 00h
3BE9:25DC 3B 00 00 48 11 00 db 3Bh, 00h, 00h, 48h, 11h, 00h
3BE9:25E2 1B 5B 32 4A 1B 5B db 1Bh, '[2J', 1Bh, '[s', 1Bh, '#w', 1Bh
3BE9:25E8 73 1B 23 77 1B
3BE9:25ED 5B 34 63 1B 23 73 db '[4c', 1Bh, '#s'
3BE9:25F3 07 00 1B 5B 32 4A db 07h, 00h, 1Bh, 5Bh, 32h, 4Ah
3BE9:25F9 1B 5B 75 04 00 1B db 1Bh, 5Bh, 75h, 04h, 00h, 1Bh
3BE9:25FF 5B 58 6D 3A 20 00 db 5Bh, 58h, 6Dh, 3Ah, 20h, 00h
3BE9:2605 00 00 db 00h, 00h
3BE9:2607 20 db 20h
3BE9:2608 000A[20] db 10 dup (20h)
3BE9:2612 001A[00] db 26 dup (0)
3BE9:262C 0A 3C 3E 2E 2C 3B db 0Ah, '<>.,;:=[]+'
3BE9:2632 3A 3D 5B 5D 2B
3BE9:2637 00 db 0
3BE9:2638 0167[00] db 359 dup (0)
3BE9:279F 000B[20] db 11 dup (20h)
3BE9:27AA 0053[00] db 83 dup (0)
3BE9:27FD 000B[20] db 11 dup (20h)
3BE9:2808 0020[00] db 32 dup (0)
3BE9:2828 E9 59 00 db 0E9h, 59h, 00h
3BE9:282B 73 77 2F 6A 67 31 db 'sw/jg1.1'
3BE9:2831 2E 31
3BE9:2833 00 02 04 01 00 02 db 00h, 02h, 04h, 01h, 00h, 02h
3BE9:2839 70 00 A0 05 FE 02 db 70h, 00h,0A0h, 05h,0FEh, 02h
3BE9:283F 00 09 00 02 00 00 db 00h, 09h, 00h, 02h, 00h, 00h
3BE9:2845 00 00 00 db 00h, 00h, 00h
3BE9:2848 0A db 0Ah
3BE9:2849 001F[00] db 31 dup (0)
3BE9:2868 95 db 95h
3BE9:2869 000D[00] db 13 dup (0)
3BE9:2876 40 db 40h
3BE9:2877 00B5[00] db 181 dup (0)
3BE9:292C 000B[20] db 11 dup (20h)
3BE9:2937 001F[00] db 31 dup (0)
3BE9:2956 000B[20] db 11 dup (20h)
3BE9:2961 0023[00] db 35 dup (0)
3BE9:2984 000B[20] db 11 dup (20h)
3BE9:298F 001F[00] db 31 dup (0)
3BE9:29AE 000B[20] db 11 dup (20h)
3BE9:29B9 0023[00] db 35 dup (0)
3BE9:29DC FF FF 00 db 0FFh,0FFh, 00h
3BE9:29DF 025D[00] db 605 dup (0)
3BE9:2C3C FE 17 04 18 FE 17 db 0FEh, 17h, 04h, 18h,0FEh, 17h
3BE9:2C42 04 18 FE 17 04 18 db 04h, 18h,0FEh, 17h, 04h, 18h
3BE9:2C48 E6 17 EC 17 FE 17 db 0E6h, 17h,0ECh, 17h,0FEh, 17h
3BE9:2C4E 04 18 F2 17 F8 17 db 04h, 18h,0F2h, 17h,0F8h, 17h
3BE9:2C54 FE 17 04 18 FE 17 db 0FEh, 17h, 04h, 18h,0FEh, 17h
3BE9:2C5A 04 18 0A 18 10 18 db 04h, 18h, 0Ah, 18h, 10h, 18h
3BE9:2C60 FF 00 db 0FFh, 00h
3BE9:2C62 0008[00] db 8 dup (0)
3BE9:2C6A 4F 17 71 17 93 17 db 4Fh, 17h, 71h, 17h, 93h, 17h
3BE9:2C70 B5 17 01 00 06 02 db 0B5h, 17h, 01h, 00h, 06h, 02h
3BE9:2C76 FE 04 1E 00 EF 01 db 0FEh, 04h, 1Eh, 00h,0EFh, 01h
3BE9:2C7C 00 db 00h
3BE9:2C7D 122D[00] db 4653 dup (0)
3BE9:3EAA 09 01 00 06 02 FE db 09h, 01h, 00h, 06h, 02h,0FEh
3BE9:3EB0 04 1E 00 EF 01 04 db 04h, 1Eh, 00h,0EFh, 01h, 04h
3BE9:3EB6 00 04 02 FE 04 1C db 00h, 04h, 02h,0FEh, 04h, 1Ch
3BE9:3EBC 00 3B 01 40 00 08 db 00h, 3Bh, 01h, 40h, 00h, 08h
3BE9:3EC2 02 FE 08 70 00 5C db 02h,0FEh, 08h, 70h, 00h, 5Ch
3BE9:3EC8 02 04 00 04 02 FF db 02h, 04h, 00h, 04h, 02h,0FFh
3BE9:3ECE 08 28 00 3D 01 08 db 08h, 28h, 00h, 3Dh, 01h, 08h
3BE9:3ED4 00 10 02 FE 08 58 db 00h, 10h, 02h,0FEh, 08h, 58h
3BE9:3EDA 00 C7 04 04 00 08 db 00h,0C7h, 04h, 04h, 00h, 08h
3BE9:3EE0 02 FC 04 24 00 61 db 02h,0FCh, 04h, 24h, 00h, 61h
3BE9:3EE6 01 04 00 08 02 FD db 01h, 04h, 00h, 08h, 02h,0FDh
3BE9:3EEC 08 30 00 64 01 50 db 08h, 30h, 00h, 64h, 01h, 50h
3BE9:3EF2 00 0C 02 FC 04 84 db 00h, 0Ch, 02h,0FCh, 04h, 84h
3BE9:3EF8 00 01 03 04 00 08 db 00h, 01h, 03h, 04h, 00h, 08h
3BE9:3EFE 02 FE 10 30 00 67 db 02h,0FEh, 10h, 30h, 00h, 67h
3BE9:3F04 01 db 01h
3BE9:3F05 03A3[00] db 931 dup (0)
3BE9:42A8 00 data_216 db 0 ; xref 3BE9:0137
3BE9:42A9 003B[00] db 59 dup (0)
3BE9:42E4 00 data_217 db 0 ; xref 3BE9:00B2
3BE9:42E5 015E[00] db 350 dup (0)
3BE9:4443 00 data_218 db 0 ; xref 3BE9:0100
3BE9:4444 00 00 00 00 00 00 db 0, 0, 0, 0, 0, 0
3BE9:444A 00 db 0
3BE9:444B 00 data_219 db 0 ; xref 3BE9:00FD
3BE9:444C 008E[00] db 142 dup (0)
3BE9:44DA 00 data_220 db 0 ; xref 3BE9:05FD
3BE9:44DB 00 data_221 db 0 ; xref 3BE9:0603
3BE9:44DC 0208[00] db 520 dup (0)
3BE9:46E4 00 data_222 db 0 ; xref 3BE9:1038
3BE9:46E5 0219[00] db 537 dup (0)
3BE9:48FE 00 data_223 db 0 ; xref 3BE9:0726, 078D
3BE9:48FF 1ABB[00] db 6843 dup (0)
3BE9:63BA B0 42 E4 42 3E 44 db 0B0h, 42h,0E4h, 42h, 3Eh, 44h
3BE9:63C0 02 00 B6 42 C8 42 db 02h, 00h,0B6h, 42h,0C8h, 42h
3BE9:63C6 05 23 30 30 BC 42 db 05h, 23h, 30h, 30h,0BCh, 42h
3BE9:63CC 0A 00 db 0Ah, 00h
3BE9:63CE 48 61 75 70 74 6D db 'Hauptmenue'
3BE9:63D4 65 6E 75 65
3BE9:63D8 07 1E 30 30 CE 42 db 07h, 1Eh, 30h, 30h,0CEh, 42h
3BE9:63DE 14 00 db 14h, 00h
3BE9:63E0 57 41 45 48 4C 45 db 'WAEHLE EINE FUNKTION'
3BE9:63E6 20 45 49 4E 45 20
3BE9:63EC 46 55 4E 4B 54 49
3BE9:63F2 4F 4E
3BE9:63F4 06 00 F4 42 FF 42 db 06h, 00h,0F4h, 42h,0FFh, 42h
3BE9:63FA 0A 43 15 db 0Ah, 43h, 15h
3BE9:63FD 43 20 43 41 43 36 db 'C CAC6C', 9, 9, 'f1 '
3BE9:6403 43 09 09 66 31 20
3BE9:6409 01 00 0A 0F 4C 43 db 01h, 00h, 0Ah, 0Fh, 4Ch, 43h
3BE9:640F 0C 09 66 32 20 01 db 0Ch, 09h, 66h, 32h, 20h, 01h
3BE9:6415 00 0D 0F 64 43 0F db 00h, 0Dh, 0Fh, 64h, 43h, 0Fh
3BE9:641B 09 66 33 20 01 00 db 09h, 66h, 33h, 20h, 01h, 00h
3BE9:6421 10 0F 7C 43 12 09 db 10h, 0Fh, 7Ch, 43h, 12h, 09h
3BE9:6427 66 34 20 01 00 13 db 66h, 34h, 20h, 01h, 00h, 13h
3BE9:642D 0F AB 43 09 28 66 db 0Fh,0ABh, 43h, 09h, 28h, 66h
3BE9:6433 35 20 01 00 0A 2E db 35h, 20h, 01h, 00h, 0Ah, 2Eh
3BE9:6439 DA 43 09 28 66 36 db 0DAh, 43h, 09h, 28h, 66h, 36h
3BE9:643F 20 01 00 0A 2E EE db 20h, 01h, 00h, 0Ah, 2Eh,0EEh
3BE9:6445 43 0C 28 66 37 20 db 43h, 0Ch, 28h, 66h, 37h, 20h
3BE9:644B 01 00 0D 2E 07 44 db 01h, 00h, 0Dh, 2Eh, 07h, 44h
3BE9:6451 15 19 66 38 20 01 db 15h, 19h, 66h, 38h, 20h, 01h
3BE9:6457 00 16 1F 26 44 16 db 00h, 16h, 1Fh, 26h, 44h, 16h
3BE9:645D 00 db 00h
3BE9:645E 20 49 6E 68 61 6C db ' Inhaltsverz. anzeigen'
3BE9:6464 74 73 76 65 72 7A
3BE9:646A 2E 20 61 6E 7A 65
3BE9:6470 69 67 65 6E
3BE9:6474 16 00 20 db 16h, 00h, 20h
3BE9:6477 44 61 74 65 69 69 db 'Dateiinhalte anzeigen-', 0
3BE9:647D 6E 68 61 6C 74 65
3BE9:6483 20 61 6E 7A 65 69
3BE9:6489 67 65 6E 2D 00
3BE9:648E 20 44 61 74 65 69 db ' Dateien umsetzen von MS-DOS- in'
3BE9:6494 65 6E 20 75 6D 73
3BE9:649A 65 74 7A 65 6E 20
3BE9:64A0 76 6F 6E 20 4D 53
3BE9:64A6 2D 44 4F 53 2D 20
3BE9:64AC 69 6E
3BE9:64AE 20 43 50 2F 4D 2D db ' CP/M-Format -', 0
3BE9:64B4 46 6F 72 6D 61 74
3BE9:64BA 20 2D 00
3BE9:64BD 20 44 61 74 65 69 db ' Dateien umsetze'
3BE9:64C3 65 6E 20 75 6D 73
3BE9:64C9 65 74 7A 65
3BE9:64CD 6E 20 76 6F 6E 20 db 'n von CP/M- in MS-DOS-Format '
3BE9:64D3 43 50 2F 4D 2D 20
3BE9:64D9 69 6E 20 4D 53 2D
3BE9:64DF 44 4F 53 2D 46 6F
3BE9:64E5 72 6D 61 74 20
3BE9:64EA 12 00 db 12h, 00h
3BE9:64EC 20 44 61 74 65 69 db ' Dateien loeschen '
3BE9:64F2 65 6E 20 6C 6F 65
3BE9:64F8 73 63 68 65 6E 20
3BE9:64FE 17 00 db 17h, 00h
3BE9:6500 20 4D 53 2D 44 4F db ' MS-DOS-Diskette init. '
3BE9:6506 53 2D 44 69 73 6B
3BE9:650C 65 74 74 65 20 69
3BE9:6512 6E 69 74 2E 20
3BE9:6517 1D 00 db 1Dh, 00h
3BE9:6519 20 44 69 72 65 6B db ' Direktes Lesen von Sektoren '
3BE9:651F 74 65 73 20 4C 65
3BE9:6525 73 65 6E 20 76 6F
3BE9:652B 6E 20 53 65 6B 74
3BE9:6531 6F 72 65 6E 20
3BE9:6536 16 00 db 16h, 00h
3BE9:6538 20 50 72 6F 67 72 db ' Programm beenden '
3BE9:653E 61 6D 6D 20 62 65
3BE9:6544 65 6E 64 65 6E 20
3BE9:654A 20 20 20 20
3BE9:654E 01 00 42 44 db 01h, 00h, 42h, 44h
3BE9:6552 08 21 22 27 28 29 db 8, '!"', 27h, '()*,+PQRSTUWV nich'
3BE9:6558 2A 2C 2B 50 51 52
3BE9:655E 53 54 55 57 56 20
3BE9:6564 6E 69 63 68
3BE9:6568 74 20 67 65 66 75 db 't gefunden ', 0Dh, 0Ah, 0
3BE9:656E 6E 64 65 6E 20 0D
3BE9:6574 0A 00
3BE9:6576 45 72 73 74 65 6C db 'Erstellung nicht moeglich ', 0
3BE9:657C 6C 75 6E 67 20 6E
3BE9:6582 69 63 68 74 20 6D
3BE9:6588 6F 65 67 6C 69 63
3BE9:658E 68 20 00
3BE9:6591 44 61 74 65 69 20 db 'Datei kann nicht geschlossen wer'
3BE9:6597 6B 61 6E 6E 20 6E
3BE9:659D 69 63 68 74 20 67
3BE9:65A3 65 73 63 68 6C 6F
3BE9:65A9 73 73 65 6E 20 77
3BE9:65AF 65 72
3BE9:65B1 64 65 6E 20 21 20 db 'den ! ', 0Dh, 0Ah, 0
3BE9:65B7 0D 0A 00
3BE9:65BA 41 72 62 65 69 74 db 'Arbeitsspeicher-Ueberlauf ', 0Dh
3BE9:65C0 73 73 70 65 69 63
3BE9:65C6 68 65 72 2D 55 65
3BE9:65CC 62 65 72 6C 61 75
3BE9:65D2 66 20 0D
3BE9:65D5 0A 00 db 0Ah, 0
3BE9:65D7 53 63 68 72 65 69 db 'Schreibfehler auf ', 0
3BE9:65DD 62 66 65 68 6C 65
3BE9:65E3 72 20 61 75 66 20
3BE9:65E9 00
3BE9:65EA 4A 6A 22 4A 22 20 db 'Jj"J" oder "N"? ', 0
3BE9:65F0 6F 64 65 72 20 22
3BE9:65F6 4E 22 3F 20 00
3BE9:65FB 28 00 db '(', 0
3BE9:65FD 0D 0A 43 4F 4E 46 db 0Dh, 0Ah, 'CONFIG benoetigt Concu'
3BE9:6603 49 47 20 62 65 6E
3BE9:6609 6F 65 74 69 67 74
3BE9:660F 20 43 6F 6E 63 75
3BE9:6615 72 72 65 6E 74 20 db 'rrent CP/M 2.0', 0Dh, 0Ah, 0Dh, 0Ah
3BE9:661B 43 50 2F 4D 20 32
3BE9:6621 2E 30 0D 0A 0D 0A
3BE9:6627 46 65 68 6C 65 72 db 'Fehler bei der Laufwerksanwahl. '
3BE9:662D 20 62 65 69 20 64
3BE9:6633 65 72 20 4C 61 75
3BE9:6639 66 77 65 72 6B 73
3BE9:663F 61 6E 77 61 68 6C
3BE9:6645 2E 20
3BE9:6647 0D 0A 00 db 0Dh, 0Ah, 0
3BE9:664A 0D 0A 44 69 73 6B db 0Dh, 0Ah, 'Disketten-Schreib/Lese'
3BE9:6650 65 74 74 65 6E 2D
3BE9:6656 53 63 68 72 65 69
3BE9:665C 62 2F 4C 65 73 65
3BE9:6662 66 65 68 6C 65 72 db 'fehler ', 0Dh, 0Ah, 0
3BE9:6668 20 0D 0A 00
3BE9:666C 53 79 6E 74 61 78 db 'Syntaxfehler', 0
3BE9:6672 66 65 68 6C 65 72
3BE9:6678 00
3BE9:6679 44 61 74 65 69 20 db 'Datei nicht gefunden ', 0Dh, 0Ah
3BE9:667F 6E 69 63 68 74 20
3BE9:6685 67 65 66 75 6E 64
3BE9:668B 65 6E 20 0D 0A
3BE9:6690 00 db 0
3BE9:6691 55 6E 67 75 65 6C db 'Ungueltiges Laufwerk ', 0Dh, 0Ah
3BE9:6697 74 69 67 65 73 20
3BE9:669D 4C 61 75 66 77 65
3BE9:66A3 72 6B 20 0D 0A
3BE9:66A8 00 db 0
3BE9:66A9 0D 0A 55 6E 67 75 db 0Dh, 0Ah, 'Ungueltige HEX-Darstel'
3BE9:66AF 65 6C 74 69 67 65
3BE9:66B5 20 48 45 58 2D 44
3BE9:66BB 61 72 73 74 65 6C
3BE9:66C1 6C 75 6E 67 20 0D db 'lung ', 0Dh, 0Ah, 0
3BE9:66C7 0A 00
3BE9:66C9 0D 0A 50 68 79 73 db 0Dh, 0Ah, 'Physikalische Sektor N'
3BE9:66CF 69 6B 61 6C 69 73
3BE9:66D5 63 68 65 20 53 65
3BE9:66DB 6B 74 6F 72 20 4E
3BE9:66E1 72 2E 20 65 69 6E db 'r. eingeben (Abbruch = "Q") ', 0
3BE9:66E7 67 65 62 65 6E 20
3BE9:66ED 28 41 62 62 72 75
3BE9:66F3 63 68 20 3D 20 22
3BE9:66F9 51 22 29 20 20 00
3BE9:66FF 0D 0A 50 68 79 73 db 0Dh, 0Ah, 'Physikalische Sektor N'
3BE9:6705 69 6B 61 6C 69 73
3BE9:670B 63 68 65 20 53 65
3BE9:6711 6B 74 6F 72 20 4E
3BE9:6717 72 2E 20 3D 20 00 db 'r. = ', 0
3BE9:671D 0D 0A 44 69 73 6B db 0Dh, 0Ah, 'Diskettenfehler ', 0Dh
3BE9:6723 65 74 74 65 6E 66
3BE9:6729 65 68 6C 65 72 20
3BE9:672F 0D
3BE9:6730 0A 00 db 0Ah, 0
3BE9:6732 20 53 79 6E 74 61 db ' Syntaxfehler ', 0Dh, 0Ah, 0
3BE9:6738 78 66 65 68 6C 65
3BE9:673E 72 20 0D 0A 00
3BE9:6743 20 6E 69 63 68 74 db ' nicht gefunden ', 0Dh, 0Ah, 0
3BE9:6749 20 67 65 66 75 6E
3BE9:674F 64 65 6E 20 0D 0A
3BE9:6755 00
3BE9:6756 20 4C 6F 65 73 63 db ' Loeschen ', 0
3BE9:675C 68 65 6E 20 00
3BE9:6761 20 20 00 db ' ', 0
3BE9:6764 20 67 65 6C 6F 65 db ' geloescht', 0Dh, 0Ah, 0
3BE9:676A 73 63 68 74 0D 0A
3BE9:6770 00
3BE9:6771 20 4C 6F 65 73 63 db ' Loeschen nicht moeglich ', 0
3BE9:6777 68 65 6E 20 6E 69
3BE9:677D 63 68 74 20 6D 6F
3BE9:6783 65 67 6C 69 63 68
3BE9:6789 20 00
3BE9:678B 0A 0D 20 4B 6F 6D db 0Ah, 0Dh, ' Kommando abgebrochen '
3BE9:6791 6D 61 6E 64 6F 20
3BE9:6797 61 62 67 65 62 72
3BE9:679D 6F 63 68 65 6E 20
3BE9:67A3 0A 0D 00 db 0Ah, 0Dh, 0
3BE9:67A6 20 55 6E 67 75 65 db ' Ungueltige Laufwerksbezeichnung'
3BE9:67AC 6C 74 69 67 65 20
3BE9:67B2 4C 61 75 66 77 65
3BE9:67B8 72 6B 73 62 65 7A
3BE9:67BE 65 69 63 68 6E 75
3BE9:67C4 6E 67
3BE9:67C6 20 0D 0A 00 db ' ', 0Dh, 0Ah, 0
3BE9:67CA 20 4C 6F 65 73 63 db ' Loeschen vom Disketteninhalt in'
3BE9:67D0 68 65 6E 20 76 6F
3BE9:67D6 6D 20 44 69 73 6B
3BE9:67DC 65 74 74 65 6E 69
3BE9:67E2 6E 68 61 6C 74 20
3BE9:67E8 69 6E
3BE9:67EA 20 4C 61 75 66 77 db ' Laufwerk : ? ', 0Dh, 0Ah, 0
3BE9:67F0 65 72 6B 20 20 3A
3BE9:67F6 20 3F 20 0D 0A 00
3BE9:67FC 20 44 69 65 20 44 db ' Die Dateien koennen nicht auf d'
3BE9:6802 61 74 65 69 65 6E
3BE9:6808 20 6B 6F 65 6E 6E
3BE9:680E 65 6E 20 6E 69 63
3BE9:6814 68 74 20 61 75 66
3BE9:681A 20 64
3BE9:681C 65 72 73 65 6C 62 db 'erselben Diskette sein', 0Dh, 0Ah
3BE9:6822 65 6E 20 44 69 73
3BE9:6828 6B 65 74 74 65 20
3BE9:682E 73 65 69 6E 0D 0A
3BE9:6834 00 db 0
3BE9:6835 20 41 62 67 65 62 db ' Abgebrochen mit Abbruchtaste ', 0Dh
3BE9:683B 72 6F 63 68 65 6E
3BE9:6841 20 6D 69 74 20 41
3BE9:6847 62 62 72 75 63 68
3BE9:684D 74 61 73 74 65 20
3BE9:6853 0D
3BE9:6854 0A 00 db 0Ah, 0
3BE9:6856 20 53 63 68 72 65 db ' Schreiben ', 0
3BE9:685C 69 62 65 6E 20 00
3BE9:6862 49 6E 68 61 6C 74 db 'Inhaltsverz. voll oder keine MS-'
3BE9:6868 73 76 65 72 7A 2E
3BE9:686E 20 76 6F 6C 6C 20
3BE9:6874 6F 64 65 72 20 6B
3BE9:687A 65 69 6E 65 20 4D
3BE9:6880 53 2D
3BE9:6882 44 4F 53 2D 44 69 db 'DOS-Diskette ', 0Dh, 0Ah, 0
3BE9:6888 73 6B 65 74 74 65
3BE9:688E 20 0D 0A 00
3BE9:6892 44 61 74 65 69 20 db 'Datei kann nicht geschlossen wer'
3BE9:6898 6B 61 6E 6E 20 6E
3BE9:689E 69 63 68 74 20 67
3BE9:68A4 65 73 63 68 6C 6F
3BE9:68AA 73 73 65 6E 20 77
3BE9:68B0 65 72
3BE9:68B2 64 65 6E 20 0D 0A db 'den ', 0Dh, 0Ah, 0
3BE9:68B8 00
3BE9:68B9 53 63 68 72 65 69 db 'Schreibfehler auf ', 0Dh, 0Ah, 0
3BE9:68BF 62 66 65 68 6C 65
3BE9:68C5 72 20 61 75 66 20
3BE9:68CB 0D 0A 00
3BE9:68CE 50 72 6F 67 72 61 db 'Programm mit Abbruchtaste abgebr'
3BE9:68D4 6D 6D 20 6D 69 74
3BE9:68DA 20 41 62 62 72 75
3BE9:68E0 63 68 74 61 73 74
3BE9:68E6 65 20 61 62 67 65
3BE9:68EC 62 72
3BE9:68EE 6F 63 68 65 6E 20 db 'ochen ', 0Dh, 0Ah, 0
3BE9:68F4 0D 0A 00
3BE9:68F7 4B 6F 70 69 65 72 db 'Kopieren '
3BE9:68FD 65 6E 20
3BE9:6900 0009[00] db 9 dup (0)
3BE9:6909 4D 58 64 69 73 6B db 'MXdisk (', 0
3BE9:690F 20 20 28 00
3BE9:6913 0D 0A 53 59 53 54 db 0Dh, 0Ah, 'SYSTRAN laeuft nicht i'
3BE9:6919 52 41 4E 20 6C 61
3BE9:691F 65 75 66 74 20 6E
3BE9:6925 69 63 68 74 20 69
3BE9:692B 6D 20 48 69 6E 74 db 'm Hintergrund.', 0Dh, 0Ah, 0Dh, 0
3BE9:6931 65 72 67 72 75 6E
3BE9:6937 64 2E 0D 0A 0D 00
3BE9:693D 0D 0A 53 59 53 54 db 0Dh, 0Ah, 'SYSTRAN laeuft nicht, '
3BE9:6943 52 41 4E 20 6C 61
3BE9:6949 65 75 66 74 20 6E
3BE9:694F 69 63 68 74 2C 20
3BE9:6955 77 61 65 68 72 65 db 'waehrend andere Programme aktiv '
3BE9:695B 6E 64 20 61 6E 64
3BE9:6961 65 72 65 20 50 72
3BE9:6967 6F 67 72 61 6D 6D
3BE9:696D 65 20 61 6B 74 69
3BE9:6973 76 20
3BE9:6975 73 69 6E 64 2E 0D db 'sind.', 0Dh, 0Ah, 0Dh, 0Ah, 'Die'
3BE9:697B 0A 0D 0A 44 69 65
3BE9:6981 73 65 73 20 44 69 db 'ses Dienstprogramm benoetigt CCP'
3BE9:6987 65 6E 73 74 70 72
3BE9:698D 6F 67 72 61 6D 6D
3BE9:6993 20 62 65 6E 6F 65
3BE9:6999 74 69 67 74 20 43
3BE9:699F 43 50
3BE9:69A1 2F 4D 20 33 2E 31 db '/M 3.1', 0Dh, 0Ah, '$'
3BE9:69A7 0D 0A 24
3BE9:69AA 0D 0A 44 69 65 73 db 0Dh, 0Ah, 'Dieses Dienstprogramm '
3BE9:69B0 65 73 20 44 69 65
3BE9:69B6 6E 73 74 70 72 6F
3BE9:69BC 67 72 61 6D 6D 20
3BE9:69C2 62 65 6E 6F 65 74 db 'benoetigt PCP/M ', 0Dh, 0Ah, '$'
3BE9:69C8 69 67 74 20 50 43
3BE9:69CE 50 2F 4D 20 0D 0A
3BE9:69D4 24
3BE9:69D5 0D 0A 44 69 65 73 db 0Dh, 0Ah, 'Dieses Dienstprogramm '
3BE9:69DB 65 73 20 44 69 65
3BE9:69E1 6E 73 74 70 72 6F
3BE9:69E7 67 72 61 6D 6D 20
3BE9:69ED 62 65 6E 6F 65 74 db 'benoetigt die XIOS-Version 3.1', 0Dh
3BE9:69F3 69 67 74 20 64 69
3BE9:69F9 65 20 58 49 4F 53
3BE9:69FF 2D 56 65 72 73 69
3BE9:6A05 6F 6E 20 33 2E 31
3BE9:6A0B 0D
3BE9:6A0C 0A 24 db 0Ah, '$'
3BE9:6A0E 02 0A 30 30 04 49 db 02h, 0Ah, 30h, 30h, 04h, 49h
3BE9:6A14 3B 00 db ';', 0
3BE9:6A16 53 59 53 54 52 41 db 'SYSTRAN : MSDOS-Disketten-Verwal'
3BE9:6A1C 4E 20 3A 20 4D 53
3BE9:6A22 44 4F 53 2D 44 69
3BE9:6A28 73 6B 65 74 74 65
3BE9:6A2E 6E 2D 56 65 72 77
3BE9:6A34 61 6C
3BE9:6A36 74 75 6E 67 73 70 db 'tungsprogramm Version 1.1'
3BE9:6A3C 72 6F 67 72 61 6D
3BE9:6A42 6D 20 20 20 56 65
3BE9:6A48 72 73 69 6F 6E 20
3BE9:6A4E 31 2E 31
3BE9:6A51 02 0A db 02h, 0Ah
3BE9:6A53 30 30 47 49 3B 00 db '00GI;', 0
3BE9:6A59 53 59 53 54 52 41 db 'SYSTRAN : MSDOS-Disketten-Verwal'
3BE9:6A5F 4E 20 3A 20 4D 53
3BE9:6A65 44 4F 53 2D 44 69
3BE9:6A6B 73 6B 65 74 74 65
3BE9:6A71 6E 2D 56 65 72 77
3BE9:6A77 61 6C
3BE9:6A79 74 75 6E 67 73 70 db 'tungsprogramm Version 1.10', 0
3BE9:6A7F 72 6F 67 72 61 6D
3BE9:6A85 6D 20 20 20 56 65
3BE9:6A8B 72 73 69 6F 6E 20
3BE9:6A91 31 2E 31 30 00
3BE9:6A96 49 6E 68 61 6C 74 db 'Inhaltsverzeichnis der MS-DOS-Di'
3BE9:6A9C 73 76 65 72 7A 65
3BE9:6AA2 69 63 68 6E 69 73
3BE9:6AA8 20 64 65 72 20 4D
3BE9:6AAE 53 2D 44 4F 53 2D
3BE9:6AB4 44 69
3BE9:6AB6 73 6B 65 74 74 65 db 'skette anzeigen &', 0
3BE9:6ABC 20 61 6E 7A 65 69
3BE9:6AC2 67 65 6E 20 26 00
3BE9:6AC8 53 65 6B 74 6F 72 db 'Sektoren der MS-DOS-Diskette anz'
3BE9:6ACE 65 6E 20 64 65 72
3BE9:6AD4 20 4D 53 2D 44 4F
3BE9:6ADA 53 2D 44 69 73 6B
3BE9:6AE0 65 74 74 65 20 61
3BE9:6AE6 6E 7A
3BE9:6AE8 65 69 67 65 6E 20 db 'eigen *', 0
3BE9:6AEE 2A 00
3BE9:6AF0 44 61 74 65 69 69 db 'Dateiinhalte von MS-DOS-Diskette'
3BE9:6AF6 6E 68 61 6C 74 65
3BE9:6AFC 20 76 6F 6E 20 4D
3BE9:6B02 53 2D 44 4F 53 2D
3BE9:6B08 44 69 73 6B 65 74
3BE9:6B0E 74 65
3BE9:6B10 20 61 6E 7A 65 69 db ' anzeigen ,', 0
3BE9:6B16 67 65 6E 20 2C 00
3BE9:6B1C 44 61 74 65 69 65 db 'Dateien umsetzen von MS-DOS- in '
3BE9:6B22 6E 20 75 6D 73 65
3BE9:6B28 74 7A 65 6E 20 76
3BE9:6B2E 6F 6E 20 4D 53 2D
3BE9:6B34 44 4F 53 2D 20 69
3BE9:6B3A 6E 20
3BE9:6B3C 43 50 2F 4D 2D 46 db 'CP/M-Format ,', 0
3BE9:6B42 6F 72 6D 61 74 20
3BE9:6B48 2C 00
3BE9:6B4A 44 61 74 65 69 65 db 'Dateien umsetzen von CP/M- in MS'
3BE9:6B50 6E 20 75 6D 73 65
3BE9:6B56 74 7A 65 6E 20 76
3BE9:6B5C 6F 6E 20 43 50 2F
3BE9:6B62 4D 2D 20 69 6E 20
3BE9:6B68 4D 53
3BE9:6B6A 2D 44 4F 53 2D 46 db '-DOS-Format %', 0
3BE9:6B70 6F 72 6D 61 74 20
3BE9:6B76 25 00
3BE9:6B78 44 61 74 65 69 65 db 'Dateien auf MS-DOS-Diskette loes'
3BE9:6B7E 6E 20 61 75 66 20
3BE9:6B84 4D 53 2D 44 4F 53
3BE9:6B8A 2D 44 69 73 6B 65
3BE9:6B90 74 74 65 20 6C 6F
3BE9:6B96 65 73
3BE9:6B98 63 68 65 6E 20 29 db 'chen )', 0
3BE9:6B9E 00
3BE9:6B9F 49 6E 69 74 69 61 db 'Initialisiere eine MS-DOS-Daten-'
3BE9:6BA5 6C 69 73 69 65 72
3BE9:6BAB 65 20 65 69 6E 65
3BE9:6BB1 20 4D 53 2D 44 4F
3BE9:6BB7 53 2D 44 61 74 65
3BE9:6BBD 6E 2D
3BE9:6BBF 44 69 73 6B 65 74 db 'Diskette '
3BE9:6BC5 74 65 20
3BE9:6BC8 19 00 db 19h, 00h
3BE9:6BCA 22 52 45 54 55 52 db '"RETURN"-Taste druecken: F', 0
3BE9:6BD0 4E 22 2D 54 61 73
3BE9:6BD6 74 65 20 64 72 75
3BE9:6BDC 65 63 6B 65 6E 3A
3BE9:6BE2 20 46 00
3BE9:6BE5 20 20 20 20 20 20 db ' Diese Funktion ist in der '
3BE9:6BEB 44 69 65 73 65 20
3BE9:6BF1 46 75 6E 6B 74 69
3BE9:6BF7 6F 6E 20 69 73 74
3BE9:6BFD 20 69 6E 20 64 65
3BE9:6C03 72 20
3BE9:6C05 56 65 72 73 69 6F db 'Version 1.1 nicht implementiert.'
3BE9:6C0B 6E 20 31 2E 31 20
3BE9:6C11 6E 69 63 68 74 20
3BE9:6C17 69 6D 70 6C 65 6D
3BE9:6C1D 65 6E 74 69 65 72
3BE9:6C23 74 2E
3BE9:6C25 20 20 20 20 20 20 db ' '
3BE9:6C2B 13 00 db 13h, 00h
3BE9:6C2D 000A[20] db 10 dup (20h)
3BE9:6C37 51 75 65 6C 6C 65 db 'Quelle : '
3BE9:6C3D 20 3A 20
3BE9:6C40 13 00 20 db 13h, 00h, 20h
3BE9:6C43 000B[20] db 11 dup (20h)
3BE9:6C4E 5A 69 65 6C 20 3A db 5Ah, 69h, 65h, 6Ch, 20h, 3Ah
3BE9:6C54 20 13 00 db 20h, 13h, 00h
3BE9:6C57 44 61 74 65 69 62 db 'Dateibezeichnung : '
3BE9:6C5D 65 7A 65 69 63 68
3BE9:6C63 6E 75 6E 67 20 3A
3BE9:6C69 20
3BE9:6C6A 13 00 20 db 13h, 00h, 20h
3BE9:6C6D 20 20 20 20 20 20 db ' Laufwerk : 8', 0
3BE9:6C73 20 4C 61 75 66 77
3BE9:6C79 65 72 6B 20 3A 20
3BE9:6C7F 38 00
3BE9:6C81 45 69 6E 67 61 62 db 'Eingabe von Laufwerk oder Dateib'
3BE9:6C87 65 20 76 6F 6E 20
3BE9:6C8D 4C 61 75 66 77 65
3BE9:6C93 72 6B 20 6F 64 65
3BE9:6C99 72 20 44 61 74 65
3BE9:6C9F 69 62
3BE9:6CA1 65 7A 65 69 63 68 db 'ezeichnung z.B. "A:*.*" /', 0
3BE9:6CA7 6E 75 6E 67 20 7A
3BE9:6CAD 2E 42 2E 20 22 41
3BE9:6CB3 3A 2A 2E 2A 22 20
3BE9:6CB9 2F 00
3BE9:6CBB 45 69 6E 67 61 62 db 'Eingabe der Dateibezeichnung z.B'
3BE9:6CC1 65 20 64 65 72 20
3BE9:6CC7 44 61 74 65 69 62
3BE9:6CCD 65 7A 65 69 63 68
3BE9:6CD3 6E 75 6E 67 20 7A
3BE9:6CD9 2E 42
3BE9:6CDB 2E 20 22 41 3A 54 db '. "A:TEST.TXT" Virtueller Parame'
3BE9:6CE1 45 53 54 2E 54 58
3BE9:6CE7 54 22 20 56 69 72
3BE9:6CED 74 75 65 6C 6C 65
3BE9:6CF3 72 20 50 61 72 61
3BE9:6CF9 6D 65
3BE9:6CFB 74 65 72 3A 20 00 db 'ter: ', 0
3BE9:6D01 0D 0A 0D 0A 1B 5B db 0Dh, 0Ah, 0Dh, 0Ah, 1Bh, '[7mWeit'
3BE9:6D07 37 6D 57 65 69 74
3BE9:6D0D 65 72 20 3F 20 20 db 'er ? Beliebige Taste druecken.'
3BE9:6D13 20 42 65 6C 69 65
3BE9:6D19 62 69 67 65 20 54
3BE9:6D1F 61 73 74 65 20 64
3BE9:6D25 72 75 65 63 6B 65
3BE9:6D2B 6E 2E
3BE9:6D2D 20 1B 5B 30 6D 0D db ' ', 1Bh, '[0m', 0Dh, 0Ah, 0
3BE9:6D33 0A 00
3BE9:6D35 50 72 6F 67 72 61 db 'Programm abgebrochen', 0Dh, 0Ah
3BE9:6D3B 6D 6D 20 61 62 67
3BE9:6D41 65 62 72 6F 63 68
3BE9:6D47 65 6E 0D 0A
3BE9:6D4B 01B5[00] db 437 dup (0)
seg_a ends
end
__________________ Interrupt Usage Synopsis __________________
22 Ocurrences of non-standard interrupts used (search for ??).
__________________ I/O Port Usage Synopsis __________________
No I/O ports used.

Reference in New Issue View Git Blame Copy Permalink