th02_maine.asm

;
; +-------------------------------------------------------------------------+
; |   This file has been generated by The Interactive Disassembler (IDA)    |
; |        Copyright (c) 2009 by Hex-Rays, <support@hex-rays.com>           |
; +-------------------------------------------------------------------------+
;
; Input	MD5   :	E6F971B37336C0F9FCE53F895780031E

; File Name   :	th02/MAINE.EXE
; Format      :	MS-DOS executable (EXE)
; Base Address:	0h Range: 0h-FCF0h Loaded length: DE32h
; Entry	Point :	0:0
; OS type	  :  MS	DOS
; Application type:  Executable	16bit

		.386
		.model large
		locals

include libs/BorlandC/RULES.ASI
include libs/master.lib/func.inc
include libs/master.lib/super.inc

; ===========================================================================

; Segment type:	Pure code
seg000		segment	word public 'CODE' use16
		assume cs:seg000
		assume es:nothing, ss:seg008, ds:dseg, fs:nothing, gs:nothing

include libs/BorlandC/c0.asm

		db    0
; ---------------------------------------------------------------------------
; START	OF FUNCTION CHUNK FOR sub_286

loc_272:
		push	ds
		mov	ds, word ptr cs:loc_35E+1
		call	smem_release
		mov	ax, 0FFF3h

loc_27F:
		pop	si
		pop	di
		pop	ds
		pop	bp
		retf	8
; END OF FUNCTION CHUNK	FOR sub_286

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_286		proc far

arg_0		= word ptr  6
arg_2		= dword	ptr  8
arg_6		= word ptr  0Ch

; FUNCTION CHUNK AT 0272 SIZE 00000014 BYTES

		push	bp
		mov	bp, sp
		push	ds
		push	si
		push	di
		mov	ax, [bp+arg_0]
		mov	word ptr cs:loc_36C+1, ax
		mov	word ptr cs:loc_35E+1, ds
		mov	ax, [bp+arg_6]
		mov	word ptr cs:loc_2EC+1, ax
		push	ds
		lds	bx, [bp+arg_2]
		mov	ax, [bx+8]
		mov	cx, [bx+0Ah]
		mov	bp, [bx+0Eh]
		sub	bp, [bx+0Ch]
		inc	bp
		pop	ds
		shr	ax, 3
		mov	byte ptr cs:loc_308+1, al
		mov	dh, al
		mov	dl, cl
		mov	word ptr cs:loc_363+1, dx
		mov	byte ptr cs:loc_306+1, cl
		mul	cx
		mov	word ptr cs:loc_301+1, ax
		shl	ax, 2
		mov	word ptr cs:loc_2E7+1, ax
		xchg	ax, bx
		push	bx
		call	smem_wget
		jb	short loc_27F
		xchg	ax, cx
		push	bx
		call	smem_wget
		jb	short loc_27F
		mov	es, ax
		mov	ds, cx

loc_2E7:
		mov	cx, 1234h
		xor	dx, dx

loc_2EC:
		mov	bx, 1234h
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		jnb	short loc_2F8
		jmp	loc_272
; ---------------------------------------------------------------------------

loc_2F8:
		cmp	ax, cx
		jz	short loc_2FF
		jmp	loc_272
; ---------------------------------------------------------------------------

loc_2FF:
		xor	si, si

loc_301:
		mov	dx, 1234h
		xor	bx, bx

loc_306:
		mov	ch, 11h

loc_308:
		mov	cl, 11h

loc_30A:
		push	cx
		push	dx
		push	bx
		lodsw
		mov	bx, ax
		lodsw
		mov	dx, ax
		mov	di, 4

loc_316:
		rol	bl, 1
		rcl	ch, 1
		rol	bl, 1
		rcl	cl, 1
		rol	bl, 1
		rcl	ah, 1
		rol	bl, 1
		rcl	al, 1
		rol	bl, 1
		rcl	ch, 1
		rol	bl, 1
		rcl	cl, 1
		rol	bl, 1
		rcl	ah, 1
		rol	bl, 1
		rcl	al, 1
		mov	bl, bh
		mov	bh, dl
		mov	dl, dh
		dec	di
		jnz	short loc_316
		pop	bx
		pop	dx
		mov	es:[bx+di], al
		add	di, dx
		mov	es:[bx+di], ah
		add	di, dx
		mov	es:[bx+di], cl
		add	di, dx
		mov	es:[bx+di], ch
		pop	cx
		inc	bx
		dec	cl
		jnz	short loc_30A
		dec	ch
		jnz	short loc_308
		push	ds

loc_35E:
		mov	ax, 1234h
		mov	ds, ax
		assume ds:nothing

loc_363:
		mov	ax, 1234h
		push	es
		push	ax
		push	es
		xor	ax, ax
		push	ax

loc_36C:
		mov	ax, 1234h
		push	ax
		push	cs
		call	near ptr sub_2762
		pop	es
		pop	ds
		assume ds:dseg
		jb	short loc_37E
		dec	bp
		jz	short loc_39A
		jmp	loc_2E7
; ---------------------------------------------------------------------------

loc_37E:
		push	ds
		mov	ds, word ptr cs:loc_35E+1
		mov	cx, ax
		push	es
		call	smem_release
		call	smem_release
		mov	ax, cx
		stc
		pop	si
		pop	di
		pop	ds
		pop	bp
		retf	8
; ---------------------------------------------------------------------------
		nop

loc_39A:
		push	ds
		mov	ds, word ptr cs:loc_35E+1
		push	es
		call	smem_release
		call	smem_release
		mov	ax, 0
		clc
		pop	si
		pop	di
		pop	ds
		pop	bp
		retf	8
sub_286		endp


; =============== S U B	R O U T	I N E =======================================


sub_3B4		proc far
		mov	bx, sp
		mov	cx, ss:[bx+8]
		les	bx, ss:[bx+4]
		mov	dx, es:[bx+1Ch]
		mov	ax, 4201h
		mov	bx, cx
		xor	cx, cx
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from present location
		mov	ax, 0FFF3h
		jb	short locret_3D3
		mov	ax, 0

locret_3D3:
		retf	6
sub_3B4		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_3D6		proc far

arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	ds
		lds	dx, [bp+arg_0]
		mov	bx, [bp+arg_4]
		mov	ah, 3Fh	; '?'
		mov	cx, 20h	; ' '
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		push	ds
		pop	es
		assume es:dseg
		pop	ds
		sbb	cx, cx
		xor	ax, cx
		sub	ax, cx
		jb	short loc_40D
		push	si
		push	di
		mov	si, 3DCh
		mov	di, dx
		mov	cx, 5
		repe cmpsb
		pop	di
		pop	si
		jnz	short loc_409
		mov	ax, 0
		pop	bp
		retf	6
; ---------------------------------------------------------------------------

loc_409:
		mov	ax, 0FFF3h
		stc

loc_40D:
		pop	bp
		retf	6
sub_3D6		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_412		proc far

arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		cld
		push	ds
		lds	bx, [bp+arg_0]
		mov	cx, [bx+1Ch]
		mov	si, [bx+1Eh]
		pop	ds
		mov	ax, 0
		jcxz	short loc_46C
		push	cx
		call	smem_wget
		jb	short loc_46C
		push	ds
		mov	ds, ax
		xor	dx, dx
		mov	bx, [bp+arg_4]
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		mov	ax, 0FFF3h
		jb	short loc_464
		mov	dx, si
		xor	si, si
		nop

loc_444:
		lodsb
		cmp	al, 10h
		jz	short loc_45E
		add	si, dx
		sub	si, 3
		lodsw
		or	ax, ax
		jz	short loc_459
		sub	cx, dx
		mov	dx, ax
		ja	short loc_444

loc_459:
		xor	ax, ax

loc_45B:
		jmp	short loc_464
; ---------------------------------------------------------------------------
		nop

loc_45E:
		lodsw
		lodsb
		and	ax, 0Fh
		nop

loc_464:
					; sub_412:loc_45Bj
		mov	bx, ds
		pop	ds
		push	bx
		call	smem_release

loc_46C:
		pop	si
		pop	bp
		retf	6
sub_412		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_472		proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		mov	es, [bp+arg_0]
		assume es:nothing
		mov	bx, es:0
		mov	ah, 3Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		push	es
		call	hmem_free
		pop	bp
		retf	2
sub_472		endp

include libs/master.lib/bfill.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_4C6		proc far

arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	ds
		lds	bx, [bp+arg_0]
		test	byte ptr [bx+5], 80h
		pop	ds
		jz	short loc_4FE
		mov	ah, 3Fh	; '?'
		mov	bx, [bp+arg_4]
		mov	cx, 30h	; '0'
		mov	dx, 20D0h
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		jb	short loc_4FE
		mov	bx, dx
		mov	cx, 1004h

loc_4E8:
		mov	dl, [bx]
		mov	ax, [bx+1]
		mov	[bx], ax
		mov	[bx+2],	dl
		add	bx, 3
		dec	ch
		jnz	short loc_4E8
		mov	ax, 0
		jmp	short loc_502
; ---------------------------------------------------------------------------

loc_4FE:
		stc
		mov	ax, 0FFF3h

loc_502:
		pop	bp
		retf	6
sub_4C6		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_506		proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		mov	es, [bp+arg_0]
		cmp	word ptr es:2, 0
		jz	short loc_52D
		dec	word ptr es:2
		mov	bx, es:4
		inc	word ptr es:4
		mov	al, es:[bx+8]
		xor	ah, ah
		pop	bp
		retf	2
; ---------------------------------------------------------------------------

loc_52D:
		push	es
		push	cs
		call	near ptr bfill
		pop	bp
		retf	2
sub_506		endp


; =============== S U B	R O U T	I N E =======================================


sub_536		proc far
		mov	bx, sp
		push	si
		push	di
		mov	si, ss:[bx+4]
		mov	word_D3B0, 0
		nop
		push	cs
		call	near ptr sub_2434

loc_549:
		nop
		push	cs

loc_54B:
		call	loc_1C2C
		mov	di, si
		cmp	di, 0
		jle	short loc_55D

loc_555:
		nop
		push	cs
		call	near ptr sub_2434
		dec	di
		jnz	short loc_555

loc_55D:
		add	word_D3B0, 6
		cmp	word_D3B0, 64h ; 'd'
		jl	short loc_549
		mov	word_D3B0, 64h ; 'd'
		nop
		push	cs
		call	loc_1C2C
		pop	di
		pop	si
		retf	2
sub_536		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_57A		proc far
					; sub_9B64+2B2P ...
		mov	bx, sp
		push	si
		push	di
		mov	si, ss:[bx+4]
		mov	word_D3B0, 64h ; 'd'
		nop
		push	cs
		call	near ptr sub_2434

loc_58D:
		nop
		push	cs
		call	loc_1C2C
		mov	di, si
		cmp	di, 0
		jle	short loc_5A1

loc_599:
		nop
		push	cs
		call	near ptr sub_2434
		dec	di
		jnz	short loc_599

loc_5A1:
		sub	word_D3B0, 6
		jg	short loc_58D
		mov	word_D3B0, 0
		nop
		push	cs
		call	loc_1C2C
		pop	di
		pop	si
		retf	2
sub_57A		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_5B8		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		mov	mem_AllocID, 6
		mov	ax, word_D3E8
		add	ax, 9
		push	ax
		call	hmem_allocbyte
		jb	short loc_5F4
		mov	es, ax
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	dos_ropen
		jb	short loc_5FB
		mov	es:0, ax
		mov	word ptr es:2, 0
		mov	ax, word_D3E8
		mov	es:6, ax
		mov	ax, es
		pop	bp
		retf	4
; ---------------------------------------------------------------------------

loc_5F4:
		mov	byte ptr word_D3EA, 3
		jmp	short loc_605
; ---------------------------------------------------------------------------

loc_5FB:
		push	es
		call	hmem_free
		mov	byte ptr word_D3EA, 1

loc_605:
		xor	ax, ax
		pop	bp
		retf	4
sub_5B8		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_60C		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	di, [bp+arg_4]
		mov	si, [bp+arg_2]
		cmp	si, 0
		jle	short loc_631

loc_61C:
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_506
		inc	ah
		jz	short loc_631
		mov	es, [bp+arg_6]
		mov	es:[di], al
		inc	di
		dec	si
		jnz	short loc_61C

loc_631:
		mov	ax, di
		sub	ax, [bp+arg_4]
		pop	di
		pop	si
		pop	bp
		retf	8
sub_60C		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_63C		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		mov	es, [bp+arg_4]
		mov	ax, es:2
		mov	dx, [bp+arg_0]
		mov	cx, [bp+arg_2]
		or	cx, cx
		jnz	short loc_664
		cmp	dx, ax
		ja	short loc_664
		sub	es:2, dx
		add	es:4, dx
		xor	ax, ax
		pop	bp
		retf	6
; ---------------------------------------------------------------------------

loc_664:
		mov	bx, es:0
		sub	dx, ax
		sbb	cx, 0
		mov	ax, 4201h
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from present location
		sbb	ax, ax
		mov	es:2, ax
		pop	bp
		retf	6
sub_63C		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_67E		proc far

arg_0		= byte ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		mov	es, [bp+arg_6]
		mov	bx, 0
		xchg	bx, es:2
		mov	al, [bp+arg_0]
		mov	dx, [bp+arg_2]
		mov	cx, [bp+arg_4]
		cmp	al, 1
		jnz	short loc_69E
		sub	dx, bx
		sbb	cx, 0

loc_69E:
		mov	bx, es:0
		mov	ah, 42h
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method:
					; 0-from beginnig,1-from current,2-from	end
		sbb	ax, ax
		pop	bp
		retf	8
sub_67E		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_6AE		proc near
		or	bl, bl
		jz	short loc_6EA
		test	bl, 3
		jz	short loc_6EE
		test	bl, 1
		jz	short loc_6C2
		mov	ax, word_D362
		jmp	short loc_6C5
; ---------------------------------------------------------------------------
		nop

loc_6C2:
		mov	ax, word_D366

loc_6C5:
		sub	cx, si
		jz	short loc_6EA
		mov	dx, di
		sub	dx, bp
		mov	di, ax
		sub	ax, si
		imul	dx
		idiv	cx
		add	ax, bp
		mov	cx, di
		mov	di, ax
		xor	ax, ax
		or	di, di
		js	short loc_6F8
		mov	ax, word_D36A
		cmp	di, ax
		jg	short loc_6F8

loc_6E8:
		xor	bl, bl

loc_6EA:
		or	bx, bx
		retn
; ---------------------------------------------------------------------------
		nop

loc_6EE:
		xor	ax, ax
		test	bl, 4
		jz	short loc_6F8
		mov	ax, word_D36A

loc_6F8:
		sub	di, bp
		jz	short loc_6EA
		mov	dx, cx
		sub	dx, si
		mov	cx, ax
		sub	ax, bp
		imul	dx
		idiv	di
		add	ax, si
		mov	di, cx
		mov	cx, ax

loc_70E:
		cmp	word_D362, cx
		jle	short loc_718
		mov	bl, 1
		retn
; ---------------------------------------------------------------------------
		nop

loc_718:
		cmp	cx, word_D366
		jle	short loc_6E8
		mov	bl, 2
		retn
sub_6AE		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_722		proc far

arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	ds
		lds	dx, [bp+arg_0]
		mov	ax, [bp+arg_4]
		int	21h		; DOS -
		pop	ds
		sbb	dx, dx
		xor	ax, dx
		sub	ax, dx
		pop	bp
		retf	6
sub_722		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_73A		proc far
		mov	bx, sp
		mov	bx, ss:[bx+4]
		mov	ax, 4201h
		xor	cx, cx
		mov	dx, cx
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from present location
		jb	short loc_76A
		push	si
		push	di
		push	ax
		push	dx
		xor	dx, dx
		mov	ax, 4202h
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from end of file
		mov	si, ax
		mov	di, dx
		pop	cx
		pop	dx
		mov	ax, 4200h
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from beginning of	file
		mov	ax, si
		mov	dx, di
		pop	di
		pop	si
		retf	2
; ---------------------------------------------------------------------------

loc_76A:
		neg	ax
		sbb	dx, dx
		retf	2
sub_73A		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_772		proc far

arg_0		= dword	ptr  6
arg_4		= byte ptr  0Ah

		push	bp
		mov	bp, sp
		push	ds
		push	bx
		push	es
		mov	al, [bp+arg_4]
		lds	dx, [bp+arg_0]
		mov	ah, 35h
		int	21h		; DOS -	2+ - GET INTERRUPT VECTOR
					; AL = interrupt number
					; Return: ES:BX	= value	of interrupt vector
		mov	ah, 25h
		int	21h		; DOS -	SET INTERRUPT VECTOR
					; AL = interrupt number
					; DS:DX	= new vector to	be used	for specified interrupt
		mov	ax, bx
		mov	dx, es
		pop	es
		pop	bx
		pop	ds
		pop	bp
		retf	6
sub_772		endp

include libs/master.lib/egc.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_7F4		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	ds
		push	si
		push	di
		mov	cx, [bp+arg_8]
		mov	dx, [bp+arg_4]
		mov	si, [bp+arg_2]
		mov	di, [bp+arg_0]
		mov	ax, di
		shl	ax, 2
		add	ax, di
		shl	ax, 4
		mov	word ptr cs:loc_8C7+2, ax
		mov	ax, si
		sub	ax, [bp+arg_6]
		mov	bx, ax
		inc	bx
		mov	ax, si
		shl	si, 2
		add	si, ax
		shl	si, 4
		mov	ax, dx
		shr	ax, 3
		and	ax, 0FFFEh
		add	si, ax
		shr	ax, 1
		mov	bp, cx
		shr	bp, 4
		sub	ax, bp
		inc	ax
		mov	bp, dx
		sub	bp, cx
		mov	cx, ax
		and	dl, 0Fh
		mov	dh, 0Fh
		sub	dh, dl
		mov	dl, dh
		xor	dh, dh
		mov	ax, dx
		push	bx
		push	bp
		mov	bx, bp
		add	bx, ax
		shr	bx, 4
		add	bp, dx
		shr	bp, 4
		cmp	al, dl
		jz	short loc_86E
		jl	short loc_868
		cmp	bx, bp
		jnz	short loc_86E
		jmp	short loc_86C
; ---------------------------------------------------------------------------
		nop

loc_868:
		cmp	bx, bp
		jge	short loc_86E

loc_86C:
		inc	cx
		nop

loc_86E:
		pop	bp
		pop	bx
		shl	dl, 4
		or	dl, al
		mov	di, dx
		mov	ax, 29h	; ')'
		sub	ax, cx
		shl	ax, 1
		mov	byte ptr cs:loc_8D6+2, al
		mov	byte ptr cs:loc_8D9+2, al
		mov	al, 7
		out	6Ah, al		; PC-98	GDC (6a):
					;
		mov	al, 80h	; '€'
		out	7Ch, al
		mov	al, 5
		out	6Ah, al		; PC-98	GDC (6a):
					;
		mov	dx, 4A0h
		mov	ax, 0FFF0h
		out	dx, ax
		mov	dx, 4A2h
		mov	ax, 0FFh
		out	dx, ax
		mov	dx, 4A4h
		mov	ax, 28F0h
		out	dx, ax
		mov	dx, 4A8h
		mov	ax, 0FFFFh
		out	dx, ax
		mov	dx, 4ACh
		mov	ax, di
		or	ax, 1000h
		out	dx, ax
		mov	dx, 4AEh
		mov	ax, bp
		out	dx, ax
		std
		mov	ax, 0A800h
		mov	ds, ax
		assume ds:nothing
		mov	es, ax
		assume es:nothing
		mov	di, si

loc_8C7:
		add	di, 1111h
		mov	dx, cx
		nop

loc_8CE:
		mov	cx, dx
		rep movsw
		inc	si
		inc	si
		inc	di
		inc	di

loc_8D6:
		sub	si, 50h	; 'P'

loc_8D9:
		sub	di, 50h	; 'P'
		dec	bx
		jnz	short loc_8CE
		cld
		mov	dx, 4A0h
		mov	ax, 0FFF0h
		out	dx, ax
		mov	al, 4
		out	6Ah, al		; PC-98	GDC (6a):
					;
		mov	al, 0
		out	7Ch, al
		mov	al, 6
		out	6Ah, al		; PC-98	GDC (6a):
					;
		pop	di
		pop	si
		pop	ds
		assume ds:dseg
		pop	bp
		retf	0Ah
sub_7F4		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_8FA		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	ds
		push	si
		push	di
		mov	cx, [bp+arg_8]
		mov	si, [bp+arg_6]
		mov	dx, [bp+arg_4]
		mov	bx, [bp+arg_2]
		mov	di, [bp+arg_0]
		mov	ax, di
		dec	ax
		shr	ax, 4
		shl	ax, 1
		mov	byte ptr cs:loc_9CB+2, al
		sub	bx, si
		inc	bx
		mov	ax, si
		shl	si, 2
		add	si, ax
		shl	si, 4
		mov	ax, cx
		shr	ax, 3
		and	ax, 0FFFEh
		add	si, ax
		shr	ax, 1
		mov	bp, dx
		shr	bp, 4
		sub	bp, ax
		inc	bp
		mov	ax, bp
		mov	bp, dx
		sub	bp, cx
		mov	es, cx
		assume es:nothing
		mov	cx, ax
		mov	dx, es
		sub	dx, di
		and	dx, 0Fh
		mov	ax, es
		and	ax, 0Fh
		push	bx
		push	bp
		mov	bx, bp
		add	bx, ax
		shr	bx, 4
		add	bp, dx
		shr	bp, 4
		cmp	al, dl
		jz	short loc_972
		jl	short loc_96C
		cmp	bx, bp
		jnz	short loc_972
		jmp	short loc_970
; ---------------------------------------------------------------------------

loc_96C:
		cmp	bx, bp
		jge	short loc_972

loc_970:
		inc	cx
		nop

loc_972:
		pop	bp
		pop	bx
		shl	dl, 4
		or	dl, al
		xor	dh, dh
		mov	di, dx
		mov	ax, 29h	; ')'
		sub	ax, cx
		shl	ax, 1
		mov	byte ptr cs:loc_9D8+2, al
		mov	byte ptr cs:loc_9DB+2, al
		mov	al, 7
		out	6Ah, al		; PC-98	GDC (6a):
					;
		mov	al, 80h	; '€'
		out	7Ch, al
		mov	al, 5
		out	6Ah, al		; PC-98	GDC (6a):
					;
		mov	dx, 4A0h
		mov	ax, 0FFF0h
		out	dx, ax
		mov	dx, 4A2h
		mov	ax, 0FFh
		out	dx, ax
		mov	dx, 4A4h
		mov	ax, 28F0h
		out	dx, ax
		mov	dx, 4A8h
		mov	ax, 0FFFFh
		out	dx, ax
		mov	dx, 4ACh
		mov	ax, di
		out	dx, ax
		mov	dx, 4AEh
		mov	ax, bp
		out	dx, ax
		mov	ax, 0A800h
		mov	ds, ax
		assume ds:nothing
		mov	es, ax
		assume es:nothing
		mov	di, si
		dec	di
		dec	di

loc_9CB:
		sub	di, 50h	; 'P'
		mov	dx, cx

loc_9D0:
		mov	cx, dx
		rep movsw
		dec	si
		dec	si
		dec	di
		dec	di

loc_9D8:
		add	si, 50h	; 'P'

loc_9DB:
		add	di, 50h	; 'P'
		dec	bx
		jnz	short loc_9D0
		mov	dx, 4A0h
		mov	ax, 0FFF0h
		out	dx, ax
		mov	al, 4
		out	6Ah, al		; PC-98	GDC (6a):
					;
		mov	al, 0
		out	7Ch, al
		mov	al, 6
		out	6Ah, al		; PC-98	GDC (6a):
					;
		pop	di
		pop	si
		pop	ds
		assume ds:dseg
		pop	bp
		retf	0Ah
sub_8FA		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9FC		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		mov	ax, 0
		mov	bx, word_D396
		cmp	bx, 0FFFFh
		jnz	short loc_A4C
		mov	ax, 3D02h
		push	ax
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_722
		or	ax, dx
		mov	word_D396, ax
		mov	cx, ax
		xor	ax, ax
		mov	word_F04A, ax
		mov	word_F048, ax
		mov	word_F04C, ax
		mov	word_F04E, ax
		mov	word_F044, ax
		mov	word_F046, ax
		inc	dx
		jz	short loc_A4C
		mov	bx, cx
		xor	cx, cx
		mov	dx, cx
		mov	ax, 4202h
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from end of file
		mov	word_F044, ax
		mov	word_F046, dx
		mov	ax, 1

loc_A4C:
		pop	bp
		retf	4
sub_9FC		endp


; =============== S U B	R O U T	I N E =======================================


sub_A50		proc far
		mov	bx, word_D396
		cmp	bx, 0FFFFh
		jz	short locret_ABA
		mov	ax, word_F048
		cmp	word_F04A, ax
		jnb	short loc_A8E
		push	ds
		mov	cx, word_F048
		lds	dx, dword_F040
		mov	ah, 40h
		int	21h		; DOS -	2+ - WRITE TO FILE WITH	HANDLE
					; BX = file handle, CX = number	of bytes to write, DS:DX -> buffer
		pop	ds
		jb	short loc_A81
		add	word_F044, ax
		adc	word_F046, 0
		cmp	word_F048, ax
		jz	short loc_A87

loc_A81:
		mov	word_F04E, 1

loc_A87:
		mov	word_F048, 0
		retf
; ---------------------------------------------------------------------------

loc_A8E:
		cmp	word_F04A, 0
		jz	short locret_ABA
		mov	dx, ax
		mov	cx, 0
		add	dx, word_F044
		mov	word_F04A, cx
		mov	word_F048, cx
		adc	cx, word_F046
		mov	ax, 4200h
		mov	bx, word_D396
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from beginning of	file
		mov	word_F044, ax
		mov	word_F046, dx

locret_ABA:
		retf
sub_A50		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_ABC		proc far
		push	cs
		call	near ptr sub_A50
		mov	ah, 3Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		mov	word_D396, 0FFFFh
		retf
sub_ABC		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_ACC		proc far
		mov	bx, sp
		push	word ptr ss:[bx+6]
		push	word ptr ss:[bx+4]
		nop
		call	dos_ropen
		jb	short loc_AE2
		xchg	ax, bx
		mov	ah, 3Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle

loc_AE2:
		sbb	ax, ax
		inc	ax
		retf	4
sub_ACC		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_AE8		proc far

arg_0		= word ptr  6
arg_2		= dword	ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		cmp	word_D394, 0
		jz	short loc_B6C
		mov	bx, [bp+arg_0]
		les	di, [bp+arg_2]
		assume es:nothing

loc_AFA:
		mov	ax, word_F04A
		cmp	word_F048, ax
		jb	short loc_B30
		add	word_F044, ax
		adc	word_F046, 0
		push	bx
		push	ds
		mov	cx, word_D394
		mov	bx, word_D396
		lds	dx, dword_F040
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		pop	ds
		pop	bx
		cmc
		sbb	dx, dx
		and	ax, dx
		mov	word_F04A, ax
		jz	short loc_B8B
		mov	word_F048, 0

loc_B30:
		mov	si, word_F04A
		sub	si, word_F048
		sub	si, bx
		sbb	ax, ax
		and	si, ax
		add	si, bx
		mov	ax, es
		or	ax, di
		jz	short loc_B61
		or	si, si
		jz	short loc_B61
		push	si
		push	ds
		mov	cx, si
		mov	ax, word_F048
		lds	si, dword_F040
		add	si, ax
		shr	cx, 1
		rep movsw
		adc	cx, cx
		rep movsb
		pop	ds
		pop	si

loc_B61:
		add	word_F048, si
		sub	bx, si
		jnz	short loc_AFA
		jmp	short loc_B91
; ---------------------------------------------------------------------------
		nop

loc_B6C:
		push	ds
		mov	cx, [bp+arg_0]
		mov	bx, word_D396
		lds	dx, [bp+arg_2]
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		pop	ds
		add	word_F044, ax
		adc	word_F046, 0
		mov	bx, cx
		sub	bx, ax
		jz	short loc_B91

loc_B8B:
		mov	word_F04C, 1

loc_B91:
		mov	ax, [bp+arg_0]
		sub	ax, bx
		pop	di
		pop	si
		pop	bp
		retf	6
sub_AE8		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B9C		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		xor	ax, ax
		mov	bx, word_D396
		cmp	bx, 0FFFFh
		jnz	short loc_BD3
		push	[bp+arg_2]
		push	[bp+arg_0]
		nop
		call	dos_ropen
		sbb	bx, bx
		or	ax, bx
		mov	word_D396, ax
		xor	ax, ax
		mov	word_F04A, ax
		mov	word_F044, ax
		mov	word_F046, ax
		mov	word_F048, ax
		mov	word_F04C, ax
		mov	word_F04E, ax
		lea	ax, [bx+1]

loc_BD3:
		pop	bp
		retf	4
sub_B9C		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_BD8		proc far
		push	cs
		call	near ptr sub_A50
		cmp	bx, 0FFFFh
		jz	short locret_C09
		push	bp
		mov	bp, sp
		mov	al, [bp+6]
		mov	ah, 42h	; 'B'
		mov	dx, [bp+8]
		mov	cx, [bp+0Ah]
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method:
					; 0-from beginnig,1-from current,2-from	end
		pop	bp
		mov	ax, 4201h
		mov	dx, 0
		mov	cx, dx
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method: offset from present location
		mov	word_F04C, 0
		mov	word_F044, ax
		mov	word_F046, dx

locret_C09:
		retf	6
sub_BD8		endp

; ---------------------------------------------------------------------------
		mov	ax, word_F048
		xor	dx, dx
		add	ax, word_F044
		adc	dx, word_F046
		retf

; =============== S U B	R O U T	I N E =======================================


sub_C1A		proc far
		push	word_D396
		push	cs
		call	near ptr sub_73A
		jb	short loc_C25
		retf
; ---------------------------------------------------------------------------

loc_C25:
		mov	ax, dx
		retf
sub_C1A		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_C28		proc far

arg_0		= word ptr  6
arg_2		= dword	ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		cmp	word_D394, 0
		jz	short loc_C9E
		mov	bx, [bp+arg_0]
		mov	si, word ptr [bp+arg_2]

loc_C3A:
		mov	cx, word_D394
		sub	cx, word_F048
		sub	cx, bx
		sbb	ax, ax
		and	cx, ax
		add	cx, bx
		les	di, dword_F040
		add	di, word_F048
		sub	bx, cx
		add	word_F048, cx
		push	ds
		mov	ds, word ptr [bp+arg_2+2]
		shr	cx, 1
		rep movsw
		adc	cx, cx
		rep movsb
		pop	ds
		or	ax, ax
		jns	short loc_C94
		push	ds
		push	bx
		mov	cx, word_D394
		mov	bx, word_D396
		lds	dx, dword_F040
		mov	ah, 40h
		int	21h		; DOS -	2+ - WRITE TO FILE WITH	HANDLE
					; BX = file handle, CX = number	of bytes to write, DS:DX -> buffer
		pop	bx
		pop	ds
		jb	short loc_CB0
		cmp	word_D394, ax
		jnz	short loc_CB0
		mov	word_F048, 0
		add	word_F044, ax
		adc	word_F046, 0

loc_C94:
		or	bx, bx
		jnz	short loc_C3A
		mov	ax, 1
		jmp	short loc_CC6
; ---------------------------------------------------------------------------
		nop

loc_C9E:
		push	ds
		mov	cx, [bp+arg_0]
		mov	bx, word_D396
		lds	dx, [bp+arg_2]
		mov	ah, 40h
		int	21h		; DOS -	2+ - WRITE TO FILE WITH	HANDLE
					; BX = file handle, CX = number	of bytes to write, DS:DX -> buffer
		pop	ds
		jnb	short loc_CB8

loc_CB0:
		mov	word_F04E, 1
		xor	ax, ax

loc_CB8:
		add	word_F044, ax
		adc	word_F046, 0
		add	ax, 0FFFFh
		sbb	ax, ax

loc_CC6:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf	6
sub_C28		endp


; =============== S U B	R O U T	I N E =======================================


sub_CCE		proc far
		mov	bx, sp
		mov	ah, 3Eh	; '>'
		mov	bx, ss:[bx+4]
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		mov	ax, 0
		jnb	short locret_CE0
		mov	ax, 0FFF3h

locret_CE0:
		retf	2
sub_CCE		endp

include libs/master.lib/dos_ropen.asm

; ---------------------------------------------------------------------------
; START	OF FUNCTION CHUNK FOR sub_D04

loc_CFE:
		pop	di
		pop	si
		pop	bp
		retf	8
; END OF FUNCTION CHUNK	FOR sub_D04

; =============== S U B	R O U T	I N E =======================================


sub_D04		proc far

; FUNCTION CHUNK AT 0CFE SIZE 00000006 BYTES

		push	bp
		push	si
		push	di
		cli
		add	sp, 0Ah
		pop	di
		pop	si
		pop	ax
		pop	bx
		sub	sp, 12h
		sti
		cmp	bx, si
		jle	short loc_D19
		xchg	bx, si

loc_D19:
		mov	bp, word_D362
		mov	dx, word_D364
		sub	si, bp
		jl	short loc_CFE
		sub	bx, bp
		cmp	bx, 8000h
		sbb	cx, cx
		and	bx, cx
		sub	si, dx
		sbb	cx, cx
		and	si, cx
		add	si, dx
		sub	si, bx
		jl	short loc_CFE
		add	bx, bp
		cmp	ax, di
		jle	short loc_D42
		xchg	ax, di

loc_D42:
		mov	dx, word_D368
		mov	bp, word_D36A
		sub	di, dx
		js	short loc_CFE
		sub	ax, dx
		cmp	ax, 8000h
		sbb	cx, cx
		and	ax, cx
		sub	di, bp
		sbb	cx, cx
		and	di, cx
		add	di, bp
		sub	di, ax
		jl	short loc_CFE
		mov	dx, ax
		shl	ax, 2
		add	ax, dx
		add	ax, word_D36E
		mov	es, ax
		mov	dx, di
		shl	di, 2
		add	di, dx
		shl	di, 4
		mov	dx, bx
		shr	dx, 4
		shl	dx, 1
		add	di, dx
		and	bx, 0Fh
		add	si, bx
		sub	si, 10h
		shl	bx, 1
		mov	dx, [bx+3F2h]
		not	dx
		mov	bx, si
		and	bx, 0Fh
		shl	bx, 1
		mov	bx, [bx+3F4h]
		sar	si, 4
		js	short loc_DC0
		lea	bp, [si+2Ah]
		shl	bp, 1

loc_DA8:
		mov	ax, dx
		stosw
		mov	ax, 0FFFFh
		mov	cx, si
		rep stosw
		mov	ax, bx
		stosw
		sub	di, bp
		jnb	short loc_DA8
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------
		nop

loc_DC0:
		mov	bp, 52h	; 'R'
		mov	ax, dx
		and	ax, bx
		nop

loc_DC8:
		stosw
		sub	di, bp
		jnb	short loc_DC8
		pop	di
		pop	si
		pop	bp
		retf	8
sub_D04		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_DD4		proc far
		push	bp
		push	si
		push	di
		cli
		add	sp, 0Ah
		pop	bp
		pop	si
		pop	di
		pop	cx
		sub	sp, 12h
		sti
		mov	ax, word_D368
		sub	di, ax
		sub	bp, ax
		mov	ax, word_D362
		mov	dx, word_D36A
		mov	bx, 505h
		cmp	ax, cx
		jg	short loc_E04
		xor	bl, 3
		cmp	cx, word_D366
		jg	short loc_E04
		xor	bl, 2

loc_E04:
		cmp	di, dx
		jg	short loc_E12
		xor	bl, 0Ch
		or	di, di
		js	short loc_E12
		xor	bl, 8

loc_E12:
		cmp	ax, si
		jg	short loc_E22
		xor	bh, 3
		cmp	si, word_D366
		jg	short loc_E22
		xor	bh, 2

loc_E22:
		cmp	bp, dx
		jg	short loc_E30
		xor	bh, 0Ch
		or	bp, bp
		js	short loc_E30
		xor	bh, 8

loc_E30:
		test	bh, bl
		jnz	short loc_E9B
		or	bx, bx
		jz	short loc_E48
		call	sub_6AE
		jz	short loc_E48
		xchg	bh, bl
		xchg	cx, si
		xchg	di, bp
		call	sub_6AE
		jnz	short loc_E9B

loc_E48:
		mov	es, word_D36E
		sub	si, cx
		jnb	short loc_E56
		add	cx, si
		neg	si
		xchg	di, bp

loc_E56:
		sub	bp, di
		sbb	dx, dx
		mov	bx, 50h	; 'P'
		add	bx, dx
		xor	bx, dx
		add	bp, dx
		xor	dx, bp
		mov	ax, di
		shl	ax, 2
		add	di, ax
		shl	di, 4
		mov	ax, cx
		shr	ax, 3
		add	di, ax
		xor	ax, ax
		cmp	si, dx
		jg	short loc_EF0
		jz	short loc_EAE
		dec	bx
		xchg	dx, si
		div	si
		mov	dx, 8000h
		mov	bp, ax
		and	cl, 7
		mov	al, dh
		shr	al, cl
		lea	cx, [si+1]

loc_E92:
		stosb
		add	dx, bp
		jb	short loc_EA2
		add	di, bx
		loop	loc_E92

loc_E9B:
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------
		nop

loc_EA2:
		ror	al, 1
		adc	di, bx
		loop	loc_E92
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------

loc_EAE:
		dec	bx
		and	cl, 7
		mov	al, 80h	; '€'
		shr	al, cl
		lea	cx, [si+1]
		shr	cx, 1
		jnb	short loc_EC2
		stosb
		ror	al, 1
		adc	di, bx

loc_EC2:
		jcxz	short loc_EEA
		shr	cx, 1
		jnb	short loc_ED2
		stosb
		ror	al, 1
		adc	di, bx
		stosb
		ror	al, 1
		adc	di, bx

loc_ED2:
		jcxz	short loc_EEA

loc_ED4:
		stosb
		ror	al, 1
		adc	di, bx
		stosb
		ror	al, 1
		adc	di, bx
		stosb
		ror	al, 1
		adc	di, bx
		stosb
		ror	al, 1
		adc	di, bx
		loop	loc_ED4

loc_EEA:
					; sub_DD4:loc_ED2j
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------

loc_EF0:
		and	di, 0FFFEh
		or	dx, dx
		jz	short loc_F44
		div	si
		mov	dx, 8000h
		mov	bp, dx
		and	cl, 0Fh
		shr	dx, cl
		mov	cx, si
		inc	cx
		mov	si, ax
		xor	ax, ax

loc_F0A:
		or	ax, dx
		ror	dx, 1
		jb	short loc_F20
		add	bp, si
		jb	short loc_F32
		loop	loc_F0A
		xchg	ah, al
		stosw
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------
		nop

loc_F20:
		xchg	ah, al
		stosw
		xor	ax, ax
		add	bp, si
		jb	short loc_F39
		loop	loc_F0A
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------
		nop

loc_F32:
		xchg	ah, al
		mov	es:[di], ax
		xor	ax, ax

loc_F39:
		add	di, bx
		loop	loc_F0A
		pop	di
		pop	si
		pop	bp
		retf	8
; ---------------------------------------------------------------------------
		nop

loc_F44:
		mov	bx, cx
		and	bx, 0Fh
		lea	cx, [bx+si-10h]
		shl	bx, 1
		mov	ax, [bx+3F2h]
		not	ax
		mov	bx, cx
		and	bx, 0Fh
		shl	bx, 1
		sar	cx, 4
		js	short loc_F66
		stosw
		mov	ax, 0FFFFh
		rep stosw

loc_F66:
		and	ax, [bx+3F4h]
		stosw
		pop	di
		pop	si
		pop	bp
		retf	8
sub_DD4		endp ; sp-analysis failed

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_F72		proc far
		mov	bx, sp
		mov	al, ss:[bx+6]
		mov	ah, ss:[bx+4]
		mov	dx, 7Eh	; '~'
		pushf
		cli
		out	7Ch, al
		shr	ah, 1
		sbb	al, al
		out	dx, al
		shr	ah, 1
		sbb	al, al
		out	dx, al
		shr	ah, 1
		sbb	al, al
		out	dx, al
		shr	ah, 1
		sbb	al, al
		out	dx, al
		popf
		retf	4
sub_F72		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_F9C		proc far
		xor	al, al
		out	7Ch, al
		retf
sub_F9C		endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_FA2		proc far
		xor	ax, ax
		cmp	word_D39A, ax
		jnz	short locret_FC5
		mov	ax, 200h
		push	ax
		nop
		call	hmem_alloc
		or	ax, ax
		jz	short locret_FC5
		mov	word_D39A, ax
		push	ax
		xor	ax, ax
		push	ax
		push	cs
		call	near ptr sub_115A
		mov	ax, 1

locret_FC5:
		retf
sub_FA2		endp


; =============== S U B	R O U T	I N E =======================================


sub_FC6		proc far
		mov	ax, word_D39A
		test	ax, ax
		jz	short locret_FE1
		push	ax
		push	ax
		xor	ax, ax
		mov	word_D39A, ax
		push	ax
		push	cs
		call	near ptr sub_11C8
		nop
		call	hmem_free
		mov	ax, 1

locret_FE1:
		retf
sub_FC6		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_FE2		proc far

arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		sub	sp, 20h
		push	[bp+arg_2]
		push	[bp+arg_0]
		nop
		call	dos_ropen
		mov	bp, ax
		mov	ax, 0
		jb	short loc_106F
		mov	ax, 2000h
		push	ax
		nop
		call	smem_wget
		mov	si, ax
		mov	ax, 0
		jb	short loc_1067
		mov	ax, sp
		push	bp
		push	ss
		push	ax
		nop
		push	cs
		call	near ptr sub_3D6
		jb	short loc_105D
		mov	di, sp
		push	ss
		pop	es
		cmp	byte ptr es:[di+5], 0
		jnz	short loc_105D
		add	di, 8
		push	si
		mov	si, 41Ch
		mov	cx, 4
		repe cmpsw
		pop	si
		jnz	short loc_105D
		mov	ax, sp
		push	bp
		push	ss
		push	ax
		nop
		push	cs
		call	near ptr sub_3B4
		push	ds
		mov	ds, si
		mov	bx, bp
		xor	dx, dx
		mov	cx, 2000h
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		pop	ds
		cmp	ax, 2000h
		jnz	short loc_105D
		push	si
		xor	ax, ax
		push	ax
		push	cs
		call	near ptr sub_11C8
		mov	ax, 1
		jmp	short loc_105F
; ---------------------------------------------------------------------------

loc_105D:
		xor	ax, ax

loc_105F:
		push	ax
		push	si
		nop
		call	smem_release
		pop	ax

loc_1067:
		push	ax
		mov	bx, bp
		mov	ah, 3Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		pop	ax

loc_106F:
		add	sp, 20h
		pop	di
		pop	si
		pop	bp
		retf	4
sub_FE2		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1078	proc far

arg_0		= word ptr  4
arg_2		= byte ptr  6
arg_4		= word ptr  8
arg_6		= word ptr  0Ah

		mov	dx, bp
		mov	bp, sp
		mov	cx, di
		mov	ax, [bp+arg_4]
		mov	di, ax
		shl	ax, 1
		shl	ax, 1
		add	di, ax
		shl	di, 1
		add	di, TextVramSeg
		mov	es, di
		mov	di, [bp+arg_6]
		shl	di, 1
		mov	ah, [bp+arg_2]
		mov	al, 0
		rol	ax, 1
		shr	ax, 1
		adc	ax, 56h	; 'V'
		mov	bx, [bp+arg_0]
		mov	bp, dx
		mov	es:[di+2000h], bx
		stosw
		or	ah, 80h
		mov	es:[di+2000h], bx
		stosw
		mov	di, cx
		retf	8
sub_1078	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_10BC	proc far

arg_0		= word ptr  4
arg_2		= dword	ptr  6
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch

		mov	dx, bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+arg_6]
		mov	di, ax
		shl	ax, 1
		shl	ax, 1
		add	di, ax
		shl	di, 1
		add	di, TextVramSeg
		mov	es, di
		mov	di, [bp+arg_8]
		shl	di, 1
		push	ds
		lds	si, [bp+arg_2]
		mov	cx, di
		mov	bx, [bp+arg_0]
		mov	bp, dx
		lodsb
		or	al, al
		jz	short loc_10FE

loc_10EA:
		mov	ah, al
		mov	al, 0
		rol	ax, 1
		shr	ax, 1
		adc	al, 56h	; 'V'
		stosw
		or	ah, 80h
		stosw
		lodsb
		or	al, al
		jnz	short loc_10EA

loc_10FE:
		xchg	cx, di
		sub	cx, di
		shr	cx, 1
		mov	ax, bx
		add	di, 2000h
		rep stosw
		pop	ds
		pop	di
		pop	si
		retf	0Ah
sub_10BC	endp


; =============== S U B	R O U T	I N E =======================================


sub_1112	proc near
		out	0A1h, al	; Interrupt Controller #2, 8259A
		mov	al, ah
		out	0A3h, al	; Interrupt Controller #2, 8259A
		mov	cx, 10h
		mov	bx, 0

loc_111E:
		mov	al, bl
		out	0A5h, al	; Interrupt Controller #2, 8259A
		in	al, 0A9h	; Interrupt Controller #2, 8259A
		mov	ah, al
		mov	al, bl
		or	al, 20h
		out	0A5h, al	; Interrupt Controller #2, 8259A
		in	al, 0A9h	; Interrupt Controller #2, 8259A
		stosw
		inc	bx
		loop	loc_111E
		retn
sub_1112	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_1134	proc far
		push	di
		mov	dx, sp
		cli
		add	sp, 6
		pop	di
		pop	es
		pop	ax
		mov	sp, dx
		sti
		mov	ah, 0
		add	ax, 5680h
		and	al, 7Fh
		push	ax
		mov	al, 0Bh
		out	68h, al
		pop	ax
		call	sub_1112
		mov	al, 0Ah
		out	68h, al
		pop	di
		retf	6
sub_1134	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_115A	proc far
		push	di
		mov	di, sp
		les	di, ss:[di+6]
		mov	al, 0Bh
		out	68h, al
		mov	dx, 0

loc_1168:
		mov	ax, dx
		adc	ax, 5680h
		and	al, 7Fh
		call	sub_1112
		inc	dl
		jnz	short loc_1168
		mov	al, 0Ah
		out	68h, al
		pop	di
		retf	4
sub_115A	endp


; =============== S U B	R O U T	I N E =======================================


sub_117E	proc near
		out	0A1h, al	; Interrupt Controller #2, 8259A
		mov	al, ah
		out	0A3h, al	; Interrupt Controller #2, 8259A
		mov	cx, 10h
		mov	bx, 0

loc_118A:
		mov	al, bl
		or	al, 20h
		out	0A5h, al	; Interrupt Controller #2, 8259A
		lodsw
		out	0A9h, al	; Interrupt Controller #2, 8259A
		mov	al, bl
		out	0A5h, al	; Interrupt Controller #2, 8259A
		mov	al, ah
		out	0A9h, al	; Interrupt Controller #2, 8259A
		inc	bx
		loop	loc_118A
		retn
sub_117E	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_11A0	proc far
		push	ds
		push	si
		mov	dx, sp
		cli
		add	sp, 8
		pop	si
		pop	ds
		pop	ax
		mov	sp, dx
		sti
		mov	ah, 0
		add	ax, 5680h
		and	al, 7Fh
		push	ax
		mov	al, 0Bh
		out	68h, al
		pop	ax
		call	sub_117E
		mov	al, 0Ah
		out	68h, al
		pop	si
		pop	ds
		retf	6
sub_11A0	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_11C8	proc far
		push	ds
		push	si
		mov	si, sp
		lds	si, ss:[si+8]
		mov	al, 0Bh
		out	68h, al
		mov	dx, 0

loc_11D7:
		mov	ax, dx
		adc	ax, 5680h
		and	al, 7Fh
		call	sub_117E
		inc	dl
		jnz	short loc_11D7
		mov	al, 0Ah
		out	68h, al
		pop	si
		pop	ds
		retf	4
sub_11C8	endp


; =============== S U B	R O U T	I N E =======================================


sub_11EE	proc far
		mov	ah, 42h	; 'B'
		mov	ch, 0C0h ; 'À'
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		mov	ax, 0A800h
		mov	word_D3A4, ax
		mov	word_D36E, ax
		mov	word_D3A6, 3E80h
		xor	ax, ax
		mov	word_D362, ax
		mov	word_D368, ax
		mov	es, ax
		assume es:seg000
		mov	ah, byte ptr es:loc_54B+2
		and	ah, 4
		add	ah, 3Fh	; '?'
		and	ah, 40h
		mov	word_D3AC, ax
		mov	ax, 27Fh
		mov	word_D366, ax
		mov	word_D364, ax
		mov	ax, 190h
		mov	word_D3A8, ax
		dec	ax
		mov	word_D36C, ax
		mov	word_D36A, ax
		mov	word_D370, 7CB0h
		retf
sub_11EE	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_123C	proc far
		mov	al, 80h	; '€'
		pushf
		cli
		out	7Ch, al
		popf
		xor	ax, ax
		mov	dx, 7Eh	; '~'
		out	dx, al
		out	dx, al
		out	dx, al
		out	dx, al
		mov	bx, di
		xor	di, di
		mov	cx, word_D3A6
		mov	es, word_D3A4
		assume es:nothing
		rep stosw
		mov	di, bx
		out	7Ch, al
		retf
sub_123C	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_1260	proc near
		xor	al, 1
		out	0A6h, al	; Interrupt Controller #2, 8259A
		mov	ds, bx
		mov	es, dx
		xor	di, di
		mov	si, di
		rep movsw
		mov	cx, di
		shr	cx, 1
		xchg	bx, dx
		retn
sub_1260	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_1276	proc far
		xor	dx, dx
		mov	cx, word_D3A6
		mov	bx, cx
		shl	bx, 1
		push	bx
		nop
		call	smem_wget
		xchg	ax, dx
		jb	short locret_12C8
		xor	al, al
		out	7Ch, al
		mov	bx, sp
		mov	ax, ss:[bx+4]
		and	al, 1
		push	si
		push	di
		push	ds
		mov	bx, 0A800h
		call	sub_1260
		call	sub_1260
		mov	bx, 0B000h
		call	sub_1260
		call	sub_1260
		mov	bx, 0B800h
		call	sub_1260
		call	sub_1260
		mov	bx, 0E000h
		call	sub_1260
		call	sub_1260
		pop	ds
		pop	di
		pop	si
		push	dx
		nop
		call	smem_release
		mov	ax, 1

locret_12C8:
		retf	2
sub_1276	endp

include libs/master.lib/graph_extmode.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1322	proc far
					; sub_A8FA+494P ...

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	di
		mov	cx, [bp+arg_6]
		mov	di, [bp+arg_4]
		mov	dx, [bp+arg_0]
		mov	bp, [bp+arg_2]
		adc	bp, 5680h
		and	bp, 0FF7Fh
		pushf
		mov	al, 0C0h ; 'À'
		cli
		out	7Ch, al
		popf
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		mov	al, 0Bh
		out	68h, al
		mov	ax, di
		shl	ax, 2
		add	di, ax
		shl	di, 4
		mov	ax, cx
		and	cx, 7
		shr	ax, 3
		add	di, ax
		mov	es, word_D3A4
		assume es:nothing
		mov	ax, bp
		out	0A1h, al	; Interrupt Controller #2, 8259A
		mov	al, ah
		out	0A3h, al	; Interrupt Controller #2, 8259A
		mov	dx, 10h
		xor	ch, ch

loc_1382:
		mov	al, ch
		or	al, 20h
		out	0A5h, al	; Interrupt Controller #2, 8259A
		in	al, 0A9h	; Interrupt Controller #2, 8259A
		mov	ah, al
		mov	al, ch
		out	0A5h, al	; Interrupt Controller #2, 8259A
		in	al, 0A9h	; Interrupt Controller #2, 8259A
		mov	bh, al
		mov	bl, 0
		shr	ax, cl
		shr	bx, cl
		xchg	al, ah
		stosw
		mov	es:[di], bl
		add	di, 4Eh	; 'N'
		inc	ch
		dec	dx
		jnz	short loc_1382
		mov	al, 0Ah
		out	68h, al
		xor	al, al
		out	7Ch, al
		pop	di
		pop	bp
		retf	8
sub_1322	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_13B6	proc far
					; sub_A8FA+5E7P

arg_0		= word ptr  6
arg_2		= dword	ptr  8
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	ds
		mov	es, word_D3A4
		mov	cx, [bp+arg_A]
		mov	di, [bp+arg_8]
		mov	bx, [bp+arg_6]
		lds	si, [bp+arg_2]
		mov	dx, [bp+arg_0]
		mov	bp, bx
		mov	ax, di
		shl	ax, 2
		add	di, ax
		shl	di, 4
		mov	al, 0C0h ; 'À'
		pushf
		cli
		out	7Ch, al
		popf
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		shr	dx, 1
		sbb	al, al
		out	7Eh, al
		mov	al, 0Bh
		out	68h, al

loc_13FE:
		lodsb
		or	al, al
		jz	short loc_1450
		mov	ah, 0
		adc	ax, 5680h
		and	ax, 0FF7Fh
		mov	bx, cx
		and	cx, 7
		shr	bx, 3
		add	di, bx
		out	0A1h, al	; Interrupt Controller #2, 8259A
		mov	al, ah
		out	0A3h, al	; Interrupt Controller #2, 8259A
		mov	dx, 10h
		xor	ch, ch

loc_1420:
		mov	al, ch
		or	al, 20h
		out	0A5h, al	; Interrupt Controller #2, 8259A
		in	al, 0A9h	; Interrupt Controller #2, 8259A
		mov	ah, al
		mov	al, ch
		out	0A5h, al	; Interrupt Controller #2, 8259A
		in	al, 0A9h	; Interrupt Controller #2, 8259A
		mov	bh, al
		mov	bl, 0
		shr	ax, cl
		shr	bx, cl
		xchg	al, ah
		stosw
		mov	es:[di], bl
		add	di, 4Eh	; 'N'
		inc	ch
		dec	dx
		jnz	short loc_1420
		sub	di, 500h
		xor	ch, ch
		add	cx, bp
		jmp	short loc_13FE
; ---------------------------------------------------------------------------

loc_1450:
		mov	al, 0Ah
		out	68h, al
		xor	al, al
		out	7Ch, al
		pop	ds
		pop	di
		pop	si
		pop	bp
		retf	0Ch
sub_13B6	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1460	proc far
					; sub_9B64+2ABP ...

arg_2		= word ptr  8
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		xor	cx, cx
		les	bx, [bp+arg_4]
		mov	ax, es:[bx+2]
		test	ax, ax
		jz	short loc_1481
		push	ax
		nop
		call	hmem_free
		mov	es:[bx+4], cx
		mov	es:[bx+2], cx
		mov	es:[bx], cx

loc_1481:
		mov	ax, es:[bx+12h]
		test	ax, ax
		jz	short loc_149B
		push	ax
		nop
		call	hmem_free
		mov	es:[bx+0Eh], cx
		mov	es:[bx+12h], cx
		mov	es:[bx+10h], cx

loc_149B:
		mov	ax, [bp+arg_2]
		test	ax, ax
		jz	short loc_14A8
		push	ax
		nop
		call	hmem_free

loc_14A8:
		pop	bp
		retf	8
sub_1460	endp

; ---------------------------------------------------------------------------
; START	OF FUNCTION CHUNK FOR sub_14B8

loc_14AC:
		pop	di
		pop	si
		pop	bp
		push	seg dseg
		pop	ds
		stc
		retf	0Ch
; END OF FUNCTION CHUNK	FOR sub_14B8
; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_14B8	proc far

arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h

; FUNCTION CHUNK AT 14AC SIZE 0000000B BYTES

		push	bp
		mov	bp, sp
		push	si
		push	di
		cld
		push	[bp+arg_A]
		push	[bp+arg_8]
		nop
		call	dos_ropen
		jb	short loc_14AC
		mov	bx, ax
		push	4114h
		nop
		call	smem_wget
		jb	short loc_14AC
		mov	ds, ax
		mov	ds:410Eh, bx
		mov	byte ptr ds:4112h, 0
		mov	byte ptr ds:4113h, 0
		mov	cx, 4000h
		xor	dx, dx
		mov	ds:4110h, dx
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		mov	ax, ds
		mov	es, ax
		assume es:dseg
		mov	ax, 1
		mov	cx, 10h
		mov	di, 400Ch
		nop

loc_1502:
		and	al, 0Fh
		stosb
		inc	al
		inc	ah
		test	ah, 0Fh
		jnz	short loc_1502
		inc	al
		loop	loc_1502
		mov	ax, 0FFF3h
		call	sub_1A62
		cmp	dl, 50h	; 'P'
		jnz	short loc_14AC
		call	sub_1A62
		cmp	dl, 69h	; 'i'
		jnz	short loc_14AC
		les	di, [bp+arg_4]
		assume es:nothing
		xor	ax, ax
		stosw
		stosw
		dec	ax

loc_152D:
		inc	ax
		call	sub_1A62
		cmp	dl, 1Ah
		jnz	short loc_152D
		stosw

loc_1537:
		call	sub_1A62
		or	dl, dl
		jnz	short loc_1537
		call	sub_1A62
		mov	al, dl
		stosb
		mov	ds:410Ch, al
		call	sub_1A62
		mov	ah, dl
		call	sub_1A62
		mov	al, dl
		stosw
		test	ax, ax
		mov	ax, 0FFF3h
		jz	short loc_155C
		jmp	loc_14AC
; ---------------------------------------------------------------------------

loc_155C:
		call	sub_1A62
		cmp	dl, 4
		jz	short loc_1567
		jmp	loc_14AC
; ---------------------------------------------------------------------------

loc_1567:
		mov	al, dl
		stosb
		call	sub_1A62
		mov	al, dl
		call	sub_1A62
		mov	ah, dl
		stosw
		call	sub_1A62
		mov	al, dl
		call	sub_1A62
		mov	ah, dl
		stosw
		call	sub_1A62
		mov	ah, dl
		call	sub_1A62
		mov	al, dl
		stosw
		mov	bx, ax
		xor	ax, ax
		stosw
		push	ds
		push	ax
		push	bx
		push	seg dseg
		pop	ds
		mov	mem_AllocID, 0Ah
		nop
		call	hmem_lallocate
		pop	ds
		stosw
		jb	short loc_15B8
		push	es
		push	di
		mov	es, ax
		xor	di, di

loc_15AC:
		call	sub_1A62
		mov	al, dl
		stosb
		dec	bx
		jnz	short loc_15AC
		pop	di
		pop	es
		nop

loc_15B8:
		call	sub_1A62
		mov	ah, dl
		call	sub_1A62
		mov	al, dl
		stosw
		mov	ds:4000h, ax
		mov	bx, ax
		call	sub_1A62
		mov	ah, dl
		call	sub_1A62
		mov	al, dl
		stosw
		mov	ds:4002h, ax
		add	ax, 2
		mul	bx
		shr	dx, 1
		rcr	ax, 1
		push	ds
		push	dx
		push	ax
		shl	dx, 0Ch
		mov	ds:4008h, ax
		mov	ds:400Ah, dx
		push	seg dseg
		pop	ds
		mov	mem_AllocID, 0Ah
		nop
		call	hmem_lallocate
		pop	ds
		mov	bx, ax
		mov	ax, 0FFF8h
		jnb	short loc_1606
		jmp	loc_14AC
; ---------------------------------------------------------------------------

loc_1606:
		mov	ax, bx
		mov	word ptr ds:4004h, 0
		mov	ds:4006h, ax
		add	ds:400Ah, ax
		mov	cx, ds:4000h
		push	es
		les	bx, [bp+arg_0]
		mov	es:[bx], cx
		mov	es:[bx+2], ax
		pop	es
		shl	byte ptr ds:410Ch, 1
		jb	short loc_1638
		mov	bl, 30h	; '0'
		nop

loc_162E:
		call	sub_1A62
		mov	al, dl
		stosb
		dec	bl
		jnz	short loc_162E

loc_1638:
		xor	bl, bl
		call	sub_1974
		mov	bl, dl
		mov	al, dl
		shl	al, 4
		call	sub_1974
		or	al, dl
		les	di, ds:4004h
		mov	cx, ds:4000h
		rep stosb
		mov	cl, 0FFh
		nop

loc_1656:
					; sub_14B8+49Bj
		mov	ch, 2
		push	cx
		mov	dh, 0
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		cmp	cl, ch
		jnb	short loc_1682
		shl	dx, cl
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_1676
		call	sub_1A8E

loc_1676:
		mov	dl, [si]
		inc	si
		sub	ch, cl
		mov	cl, 8
		mov	ds:4110h, si
		nop

loc_1682:
		xchg	cl, ch
		shl	dx, cl
		sub	ch, cl
		mov	ds:4112h, dl
		mov	ds:4113h, ch
		mov	dl, dh
		mov	dh, 0
		pop	cx
		mov	bl, dl
		cmp	dl, 3
		jnz	short loc_16D0
		push	cx
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		mov	dh, 0
		dec	cl
		jns	short loc_16C2
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_16B8
		call	sub_1A8E

loc_16B8:
		mov	dl, [si]
		inc	si
		mov	cl, 7
		mov	ds:4110h, si
		nop

loc_16C2:
		shl	dl, 1
		mov	ds:4112h, dl
		mov	ds:4113h, cl
		adc	bl, 0
		pop	cx

loc_16D0:
		cmp	bl, cl
		jnz	short loc_1744
		mov	bl, es:[di-1]
		cmp	di, 1
		jnb	short loc_16EA
		push	es
		mov	ax, es
		sub	ax, 1000h
		mov	es, ax
		assume es:nothing
		mov	bl, es:[di-1]
		pop	es
		assume es:nothing

loc_16EA:
		and	bl, 0Fh
		nop

loc_16EE:
		call	sub_1974
		mov	bl, dl
		mov	al, dl
		shl	al, 4
		call	sub_1974
		mov	bl, dl
		or	al, dl
		stosb
		or	di, di
		jnz	short loc_170C
		mov	ax, es
		add	ax, 1000h
		mov	es, ax
		assume es:nothing
		nop

loc_170C:
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		mov	dh, 0
		dec	cl
		jns	short loc_1732
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_1728
		call	sub_1A8E
		nop

loc_1728:
		mov	dl, [si]
		inc	si
		mov	cl, 7
		mov	ds:4110h, si
		nop

loc_1732:
		shl	dl, 1
		mov	ds:4112h, dl
		mov	ds:4113h, cl
		jb	short loc_16EE
		mov	cl, 0FFh
		jmp	loc_1942
; ---------------------------------------------------------------------------
		nop

loc_1744:
		mov	bh, 0
		xor	bp, bp
		mov	ax, 1
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		nop

loc_1754:
		inc	bh
		dec	cl
		jns	short loc_1772
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_1768
		call	sub_1A8E
		nop

loc_1768:
		mov	dl, [si]
		inc	si
		mov	cl, 7
		mov	ds:4110h, si
		nop

loc_1772:
		shl	dl, 1
		jb	short loc_1754
		mov	ds:4112h, dl
		mov	ds:4113h, cl
		mov	dh, 0
		dec	bh
		jnz	short loc_1787
		jmp	loc_181E
; ---------------------------------------------------------------------------

loc_1787:
		cmp	bh, 8
		jl	short loc_17CC
		mov	cx, bp

loc_178E:
		push	cx
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_179C
		call	sub_1A8E

loc_179C:
		mov	dh, 0
		mov	dl, [si]
		inc	si
		mov	ds:4110h, si
		mov	cl, ds:4113h
		sub	cl, 8
		neg	cl
		shl	dx, cl
		xchg	dl, ds:4112h
		or	dl, dh
		mov	dh, 0
		pop	cx
		mov	ch, cl
		mov	cl, ah
		mov	ah, al
		mov	al, dl
		sub	bh, 8
		cmp	bh, 8
		jg	short loc_178E
		mov	bp, cx
		nop

loc_17CC:
		mov	ch, bh
		push	cx
		mov	dh, 0
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		cmp	cl, ch
		jnb	short loc_17F8
		shl	dx, cl
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_17EC
		call	sub_1A8E

loc_17EC:
		mov	dl, [si]
		inc	si
		sub	ch, cl
		mov	cl, 8
		mov	ds:4110h, si
		nop

loc_17F8:
		xchg	cl, ch
		shl	dx, cl
		sub	ch, cl
		mov	ds:4112h, dl
		mov	ds:4113h, ch
		mov	dl, dh
		mov	dh, 0
		pop	cx
		mov	cl, ch
		mov	dh, ah
		shl	ax, cl
		or	al, dl
		mov	dl, 0
		rol	dx, cl
		mov	dh, 0
		shl	bp, cl
		or	bp, dx
		nop

loc_181E:
		mov	cx, ax
		test	bl, bl
		jnz	short loc_1827
		jmp	loc_18C4
; ---------------------------------------------------------------------------

loc_1827:
		mov	bh, 0
		mov	ax, ds:4000h
		cmp	bl, 1
		jz	short loc_1846
		cmp	bl, 2
		jnz	short loc_183C
		shl	ax, 1
		adc	bh, bh
		jmp	short loc_1846
; ---------------------------------------------------------------------------

loc_183C:
		dec	ax
		cmp	bl, 3
		jz	short loc_1846
		add	ax, 2
		nop

loc_1846:
					; sub_14B8+382j ...
		push	ds
		shr	bh, 1
		rcr	ax, 1
		sbb	bh, bh
		mov	si, di
		sbb	si, ax
		mov	dx, es
		jnb	short loc_185A
		sub	dx, 1000h
		nop

loc_185A:
		mov	ds, dx
		or	bh, bh
		jnz	short loc_189C
		mov	ax, cx

loc_1862:
		mov	cx, si
		cmp	si, di
		ja	short loc_186A
		mov	cx, di

loc_186A:
		neg	cx
		test	ax, ax
		jz	short loc_1878
		sub	cx, ax
		sbb	dx, dx
		and	cx, dx
		add	cx, ax

loc_1878:
		sub	ax, cx
		rep movsb
		or	di, di
		jnz	short loc_1888
		mov	cx, es
		add	cx, 1000h
		mov	es, cx
		assume es:nothing

loc_1888:
		or	si, si
		jnz	short loc_1894
		mov	cx, ds
		add	cx, 1000h
		mov	ds, cx
		assume ds:nothing

loc_1894:
		test	ax, ax
		jnz	short loc_1862
		pop	ds
		assume ds:dseg
		jmp	loc_1940
; ---------------------------------------------------------------------------

loc_189C:
					; sub_14B8:loc_18BEj
		lodsb
		mov	ah, al
		or	si, si
		jnz	short loc_18AC
		mov	bp, ds
		add	bp, 1000h
		mov	ds, bp
		assume ds:nothing
		nop

loc_18AC:
		mov	al, [si]
		shr	ax, 4
		stosb
		or	di, di
		jnz	short loc_18BE
		mov	ax, es
		add	ax, 1000h
		mov	es, ax
		assume es:nothing
		nop

loc_18BE:
		loop	loc_189C
		pop	ds
		assume ds:dseg
		jmp	short loc_1940
; ---------------------------------------------------------------------------
		nop

loc_18C4:
		mov	dl, es:[di-1]
		cmp	di, 1
		jnb	short loc_18DA
		push	es
		mov	ax, es
		sub	ax, 1000h
		mov	es, ax
		assume es:nothing
		mov	dl, es:[di-1]
		pop	es
		assume es:nothing

loc_18DA:
		mov	al, dl
		ror	dl, 4
		cmp	al, dl
		jnz	short loc_18FC
		nop

loc_18E4:
					; sub_14B8+43Fj
		stosb
		or	di, di
		jnz	short loc_18F2
		mov	dx, es
		add	dx, 1000h
		mov	es, dx
		assume es:nothing
		nop

loc_18F2:
		loop	loc_18E4
		sub	bp, 1
		jnb	short loc_18E4
		jmp	short loc_1940
; ---------------------------------------------------------------------------
		nop

loc_18FC:
		mov	bh, al
		mov	dl, es:[di-2]
		cmp	di, 2
		jnb	short loc_1914
		push	es
		mov	ax, es
		sub	ax, 1000h
		mov	es, ax
		assume es:nothing
		mov	dl, es:[di-2]
		pop	es

loc_1914:
					; sub_14B8:loc_1938j ...
		mov	al, dl
		stosb
		or	di, di
		jnz	short loc_1922
		mov	ax, es
		add	ax, 1000h
		mov	es, ax
		assume es:nothing

loc_1922:
		loop	loc_192A
		sub	bp, 1
		jb	short loc_1940
		nop

loc_192A:
		mov	al, bh
		stosb
		or	di, di
		jnz	short loc_1938
		mov	ax, es
		add	ax, 1000h
		mov	es, ax
		assume es:nothing

loc_1938:
		loop	loc_1914
		sub	bp, 1
		jnb	short loc_1914
		nop

loc_1940:
					; sub_14B8+409j ...
		mov	cl, bl

loc_1942:
		cmp	ds:4008h, di
		jbe	short loc_194B
		jmp	loc_1656
; ---------------------------------------------------------------------------

loc_194B:
		mov	ax, es
		cmp	ds:400Ah, ax
		jbe	short loc_1956
		jmp	loc_1656
; ---------------------------------------------------------------------------

loc_1956:
		mov	ah, 3Eh	; '>'
		mov	bx, ds:410Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		push	ds
		mov	bx, seg	dseg
		mov	ds, bx
		nop
		call	smem_release
		clc
		mov	ax, 0
		pop	di
		pop	si
		pop	bp
		retf	0Ch
sub_14B8	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_1974	proc near
					; sub_14B8+18Cp ...
		push	ax
		push	bx
		push	cx
		xor	ax, ax
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		dec	cl
		jns	short loc_199C
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_1992
		call	sub_1A8E

loc_1992:
		mov	dl, [si]
		inc	si
		mov	cl, 7
		mov	ds:4110h, si
		nop

loc_199C:
		shl	dl, 1
		jb	short loc_19EA
		add	al, 2
		dec	cl
		jns	short loc_19BE
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_19B4
		call	sub_1A8E
		nop

loc_19B4:
		mov	dl, [si]
		inc	si
		mov	cl, 7
		mov	ds:4110h, si
		nop

loc_19BE:
		shl	dl, 1
		jnb	short loc_19EA
		add	al, 2
		inc	ah
		dec	cl
		jns	short loc_19E2
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_19D8
		call	sub_1A8E
		nop

loc_19D8:
		mov	dl, [si]
		inc	si
		mov	cl, 7
		mov	ds:4110h, si
		nop

loc_19E2:
		shl	dl, 1
		jnb	short loc_19EA
		add	al, 4
		inc	ah

loc_19EA:
		mov	ds:4112h, dl
		mov	ds:4113h, cl
		mov	ch, ah
		inc	ch
		push	cx
		mov	dh, 0
		mov	dl, ds:4112h
		mov	cl, ds:4113h
		cmp	cl, ch
		jnb	short loc_1A20
		shl	dx, cl
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_1A14
		call	sub_1A8E

loc_1A14:
		mov	dl, [si]
		inc	si
		sub	ch, cl
		mov	cl, 8
		mov	ds:4110h, si
		nop

loc_1A20:
		xchg	cl, ch
		shl	dx, cl
		sub	ch, cl
		mov	ds:4112h, dl
		mov	ds:4113h, ch
		mov	dl, dh
		mov	dh, 0
		pop	cx
		add	al, dl
		xor	al, 0Fh
		mov	ah, 0
		mov	bh, 0
		shl	bx, 4
		add	bx, 400Ch
		add	bx, ax
		mov	cx, 0Fh
		mov	dh, 0
		mov	dl, [bx]
		sub	cx, ax
		jnz	short loc_1A54
		pop	cx
		pop	bx
		pop	ax
		retn
; ---------------------------------------------------------------------------
		nop

loc_1A54:
		mov	al, [bx+1]
		mov	[bx], al
		inc	bx
		loop	loc_1A54
		mov	[bx], dl
		pop	cx
		pop	bx
		pop	ax
		retn
sub_1974	endp


; =============== S U B	R O U T	I N E =======================================


sub_1A62	proc near
		push	cx
		mov	si, ds:4110h
		cmp	si, 4000h
		jnz	short loc_1A70
		call	sub_1A8E

loc_1A70:
		mov	dh, 0
		mov	dl, [si]
		inc	si
		mov	ds:4110h, si
		mov	cl, ds:4113h
		sub	cl, 8
		neg	cl
		shl	dx, cl
		xchg	dl, ds:4112h
		or	dl, dh
		mov	dh, 0
		pop	cx
		retn
sub_1A62	endp


; =============== S U B	R O U T	I N E =======================================


sub_1A8E	proc near
					; sub_14B8+1FDp ...
		pusha
		mov	ah, 3Fh	; '?'
		mov	bx, ds:410Eh
		mov	cx, 4000h
		xor	dx, dx
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		popa
		xor	si, si
		retn
sub_1A8E	endp

; ---------------------------------------------------------------------------
; START	OF FUNCTION CHUNK FOR sub_1AA6

loc_1AA0:
		pop	di
		pop	si
		pop	bp
		retf	0Ah
; END OF FUNCTION CHUNK	FOR sub_1AA6

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1AA6	proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh

; FUNCTION CHUNK AT 1AA0 SIZE 00000006 BYTES

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+arg_6]
		sub	ax, word_D368
		cmp	ax, word_D36A
		ja	short loc_1AA0
		mov	cx, [bp+arg_0]
		sar	cx, 3
		jle	short loc_1AA0
		mov	si, [bp+arg_2]
		mov	di, [bp+arg_8]
		sar	di, 3
		jns	short loc_1AD6
		add	cx, di
		jle	short loc_1AA0
		shl	di, 2
		add	si, di
		xor	di, di

loc_1AD6:
		cmp	di, 50h	; 'P'
		jge	short loc_1AA0
		add	cx, di
		cmp	cx, 50h	; 'P'
		jl	short loc_1AE5
		mov	cx, 50h	; 'P'

loc_1AE5:
		sub	cx, di
		imul	ax, 50h
		add	di, ax
		push	ds
		mov	es, word_D36E
		assume es:nothing
		mov	ds, [bp+arg_4]
		mov	bp, cx
		cld
		nop

loc_1AF8:
		mov	cl, 2
		mov	bl, [si]
		mov	bh, 0
		shl	bx, cl
		mov	ax, cs:[bx+1EDCh]
		mov	dx, cs:[bx+1EDEh]
		inc	si
		shl	ax, cl
		shl	dx, cl
		mov	bl, [si]
		mov	bh, 0
		shl	bx, cl
		or	ax, cs:[bx+1EDCh]
		or	dx, cs:[bx+1EDEh]
		inc	si
		shl	ax, cl
		shl	dx, cl
		mov	bl, [si]
		mov	bh, 0
		shl	bx, cl
		or	ax, cs:[bx+1EDCh]
		or	dx, cs:[bx+1EDEh]
		inc	si
		shl	ax, cl
		shl	dx, cl
		mov	bl, [si]
		mov	bh, 0
		shl	bx, cl
		or	ax, cs:[bx+1EDCh]
		or	dx, cs:[bx+1EDEh]
		inc	si
		mov	es:[di], al
		mov	bx, es
		mov	es:[di-8000h], ah
		add	bh, 10h
		mov	es, bx
		assume es:nothing
		mov	es:[di], dl
		add	bh, 28h	; '('
		mov	es, bx
		assume es:nothing
		mov	es:[di], dh
		sub	bh, 38h	; '8'
		mov	es, bx
		assume es:nothing
		inc	di
		dec	bp
		jnz	short loc_1AF8
		pop	ds
		pop	di
		pop	si
		pop	bp
		retf	0Ah
sub_1AA6	endp


; =============== S U B	R O U T	I N E =======================================


sub_1B74	proc far
		mov	bx, sp
		mov	ax, ss:[bx+4]
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		mov	al, ah
		mov	ah, 0
		retf	2
sub_1B74	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1B86	proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	ds
		push	si
		push	di
		mov	bx, [bp+arg_0]
		shl	bx, 1
		mov	cx, [bp+arg_4]
		mov	bp, [bp+arg_2]
		mov	ax, bp
		shl	ax, 2
		add	bp, ax
		shl	bp, 4
		shr	cx, 3
		add	bp, cx
		mov	dx, [bx+2512h]
		mov	ds, word ptr [bx+2112h]
		mov	al, dh
		mul	dl
		mov	si, ax
		mov	bx, 50h	; 'P'
		sub	bl, dh
		mov	al, dh
		xor	ah, ah
		mov	cx, 0A800h
		call	sub_1BDC
		mov	cx, 0B000h
		call	sub_1BDC
		mov	cx, 0B800h
		call	sub_1BDC
		mov	cx, 0E000h
		call	sub_1BDC
		pop	di
		pop	si
		pop	ds
		pop	bp
		retf	6
sub_1B86	endp


; =============== S U B	R O U T	I N E =======================================


sub_1BDC	proc near
		mov	es, cx
		assume es:nothing
		mov	dh, dl
		mov	di, bp
		test	di, 1
		jnz	short loc_1C08
		shr	ax, 1
		jb	short loc_1BFA

loc_1BEC:
		mov	cx, ax
		rep movsw
		add	di, bx
		dec	dh
		jnz	short loc_1BEC
		shl	ax, 1
		retn
; ---------------------------------------------------------------------------
		nop

loc_1BFA:
		mov	cx, ax
		rep movsw
		movsb
		lea	di, [bx+di]
		dec	dh
		jnz	short loc_1BFA
		rcl	ax, 1
		retn
; ---------------------------------------------------------------------------

loc_1C08:
		shr	ax, 1
		jb	short loc_1C1E
		dec	ax

loc_1C0D:
		mov	cx, ax
		movsb
		rep movsw
		movsb
		add	di, bx
		dec	dh
		jnz	short loc_1C0D
		inc	ax
		shl	ax, 1
		retn
; ---------------------------------------------------------------------------
		nop

loc_1C1E:
		mov	cx, ax
		movsb
		rep movsw
		lea	di, [bx+di]
		dec	dh
		jnz	short loc_1C1E
		rcl	ax, 1
		retn
sub_1BDC	endp

; ---------------------------------------------------------------------------

loc_1C2C:
					; sub_536+3Bp ...
		cld
		push	si
		mov	ax, word_D3B0
		cwd
		not	dx
		and	ax, dx
		sub	ax, 0C8h ; 'È'
		sbb	dx, dx
		and	ax, dx
		add	ax, 0C8h ; 'È'
		mov	dh, al
		xor	bx, bx
		mov	ch, bl
		cmp	dh, 64h	; 'd'
		jbe	short loc_1C52
		mov	ch, 0Fh
		sub	dh, 0C8h ; 'È'
		neg	dh

loc_1C52:
		mov	si, 20D0h
		mov	dl, 64h	; 'd'
		cmp	word_D3E2, bx
		jnz	short loc_1C96

loc_1C5D:
		mov	al, bl
		out	0A8h, al	; Interrupt Controller #2, 8259A
		lodsw
		shr	ax, 4
		mov	cl, ah
		and	al, 0Fh
		xor	al, ch
		mul	dh
		div	dl
		xor	al, ch
		out	0ACh, al	; Interrupt Controller #2, 8259A
		mov	al, cl
		xor	al, ch
		mul	dh
		div	dl
		xor	al, ch
		out	0AAh, al	; Interrupt Controller #2, 8259A
		lodsb
		shr	al, 4
		xor	al, ch
		mul	dh
		div	dl
		xor	al, ch
		out	0AEh, al	; Interrupt Controller #2, 8259A
		inc	bx
		cmp	bx, 10h
		jl	short loc_1C5D
		pop	si
		retf
; ---------------------------------------------------------------------------
		nop

loc_1C96:
		mov	bx, dx
		mov	dx, 871Eh
		mov	al, 0A0h ; ' '
		out	0F6h, al
		in	al, dx
		cmp	al, 0FFh
		jnz	short loc_1CAB
		mov	dx, 0AE8Eh
		in	al, dx
		shr	al, 2

loc_1CAB:
		shr	al, 1
		cmc
		sbb	al, al
		mov	cs:byte_1D14, al
		mov	dx, bx
		push	di
		mov	di, 0

loc_1CBA:
		mov	ax, di
		out	0A8h, al	; Interrupt Controller #2, 8259A
		lodsw
		mov	bx, ax
		shr	bx, 4
		and	bl, ch
		lodsb
		and	al, ch
		xor	al, ch
		mul	dh
		div	dl
		xor	al, ch
		xchg	al, bh
		xor	al, ch
		mul	dh
		div	dl
		xor	al, ch
		xchg	al, bl
		xor	al, ch
		mul	dh
		div	dl
		xor	al, ch
		xchg	al, bl
		mov	ah, bh
		cmp	bh, al
		ja	short loc_1CEF
		mov	bh, al

loc_1CEF:
		cmp	bh, bl
		ja	short loc_1CF5
		mov	bh, bl

loc_1CF5:
		shl	al, 1
		add	al, bl
		shl	al, 1
		add	al, ah
		add	al, bh
		mov	cl, 3
		mul	cl
		mov	cl, 14h
		div	cl
		shr	al, 1
		adc	al, 0
		sub	al, 2
		cmc
		sbb	ah, ah
		and	ah, al
; ---------------------------------------------------------------------------
		db 80h,	0F4h
byte_1D14	db 0
; ---------------------------------------------------------------------------
		shr	ah, 1
		sbb	al, al
		and	al, 0Fh
		out	0AEh, al	; Interrupt Controller #2, 8259A
		shr	ah, 1
		sbb	al, al
		and	al, 0Fh
		out	0ACh, al	; Interrupt Controller #2, 8259A
		shr	ah, 1
		sbb	al, al
		and	al, 0Fh
		out	0AAh, al	; Interrupt Controller #2, 8259A
		inc	di
		cmp	di, 10h
		jl	short loc_1CBA
		pop	di
		pop	si
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1D36	proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		mov	es, [bp+arg_0]
		push	word ptr es:0
		push	cs
		call	near ptr sub_472
		push	[bp+arg_0]
		call	hmem_free
		pop	bp
		retf	2
sub_1D36	endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		mov	es, word ptr [bp+6]
		call	word ptr es:2
		pop	bp
		retf	2
; ---------------------------------------------------------------------------
		nop
		cmp	word ptr es:1Ah, 0
		jz	short loc_1D7E
		dec	word ptr es:1Ah
		add	word ptr es:12h, 1
		adc	word ptr es:14h, 0
		mov	ax, es:1Ch
		retn
; ---------------------------------------------------------------------------

loc_1D7E:
		call	word ptr es:4
		test	ah, ah
		jnz	short locret_1DAD
		cmp	ax, es:1Ch
		mov	es:1Ch,	ax
		jnz	short locret_1DAD
		push	ax
		call	word ptr es:4
		test	ah, ah
		jnz	short loc_1DAC
		mov	es:1Ah,	ax
		sub	word ptr es:12h, 1
		sbb	word ptr es:14h, 0

loc_1DAC:
		pop	ax

locret_1DAD:
		retn

; =============== S U B	R O U T	I N E =======================================


sub_1DAE	proc near
		mov	ax, es:0Ah
		mov	dx, es:0Ch
		cmp	dx, es:8
		jb	short loc_1DCB
		ja	short loc_1DC7
		cmp	ax, es:6
		jb	short loc_1DCB

loc_1DC7:
		mov	ax, 0FFFFh
		retn
; ---------------------------------------------------------------------------

loc_1DCB:
		add	ax, 1
		adc	dx, 0
		mov	es:0Ah,	ax
		mov	es:0Ch,	dx
		add	word ptr es:12h, 1
		adc	word ptr es:14h, 0
		push	es
		push	word ptr es:0
		push	cs
		call	near ptr sub_506
		pop	es
		retn
sub_1DAE	endp

; ---------------------------------------------------------------------------
		call	sub_1DAE
		or	ah, ah
		jnz	short locret_1DFE
		xor	al, es:1Eh

locret_1DFE:
		retn
; ---------------------------------------------------------------------------
		db 0

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1E00	proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		cld
		mov	si, [bp+arg_2]
		mov	di, [bp+arg_4]
		test	si, si
		jz	short loc_1E23

loc_1E10:
		mov	es, [bp+arg_0]
		call	word ptr es:2
		inc	ah
		jz	short loc_1E23
		mov	es, [bp+arg_6]
		stosb
		dec	si
		jnz	short loc_1E10

loc_1E23:
		mov	ax, di
		sub	ax, [bp+arg_4]
		pop	di
		pop	si
		pop	bp
		retf	8
sub_1E00	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1E2E	proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		mov	es, [bp+arg_0]
		xor	ax, ax
		mov	es:1Ah,	ax
		mov	word ptr es:1Ch, 0FFFFh
		mov	es:0Ah,	ax
		mov	es:0Ch,	ax
		mov	es:12h,	ax
		mov	es:14h,	ax
		push	word ptr es:0
		push	word ptr es:10h
		push	word ptr es:0Eh
		push	ax
		push	cs
		call	near ptr sub_67E
		pop	bp
		retf	2
sub_1E2E	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_1E6A	proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	di
		mov	es, [bp+arg_4]
		inc	[bp+arg_2]
		mov	di, [bp+arg_0]
		or	di, di
		jz	short loc_1E87

loc_1E7B:
		call	word ptr es:2
		test	ah, ah
		jnz	short loc_1E8C
		dec	di
		jnz	short loc_1E7B

loc_1E87:
		dec	[bp+arg_2]
		jnz	short loc_1E7B

loc_1E8C:
		mov	ax, es:12h
		mov	dx, es:14h
		pop	di
		pop	bp
		retf	6
sub_1E6A	endp


; =============== S U B	R O U T	I N E =======================================


sub_1E9A	proc far
					; sub_A8FA+12EP ...
		mov	bx, sp
		push	word ptr ss:[bx+6]
		push	word ptr ss:[bx+4]
		nop
		call	dos_ropen
		jb	short locret_1ED9
		mov	bx, ax
		mov	dx, 20D0h
		mov	cx, 30h	; '0'
		mov	ah, 3Fh
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		sbb	cx, cx
		push	bx
		mov	bx, 2Fh	; '/'

loc_1EBD:
		mov	al, [bx+20D0h]
		shl	al, 4
		or	[bx+20D0h], al
		dec	bx
		jns	short loc_1EBD
		pop	bx
		mov	ah, 3Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		mov	ax, 0
		jcxz	short locret_1ED9
		mov	ax, 0FFF3h
		stc

locret_1ED9:
		retf	4
sub_1E9A	endp

; ---------------------------------------------------------------------------
		dd 0
		db 1, 4	dup(0),	1, 2 dup(0), 2 dup(1), 4 dup(0), 1, 0
		db 1, 0, 1, 2 dup(0), 2	dup(1),	0, 3 dup(1), 4 dup(0)
		db 2 dup(1), 2 dup(0), 1, 0, 1,	0, 3 dup(1), 0,	1, 2 dup(0)
		db 3 dup(1), 0,	2 dup(1), 0, 7 dup(1), 2, 3 dup(0), 3
		db 3 dup(0), 2,	1, 2 dup(0), 3,	1, 2 dup(0), 2,	0, 1, 0
		db 3, 0, 1, 0, 2, 2 dup(1), 0, 3, 2 dup(1), 0, 2, 2 dup(0)
		db 1, 3, 2 dup(0), 1, 2, 1, 0, 1, 3, 1,	0, 1, 2, 0, 2 dup(1)
		db 3, 0, 2 dup(1), 2, 3	dup(1),	3, 3 dup(1), 0,	2, 2 dup(0)
		db 1, 2, 3 dup(0), 3, 2	dup(0),	1, 3, 3	dup(0),	2, 1, 0
		db 1, 2, 1, 2 dup(0), 3, 1, 0, 1, 3, 1,	2 dup(0), 2, 0
		db 2 dup(1), 2,	0, 1, 0, 3, 0, 2 dup(1), 3, 0, 1, 0, 2
		db 3 dup(1), 2,	2 dup(1), 0, 3,	3 dup(1), 3, 2 dup(1)
		db 2 dup(2), 2 dup(0), 3, 2, 2 dup(0), 2, 3, 2 dup(0)
		db 2 dup(3), 2 dup(0), 2 dup(2), 1, 0, 3, 2, 1,	0, 2, 3
		db 1, 0, 2 dup(3), 1, 0, 2 dup(2), 0, 1, 3, 2, 0, 1, 2
		db 3, 0, 1, 2 dup(3), 0, 1, 2 dup(2), 2	dup(1),	3, 2, 2	dup(1)
		db 2, 3, 2 dup(1), 2 dup(3), 2 dup(1), 2 dup(0), 2, 0
		db 1, 0, 2, 2 dup(0), 1, 2, 0, 2 dup(1), 2, 3 dup(0), 3
		db 0, 1, 0, 3, 2 dup(0), 1, 3, 0, 2 dup(1), 3, 3 dup(0)
		db 2, 2	dup(1),	0, 2, 1, 0, 1, 2, 3 dup(1), 2, 1, 2 dup(0)
		db 3, 2	dup(1),	0, 3, 1, 0, 1, 3, 3 dup(1), 3, 1, 2, 0
		db 2, 0, 3, 0, 2, 0, 2,	1, 2, 0, 3, 1, 2, 0, 2,	0, 3, 0
		db 3, 0, 3, 0, 2, 1, 3,	0, 3, 1, 3, 0, 2, 0, 2,	1, 3, 0
		db 2, 1, 2, 1, 2, 1, 3,	1, 2, 1, 2, 0, 3, 1, 3,	0, 3, 1
		db 2, 1, 3, 1, 3, 1, 3,	1, 0, 2	dup(2),	0, 1, 2	dup(2)
		db 2 dup(0), 3,	2, 0, 1, 3, 2, 2 dup(0), 2, 3, 0, 1, 2
		db 3, 2	dup(0),	2 dup(3), 0, 1,	2 dup(3), 2 dup(0), 2 dup(2)
		db 2 dup(1), 2 dup(2), 1, 0, 3,	2, 2 dup(1), 3,	2, 1, 0
		db 2, 3, 2 dup(1), 2, 3, 1, 0, 2 dup(3), 2 dup(1), 2 dup(3)
		db 1, 3	dup(2),	0, 3, 2	dup(2),	0, 2, 3, 2, 0, 2 dup(3)
		db 2, 0, 2 dup(2), 3, 0, 3, 2, 3, 0, 2,	2 dup(3), 0, 3 dup(3)
		db 0, 3	dup(2),	1, 3, 2	dup(2),	1, 2, 3, 2, 1, 2 dup(3)
		db 2, 1, 2 dup(2), 3, 1, 3, 2, 3, 1, 2,	2 dup(3), 1, 3 dup(3)
		db 1, 3	dup(0),	2, 1, 2	dup(0),	2, 0, 1, 0, 2, 2 dup(1)
		db 0, 2, 2 dup(0), 1, 2, 1, 0, 1, 2, 0,	2 dup(1), 2, 3 dup(1)
		db 2, 3	dup(0),	3, 1, 2	dup(0),	3, 0, 1, 0, 3, 2 dup(1)
		db 0, 3, 2 dup(0), 1, 3, 1, 0, 1, 3, 0,	2 dup(1), 3, 3 dup(1)
		db 3, 2, 2 dup(0), 2, 3, 2 dup(0), 2 dup(2), 1,	0, 2, 3
		db 1, 0, 2 dup(2), 0, 1, 2, 3, 0, 1, 2 dup(2), 2 dup(1)
		db 2, 3, 2 dup(1), 2 dup(2), 2 dup(0), 2 dup(3), 2 dup(0)
		db 3, 2, 1, 0, 2 dup(3), 1, 0, 3, 2, 0,	1, 2 dup(3), 0
		db 1, 3, 2, 2 dup(1), 2	dup(3),	2 dup(1), 3, 0,	2, 0, 2
		db 1, 2, 0, 2, 0, 3, 0,	2, 1, 3, 0, 2, 0, 2, 1,	2, 1, 2
		db 1, 2, 0, 3, 1, 2, 1,	3, 1, 2, 0
		db 2, 0, 3, 1, 2, 0, 3,	0, 3, 0, 3, 1, 3, 0, 3,	0, 2, 1
		db 3, 1, 2, 1, 3, 0, 3,	1, 3, 1, 3, 1, 3, 2 dup(2), 0
		db 2, 3, 2, 0, 2 dup(2), 3, 0, 2, 2 dup(3), 0, 3 dup(2)
		db 1, 2, 3, 2, 1, 2 dup(2), 3, 1, 2, 2 dup(3), 1, 3 dup(2)
		db 0, 2	dup(3),	2, 0, 3, 2, 3, 0, 3 dup(3), 0, 3, 2 dup(2)
		db 1, 2	dup(3),	2, 1, 3, 2, 3, 1, 3 dup(3), 1, 3, 2 dup(0)
		db 2 dup(2), 1,	0, 2 dup(2), 0,	1, 2 dup(2), 2 dup(1)
		db 2 dup(2), 2 dup(0), 3, 2, 1,	0, 3, 2, 0, 1, 3, 2, 2 dup(1)
		db 3, 2, 2 dup(0), 2, 3, 1, 0, 2, 3, 0,	1, 2, 3, 2 dup(1)
		db 2, 3, 2 dup(0), 2 dup(3), 1,	0, 2 dup(3), 0,	1, 2 dup(3)
		db 2 dup(1), 2 dup(3), 2, 0, 2 dup(2), 3, 0, 3 dup(2)
		db 1, 2	dup(2),	3, 1, 3	dup(2),	0, 3, 2, 3, 0, 3, 2 dup(2)
		db 1, 3, 2, 3, 1, 3, 2 dup(2), 0, 2, 2 dup(3), 0, 2, 3
		db 2, 1, 2, 2 dup(3), 1, 2, 3, 2, 0, 3 dup(3), 0, 2 dup(3)
		db 2, 1, 3 dup(3), 1, 2	dup(3),	0, 3 dup(2), 1,	3 dup(2)
		db 0, 3, 2 dup(2), 1, 3, 2 dup(2), 0, 2, 3, 2, 1, 2, 3
		db 2, 0, 2 dup(3), 2, 1, 2 dup(3), 2, 0, 2 dup(2), 3, 1
		db 2 dup(2), 3,	0, 3, 2, 3, 1, 3, 2, 3,	0, 2, 2	dup(3)
		db 1, 2, 2 dup(3), 0, 3	dup(3),	1, 3 dup(3), 4 dup(2)
		db 3, 4	dup(2),	3, 2 dup(2), 2 dup(3), 4 dup(2), 3, 2
		db 3, 2, 3, 2 dup(2), 2	dup(3),	2, 3 dup(3), 4 dup(2)
		db 2 dup(3), 2 dup(2), 3, 2, 3,	2, 3 dup(3), 2,	3, 2 dup(2)
		db 3 dup(3), 2,	2 dup(3), 2, 7 dup(3)

include libs/master.lib/smem_release.asm
include libs/master.lib/smem_wget.asm
include libs/BorlandC/text_clear.asm
dword_233A	dd 0

; =============== S U B	R O U T	I N E =======================================


sub_233E	proc far
		xor	ax, ax
		push	ax
		push	ax
		push	cs
		call	near ptr graph_extmode
		and	ax, 0Ch
		cmp	ax, 0Ch
		mov	word_D6D8, 33FFh
		jz	short loc_235A
		mov	word_D6D8, 0

loc_235A:
		xor	ax, ax
		mov	word_F080, ax
		mov	word_F082, ax
		cmp	byte_D6DA, al
		jnz	short locret_23A7
		mov	al, 0Ah
		push	ax
		push	cs
		mov	ax, 23B2h
		push	ax
		nop
		push	cs
		call	near ptr sub_772
		mov	word_F084, ax
		mov	word_F086, dx
		pushf
		cli
		in	al, 2		; DMA controller, 8237A-5.
					; channel 1 current address
		mov	ah, al
		and	al, 0FBh
		out	2, al		; DMA controller, 8237A-5.
					; channel 1 base address
					; (also	sets current address)
		popf
		or	ah, 0FBh
		mov	byte_D6DA, ah
		mov	ax, 18h
		push	ax
		push	cs
		mov	ax, 23A8h
		push	ax
		nop
		push	cs
		call	near ptr sub_772
		mov	word ptr cs:dword_233A,	ax
		mov	word ptr cs:dword_233A+2, dx
		out	64h, al		; AT Keyboard controller 8042.

locret_23A7:
		retf
sub_233E	endp

; ---------------------------------------------------------------------------
		pushf
		call	cs:dword_233A
		out	64h, al		; AT Keyboard controller 8042.
		iret
; ---------------------------------------------------------------------------
		nop
		push	ax
		push	ds
		mov	ax, seg	dseg
		mov	ds, ax
		mov	ax, word_D6D8
		add	word_F088, ax
		jb	short loc_23E3
		inc	word_F080
		inc	word_F082
		cmp	word_D6D6, 0
		jz	short loc_23E3
		push	bx
		push	cx
		push	dx
		push	si
		push	di
		push	es
		cld
		call	dword ptr unk_D6D4
		pop	es
		pop	di
		pop	si
		pop	dx
		pop	cx
		pop	bx
		cli

loc_23E3:
		pop	ds
		mov	al, 20h	; ' '
		out	0, al
		out	64h, al		; AT Keyboard controller 8042.
		pop	ax
		iret

; =============== S U B	R O U T	I N E =======================================


sub_23EC	proc far
		cmp	byte_D6DA, 0
		jz	short locret_2432
		mov	ax, 18h
		push	ax
		push	word ptr cs:dword_233A+2
		push	word ptr cs:dword_233A
		nop
		push	cs
		call	near ptr sub_772
		pushf
		cli
		in	al, 2		; DMA controller, 8237A-5.
					; channel 1 current address
		or	al, 4
		out	2, al		; DMA controller, 8237A-5.
					; channel 1 base address
					; (also	sets current address)
		popf
		mov	ax, 0Ah
		push	ax
		push	word_F086
		push	word_F084
		nop
		push	cs
		call	near ptr sub_772
		pushf
		cli
		in	al, 2		; DMA controller, 8237A-5.
					; channel 1 current address
		and	al, byte_D6DA
		out	2, al		; DMA controller, 8237A-5.
					; channel 1 base address
					; (also	sets current address)
		popf
		out	64h, al		; AT Keyboard controller 8042.
		xor	al, al
		mov	byte_D6DA, al

locret_2432:
		retf
sub_23EC	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_2434	proc far
		cmp	byte_D6DA, 0
		jnz	short loc_2450

loc_243B:
		jmp	short $+2
		jmp	short $+2
		in	al, 0A0h	; PIC 2	 same as 0020 for PIC 1
		test	al, 20h
		jnz	short loc_243B

loc_2445:
		jmp	short $+2
		jmp	short $+2
		in	al, 0A0h	; PIC 2	 same as 0020 for PIC 1
		test	al, 20h
		jz	short loc_2445
		retf
; ---------------------------------------------------------------------------

loc_2450:
		mov	ax, word_F080

loc_2453:
		cmp	ax, word_F080
		jz	short loc_2453
		retf
sub_2434	endp


; =============== S U B	R O U T	I N E =======================================


sub_245A	proc far
		mov	bx, sp
		push	si
		push	di
		mov	si, ss:[bx+4]
		mov	word_D3B0, 0C8h	; 'È'
		push	cs
		call	near ptr sub_2434

loc_246C:
		push	cs
		call	loc_1C2C
		mov	di, si
		cmp	di, 0
		jle	short loc_247E

loc_2477:
		push	cs
		call	near ptr sub_2434
		dec	di
		jnz	short loc_2477

loc_247E:
		sub	word_D3B0, 6
		cmp	word_D3B0, 64h ; 'd'
		jg	short loc_246C
		mov	word_D3B0, 64h ; 'd'
		push	cs
		call	loc_1C2C
		pop	di
		pop	si
		retf	2
sub_245A	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_249A	proc far
		mov	bx, sp
		push	si
		push	di
		mov	si, ss:[bx+4]
		mov	word_D3B0, 64h ; 'd'
		push	cs
		call	near ptr sub_2434

loc_24AC:
		push	cs
		call	loc_1C2C
		mov	di, si
		cmp	di, 0
		jle	short loc_24BE

loc_24B7:
		push	cs
		call	near ptr sub_2434
		dec	di
		jnz	short loc_24B7

loc_24BE:
		add	word_D3B0, 6
		cmp	word_D3B0, 0C8h	; 'È'
		jl	short loc_24AC
		mov	word_D3B0, 0C8h	; 'È'
		push	cs
		call	loc_1C2C
		pop	di
		pop	si
		retf	2
sub_249A	endp

include libs/master.lib/hmem_lallocate.asm
include libs/master.lib/mem_assign_dos.asm
include libs/master.lib/mem_assign.asm
include libs/master.lib/memheap.asm

; =============== S U B	R O U T	I N E =======================================


sub_272A	proc far
		cmp	mem_TopSeg, 0
		jz	short loc_2745
		mov	ax, mem_TopSeg
		mov	es, ax
		xor	ax, ax
		cmp	mem_MyOwn, ax
		mov	mem_TopSeg, ax
		jz	short loc_2745
		mov	ah, 49h
		int	21h		; DOS -	2+ - FREE MEMORY
					; ES = segment address of area to be freed

loc_2745:
		mov	ax, 1
		retf
sub_272A	endp

; ---------------------------------------------------------------------------
		xor	ax, ax
		stc
		retf
; ---------------------------------------------------------------------------
		nop
; START	OF FUNCTION CHUNK FOR sub_2762

loc_274E:
		push	ax
		push	es
		call	hmem_free
		pop	ax
		jmp	short loc_275B
; END OF FUNCTION CHUNK	FOR sub_2762
; ---------------------------------------------------------------------------
		nop
; START	OF FUNCTION CHUNK FOR sub_2762

loc_2758:
		mov	ax, 0FFF8h

loc_275B:
		stc
		pop	di
		pop	si
		pop	bp
		retf	8
; END OF FUNCTION CHUNK	FOR sub_2762

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_2762	proc far

arg_0		= word ptr  6
arg_2		= dword	ptr  8
arg_6		= word ptr  0Ch

; FUNCTION CHUNK AT 274E SIZE 00000009 BYTES
; FUNCTION CHUNK AT 2758 SIZE 0000000A BYTES

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	di, word_D706
		shl	di, 1
		mov	ax, [bp+arg_6]
		mov	dx, ax
		mul	ah
		mov	bx, ax
		shl	ax, 2
		add	ax, bx
		mov	mem_AllocID, 4
		push	ax
		call	hmem_allocbyte
		jb	short loc_2758
		mov	es, ax
		push	word_D706
		push	dx
		push	ax
		push	cs
		call	near ptr sub_280E
		jb	short loc_274E
		push	ds
		lds	si, [bp+arg_2]
		mov	di, bx
		mov	cx, bx
		shl	cx, 1
		rep movsw
		push	es
		pop	ds
		mov	si, bx
		mov	dx, [bp+arg_0]
		mov	dh, dl
		mov	cx, bx
		xor	di, di
		shr	dh, 1
		jb	short loc_27B8
		rep movsb
		jmp	short loc_27BE
; ---------------------------------------------------------------------------
		nop

loc_27B8:
		lodsb
		not	al
		stosb
		loop	loc_27B8

loc_27BE:
		mov	cx, bx
		xor	di, di
		shr	dh, 1
		sbb	ah, ah

loc_27C6:
		lodsb
		xor	al, ah
		or	[di], al
		inc	di
		loop	loc_27C6
		mov	cx, bx
		xor	di, di
		shr	dh, 1
		sbb	ah, ah

loc_27D6:
		lodsb
		xor	al, ah
		or	[di], al
		inc	di
		loop	loc_27D6
		mov	cx, bx
		xor	di, di
		shr	dh, 1
		sbb	ah, ah

loc_27E6:
		lodsb
		xor	al, ah
		or	[di], al
		inc	di
		loop	loc_27E6
		test	dl, dl
		jz	short loc_2802
		mov	ah, 4

loc_27F4:
		xor	si, si
		mov	cx, bx

loc_27F8:
		lodsb
		and	[di], al
		inc	di
		loop	loc_27F8
		dec	ah
		jnz	short loc_27F4

loc_2802:
		pop	ds
		mov	ax, word_D706
		dec	ax
		pop	di
		pop	si
		pop	bp
		retf	8
sub_2762	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_280E	proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	bx
		cld
		mov	bx, [bp+arg_4]
		cmp	bx, 200h
		cmc
		mov	ax, 0FFE1h
		jb	short loc_287D
		cmp	word_D704, 0
		jnz	short loc_284E
		mov	mem_AllocID, 4
		push	240h
		call	hmem_alloc
		mov	word_D704, ax
		mov	ax, 0FFF8h
		jb	short loc_287D
		push	es
		push	cx
		push	di
		push	ds
		pop	es
		assume es:dseg
		xor	ax, ax
		mov	di, 2512h
		mov	cx, 200h
		rep stosw
		pop	di
		pop	cx
		pop	es
		assume es:nothing

loc_284E:
		mov	ax, bx
		shl	bx, 1
		cmp	ax, word_D706
		jnb	short loc_2869
		cmp	word ptr [bx+2512h], 0
		jz	short loc_286D
		push	word ptr [bx+2112h]
		call	hmem_free
		jmp	short loc_286D
; ---------------------------------------------------------------------------

loc_2869:
		inc	ax
		mov	word_D706, ax

loc_286D:
		mov	ax, [bp+arg_2]
		mov	[bx+2512h], ax
		mov	ax, [bp+arg_0]
		mov	[bx+2112h], ax
		xor	ax, ax

loc_287D:
		pop	bx
		pop	bp
		retf	6
sub_280E	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_2882	proc far

arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		push	ds
		push	si
		push	di
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	dos_ropen
		jb	short loc_2904
		mov	bx, ax
		mov	cx, 764h
		push	bx
		push	cx
		push	bx
		push	ds
		push	cx
		push	cs
		call	near ptr sub_3D6
		pop	cx
		pop	bx
		jb	short loc_28FC
		mov	al, byte_D6E9
		and	al, 7Fh
		cmp	al, 3
		mov	ax, 0FFF3h
		jnz	short loc_28FC
		xor	si, si
		mov	ax, word_D700
		or	ax, ax
		jz	short loc_28C8
		push	bx
		push	cx
		push	bx
		push	ds
		push	cx
		push	cs
		call	near ptr sub_412
		pop	cx
		pop	bx
		mov	si, ax

loc_28C8:
		test	byte_D6E9, 80h
		jz	short loc_28DC
		push	bx
		push	cx
		push	bx
		push	ds
		push	cx
		push	cs
		call	near ptr sub_4C6
		pop	cx
		pop	bx
		jb	short loc_28FC

loc_28DC:
		push	bx
		push	bx
		push	ds
		push	cx
		push	si
		push	cs
		call	near ptr sub_286
		pop	bx
		jb	short loc_28FC
		push	bx
		push	cs
		call	near ptr sub_CCE
		mov	ax, word_D6F2
		sub	ax, word_D6F0
		inc	ax
		pop	di
		pop	si
		pop	ds
		pop	bp
		retf	4
; ---------------------------------------------------------------------------

loc_28FC:
		push	ax
		push	bx
		push	cs
		call	near ptr sub_CCE
		pop	ax
		stc

loc_2904:
		pop	di
		pop	si
		pop	ds
		pop	bp
		retf	4
sub_2882	endp

; ---------------------------------------------------------------------------
		nop
; ---------------------------------------------------------------------------
dword_290C	dd 0
byte_2910	db 0, 90h

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_2912	proc far

arg_0		= dword	ptr  6

		push	bp
		mov	bp, sp
		cld
		mov	ax, word ptr cs:dword_290C
		or	ax, word ptr cs:dword_290C+2
		jnz	short loc_2948
		mov	ax, 3521h
		int	21h		; DOS -	2+ - GET INTERRUPT VECTOR
					; AL = interrupt number
					; Return: ES:BX	= value	of interrupt vector
		mov	word ptr cs:dword_290C,	bx
		mov	word ptr cs:dword_290C+2, es
		mov	word_FAEA, 0
		mov	word_FAEC, 0FFFFh
		push	ds
		push	cs
		pop	ds
		assume ds:seg000
		mov	dx, 29A2h
		mov	ax, 2521h
		int	21h		; DOS -	SET INTERRUPT VECTOR
					; AL = interrupt number
					; DS:DX	= new vector to	be used	for specified interrupt
		pop	ds
		assume ds:dseg

loc_2948:
		push	si
		push	di
		push	ds
		mov	cx, 0FFFFh
		mov	al, 0
		les	di, [bp+arg_0]
		repne scasb
		not	cx
		sub	di, cx
		mov	si, di
		mov	di, 2AEAh
		push	ds
		push	es
		pop	ds
		pop	es
		shr	cx, 1
		rep movsw
		adc	cx, cx
		rep movsb
		pop	ds
		pop	di
		pop	si
		pop	bp
		retf	4
sub_2912	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_2972	proc far
		mov	ax, word ptr cs:dword_290C
		or	ax, word ptr cs:dword_290C+2
		jz	short locret_29A1
		push	ds
		lds	dx, cs:dword_290C
		mov	ax, 2521h
		int	21h		; DOS -	SET INTERRUPT VECTOR
					; AL = interrupt number
					; DS:DX	= new vector to	be used	for specified interrupt
		pop	ds
		xor	ax, ax
		mov	word ptr cs:dword_290C,	ax
		mov	word ptr cs:dword_290C+2, ax
		cmp	word_FAEA, ax
		jz	short locret_29A1
		push	word_FAEA
		push	cs
		call	near ptr sub_1D36

locret_29A1:
		retf
sub_2972	endp

; ---------------------------------------------------------------------------
		cmp	cs:byte_2910, 0
		jz	short loc_29AF
		jmp	cs:dword_290C
; ---------------------------------------------------------------------------

loc_29AF:
		pusha
		push	ds
		push	es
		mov	bp, sp
		mov	di, seg	dseg
		mov	ds, di
		inc	cs:byte_2910
		push	word ptr [bp+18h]
		popf
		mov	cs:byte_2A06, ah
		mov	si, 29D6h

loc_29CA:
		add	si, 4
		cmp	ah, cs:[si]
		jnz	short loc_29CA
		mov	di, word_FAEC
		jmp	word ptr cs:[si+2]
; ---------------------------------------------------------------------------
		db 3Dh,	0, 0Ah,	2Ah, 3Eh, 0, 3Fh, 2Ah, 3Fh, 0, 5Dh, 2Ah
		db 42h,	0, 71h,	2Ah, 46h, 0, 0D2h, 2Ah,	40h, 0,	0D6h, 2Ah
		db 45h,	0, 0D6h, 2Ah, 4Ch, 0, 0B4h, 2Ah, 57h, 0, 0D6h
		db 2Ah,	5Ch, 0,	0D6h, 2Ah, 44h,	0, 0C0h, 2Ah
byte_2A06	db 0
		db 0
; ---------------------------------------------------------------------------
		fisubr	dword ptr [bp+si]
		test	al, 0Fh
		jz	short loc_2A11
		jmp	loc_2ADA
; ---------------------------------------------------------------------------

loc_2A11:
		or	di, di
		js	short loc_2A18
		jmp	loc_2ADA
; ---------------------------------------------------------------------------

loc_2A18:
		push	ds
		push	offset unk_FA6A
		push	word ptr [bp+2]
		push	dx
		push	cs
		call	near ptr sub_2B06
		or	ax, ax
		jnz	short loc_2A2B
		jmp	loc_2ADA
; ---------------------------------------------------------------------------

loc_2A2B:
		mov	word_FAEA, ax
		mov	es, ax
		mov	es, word ptr es:0
		mov	ax, es:0
		mov	word_FAEC, ax
		jmp	loc_2AF5
; ---------------------------------------------------------------------------
		cmp	bx, di
		jz	short loc_2A46
		jmp	loc_2ADA
; ---------------------------------------------------------------------------

loc_2A46:
		push	word_FAEA
		push	cs
		call	near ptr sub_1D36
		mov	word_FAEA, 0
		mov	word_FAEC, 0FFFFh
		jmp	loc_2AF5
; ---------------------------------------------------------------------------
		cmp	bx, di
		jnz	short loc_2ADA
		push	word ptr [bp+2]
		push	dx
		push	cx
		push	word_FAEA
		push	cs
		call	near ptr sub_1E00
		jmp	loc_2AF5
; ---------------------------------------------------------------------------
		cmp	bx, di
		jnz	short loc_2ADA
		or	cx, cx
		jl	short loc_2AEC
		cmp	al, 1
		jz	short loc_2AA5
		jl	short loc_2A99
		mov	es, word_FAEA
		mov	dx, es:16h
		mov	cx, es:18h
		sub	dx, es:12h
		sbb	cx, es:14h
		jmp	short loc_2AA5
; ---------------------------------------------------------------------------

loc_2A99:
		push	cx
		push	dx
		push	word_FAEA
		push	cs
		call	near ptr sub_1E2E
		pop	dx
		pop	cx

loc_2AA5:
		push	word_FAEA
		push	cx
		push	dx
		push	cs
		call	near ptr sub_1E6A
		mov	[bp+0Eh], dx
		jmp	short loc_2AF5
; ---------------------------------------------------------------------------
		db 2Eh,	0C5h, 16h, 0Ch,	29h, 0B8h, 21h,	25h, 0CDh, 21h
		db 0EBh, 1Ah, 8Ah, 0C8h, 0B8h, 1, 0, 0D3h, 0E0h, 2Eh, 85h
		db 6, 0D0h, 2Ah, 75h, 8, 0EBh, 0Ah, 0CFh, 14h, 8Bh, 0CFh
		db 74h,	16h, 3Bh, 0DFh,	74h, 12h
; ---------------------------------------------------------------------------

loc_2ADA:
		dec	cs:byte_2910
		push	word ptr [bp+18h]
		popf
		pop	es
		pop	ds
		popa
		cli
		jmp	cs:dword_290C
; ---------------------------------------------------------------------------

loc_2AEC:
		or	byte ptr [bp+18h], 1
		mov	ax, 1
		jmp	short loc_2AF9
; ---------------------------------------------------------------------------

loc_2AF5:
		and	byte ptr [bp+18h], 0FEh

loc_2AF9:
		mov	[bp+12h], ax
		dec	cs:byte_2910
		pop	es
		pop	ds
		popa
		iret
; ---------------------------------------------------------------------------
		db 0

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_2B06	proc far

var_20		= byte ptr -20h
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_A		= word ptr  10h
arg_C		= word ptr  12h
arg_E		= word ptr  14h
arg_10		= word ptr  16h

		enter	20h, 0
		push	si
		push	di
		mov	mem_AllocID, 7
		push	1Fh
		call	hmem_allocbyte
		jnb	short loc_2B1D
		jmp	loc_2BD8
; ---------------------------------------------------------------------------

loc_2B1D:
		mov	si, ax
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	cs
		call	near ptr sub_5B8
		or	ax, ax
		jnz	short loc_2B30
		jmp	loc_2BD1
; ---------------------------------------------------------------------------

loc_2B30:
		mov	es, si
		mov	es:0, ax
		lea	di, [bp+var_20]
		push	di
		push	si
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	sub_2BE6
		or	ax, ax
		jnz	short loc_2BC5
		mov	ax, 1DF2h
		mov	es:4, ax
		mov	al, byte_D3EC
		mov	es:1Eh,	al
		mov	ax, ss:[di]
		cmp	ax, 0F388h
		jz	short loc_2B6E
		cmp	ax, 9595h
		jz	short loc_2B78
		mov	ax, 5
		jmp	short loc_2BC5
; ---------------------------------------------------------------------------

loc_2B6E:
		mov	ax, es:4
		mov	es:2, ax
		jmp	short loc_2B8D
; ---------------------------------------------------------------------------

loc_2B78:
		mov	word ptr es:2, 1D60h
		mov	word ptr es:1Ah, 0
		mov	word ptr es:1Ch, 0FFFFh

loc_2B8D:
		mov	ax, ss:[di+arg_A]
		mov	dx, ss:[di+arg_C]
		mov	es:6, ax
		mov	es:8, dx
		mov	ax, ss:[di+arg_E]
		mov	dx, ss:[di+arg_10]
		mov	es:16h,	ax
		mov	es:18h,	dx
		xor	ax, ax
		mov	es:0Ah,	ax
		mov	es:0Ch,	ax
		mov	es:12h,	ax
		mov	es:14h,	ax
		mov	ax, si
		jmp	short loc_2BDF
; ---------------------------------------------------------------------------

loc_2BC5:
		mov	word_D3EA, ax
		push	word ptr es:0
		push	cs
		call	near ptr sub_472

loc_2BD1:
		push	si
		call	hmem_free
		jmp	short loc_2BDD
; ---------------------------------------------------------------------------

loc_2BD8:
		mov	byte ptr word_D3EA, 3

loc_2BDD:
		xor	ax, ax

loc_2BDF:
		pop	di
		pop	si
		leave
		retf	8
sub_2B06	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_2BE6	proc near

arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= dword	ptr  8
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_14		= word ptr  18h
arg_16		= word ptr  1Ah

		enter	6, 0
		push	si
		push	di
		push	es
		mov	si, [bp+arg_8]
		mov	es, si
		xor	ax, ax
		mov	es:0Eh,	ax
		mov	es:10h,	ax
		push	ds
		push	si
		cld
		xor	bx, bx
		mov	dx, bx
		lds	si, [bp+arg_4]

loc_2C06:
		lodsb
		cmp	al, 0
		jz	short loc_2C16
		cmp	al, 2Eh	; '.'
		jnz	short loc_2C06
		lea	bx, [si-1]
		mov	dx, ds
		jmp	short loc_2C06
; ---------------------------------------------------------------------------

loc_2C16:
		pop	si
		pop	ds
		mov	ax, dx
		or	ax, bx
		jz	short $+2
		mov	di, [bp+arg_A]
		mov	byte_D713, 0

loc_2C26:
		mov	es, si
		push	ss
		push	di
		push	20h ; ' '
		push	word ptr es:0
		push	cs
		call	near ptr sub_60C
		inc	byte_D713
		cmp	byte_D713, 0FFh
		mov	bx, 2
		jz	short loc_2C83
		cmp	ax, 20h	; ' '
		jnz	short loc_2C83
		mov	es, si
		add	es:0Eh,	ax
		adc	word ptr es:10h, 0
		mov	ax, ss:[di]
		and	ax, ax
		mov	bx, 6
		jz	short loc_2C83
		lea	bx, [di+3]

loc_2C62:
		cmp	byte ptr ss:[bx], 0
		jz	short loc_2C6E
		not	byte ptr ss:[bx]
		inc	bx
		jmp	short loc_2C62
; ---------------------------------------------------------------------------

loc_2C6E:
		lea	bx, [di+3]
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	ss
		push	bx
		call	sub_2CAC
		mov	ax, 0
		jnz	short loc_2C85
		jmp	short loc_2C26
; ---------------------------------------------------------------------------

loc_2C83:
		mov	ax, bx

loc_2C85:
		mov	es, si
		mov	ax, ss:[di+arg_14]
		mov	dx, ss:[di+arg_16]
		mov	es:0Eh,	ax
		mov	es:10h,	dx
		push	word ptr es:0
		push	dx
		push	ax
		push	0
		push	cs
		call	near ptr sub_67E
		pop	es
		pop	di
		pop	si
		leave
		retn	0Ch
sub_2BE6	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_2CAC	proc near

arg_0		= dword	ptr  4
arg_4		= dword	ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	ds
		cld
		les	bx, [bp+arg_4]
		lds	si, [bp+arg_0]

loc_2CB8:
		mov	ah, es:[bx]
		inc	bx
		lodsb
		sub	al, 61h	; 'a'
		cmp	al, 19h
		ja	short loc_2CC5
		sub	al, 20h	; ' '

loc_2CC5:
		sub	ah, 61h	; 'a'
		cmp	ah, 19h
		ja	short loc_2CD0
		sub	ah, 20h	; ' '

loc_2CD0:
		cmp	ah, al
		jnz	short loc_2CDA
		add	al, 61h	; 'a'
		jnz	short loc_2CB8
		jmp	short loc_2CDC
; ---------------------------------------------------------------------------

loc_2CDA:
		xor	ax, ax

loc_2CDC:
		test	ax, ax
		pop	ds
		pop	si
		pop	bp
		retn	8
sub_2CAC	endp

include libs/BorlandC/__abort.asm
include libs/BorlandC/stpcpy.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function noreturn

; void abort(void)
_abort		proc far
					; ___call_terminate+6Ep ...
		push	si
		push	di
		mov	ax, 16h
		push	ax
		nop
		call	raise
		pop	cx
		nop
		push	cs
		call	near ptr __abort
_abort		endp

; ---------------------------------------------------------------------------
		pop	di
		pop	si
		retf

include libs/BorlandC/atexit.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl registerbgidriver(void (*driver)(void))
_registerbgidriver proc	far
					; seg000:34FEp	...

driver		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	[bp+arg_2]
		push	[bp+driver]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx
		pop	di
		pop	si
		pop	bp
		retf
_registerbgidriver endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl registerbgifont(void (*font)(void))
_registerbgifont proc far

driver		= dword	ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; driver
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		pop	di
		pop	si
		pop	bp
		retf
_registerbgifont endp

include libs/BorlandC/dosenv.asm
include libs/BorlandC/dosgdriv.asm
include libs/BorlandC/errormsg.asm
include libs/BorlandC/exit.asm
include libs/BorlandC/f_scopy.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void __cdecl getdate(struct date *datep)
_getdate	proc far

datep		= dword	ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ah, 2Ah
		int	21h		; DOS -	GET CURRENT DATE
					; Return: DL = day, DH = month,	CX = year
					; AL = day of the week (0=Sunday, 1=Monday, etc.)
		les	bx, [bp+datep]
		mov	es:[bx], cx
		mov	es:[bx+2], dx
		pop	di
		pop	si
		pop	bp
		retf
_getdate	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void __cdecl gettime(struct time *timep)
_gettime	proc far

timep		= dword	ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ah, 2Ch
		int	21h		; DOS -	GET CURRENT TIME
					; Return: CH = hours, CL = minutes, DH = seconds
					; DL = hundredths of seconds
		les	bx, [bp+timep]
		mov	es:[bx], cx
		mov	es:[bx+2], dx
		pop	di
		pop	si
		pop	bp
		retf
_gettime	endp

include libs/BorlandC/getvect.asm
include libs/BorlandC/H_LDIV.ASM
include libs/BorlandC/H_LLSH.ASM
include libs/BorlandC/H_PADD.ASM
include libs/BorlandC/__IOERROR.ASM
include libs/BorlandC/_isatty.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; __int32 __cdecl lseek(int handle, __int32 offset, int	fromwhere)
_lseek		proc far

handle		= word ptr  6
_offset		= word ptr  8
arg_4		= word ptr  0Ah
fromwhere	= byte ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	bx, [bp+handle]
		add	bx, bx
		and	word ptr [bx+9DCh], 0FDFFh
		mov	ah, 42h	; 'B'
		mov	al, [bp+fromwhere]
		mov	bx, [bp+handle]
		mov	cx, [bp+arg_4]
		mov	dx, [bp+_offset]
		int	21h		; DOS -	2+ - MOVE FILE READ/WRITE POINTER (LSEEK)
					; AL = method:
					; 0-from beginnig,1-from current,2-from	end
		jb	short loc_324A
		jmp	short loc_324F
; ---------------------------------------------------------------------------

loc_324A:
		push	ax
		call	__IOERROR
		cwd

loc_324F:
		pop	di
		pop	si
		pop	bp
		retf
_lseek		endp

; ---------------------------------------------------------------------------
		dd byte_347E
		db 4, 0, 0FAh, 0FFh, 0Ah dup(0), 0DCh, 0FFh, 2 dup(0)
		db 5, 3	dup(0),	53h, 32h
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		sub	sp, 24h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 3261h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		xor	ax, ax
		push	ax
		push	ax
		push	ax
		push	ax
		mov	ax, 5
		push	ax
		mov	ax, seg	seg000
		push	ax
		mov	ax, 3359h
		push	ax
		xor	ax, ax
		push	ax
		push	ax
		push	ds
		mov	ax, 0A60h
		push	ax
		push	ss
		lea	ax, [bp-6]
		push	ax
		nop
		push	cs
		call	near ptr @xmsg@$bctr$qmx4xmsg ;	xmsg::xmsg(xmsg	&)
		add	sp, 8
		mov	ax, word_D9E4
		mov	[bp-2],	ax
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		lea	ax, [bp-6]
		push	ss
		push	ax
		push	cs
		mov	ax, 347Eh
		push	ax
		nop
		push	cs
		call	near ptr @_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void *,uint,uint,uint,uchar	*)
		add	sp, 1Ah
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; set_new_handler(void (*)(void))
@set_new_handler$qnqv$v	proc far

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		mov	dx, seg_D9E8
		mov	ax, word_D9E6
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	seg_D9E8, dx
		mov	word_D9E6, ax
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@set_new_handler$qnqv$v	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; operator new(unsigned	int)
@$bnew$qui	proc far
					; xmsg::xmsg(string &)+21p ...

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		mov	[bp+var_2], 0
		mov	[bp+var_4], 0
		cmp	[bp+arg_0], 0
		jz	short loc_3325
		mov	ax, [bp+arg_0]
		jmp	short loc_3328
; ---------------------------------------------------------------------------

loc_3325:
		mov	ax, 1

loc_3328:
		mov	[bp+arg_0], ax
		jmp	short loc_3331
; ---------------------------------------------------------------------------

loc_332D:
		call	dword ptr word_D9E6

loc_3331:
		push	[bp+arg_0]
		nop
		push	cs
		call	near ptr _malloc
		pop	cx
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		or	ax, dx
		jnz	short loc_334D
		mov	ax, word_D9E6
		or	ax, seg_D9E8
		jnz	short loc_332D

loc_334D:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@$bnew$qui	endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		push	word ptr [bp+0Ch]
		push	word ptr [bp+0Ah]
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bctr$qmx4xmsg ;	xmsg::xmsg(xmsg	&)
		add	sp, 8
		les	bx, [bp+0Ah]
		mov	ax, es:[bx+4]
		les	bx, [bp+6]
		mov	es:[bx+4], ax
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	dx, [bp+8]
		mov	ax, [bp+6]
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		dd byte_347E
		db 2 dup(0), 60h, 0Ah
		dw seg dseg
		dd byte_3444
		db 4, 0, 0FCh, 0FFh, 0Ah dup(0), 0DEh, 0FFh, 2 dup(0)
		db 5, 3	dup(0),	9Ch, 33h

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; string::contains(char	const *)const
@string@contains$xqnxc proc far

var_22		= word ptr -22h
var_16		= word ptr -16h
driver		= byte ptr -4

		push	bp
		mov	bp, sp
		sub	sp, 22h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 33B4h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	[bp+var_16], 6
		xor	ax, ax
		push	ax
		push	ds
		mov	ax, 0A6Ah
		push	ax		; s
		push	ss
		lea	ax, [bp+driver]
		push	ax		; __int32
		call	@string@$bctr$qnxc ; string::string(char *)
		add	sp, 8
		lea	ax, [bp+driver]
		push	ss
		push	ax
		push	ds
		mov	ax, 0A60h
		push	ax
		nop
		push	cs
		call	near ptr @xalloc@$bctr$qmx6stringui ; xalloc::xalloc(string &,uint)
		mov	ax, 2
		push	ax		; char
		push	ss
		lea	ax, [bp+driver]
		push	ax		; driver
		call	@string@$bdtr$qv ; string::~string(void)
		add	sp, 10h
		push	[bp+var_22]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@string@contains$xqnxc endp

; ---------------------------------------------------------------------------

loc_341D:
		push	si
		push	di
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	ds
		mov	ax, 0A60h
		push	ax
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		pop	di
		pop	si
		retf
; ---------------------------------------------------------------------------
byte_3444	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Eh, 0, 32h
		db 0Dh dup(0), 1, 0, 1,	0, 8, 3
		dw seg seg006
		db 5, 0, 36h, 0, 73h, 74h, 72h,	69h, 6Eh, 67h, 0Eh dup(0)
byte_347E	db 6, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 2Eh, 0, 3Ah
		db 0Dh dup(0), 2, 0, 2,	0, 0C0h, 34h
		dw seg seg000
		db 5, 0, 3Eh, 0, 78h, 61h, 2 dup(6Ch), 6Fh, 63h, 2 dup(0)
		db 0Dh,	35h
		dw seg seg000
		db 2 dup(0), 3,	0Dh dup(0)
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_3507
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_3505
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_3509
; ---------------------------------------------------------------------------

loc_3505:
		jmp	short loc_3509
; ---------------------------------------------------------------------------

loc_3507:
		xor	ax, ax

loc_3509:
					; seg000:loc_3505j
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Ch, 0, 30h
		db 0Dh dup(0), 1, 0, 1,	0, 9Ch,	55h
		dw seg seg000
		db 5, 0, 34h, 0, 78h, 6Dh, 73h,	67h, 0Eh dup(0)

include libs/BorlandC/N_LXMUL.ASM
include libs/BorlandC/N_PCMP.ASM
include libs/BorlandC/setupio.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl toupper(int ch)
_toupper	proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	dx, [bp+arg_0]
		cmp	dx, 0FFFFh
		jnz	short loc_3633
		mov	ax, 0FFFFh
		jmp	short loc_364D
; ---------------------------------------------------------------------------

loc_3633:
		mov	al, dl
		mov	ah, 0
		mov	bx, ax
		test	(__ctype+1)[bx], 8
		jz	short loc_3649
		mov	al, dl
		mov	ah, 0
		add	ax, 0FFE0h
		jmp	short loc_364D
; ---------------------------------------------------------------------------

loc_3649:
		mov	al, dl
		mov	ah, 0

loc_364D:
		pop	di
		pop	si
		pop	bp
		retf
_toupper	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

; __RefDestructorCount(void)
@__RefDestructorCount$qv proc far
		mov	dx, ss
		mov	ax, 10h
		retf
@__RefDestructorCount$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

; __RefExceptionList(void)
@__RefExceptionList$qv proc far
					; ___ExitExceptBlocks+4p
		mov	dx, ss
		mov	ax, 14h
		retf
@__RefExceptionList$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

___InitExceptBlocks proc far
					; string::contains(char	*)+10p	...
		mov	es, ax
		mov	dx, bx
		mov	cx, bp
		mov	bx, es:[bx+4]
		add	bx, cx
		mov	ss:[bx+6], dx
		mov	ss:[bx+8], ax
		mov	ax, sp
		add	ax, 4
		mov	ss:[bx+0Ah], ax
		mov	ax, seg	dseg
		mov	ss:[bx+0Eh], ax
		mov	ss:[bx+10h], si
		mov	word ptr ss:[bx+2], offset __ExceptionHandler
		mov	word ptr ss:[bx+4], seg	seg000
		mov	word ptr ss:[bx+0Ch], 0
		mov	word ptr ss:[bx+12h], 0
		push	bx
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		pop	bx
		xchg	ax, bx
		mov	es, dx
		mov	cx, es:[bx]
		mov	dx, es:[bx+2]
		mov	bx, ax
		mov	ss:[bx+1Ah], cx
		mov	ss:[bx+1Ch], dx
		push	bx
		push	cs
		call	near ptr @__RefExceptionList$qv	; __RefExceptionList(void)
		pop	bx
		xchg	ax, bx
		mov	es, dx
		mov	cx, es:[bx]
		mov	es:[bx], ax
		mov	bx, ax
		mov	ss:[bx], cx
		retf
___InitExceptBlocks endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

___ExitExceptBlocks proc far
					; seg000:37CCp	...

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		push	cs
		call	near ptr @__RefExceptionList$qv	; __RefExceptionList(void)
		mov	bx, [bp+arg_0]
		xchg	ax, bx
		mov	es, dx
		mov	es:[bx], ax
		pop	bp
		retf	2
___ExitExceptBlocks endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function noreturn

; terminate(void)
@terminate$qv	proc near
		push	si
		push	di
		nop
		push	cs
		call	near ptr _abort
@terminate$qv	endp

; ---------------------------------------------------------------------------
		pop	di
		pop	si
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; set_terminate(void (*)(void))
@set_terminate$qnqv$v proc far

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+0Ch]
		mov	ax, es:[bx+0Ah]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		mov	ax, [bp+arg_0]
		or	ax, [bp+arg_2]
		jz	short loc_3720
		les	bx, ss:16h
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	es:[bx+0Ch], dx
		mov	es:[bx+0Ah], ax

loc_3720:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@set_terminate$qnqv$v endp

; ---------------------------------------------------------------------------
		dd 0
		dd loc_37BA
		db 14h dup(0), 0E2h, 0FFh, 2 dup(0), 3,	0, 2Ch,	37h
		dw seg seg000
		dw 0
		db 4, 0

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function noreturn	bp-based frame

___call_terminate proc far
					; sub_6311+272p ...

var_26		= dword	ptr -26h
var_22		= word ptr -22h
var_20		= word ptr -20h
var_1E		= word ptr -1Eh
var_12		= word ptr -12h

		push	bp
		mov	bp, sp
		sub	sp, 26h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 3744h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	[bp+var_22], ds
		nop
		push	cs
		call	near ptr _flushall
		les	bx, ss:16h
		mov	dx, es:[bx+0Ch]
		mov	ax, es:[bx+0Ah]
		mov	word ptr [bp+var_26+2],	dx
		mov	word ptr [bp+var_26], ax
		mov	[bp+var_12], 6
		les	bx, ss:16h
		cmp	word ptr es:[bx+12h], 0
		jnz	short loc_379E
		les	bx, ss:16h
		mov	word ptr es:[bx+12h], ds

loc_379E:
		les	bx, ss:16h
		mov	ax, es:[bx+12h]
		mov	[bp+var_20], ax
		mov	ds, [bp+var_20]
		call	[bp+var_26]
		mov	ds, [bp+var_22]
		mov	[bp+var_12], 0
		jmp	short loc_37C2
; ---------------------------------------------------------------------------

loc_37BA:
		mov	ds, [bp+var_22]
		nop
		push	cs
		call	near ptr @_CatchCleanup$qv ; _CatchCleanup(void)

loc_37C2:
		nop
		push	cs
		call	near ptr _abort
___call_terminate endp

; ---------------------------------------------------------------------------
		push	word ptr [bp-1Eh]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function noreturn

; unexpected(void)
@unexpected$qv	proc near
		push	si
		push	di
		push	cs
		call	near ptr ___call_terminate
@unexpected$qv	endp

; ---------------------------------------------------------------------------
		pop	di
		pop	si
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; set_unexpected(void (*)(void))
@set_unexpected$qnqv$v proc far

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+10h]
		mov	ax, es:[bx+0Eh]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		mov	ax, [bp+arg_0]
		or	ax, [bp+arg_2]
		jz	short loc_3814
		les	bx, ss:16h
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	es:[bx+10h], dx
		mov	es:[bx+0Eh], ax

loc_3814:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@set_unexpected$qnqv$v endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function noreturn	bp-based frame

___call_unexpected proc	far

var_6		= dword	ptr -6
var_2		= word ptr -2

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+10h]
		mov	ax, es:[bx+0Eh]
		mov	word ptr [bp+var_6+2], dx
		mov	word ptr [bp+var_6], ax
		les	bx, ss:16h
		cmp	word ptr es:[bx+14h], 0
		jnz	short loc_3850
		les	bx, ss:16h
		mov	word ptr es:[bx+14h], ds

loc_3850:
		les	bx, ss:16h
		mov	ax, es:[bx+14h]
		mov	[bp+var_2], ax
		push	ds
		mov	ds, [bp+var_2]
		call	[bp+var_6]
		pop	ds
		nop
		push	cs
		call	near ptr _abort
___call_unexpected endp

; ---------------------------------------------------------------------------
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; __GetPolymorphicDTC(void *, unsigned int)
@__GetPolymorphicDTC$qnvui proc	far

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_3883
		xor	ax, ax
		jmp	short loc_38BD
; ---------------------------------------------------------------------------

loc_3883:
		les	bx, [bp+arg_0]
		add	bx, [bp+arg_4]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_4+2], ds
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	dx, word ptr [bp+var_4+2]
		mov	ax, word ptr [bp+var_4]
		sub	ax, es:[bx-2]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	dx, es:[bx-6]
		mov	ax, es:[bx-8]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		mov	ax, es:[bx+1Ah]

loc_38BD:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@__GetPolymorphicDTC$qnvui endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; __GetPolymorphicDTCfar(void *, unsigned int)
@__GetPolymorphicDTCfar$qnvui proc far

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_38D7
		xor	ax, ax
		jmp	short loc_3915
; ---------------------------------------------------------------------------

loc_38D7:
		les	bx, [bp+arg_0]
		add	bx, [bp+arg_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	dx, word ptr [bp+var_4+2]
		mov	ax, word ptr [bp+var_4]
		sub	ax, es:[bx-2]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	dx, es:[bx-6]
		mov	ax, es:[bx-8]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		mov	ax, es:[bx+1Ah]

loc_3915:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@__GetPolymorphicDTCfar$qnvui endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

__ExceptInit	proc far
		push	si
		push	di
		mov	word ptr ss:12h, 0
		mov	word ptr ss:10h, 0
		mov	word ptr ss:18h, ds
		mov	word ptr ss:16h, 0B7Ch
		mov	word ptr ss:1Ah, 0FEEDh
		mov	ax, ds
		mov	word_DB10, ax
		mov	word_DB0E, ax
		mov	dx, ss:18h
		mov	ax, ss:16h
		add	ax, 0A8h ; '¨'
		les	bx, ss:16h
		mov	es:[bx+22h], dx
		mov	es:[bx+20h], ax
		mov	word ptr ss:14h, 0FFFFh
		pop	di
		pop	si
		retf
__ExceptInit	endp

; ---------------------------------------------------------------------------

unknown_libname_1:			; BCC v4.x/5.x DOS runtime
		pushf
		pop	bx
		mov	ax, 0FFFh
		and	ax, bx
		push	ax
		popf
		pushf
		pop	ax
		and	ax, 0F000h
		cmp	ax, 0F000h
		mov	word_DC24, 0
		jz	short locret_39C4
		or	bx, 0F000h
		push	bx
		popf
		pushf
		pop	ax
		and	ax, 0F000h
		mov	word_DC24, 2
		jz	short locret_39C4
		mov	edx, esp
		and	sp, 0FFFCh
		pushfd
		pop	eax
		mov	ecx, eax
		xor	eax, 40000h
		push	eax
		popfd
		pushfd
		pop	eax
		xor	eax, ecx
		mov	word_DC24, 3
		mov	esp, edx
		jz	short locret_39C4
		mov	word_DC24, 4

locret_39C4:
		retn
; ---------------------------------------------------------------------------

include libs/BorlandC/FARHEAP.ASM
include libs/BorlandC/fbrk.asm
include libs/BorlandC/signal.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far _access(char *pathname, char)
__access	proc far

pathname	= dword	ptr  6
arg_4		= byte ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	di
		xor	ax, ax
		push	ax		; func
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; pathname
		nop
		call	__chmod
		add	sp, 6
		mov	dx, ax
		cmp	dx, 0FFFFh
		jnz	short loc_42A0
		jmp	short loc_42B8
; ---------------------------------------------------------------------------

loc_42A0:
		test	[bp+arg_4], 2
		jz	short loc_42AB
		test	dl, 1
		jnz	short loc_42AF

loc_42AB:
		xor	ax, ax
		jmp	short loc_42B8
; ---------------------------------------------------------------------------

loc_42AF:
		mov	_errno, 5
		mov	ax, 0FFFFh

loc_42B8:
		pop	di
		pop	si
		pop	bp
		retf
__access	endp

; ---------------------------------------------------------------------------
		db 50h,	51h, 52h, 53h, 54h, 55h, 56h, 57h, 1Eh,	6, 8Bh
		db 0ECh, 0A1h, 0CEh, 0Ch, 0Bh, 6, 0D0h,	0Ch, 75h, 27h
		db 0BEh, 2 dup(0FFh), 1Eh, 0B8h, 0, 63h, 0F8h, 0CDh, 21h
		db 8Ch,	0D8h, 1Fh, 72h,	0Bh, 8Ch, 0DAh,	3Bh, 0C2h, 74h
		db 5, 83h, 0FEh, 0FFh, 75h, 6, 0BEh, 0D2h, 0Ch,	0B8h
		dw seg dseg
; ---------------------------------------------------------------------------
		mov	word ptr dword_DC4E, si
		mov	word ptr dword_DC4E+2, ax
		mov	sp, bp
		pop	es
		pop	ds
		pop	di
		pop	si
		pop	bp
		pop	bx
		pop	bx
		pop	dx
		pop	cx
		pop	ax
		retn

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_4305	proc near
					; sub_470F+284p ...

arg_2		= byte ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	al, [bp+arg_2]
		xor	cx, cx
		les	bx, dword_DC4E

loc_4313:
		mov	dx, es:[bx]
		or	dx, dx
		jz	short loc_4325
		cmp	al, dl
		jb	short loc_4325
		inc	bx
		inc	bx
sub_4305	endp ; sp-analysis failed


; =============== S U B	R O U T	I N E =======================================


sub_4320	proc far
		cmp	al, dh
		ja	short loc_4313
		inc	cx

loc_4325:
		xchg	ax, cx
		pop	di
		pop	si
		pop	bp
		retf
sub_4320	endp ; sp-analysis failed


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_432A	proc far
					; sub_470F+1AEp ...

var_4		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		xor	cx, cx
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax

loc_4340:
		les	bx, [bp+var_4]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_434D
		xor	cx, cx
		jmp	short loc_437B
; ---------------------------------------------------------------------------

loc_434D:
		cmp	cx, 1
		jnz	short loc_4357
		mov	cx, 2
		jmp	short loc_436E
; ---------------------------------------------------------------------------

loc_4357:
		les	bx, [bp+var_4]
		mov	al, es:[bx]
		push	ax
		push	cs
		call	sub_4305
		pop	cx
		or	ax, ax
		jz	short loc_436C
		mov	cx, 1
		jmp	short loc_436E
; ---------------------------------------------------------------------------

loc_436C:
		xor	cx, cx

loc_436E:
		mov	ax, word ptr [bp+var_4]
		cmp	ax, [bp+arg_4]
		jnb	short loc_437B
		inc	word ptr [bp+var_4]
		jmp	short loc_4340
; ---------------------------------------------------------------------------

loc_437B:
		or	cx, cx
		jnz	short loc_4384
		mov	ax, 1
		jmp	short loc_4386
; ---------------------------------------------------------------------------

loc_4384:
		xor	ax, ax

loc_4386:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_432A	endp

include libs/BorlandC/chmoda.asm
include libs/BorlandC/fflush.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int flushall(void)
_flushall	proc far
					; _fflush+12p

var_8		= word ptr -8
var_6		= word ptr -6
stream		= dword	ptr -4

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	[bp+var_8], 0
		mov	ax, __nfile
		mov	[bp+var_6], ax
		mov	word ptr [bp+stream+2],	ds
		mov	word ptr [bp+stream], 84Ah
		jmp	short loc_44B7
; ---------------------------------------------------------------------------

loc_449B:
		les	bx, [bp+stream]
		test	byte ptr es:[bx+2], 3
		jz	short loc_44B3
		push	word ptr [bp+stream+2]
		push	bx		; stream
		nop
		call	_fflush
		pop	cx
		pop	cx
		inc	[bp+var_8]

loc_44B3:
		add	word ptr [bp+stream], 14h

loc_44B7:
		mov	ax, [bp+var_6]
		dec	[bp+var_6]
		or	ax, ax
		jnz	short loc_449B
		mov	ax, [bp+var_8]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
_flushall	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_44CA	proc near

var_6		= dword	ptr -6
var_2		= word ptr -2
arg_0		= dword	ptr  4

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		les	bx, [bp+arg_0]
		cmp	word ptr es:[bx], 0
		jge	short loc_44E7
		mov	cx, es:[bx+6]
		add	cx, es:[bx]
		inc	cx
		mov	ax, cx
		jmp	short loc_44F4
; ---------------------------------------------------------------------------

loc_44E7:
		les	bx, [bp+arg_0]
		mov	ax, es:[bx]
		cwd
		xor	ax, dx
		sub	ax, dx
		mov	cx, ax

loc_44F4:
		mov	[bp+var_2], ax
		les	bx, [bp+arg_0]
		test	byte ptr es:[bx+2], 40h
		jnz	short sub_4548
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+0Eh]
		mov	ax, es:[bx+0Ch]
		mov	word ptr [bp+var_6+2], dx
		mov	word ptr [bp+var_6], ax
		cmp	word ptr es:[bx], 0
		jge	short loc_4541
		jmp	short loc_4529
; ---------------------------------------------------------------------------

loc_451A:
		dec	word ptr [bp+var_6]
		les	bx, [bp+var_6]
		cmp	byte ptr es:[bx], 0Ah
		jnz	short loc_4529
		inc	[bp+var_2]

loc_4529:
		mov	ax, cx
		dec	cx
		or	ax, ax
		jnz	short loc_451A
		jmp	short sub_4548
; ---------------------------------------------------------------------------

loc_4532:
		les	bx, [bp+var_6]
		inc	word ptr [bp+var_6]
		cmp	byte ptr es:[bx], 0Ah
		jnz	short loc_4541
		inc	[bp+var_2]

loc_4541:
		mov	ax, cx
		dec	cx
		or	ax, ax
		jnz	short loc_4532
sub_44CA	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

sub_4548	proc near
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn	4
sub_4548	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl fseek(FILE *stream, __int32 offset, int whence)
_fseek		proc far

stream		= dword	ptr  6
_offset		= dword	ptr  0Ah
whence		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	word ptr [bp+stream+2]
		push	word ptr [bp+stream] ; stream
		nop
		call	_fflush
		pop	cx
		pop	cx
		or	ax, ax
		jz	short loc_456E
		mov	ax, 0FFFFh
		jmp	short loc_45D1
; ---------------------------------------------------------------------------

loc_456E:
		cmp	[bp+whence], 1
		jnz	short loc_458B
		les	bx, [bp+stream]
		cmp	word ptr es:[bx], 0
		jle	short loc_458B
		push	word ptr [bp+stream+2]
		push	bx
		call	sub_44CA
		cwd
		sub	word ptr [bp+_offset], ax
		sbb	word ptr [bp+_offset+2],	dx

loc_458B:
		les	bx, [bp+stream]
		and	word ptr es:[bx+2], 0FE5Fh
		mov	word ptr es:[bx], 0
		mov	dx, es:[bx+0Ah]
		mov	ax, es:[bx+8]
		mov	es:[bx+0Eh], dx
		mov	es:[bx+0Ch], ax
		push	[bp+whence]	; fromwhere
		push	word ptr [bp+_offset+2]
		push	word ptr [bp+_offset] ; offset
		mov	al, es:[bx+4]
		cbw
		push	ax		; handle
		nop
		push	cs
		call	near ptr _lseek
		add	sp, 8
		cmp	dx, 0FFFFh
		jnz	short loc_45CF
		cmp	ax, 0FFFFh
		jnz	short loc_45CF
		mov	ax, 0FFFFh
		jmp	short loc_45D1
; ---------------------------------------------------------------------------

loc_45CF:
		xor	ax, ax

loc_45D1:
		pop	di
		pop	si
		pop	bp
		retf
_fseek		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; __int32 __cdecl ftell(FILE *stream)
_ftell		proc far

var_8		= word ptr -8
var_6		= word ptr -6
_offset		= dword	ptr -4
stream		= dword	ptr  6

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	ax, 1
		push	ax		; fromwhere
		xor	ax, ax
		push	ax
		push	ax		; offset
		les	bx, [bp+stream]
		mov	al, es:[bx+4]
		cbw
		push	ax		; handle
		nop
		push	cs
		call	near ptr _lseek
		add	sp, 8
		mov	word ptr [bp+_offset+2],	dx
		mov	word ptr [bp+_offset], ax
		cmp	dx, 0FFFFh
		jnz	short loc_4609
		cmp	ax, 0FFFFh
		jnz	short loc_4609
		jmp	loc_46AA
; ---------------------------------------------------------------------------

loc_4609:
		les	bx, [bp+stream]
		cmp	word ptr es:[bx], 0
		jl	short loc_4615
		jmp	loc_469A
; ---------------------------------------------------------------------------

loc_4615:
		mov	al, es:[bx+4]
		cbw
		add	ax, ax
		mov	bx, ax
		test	byte ptr [bx+9DDh], 8
		jz	short loc_4688
		mov	ax, 2
		push	ax		; fromwhere
		xor	ax, ax
		push	ax
		push	ax		; offset
		mov	bx, word ptr [bp+stream]
		mov	al, es:[bx+4]
		cbw
		push	ax		; handle
		nop
		push	cs
		call	near ptr _lseek
		add	sp, 8
		mov	[bp+var_6], dx
		mov	[bp+var_8], ax
		cmp	dx, 0FFFFh
		jnz	short loc_4650
		cmp	ax, 0FFFFh
		jnz	short loc_4650
		jmp	short loc_46B0
; ---------------------------------------------------------------------------

loc_4650:
		xor	ax, ax
		push	ax		; fromwhere
		push	word ptr [bp+_offset+2]
		push	word ptr [bp+_offset] ; offset
		les	bx, [bp+stream]
		mov	al, es:[bx+4]
		cbw
		push	ax		; handle
		nop
		push	cs
		call	near ptr _lseek
		add	sp, 8
		cmp	dx, 0FFFFh
		jnz	short loc_467C
		cmp	ax, 0FFFFh
		jnz	short loc_467C
		mov	dx, 0FFFFh
		mov	ax, 0FFFFh
		jmp	short loc_46B0
; ---------------------------------------------------------------------------

loc_467C:
		mov	dx, [bp+var_6]
		mov	ax, [bp+var_8]
		mov	word ptr [bp+_offset+2],	dx
		mov	word ptr [bp+_offset], ax

loc_4688:
		push	word ptr [bp+stream+2]
		push	word ptr [bp+stream]
		call	sub_44CA
		cwd
		add	word ptr [bp+_offset], ax
		adc	word ptr [bp+_offset+2],	dx
		jmp	short loc_46AA
; ---------------------------------------------------------------------------

loc_469A:
		push	word ptr [bp+stream+2]
		push	word ptr [bp+stream]
		call	sub_44CA
		cwd
		sub	word ptr [bp+_offset], ax
		sbb	word ptr [bp+_offset+2],	dx

loc_46AA:
		mov	dx, word ptr [bp+_offset+2]
		mov	ax, word ptr [bp+_offset]

loc_46B0:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
_ftell		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_46B6	proc near

arg_0		= word ptr  4

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+arg_0]
		cmp	ax, 5Ch	; '\'
		jz	short loc_46C8
		cmp	ax, 2Fh	; '/'
		jnz	short loc_46CD

loc_46C8:
		mov	ax, 1
		jmp	short loc_46CF
; ---------------------------------------------------------------------------

loc_46CD:
		xor	ax, ax

loc_46CF:
		pop	di
		pop	si
		pop	bp
		retn	2
sub_46B6	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_46D5	proc near
					; sub_470F+15Bp ...

arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	di
		les	bx, [bp+arg_0]
		mov	al, es:[bx]
		mov	ah, 0
		push	ax
		call	sub_46B6
		or	ax, ax
		jz	short loc_4707
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		nop
		push	cs
		call	near ptr sub_432A
		add	sp, 8
		or	ax, ax
		jz	short loc_4707
		mov	ax, 1
		jmp	short loc_4709
; ---------------------------------------------------------------------------

loc_4707:
		xor	ax, ax

loc_4709:
		pop	di
		pop	si
		pop	bp
		retn	8
sub_46D5	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_470F	proc far

drive		= word ptr -12h
var_10		= word ptr -10h
var_E		= word ptr -0Eh
src		= dword	ptr -0Ch
dest		= dword	ptr -8
s		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 12h
		push	si
		push	di
		mov	ax, 0A1h ; '¡'
		push	ax
		nop
		push	cs
		call	near ptr _malloc
		pop	cx
		mov	word ptr [bp+s+2], dx
		mov	word ptr [bp+s], ax
		or	ax, dx
		jnz	short loc_472E
		jmp	loc_4971
; ---------------------------------------------------------------------------

loc_472E:
		mov	dx, [bp+arg_6]
		mov	ax, [bp+arg_4]
		mov	word ptr [bp+src+2], dx
		mov	word ptr [bp+src], ax
		les	bx, [bp+src]
		mov	al, es:[bx]
		cbw
		mov	bx, ax
		test	byte ptr [bx+0A7Bh], 0Ch
		jz	short loc_476E
		mov	bx, word ptr [bp+src]
		cmp	byte ptr es:[bx+1], 3Ah	; ':'
		jnz	short loc_476E
		mov	al, es:[bx]
		cbw
		mov	[bp+var_10], ax
		push	ax		; ch
		nop
		push	cs
		call	near ptr _toupper
		pop	cx
		add	ax, 0FFC0h
		mov	[bp+drive], ax
		add	word ptr [bp+src], 2
		jmp	short loc_4784
; ---------------------------------------------------------------------------

loc_476E:
		push	ss
		lea	ax, [bp+drive]
		push	ax		; drive
		nop
		call	__dos_getdrive
		pop	cx
		pop	cx
		mov	ax, [bp+drive]
		add	ax, 41h	; 'A'
		dec	ax
		mov	[bp+var_10], ax

loc_4784:
		les	bx, [bp+src]
		mov	al, es:[bx]
		cbw
		push	ax
		call	sub_46B6
		or	ax, ax
		jnz	short loc_47EC
		mov	ax, 0A1h ; '¡'
		push	ax		; len
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; buf
		push	[bp+drive]	; drive
		nop
		push	cs
		call	near ptr __getdcwd
		add	sp, 8
		or	ax, dx
		jnz	short loc_47BC
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx
		jmp	loc_4971
; ---------------------------------------------------------------------------

loc_47BC:
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		mov	dx, word ptr [bp+s+2]
		add	ax, word ptr [bp+s]
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		push	dx
		push	word ptr [bp+s]
		dec	ax
		push	dx
		push	ax
		call	sub_46D5
		or	ax, ax
		jnz	short loc_480E
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 5Ch ;	'\'
		jmp	short loc_480B
; ---------------------------------------------------------------------------

loc_47EC:
		mov	dx, word ptr [bp+s+2]
		mov	ax, word ptr [bp+s]
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		les	bx, [bp+dest]
		mov	al, byte ptr [bp+var_10]
		mov	es:[bx], al
		inc	word ptr [bp+dest]
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 3Ah ;	':'

loc_480B:
		inc	word ptr [bp+dest]

loc_480E:
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		push	word ptr [bp+dest+2]
		push	word ptr [bp+dest] ; dest
		nop
		push	cs
		call	near ptr _strcpy
		add	sp, 8
		mov	dx, word ptr [bp+s+2]
		mov	ax, word ptr [bp+s]
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		mov	word ptr [bp+src+2], dx
		mov	word ptr [bp+src], ax

loc_4834:
					; sub_470F+298j ...
		les	bx, [bp+src]
		inc	word ptr [bp+src]
		mov	al, es:[bx]
		cbw
		mov	[bp+var_E], ax
		or	ax, ax
		jz	short loc_4850
		push	ax
		call	sub_46B6
		or	ax, ax
		jnz	short loc_4850
		jmp	loc_4982
; ---------------------------------------------------------------------------

loc_4850:
					; sub_470F+13Cj
		les	bx, [bp+dest]
		cmp	byte ptr es:[bx-1], 2Eh	; '.'
		jnz	short loc_4877
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		mov	ax, word ptr [bp+dest]
		add	ax, 0FFFEh
		push	word ptr [bp+dest+2]
		push	ax
		call	sub_46D5
		or	ax, ax
		jz	short loc_4877
		sub	word ptr [bp+dest], 2
		jmp	short loc_48EE
; ---------------------------------------------------------------------------

loc_4877:
					; sub_470F+160j
		les	bx, [bp+dest]
		cmp	byte ptr es:[bx-1], 2Eh	; '.'
		jnz	short loc_48EE
		cmp	byte ptr es:[bx-2], 2Eh	; '.'
		jnz	short loc_48EE
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		mov	ax, word ptr [bp+dest]
		add	ax, 0FFFDh
		push	word ptr [bp+dest+2]
		push	ax
		call	sub_46D5
		or	ax, ax
		jz	short loc_48EE
		sub	word ptr [bp+dest], 3
		les	bx, [bp+dest]
		cmp	byte ptr es:[bx-1], 3Ah	; ':'
		jnz	short loc_48D7
		mov	ax, word ptr [bp+dest]
		dec	ax
		push	word ptr [bp+dest+2]
		push	ax
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr sub_432A
		add	sp, 8
		or	ax, ax
		jz	short loc_48D7
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx
		jmp	loc_4971
; ---------------------------------------------------------------------------

loc_48D7:
					; sub_470F+1B6j ...
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		dec	word ptr [bp+dest]
		mov	ax, word ptr [bp+dest]
		push	word ptr [bp+dest+2]
		push	ax
		call	sub_46D5
		or	ax, ax
		jz	short loc_48D7

loc_48EE:
					; sub_470F+170j ...
		cmp	[bp+var_E], 0
		jz	short loc_48F7
		jmp	loc_4977
; ---------------------------------------------------------------------------

loc_48F7:
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		mov	ax, word ptr [bp+dest]
		dec	ax
		push	word ptr [bp+dest+2]
		push	ax
		call	sub_46D5
		or	ax, ax
		jz	short loc_490F
		dec	word ptr [bp+dest]

loc_490F:
		les	bx, [bp+dest]
		cmp	byte ptr es:[bx-1], 3Ah	; ':'
		jnz	short loc_493D
		mov	ax, word ptr [bp+dest]
		dec	ax
		push	word ptr [bp+dest+2]
		push	ax
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr sub_432A
		add	sp, 8
		or	ax, ax
		jz	short loc_493D
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 5Ch ;	'\'
		inc	word ptr [bp+dest]

loc_493D:
					; sub_470F+222j
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 0
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		inc	ax
		mov	dx, ax
		mov	ax, [bp+arg_0]
		or	ax, [bp+arg_2]
		jnz	short loc_495F
		jmp	loc_49E3
; ---------------------------------------------------------------------------

loc_495F:
		cmp	dx, [bp+arg_8]
		jbe	short loc_49BC
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx

loc_4971:
		xor	dx, dx
		xor	ax, ax
		jmp	short loc_49F2
; ---------------------------------------------------------------------------

loc_4977:
		les	bx, [bp+dest]
		mov	al, byte ptr [bp+var_E]
		mov	es:[bx], al
		jmp	short loc_49B6
; ---------------------------------------------------------------------------

loc_4982:
		les	bx, [bp+dest]
		mov	al, byte ptr [bp+var_E]
		mov	es:[bx], al
		inc	word ptr [bp+dest]
		push	[bp+var_E]
		nop
		push	cs
		call	sub_4305
		pop	cx
		or	ax, ax
		jnz	short loc_499E
		jmp	loc_4834
; ---------------------------------------------------------------------------

loc_499E:
		les	bx, [bp+src]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_49AA
		jmp	loc_4834
; ---------------------------------------------------------------------------

loc_49AA:
		mov	al, es:[bx]
		les	bx, [bp+dest]
		mov	es:[bx], al
		inc	word ptr [bp+src]

loc_49B6:
		inc	word ptr [bp+dest]
		jmp	loc_4834
; ---------------------------------------------------------------------------

loc_49BC:
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; src
		push	[bp+arg_2]
		push	[bp+arg_0]	; dest
		nop
		push	cs
		call	near ptr _strcpy
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr _farfree
		add	sp, 0Ch
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		jmp	short loc_49F2
; ---------------------------------------------------------------------------

loc_49E3:
		push	dx
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		nop
		push	cs
		call	near ptr _realloc
		add	sp, 6

loc_49F2:
					; sub_470F+2D2j
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_470F	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; char *__cdecl	_getdcwd(int drive, char *buf, int len)
__getdcwd	proc far

s		= byte ptr -48h
var_47		= byte ptr -47h
var_46		= byte ptr -46h
var_45		= byte ptr -45h
var_2		= word ptr -2
drive		= word ptr  6
dest		= dword	ptr  8
len		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 48h
		push	si
		push	di
		mov	ax, [bp+drive]
		mov	[bp+var_2], ax
		or	ax, ax
		jnz	short loc_4A14
		mov	ah, 19h
		int	21h		; DOS -	GET DEFAULT DISK NUMBER
		mov	ah, 0
		inc	ax
		mov	[bp+var_2], ax

loc_4A14:
		mov	al, byte ptr [bp+var_2]
		add	al, 40h	; '@'
		mov	[bp+s],	al
		mov	[bp+var_47], 3Ah ; ':'
		mov	[bp+var_46], 5Ch ; '\'
		push	ds
		mov	ax, ss
		mov	ds, ax
		lea	si, [bp+var_45]
		mov	ah, 47h	; 'G'
		mov	dl, byte ptr [bp+var_2]
		int	21h		; DOS -	2+ - GET CURRENT DIRECTORY
					; DL = drive (0=default, 1=A, etc.)
					; DS:SI	points to 64-byte buffer area
		pop	ds
		jb	short loc_4A70
		push	ss
		lea	ax, [bp+s]
		push	ax		; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		cmp	ax, [bp+len]
		jb	short loc_4A4F
		mov	_errno, 22h ; '"'
		jmp	short loc_4A70
; ---------------------------------------------------------------------------

loc_4A4F:
		mov	ax, word ptr [bp+dest]
		or	ax, word ptr [bp+dest+2]
		jnz	short loc_4A76
		push	[bp+len]
		nop
		push	cs
		call	near ptr _malloc
		pop	cx
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		or	ax, dx
		jnz	short loc_4A76
		mov	_errno, 8

loc_4A70:
					; __getdcwd+55j
		xor	dx, dx
		xor	ax, ax
		jmp	short loc_4A8F
; ---------------------------------------------------------------------------

loc_4A76:
					; __getdcwd+70j
		push	ss
		lea	ax, [bp+s]
		push	ax		; src
		push	word ptr [bp+dest+2]
		push	word ptr [bp+dest] ; dest
		nop
		push	cs
		call	near ptr _strcpy
		add	sp, 8
		mov	dx, word ptr [bp+dest+2]
		mov	ax, word ptr [bp+dest]

loc_4A8F:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__getdcwd	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; char *__cdecl	getenv(const char *name)
_getenv		proc far
					; sub_9349+126p

var_4		= dword	ptr -4
_name		= dword	ptr  6

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		les	di, [bp+_name]
		mov	ax, es
		or	ax, di
		jz	short loc_4AC6
		mov	al, 0
		mov	ah, es:[di]
		mov	cx, 0FFFFh
		cld
		repne scasb
		not	cx
		dec	cx
		jz	short loc_4AC6
		les	di, environ@
		mov	word ptr [bp+var_4+2], es
		mov	bx, es
		or	bx, di
		mov	word ptr [bp+var_4], di
		jnz	short loc_4AD3

loc_4AC6:
		xor	dx, dx
		xor	ax, ax
		jmp	short loc_4AFF
; ---------------------------------------------------------------------------

loc_4ACC:
		add	word ptr [bp+var_4], 4
		les	di, [bp+var_4]

loc_4AD3:
		les	di, es:[di]
		mov	bx, es
		or	bx, di
		jz	short loc_4AC6
		mov	al, es:[di]
		or	al, al
		jz	short loc_4AC6
		cmp	ah, al
		jnz	short loc_4ACC
		mov	bx, cx
		cmp	byte ptr es:[bx+di], 3Dh ; '='
		jnz	short loc_4ACC
		push	ds
		lds	si, [bp+_name]
		repe cmpsb
		pop	ds
		xchg	cx, bx
		jnz	short loc_4ACC
		inc	di
		mov	ax, di
		mov	dx, es

loc_4AFF:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
_getenv		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl memcmp(const void	*s1, const void	*s2, size_t n)
_memcmp		proc far

s1		= dword	ptr  6
s2		= dword	ptr  0Ah
n		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	ds
		mov	ax, [bp+n]
		mov	cx, ax
		jcxz	short loc_4B26
		lds	si, [bp+s1]
		les	di, [bp+s2]
		cld
		repe cmpsb
		mov	al, [si-1]
		xor	ah, ah
		mov	cl, es:[di-1]
		xor	ch, ch

loc_4B26:
		pop	ds
		sub	ax, cx
		pop	di
		pop	si
		pop	bp
		retf
_memcmp		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void *__cdecl	memcpy(void *dest, const void *src, size_t n)
_memcpy		proc far

dest		= dword	ptr  6
src		= dword	ptr  0Ah
n		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	dx, ds
		les	di, [bp+dest]
		lds	si, [bp+src]
		mov	cx, [bp+n]
		shr	cx, 1
		cld
		rep movsw
		jnb	short loc_4B45
		movsb

loc_4B45:
		mov	ds, dx
		mov	dx, word ptr [bp+dest+2]
		mov	ax, word ptr [bp+dest]
		pop	di
		pop	si
		pop	bp
		retf
_memcpy		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void __cdecl setmem(void *dest, unsigned int length, char value)
_setmem		proc far

dest		= dword	ptr  6
_length		= word ptr  0Ah
value		= byte ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		les	di, [bp+dest]
		mov	cx, [bp+_length]
		mov	al, [bp+value]
		mov	ah, al
		cld
		test	di, 1
		jz	short loc_4B6C
		jcxz	short loc_4B73
		stosb
		dec	cx

loc_4B6C:
		shr	cx, 1
		rep stosw
		jnb	short loc_4B73
		stosb

loc_4B73:
		pop	di
		pop	si
		pop	bp
		retf
_setmem		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void *__cdecl	memset(void *s,	int c, size_t n)
_memset		proc far

dest		= dword	ptr  6
value		= byte ptr  0Ah
_length		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	word ptr [bp+value] ; value
		push	[bp+_length]	; length
		push	word ptr [bp+dest+2]
		push	word ptr [bp+dest] ; dest
		push	cs
		call	near ptr _setmem
		add	sp, 8
		mov	dx, word ptr [bp+dest+2]
		mov	ax, word ptr [bp+dest]
		pop	di
		pop	si
		pop	bp
		retf
_memset		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void __cdecl movmem(const void *src, void *dest, unsigned int	length)
_movmem		proc far

src		= dword	ptr  6
dest		= dword	ptr  0Ah
_length		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	ds
		mov	cx, word ptr [bp+dest+2]
		mov	bx, word ptr [bp+dest]
		mov	dx, word ptr [bp+src+2]
		mov	ax, word ptr [bp+src]
		call	N_PCMP@
		jnb	short loc_4BB6
		std
		mov	ax, 1
		jmp	short loc_4BB9
; ---------------------------------------------------------------------------

loc_4BB6:
		cld
		xor	ax, ax

loc_4BB9:
		lds	si, [bp+src]
		les	di, [bp+dest]
		mov	cx, [bp+_length]
		or	ax, ax
		jz	short loc_4BCC
		add	si, cx
		dec	si
		add	di, cx
		dec	di

loc_4BCC:
		test	di, 1
		jz	short loc_4BD6
		jcxz	short loc_4BE5
		movsb
		dec	cx

loc_4BD6:
		sub	si, ax
		sub	di, ax
		shr	cx, 1
		rep movsw
		jnb	short loc_4BE5
		add	si, ax
		add	di, ax
		movsb

loc_4BE5:
		cld
		pop	ds
		pop	di
		pop	si
		pop	bp
		retf
_movmem		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void *__cdecl	memmove(void *dest, const void *src, size_t n)
_memmove	proc far

dest		= dword	ptr  6
src		= dword	ptr  0Ah
_length		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	[bp+_length]	; length
		push	word ptr [bp+dest+2]
		push	word ptr [bp+dest] ; dest
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		push	cs
		call	near ptr _movmem
		add	sp, 0Ah
		mov	dx, word ptr [bp+dest+2]
		mov	ax, word ptr [bp+dest]
		pop	di
		pop	si
		pop	bp
		retf
_memmove	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; void __cdecl _searchenv(const	char *file, const char *varname, char *pathname)
__searchenv	proc far

var_4		= dword	ptr -4
src		= dword	ptr  6
varname		= dword	ptr  0Ah
pathname	= dword	ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		push	word ptr [bp+varname+2]
		push	word ptr [bp+varname] ;	name
		nop
		push	cs
		call	near ptr _getenv
		pop	cx
		pop	cx
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		or	ax, dx
		jnz	short loc_4C37
		mov	word ptr [bp+var_4+2], ds
		mov	word ptr [bp+var_4], 0CDEh

loc_4C37:
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; pathname
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4] ; __int32
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		nop
		push	cs
		call	near ptr sub_4C57
		add	sp, 0Ch
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__searchenv	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

; int __cdecl __far sub_4C57(char *src,	__int32, char *pathname)
sub_4C57	proc far

var_4		= word ptr -4
var_2		= word ptr -2
src		= dword	ptr  6
arg_4		= dword	ptr  0Ah
pathname	= dword	ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		mov	ax, 50h	; 'P'
		push	ax		; len
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; buf
		xor	ax, ax
		push	ax		; drive
		nop
		push	cs
		call	near ptr __getdcwd
		add	sp, 8
		or	ax, dx
		jnz	short loc_4C7C
		xor	dx, dx
		jmp	short loc_4C8B
; ---------------------------------------------------------------------------

loc_4C7C:
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		mov	dx, ax

loc_4C8B:
		les	bx, [bp+pathname]
		add	bx, dx
		mov	byte ptr es:[bx], 0
		or	dx, dx
		jz	short loc_4CE0
		mov	bx, dx
		add	bx, word ptr [bp+pathname]
		mov	bl, es:[bx-1]
		mov	al, bl
		cmp	al, 5Ch	; '\'
		jz	short loc_4CB1
		cmp	bl, 2Fh	; '/'
		jz	short loc_4CB1
		cmp	bl, 3Ah	; ':'
		jnz	short loc_4CCD

loc_4CB1:
		mov	ax, word ptr [bp+pathname]
		add	ax, dx
		dec	ax
		push	word ptr [bp+pathname+2]
		push	ax
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname]
		nop
		push	cs
		call	near ptr sub_432A
		add	sp, 8
		or	ax, ax
		jnz	short loc_4CE0

loc_4CCD:
		push	ds
		mov	ax, 0CE0h
		push	ax		; src
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; dest
		nop
		push	cs
		call	near ptr _strcat
		add	sp, 8

loc_4CE0:
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; dest
		nop
		push	cs
		call	near ptr _strcat
		add	sp, 8
		xor	ax, ax
		push	ax		; char
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; pathname
		nop
		push	cs
		call	near ptr __access
		add	sp, 6
		or	ax, ax
		jz	short loc_4D54
		les	bx, [bp+arg_4]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_4D1B
		les	bx, [bp+pathname]
		mov	byte ptr es:[bx], 0
		jmp	short loc_4D93
; ---------------------------------------------------------------------------

loc_4D1B:
		xor	dx, dx
		jmp	short loc_4D33
; ---------------------------------------------------------------------------

loc_4D1F:
		les	bx, [bp+pathname]
		add	bx, dx
		push	es
		les	si, [bp+arg_4]
		mov	al, es:[si]
		pop	es
		mov	es:[bx], al
		inc	word ptr [bp+arg_4]
		inc	dx

loc_4D33:
		les	bx, [bp+arg_4]
		cmp	byte ptr es:[bx], 3Bh ;	';'
		jz	short loc_4D42
		cmp	byte ptr es:[bx], 0
		jnz	short loc_4D1F

loc_4D42:
		les	bx, [bp+arg_4]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_4D4E
		jmp	loc_4C8B
; ---------------------------------------------------------------------------

loc_4D4E:
		inc	word ptr [bp+arg_4]
		jmp	loc_4C8B
; ---------------------------------------------------------------------------

loc_4D54:
		mov	ax, 50h	; 'P'
		push	ax
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname]
		xor	ax, ax
		push	ax
		push	ax
		nop
		push	cs
		call	near ptr sub_470F
		add	sp, 0Ah
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		or	ax, dx
		jz	short loc_4D93
		push	[bp+var_2]
		push	[bp+var_4]	; src
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; dest
		nop
		push	cs
		call	near ptr _strcpy
		push	[bp+var_2]
		push	[bp+var_4]
		nop
		push	cs
		call	near ptr _farfree
		add	sp, 0Ch

loc_4D93:
					; sub_4C57+11Bj
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_4C57	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl setvbuf(FILE *stream, char *buf, int type, size_t	size)
_setvbuf	proc far

stream		= dword	ptr  6
buf		= dword	ptr  0Ah
_type		= word ptr  0Eh
_size		= word ptr  10h

		push	bp
		mov	bp, sp
		push	si
		push	di
		les	bx, [bp+stream]
		mov	ax, es:[bx+12h]
		cmp	ax, word ptr [bp+stream]
		jz	short loc_4DAD
		jmp	loc_4E84
; ---------------------------------------------------------------------------

loc_4DAD:
		cmp	[bp+_type], 2
		jle	short loc_4DB6
		jmp	loc_4E84
; ---------------------------------------------------------------------------

loc_4DB6:
		cmp	[bp+_size], 7FFFh
		jbe	short loc_4DC0
		jmp	loc_4E84
; ---------------------------------------------------------------------------

loc_4DC0:
		cmp	word_DC64, 0
		jnz	short loc_4DD6
		cmp	word ptr [bp+stream], 85Eh
		jnz	short loc_4DD6
		mov	word_DC64, 1
		jmp	short loc_4DEA
; ---------------------------------------------------------------------------

loc_4DD6:
		cmp	word_DC62, 0
		jnz	short loc_4DEA
		cmp	word ptr [bp+stream], 84Ah
		jnz	short loc_4DEA
		mov	word_DC62, 1

loc_4DEA:
		les	bx, [bp+stream]
		cmp	word ptr es:[bx], 0
		jz	short loc_4E07
		mov	ax, 1
		push	ax		; whence
		xor	ax, ax
		push	ax
		push	ax		; offset
		push	word ptr [bp+stream+2]
		push	bx		; stream
		nop
		push	cs
		call	near ptr _fseek
		add	sp, 0Ah

loc_4E07:
		les	bx, [bp+stream]
		test	byte ptr es:[bx+2], 4
		jz	short loc_4E20
		push	word ptr es:[bx+0Ah]
		push	word ptr es:[bx+8]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx

loc_4E20:
		les	bx, [bp+stream]
		and	word ptr es:[bx+2], 0FFF3h
		mov	word ptr es:[bx+6], 0
		mov	dx, word ptr [bp+stream+2]
		mov	ax, word ptr [bp+stream]
		add	ax, 5
		mov	es:[bx+0Ah], dx
		mov	es:[bx+8], ax
		mov	es:[bx+0Eh], dx
		mov	es:[bx+0Ch], ax
		cmp	[bp+_type], 2
		jz	short loc_4EB4
		cmp	[bp+_size], 0
		jbe	short loc_4EB4
		mov	word ptr _exitbuf+2, seg seg000
		mov	word ptr _exitbuf, 51C2h
		mov	ax, word ptr [bp+buf]
		or	ax, word ptr [bp+buf+2]
		jnz	short loc_4E89
		push	[bp+_size]
		nop
		push	cs
		call	near ptr _malloc
		pop	cx
		mov	word ptr [bp+buf+2], dx
		mov	word ptr [bp+buf], ax
		or	ax, dx
		jz	short loc_4E84
		les	bx, [bp+stream]
		or	word ptr es:[bx+2], 4
		jmp	short loc_4E89
; ---------------------------------------------------------------------------

loc_4E84:
		mov	ax, 0FFFFh
		jmp	short loc_4EB6
; ---------------------------------------------------------------------------

loc_4E89:
		les	bx, [bp+stream]
		mov	dx, word ptr [bp+buf+2]
		mov	ax, word ptr [bp+buf]
		mov	es:[bx+0Eh], dx
		mov	es:[bx+0Ch], ax
		mov	es:[bx+0Ah], dx
		mov	es:[bx+8], ax
		mov	ax, [bp+_size]
		mov	es:[bx+6], ax
		cmp	[bp+_type], 1
		jnz	short loc_4EB4
		or	word ptr es:[bx+2], 8

loc_4EB4:
		xor	ax, ax

loc_4EB6:
		pop	di
		pop	si
		pop	bp
		retf
_setvbuf	endp

include libs/BorlandC/_strcat.asm
include libs/BorlandC/_strcmp.asm
include libs/BorlandC/_strcpy.asm
include libs/BorlandC/_stricmp.asm
include libs/BorlandC/_strlen.asm
include libs/BorlandC/strrchr.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far __write(int	handle,	void *buf, unsigned int	len)
___write	proc far

var_90		= byte ptr -90h
var_E		= dword	ptr -0Eh
var_9		= byte ptr -9
var_8		= word ptr -8
var_6		= dword	ptr -6
var_2		= word ptr -2
handle		= word ptr  6
buf		= dword	ptr  8
len		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 90h
		push	si
		push	di
		mov	ax, [bp+handle]
		cmp	ax, __nfile
		jb	short loc_501D
		mov	ax, 6
		push	ax
		call	__IOERROR
		jmp	loc_5161
; ---------------------------------------------------------------------------

loc_501D:
		mov	ax, [bp+len]
		inc	ax
		cmp	ax, 2
		jnb	short loc_502B
		xor	ax, ax
		jmp	loc_5161
; ---------------------------------------------------------------------------

loc_502B:
		mov	bx, [bp+handle]
		add	bx, bx
		test	byte ptr [bx+9DDh], 8
		jz	short loc_504A
		mov	ax, 2
		push	ax		; fromwhere
		xor	ax, ax
		push	ax
		push	ax		; offset
		push	[bp+handle]	; handle
		nop
		push	cs
		call	near ptr _lseek
		add	sp, 8

loc_504A:
		mov	bx, [bp+handle]
		add	bx, bx
		test	byte ptr [bx+9DDh], 40h
		jnz	short loc_506D
		push	[bp+len]	; len
		push	word ptr [bp+buf+2]
		push	word ptr [bp+buf] ; buf
		push	[bp+handle]	; handle
		nop
		push	cs
		call	near ptr __rtl_write
		add	sp, 8
		jmp	loc_5161
; ---------------------------------------------------------------------------

loc_506D:
		mov	bx, [bp+handle]
		add	bx, bx
		and	word ptr [bx+9DCh], 0FDFFh
		mov	dx, word ptr [bp+buf+2]
		mov	ax, word ptr [bp+buf]
		mov	word ptr [bp+var_E+2], dx
		mov	word ptr [bp+var_E], ax
		mov	ax, [bp+len]
		mov	[bp+var_8], ax
		jmp	short loc_5107
; ---------------------------------------------------------------------------

loc_508C:
		dec	[bp+var_8]
		les	bx, [bp+var_E]
		inc	word ptr [bp+var_E]
		mov	al, es:[bx]
		mov	[bp+var_9], al
		cmp	al, 0Ah
		jnz	short loc_50A9
		les	bx, [bp+var_6]
		mov	byte ptr es:[bx], 0Dh
		inc	word ptr [bp+var_6]

loc_50A9:
		les	bx, [bp+var_6]
		mov	al, [bp+var_9]
		mov	es:[bx], al
		inc	word ptr [bp+var_6]
		lea	ax, [bp+var_90]
		mov	dx, word ptr [bp+var_6]
		xor	bx, bx
		sub	dx, ax
		sbb	bx, 0
		or	bx, bx
		jl	short loc_5111
		jnz	short loc_50CF
		cmp	dx, 80h	; '€'
		jb	short loc_5111

loc_50CF:
		lea	ax, [bp+var_90]
		mov	dx, word ptr [bp+var_6]
		xor	bx, bx
		sub	dx, ax
		sbb	bx, 0
		mov	[bp+var_2], dx
		push	dx		; len
		push	ss
		push	ax		; buf
		push	[bp+handle]	; handle
		nop
		push	cs
		call	near ptr __rtl_write
		add	sp, 8
		mov	dx, ax
		cmp	ax, [bp+var_2]
		jz	short loc_5107
		cmp	dx, 0FFFFh
		jnz	short loc_50FF
		mov	ax, 0FFFFh
		jmp	short loc_515C
; ---------------------------------------------------------------------------

loc_50FF:
		mov	ax, [bp+len]
		sub	ax, [bp+var_8]
		jmp	short loc_5157
; ---------------------------------------------------------------------------

loc_5107:
		lea	ax, [bp+var_90]
		mov	word ptr [bp+var_6+2], ss
		mov	word ptr [bp+var_6], ax

loc_5111:
		cmp	[bp+var_8], 0
		jz	short loc_511A
		jmp	loc_508C
; ---------------------------------------------------------------------------

loc_511A:
		lea	ax, [bp+var_90]
		mov	dx, word ptr [bp+var_6]
		xor	bx, bx
		sub	dx, ax
		sbb	bx, 0
		mov	[bp+var_2], dx
		mov	ax, dx
		or	ax, ax
		jbe	short loc_515E
		push	dx		; len
		push	ss
		lea	ax, [bp+var_90]
		push	ax		; buf
		push	[bp+handle]	; handle
		nop
		push	cs
		call	near ptr __rtl_write
		add	sp, 8
		mov	dx, ax
		cmp	ax, [bp+var_2]
		jz	short loc_515E
		cmp	dx, 0FFFFh
		jnz	short loc_5154
		mov	ax, 0FFFFh
		jmp	short loc_515C
; ---------------------------------------------------------------------------

loc_5154:
		mov	ax, [bp+len]

loc_5157:
		add	ax, dx
		sub	ax, [bp+var_2]

loc_515C:
					; ___write+151j
		jmp	short loc_5161
; ---------------------------------------------------------------------------

loc_515E:
					; ___write+147j
		mov	ax, [bp+len]

loc_5161:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
___write	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl _rtl_write(int handle, const void	*buf, unsigned int len)
__rtl_write	proc far
					; ___write+63p	...

handle		= word ptr  6
buf		= dword	ptr  8
len		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	bx, [bp+handle]
		add	bx, bx
		test	byte ptr [bx+9DCh], 1
		jz	short loc_517E
		mov	ax, 5
		push	ax
		jmp	short loc_519F
; ---------------------------------------------------------------------------

loc_517E:
		push	ds
		mov	ah, 40h	; '@'
		mov	bx, [bp+handle]
		mov	cx, [bp+len]
		lds	dx, [bp+buf]
		int	21h		; DOS -	2+ - WRITE TO FILE WITH	HANDLE
					; BX = file handle, CX = number	of bytes to write, DS:DX -> buffer
		pop	ds
		jb	short loc_519E
		push	ax
		mov	bx, [bp+handle]
		add	bx, bx
		or	word ptr [bx+9DCh], 1000h
		pop	ax
		jmp	short loc_51A2
; ---------------------------------------------------------------------------

loc_519E:
		push	ax

loc_519F:
		call	__IOERROR

loc_51A2:
		pop	di
		pop	si
		pop	bp
		retf
__rtl_write	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl _write(int handle, const void *buf, unsigned int len)
__write		proc far

handle		= word ptr  6
buf		= dword	ptr  8
len		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	[bp+len]	; len
		push	word ptr [bp+buf+2]
		push	word ptr [bp+buf] ; buf
		push	[bp+handle]	; handle
		push	cs
		call	near ptr __rtl_write
		add	sp, 8
		pop	di
		pop	si
		pop	bp
		retf
__write		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

__xfflush	proc far

var_6		= word ptr -6
stream		= dword	ptr -4

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		mov	[bp+var_6], 4
		mov	word ptr [bp+stream+2],	ds
		mov	word ptr [bp+stream], 84Ah
		jmp	short loc_51F5
; ---------------------------------------------------------------------------

loc_51D9:
		les	bx, [bp+stream]
		test	byte ptr es:[bx+2], 3
		jz	short loc_51EE
		push	word ptr [bp+stream+2]
		push	bx		; stream
		nop
		call	_fflush
		pop	cx
		pop	cx

loc_51EE:
		dec	[bp+var_6]
		add	word ptr [bp+stream], 14h

loc_51F5:
		cmp	[bp+var_6], 0
		jnz	short loc_51D9
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__xfflush	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; xalloc::xalloc(string	const &, unsigned int)
@xalloc@$bctr$qmx6stringui proc	far

arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_5222
		mov	ax, 6
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jz	short loc_5240

loc_5222:
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		nop
		push	cs
		call	near ptr @xmsg@$bctr$qmx6string	; xmsg::xmsg(string &)
		add	sp, 8
		les	bx, [bp+arg_0]
		mov	ax, [bp+arg_8]
		mov	es:[bx+4], ax

loc_5240:
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		pop	bp
		retf
@xalloc@$bctr$qmx6stringui endp

; ---------------------------------------------------------------------------
		dd byte_533B
		db 4 dup(0), 3Bh, 53h
		dw seg seg000
		db 4, 0, 0FAh, 0FFh, 6 dup(0), 5Ch, 52h
		dw seg seg000
		db 0DCh, 0FFh, 2 dup(0), 5, 3 dup(0), 64h, 52h

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; xalloc::raise(void)
@xalloc@raise$qv proc far
					; sub_CB11+4DP	...

var_28		= dword	ptr -28h
src		= byte ptr -6
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 28h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 5272h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ax		; int
		mov	ax, 5
		push	ax		; int
		mov	ax, seg	seg000
		push	ax		; int
		mov	ax, 52F8h
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	word ptr [bp+var_28+2],	dx
		mov	word ptr [bp+var_28], ax
		push	dx
		push	ax
		push	ss
		lea	ax, [bp+src]
		push	ax
		nop
		push	cs
		call	near ptr @xmsg@$bctr$qmx4xmsg ;	xmsg::xmsg(xmsg	&)
		add	sp, 8
		les	bx, [bp+var_28]
		mov	ax, es:[bx+4]
		mov	[bp+var_2], ax
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		lea	ax, [bp+src]
		push	ss
		push	ax		; src
		push	cs		; int
		mov	ax, 533Bh
		push	ax		; int
		nop
		push	cs
		call	near ptr @_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void *,uint,uint,uint,uchar	*)
		add	sp, 1Ah
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@xalloc@raise$qv endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		push	word ptr [bp+0Ch]
		push	word ptr [bp+0Ah]
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bctr$qmx4xmsg ;	xmsg::xmsg(xmsg	&)
		add	sp, 8
		les	bx, [bp+0Ah]
		mov	ax, es:[bx+4]
		les	bx, [bp+6]
		mov	es:[bx+4], ax
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	dx, [bp+8]
		mov	ax, [bp+6]
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
byte_533B	db 6, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 2Eh, 0, 3Ah
		db 0Dh dup(0), 2, 0, 2,	0, 7Dh,	53h
		dw seg seg000
		db 5, 0, 3Eh, 0, 78h, 61h, 2 dup(6Ch), 6Fh, 63h, 2 dup(0)
		db 0CAh, 53h
		dw seg seg000
		db 2 dup(0), 3,	0Dh dup(0)
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_53C4
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_53C2
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_53C6
; ---------------------------------------------------------------------------

loc_53C2:
		jmp	short loc_53C6
; ---------------------------------------------------------------------------

loc_53C4:
		xor	ax, ax

loc_53C6:
					; seg000:loc_53C2j
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Ch, 0, 30h
		db 0Dh dup(0), 1, 0, 1,	0, 9Ch,	55h
		dw seg seg000
		db 5, 0, 34h, 0, 78h, 6Dh, 73h,	67h, 0Eh dup(0), 70h, 57h
		dw seg seg000
		db 87h,	20h, 0FCh, 0FFh, 0Ah dup(0), 0DEh, 0FFh, 2 dup(0)
		db 5, 3	dup(0),	2 dup(0FFh), 6,	0, 5, 3	dup(0),	2, 54h

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; xmsg::xmsg(string const &)
@xmsg@$bctr$qmx6string proc far
					; string::assert_element(uint)+6AP ...

var_22		= word ptr -22h
var_16		= word ptr -16h
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 22h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 5410h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_5455
		mov	ax, 4
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jz	short loc_54A7

loc_5455:
		mov	ax, 4
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		or	ax, dx
		jz	short loc_5497
		mov	[bp+var_16], 0Eh
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	dx
		push	[bp+var_4]
		call	@string@$bctr$qmx6string ; string::string(string &)
		add	sp, 8
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	[bp+var_16], 6

loc_5497:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		les	bx, [bp+arg_0]
		mov	es:[bx+2], dx
		mov	es:[bx], ax

loc_54A7:
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		push	[bp+var_22]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@xmsg@$bctr$qmx6string endp

; ---------------------------------------------------------------------------
		dd byte_5770
		db 87h,	20h, 0FCh, 0FFh, 0Ah dup(0), 0DEh, 0FFh, 2 dup(0)
		db 5, 3	dup(0),	2 dup(0FFh), 6,	0, 5, 3	dup(0),	0CDh, 54h

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; xmsg::xmsg(xmsg const	&)
@xmsg@$bctr$qmx4xmsg proc far

var_22		= word ptr -22h
var_16		= word ptr -16h
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 22h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 54DBh
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_5520
		mov	ax, 4
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jz	short loc_5576

loc_5520:
		mov	ax, 4
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		or	ax, dx
		jz	short loc_5566
		mov	[bp+var_16], 0Eh
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx]
		push	dx
		push	[bp+var_4]
		call	@string@$bctr$qmx6string ; string::string(string &)
		add	sp, 8
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	[bp+var_16], 6

loc_5566:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		les	bx, [bp+arg_0]
		mov	es:[bx+2], dx
		mov	es:[bx], ax

loc_5576:
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		push	[bp+var_22]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@xmsg@$bctr$qmx4xmsg endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far xmsg___xmsg(void (*driver)(void), char)
@xmsg@$bdtr$qv	proc far

driver		= dword	ptr  6
arg_4		= byte ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	di
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	ax, word ptr [bp+driver]
		or	ax, word ptr [bp+driver+2]
		jz	short loc_55F6
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	ax, 3
		push	ax		; char
		les	bx, [bp+driver]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx] ; driver
		call	@string@$bdtr$qv ; string::~string(void)
		add	sp, 6
		test	[bp+arg_4], 1
		jz	short loc_55F6
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; driver
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx

loc_55F6:
					; xmsg::~xmsg(void)+4Bj
		pop	di
		pop	si
		pop	bp
		retf
@xmsg@$bdtr$qv	endp

; ---------------------------------------------------------------------------
		dd byte_5738
		db 4 dup(0), 0FAh, 55h
		dw seg seg000
		db 0E2h, 0FFh

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; xmsg::raise(void)
@xmsg@raise$qv	proc far

src		= byte ptr -22h
arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 22h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 5602h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ax		; int
		mov	ax, 5
		push	ax		; int
		mov	ax, seg	seg000
		push	ax		; int
		mov	ax, 54F1h
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	ss
		lea	ax, [bp+src]
		push	ax
		push	cs
		call	near ptr @xmsg@$bctr$qmx4xmsg ;	xmsg::xmsg(xmsg	&)
		add	sp, 8
		lea	ax, [bp+src]
		push	ss
		push	ax		; src
		push	cs		; int
		mov	ax, 5738h
		push	ax		; int
		nop
		push	cs
		call	near ptr @_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void *,uint,uint,uint,uchar	*)
		add	sp, 1Ah
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@xmsg@raise$qv	endp

; ---------------------------------------------------------------------------
		dd byte_5770
		db 87h,	20h, 0FCh, 0FFh, 0Ah dup(0), 0DEh, 0FFh, 2 dup(0)
		db 5, 3	dup(0),	2 dup(0FFh), 6,	0, 5, 3	dup(0),	5Bh, 56h

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; xmsg::operator=(xmsg const &)
@xmsg@$basg$qmx4xmsg proc far

var_22		= word ptr -22h
var_16		= word ptr -16h
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 22h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 5669h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		cmp	dx, word ptr [bp+arg_4+2]
		jnz	short loc_56A2
		cmp	ax, word ptr [bp+arg_4]
		jz	short loc_5720

loc_56A2:
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	ax, 3
		push	ax		; char
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx] ; driver
		call	@string@$bdtr$qv ; string::~string(void)
		add	sp, 6
		mov	ax, 4
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		or	ax, dx
		jz	short loc_5710
		mov	[bp+var_16], 0Eh
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx]
		push	dx
		push	[bp+var_4]
		call	@string@$bctr$qmx6string ; string::string(string &)
		add	sp, 8
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	[bp+var_16], 6

loc_5710:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		les	bx, [bp+arg_0]
		mov	es:[bx+2], dx
		mov	es:[bx], ax

loc_5720:
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		push	dx
		push	ax
		push	[bp+var_22]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		pop	ax
		pop	dx
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@xmsg@$basg$qmx4xmsg endp

; ---------------------------------------------------------------------------
byte_5738	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Ch, 0, 30h
		db 0Dh dup(0), 1, 0, 1,	0, 9Ch,	55h
		dw seg seg000
		db 5, 0, 34h, 0, 78h, 6Dh, 73h,	67h, 0Eh dup(0)
byte_5770	db 4, 0, 10h, 20h, 0Ah,	0, 83h,	57h
					; seg000:565Bo
		dw seg seg000
aString		db 'string *',0
		db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Eh, 0, 32h
		db 0Dh dup(0), 1, 0, 1,	0, 8, 3
		dw seg seg006
		db 5, 0, 36h, 0, 73h, 74h, 72h,	69h, 6Eh, 67h, 0Eh dup(0)

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

___JumpToCatch__ proc far
		push	si
		push	di
		mov	sp, bx
		mov	bp, cx
		push	dx
		push	ax
		retf
___JumpToCatch__ endp

; ---------------------------------------------------------------------------
		pop	di
		pop	si
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_57C9	proc far

arg_0		= dword	ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_57DD
		mov	dx, ds
		mov	ax, 0CE8h
		jmp	short loc_57EA
; ---------------------------------------------------------------------------

loc_57DD:
		les	bx, [bp+arg_0]
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		add	ax, es:[bx+4]

loc_57EA:
		pop	di
		pop	si
		pop	bp
		retf
sub_57C9	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_57EE	proc far
					; sub_588B+106p ...

var_A		= word ptr -0Ah
var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 0Ah
		push	si
		push	di
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		cmp	dx, word ptr [bp+arg_4+2]
		jnz	short loc_5806
		cmp	ax, word ptr [bp+arg_4]
		jz	short loc_5882

loc_5806:
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+2]
		les	bx, [bp+arg_4]
		cmp	ax, es:[bx+2]
		jnz	short loc_587A
		les	bx, [bp+arg_0]
		mov	ax, es:[bx]
		les	bx, [bp+arg_4]
		cmp	ax, es:[bx]
		jnz	short loc_587A
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+2]
		les	bx, [bp+arg_4]
		or	ax, es:[bx+2]
		test	al, 80h
		jnz	short loc_587A
		les	bx, [bp+arg_0]
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		add	ax, es:[bx+4]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+4]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax

loc_585C:
		les	bx, [bp+var_4]
		mov	al, es:[bx]
		cbw
		mov	dx, ax
		inc	word ptr [bp+var_4]
		les	bx, [bp+var_8]
		mov	al, es:[bx]
		cbw
		mov	[bp+var_A], ax
		inc	word ptr [bp+var_8]
		cmp	dx, [bp+var_A]
		jz	short loc_587E

loc_587A:
		xor	ax, ax
		jmp	short loc_5885
; ---------------------------------------------------------------------------

loc_587E:
		or	dx, dx
		jnz	short loc_585C

loc_5882:
		mov	ax, 1

loc_5885:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_57EE	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_588B	proc near
					; sub_588B+135p ...

var_A		= dword	ptr -0Ah
var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_C		= word ptr  10h

		push	bp
		mov	bp, sp
		sub	sp, 0Ah
		push	si
		push	di
		les	bx, [bp+arg_0]
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		add	ax, es:[bx+0Ch]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax

loc_58A6:
		les	bx, [bp+var_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_A+2], dx
		mov	word ptr [bp+var_A], ax
		mov	ax, word ptr [bp+var_A]
		or	ax, word ptr [bp+var_A+2]
		jz	short loc_593A
		les	bx, [bp+var_4]
		test	byte ptr es:[bx+6], 8
		jnz	short loc_5933
		cmp	[bp+arg_C], 0
		jz	short loc_58E2
		les	bx, [bp+var_4]
		mov	ax, es:[bx+6]
		and	ax, 3
		cmp	ax, 3
		jnz	short loc_58E2
		mov	ax, 1
		jmp	short loc_58E4
; ---------------------------------------------------------------------------

loc_58E2:
		xor	ax, ax

loc_58E4:
		mov	[bp+var_6], ax
		push	word ptr [bp+var_A+2]
		push	word ptr [bp+var_A]
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jz	short loc_5907
		cmp	[bp+var_6], 0
		jz	short loc_5907
		jmp	loc_59CA
; ---------------------------------------------------------------------------

loc_5907:
		les	bx, [bp+var_A]
		test	byte ptr es:[bx+8], 4
		jz	short loc_5933
		push	[bp+var_6]
		push	[bp+arg_A]
		push	[bp+arg_8]
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+var_A+2]
		push	word ptr [bp+var_A]
		call	sub_588B
		add	sp, 0Eh
		or	ax, ax
		jz	short loc_5933
		jmp	loc_59CA
; ---------------------------------------------------------------------------

loc_5933:
		add	word ptr [bp+var_4], 8
		jmp	loc_58A6
; ---------------------------------------------------------------------------

loc_593A:
		les	bx, [bp+arg_0]
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		add	ax, es:[bx+0Ah]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax

loc_594D:
		les	bx, [bp+var_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_A+2], dx
		mov	word ptr [bp+var_A], ax
		mov	ax, word ptr [bp+var_A]
		or	ax, word ptr [bp+var_A+2]
		jz	short loc_59D6
		cmp	[bp+arg_C], 0
		jz	short loc_597F
		les	bx, [bp+var_4]
		mov	ax, es:[bx+6]
		and	ax, 3
		cmp	ax, 3
		jnz	short loc_597F
		mov	ax, 1
		jmp	short loc_5981
; ---------------------------------------------------------------------------

loc_597F:
		xor	ax, ax

loc_5981:
		mov	[bp+var_6], ax
		push	word ptr [bp+var_A+2]
		push	word ptr [bp+var_A]
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jz	short loc_59A1
		cmp	[bp+var_6], 0
		jnz	short loc_59CA

loc_59A1:
		les	bx, [bp+var_A]
		test	byte ptr es:[bx+8], 4
		jz	short loc_59CF
		push	[bp+var_6]
		push	[bp+arg_A]
		push	[bp+arg_8]
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+var_A+2]
		push	word ptr [bp+var_A]
		call	sub_588B
		add	sp, 0Eh
		or	ax, ax
		jz	short loc_59CF

loc_59CA:
		mov	ax, 1
		jmp	short loc_59D8
; ---------------------------------------------------------------------------

loc_59CF:
					; sub_588B+13Dj
		add	word ptr [bp+var_4], 8
		jmp	loc_594D
; ---------------------------------------------------------------------------

loc_59D6:
		xor	ax, ax

loc_59D8:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_588B	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_59DE	proc near

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  4
arg_4		= dword	ptr  8
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_C		= word ptr  10h

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		mov	cx, [bp+arg_8]

loc_59E9:
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		cmp	dx, word ptr [bp+arg_4+2]
		jnz	short loc_59FC
		cmp	ax, word ptr [bp+arg_4]
		jnz	short loc_59FC
		jmp	loc_5B11
; ---------------------------------------------------------------------------

loc_59FC:
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+2]
		mov	[bp+var_2], ax
		les	bx, [bp+arg_4]
		mov	ax, es:[bx+2]
		mov	[bp+var_4], ax
		mov	ax, [bp+var_2]
		and	ax, [bp+var_4]
		test	al, 10h
		jz	short loc_5A8C
		and	[bp+var_2], 3300h
		and	[bp+var_4], 3300h
		mov	ax, [bp+var_2]
		cmp	ax, [bp+var_4]
		jnz	short loc_5A2F
		jmp	loc_5AD2
; ---------------------------------------------------------------------------

loc_5A2F:
		or	cx, cx
		jz	short loc_5A36
		jmp	loc_5B4A
; ---------------------------------------------------------------------------

loc_5A36:
		mov	ax, [bp+var_2]
		and	ax, 300h
		mov	dx, [bp+var_4]
		and	dx, 300h
		cmp	ax, dx
		jz	short loc_5A6C
		mov	ax, [bp+var_4]
		and	ax, 300h
		not	ax
		and	ax, [bp+var_2]
		test	ah, 3
		jz	short loc_5A5A
		jmp	loc_5B4A
; ---------------------------------------------------------------------------

loc_5A5A:
		or	[bp+var_2], 300h
		or	[bp+var_4], 300h
		mov	ax, [bp+var_2]
		cmp	ax, [bp+var_4]
		jz	short loc_5AD2

loc_5A6C:
		mov	ax, [bp+var_2]
		or	ax, 3000h
		mov	dx, [bp+var_4]
		or	dx, 3000h
		cmp	ax, dx
		jz	short loc_5A80
		jmp	loc_5B4A
; ---------------------------------------------------------------------------

loc_5A80:
		test	byte ptr [bp+var_2+1], 10h
		jnz	short loc_5A89
		jmp	loc_5B4A
; ---------------------------------------------------------------------------

loc_5A89:
		jmp	loc_5B11
; ---------------------------------------------------------------------------

loc_5A8C:
		mov	ax, [bp+var_2]
		and	ax, [bp+var_4]
		test	ah, 4
		jz	short loc_5AFA
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+0Ch]
		mov	ax, es:[bx+0Ah]
		les	bx, [bp+arg_4]
		cmp	dx, es:[bx+0Ch]
		jnz	short loc_5AB1
		cmp	ax, es:[bx+0Ah]
		jz	short loc_5AD2

loc_5AB1:
		or	cx, cx
		jz	short loc_5AB8
		jmp	loc_5B4A
; ---------------------------------------------------------------------------

loc_5AB8:
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+0Ch]
		mov	ax, es:[bx+0Ah]
		les	bx, [bp+arg_4]
		or	ax, es:[bx+0Ah]
		or	dx, es:[bx+0Ch]
		or	ax, dx
		jnz	short loc_5B4A

loc_5AD2:
		mov	cx, 1
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		les	bx, [bp+arg_4]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+arg_4+2], dx
		mov	word ptr [bp+arg_4], ax
		jmp	loc_59E9
; ---------------------------------------------------------------------------

loc_5AFA:
		push	word ptr [bp+arg_4+2]
		push	word ptr [bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jz	short loc_5B16

loc_5B11:
					; sub_59DE:loc_5A89j
		mov	ax, 1
		jmp	short loc_5B4C
; ---------------------------------------------------------------------------

loc_5B16:
		test	byte ptr [bp+var_2], 2
		jz	short loc_5B4A
		test	byte ptr [bp+var_4], 1
		jz	short loc_5B4A
		les	bx, [bp+arg_0]
		test	byte ptr es:[bx+8], 4
		jz	short loc_5B4A
		mov	ax, 1
		push	ax
		push	[bp+arg_C]
		push	[bp+arg_A]
		push	word ptr [bp+arg_4+2]
		push	word ptr [bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	sub_588B
		add	sp, 0Eh
		jmp	short loc_5B4C
; ---------------------------------------------------------------------------

loc_5B4A:
		xor	ax, ax

loc_5B4C:
					; sub_59DE+16Aj
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_59DE	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_5B52	proc far

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		push	[bp+arg_0]
		nop
		push	cs
		call	near ptr _malloc
		pop	cx
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		mov	ax, [bp+var_4]
		or	ax, [bp+var_2]
		jnz	short loc_5BA2
		cmp	[bp+arg_0], 80h	; '€'
		ja	short loc_5B84
		les	bx, ss:16h
		test	byte ptr es:[bx+4], 1
		jz	short loc_5B89

loc_5B84:
		nop
		push	cs
		call	near ptr _abort
; ---------------------------------------------------------------------------

loc_5B89:
		les	bx, ss:16h
		or	word ptr es:[bx+4], 1
		les	bx, ss:16h
		mov	dx, es:[bx+22h]
		mov	ax, es:[bx+20h]
		jmp	short loc_5BA8
; ---------------------------------------------------------------------------

loc_5BA2:
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]

loc_5BA8:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_5B52	endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+22h]
		mov	ax, es:[bx+20h]
		cmp	dx, [bp+8]
		jnz	short loc_5BD6
		cmp	ax, [bp+6]
		jnz	short loc_5BD6
		les	bx, ss:16h
		and	word ptr es:[bx+4], 0FFFEh
		jmp	short loc_5BE3
; ---------------------------------------------------------------------------

loc_5BD6:
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx

loc_5BE3:
		pop	di
		pop	si
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_5BE7	proc near
					; __ExceptionHandler+F7p

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah
arg_8		= dword	ptr  0Ch
arg_C		= byte ptr  10h

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		push	[bp+arg_6]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		push	word ptr [bp+arg_8+2]
		push	word ptr [bp+arg_8]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	sub_59DE
		add	sp, 0Eh
		or	ax, ax
		jz	short loc_5C11
		jmp	loc_5CAD
; ---------------------------------------------------------------------------

loc_5C11:
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+2]
		mov	[bp+var_2], ax
		les	bx, [bp+arg_8]
		mov	ax, es:[bx+2]
		mov	[bp+var_4], ax
		test	byte ptr [bp+var_4], 20h
		jz	short loc_5CA1
		push	[bp+arg_6]
		push	[bp+arg_4]
		mov	ax, 1
		push	ax
		les	bx, [bp+arg_8]
		push	word ptr es:[bx+8]
		push	word ptr es:[bx+6]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	sub_59DE
		add	sp, 0Eh
		or	ax, ax
		jnz	short loc_5CAD
		les	bx, [bp+arg_8]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+arg_8+2], dx
		mov	word ptr [bp+arg_8], ax
		les	bx, [bp+arg_8]
		mov	ax, es:[bx+2]
		mov	[bp+var_4], ax
		test	byte ptr [bp+var_4], 10h
		jz	short loc_5CE4
		push	[bp+arg_6]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		push	word ptr [bp+arg_8+2]
		push	word ptr [bp+arg_8]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	sub_59DE
		add	sp, 0Eh
		or	ax, ax
		jnz	short loc_5CAD
		mov	ax, [bp+var_2]
		and	ax, 3000h
		mov	dx, [bp+var_4]
		and	dx, 3000h
		cmp	ax, dx
		jnz	short loc_5CE4

loc_5CA1:
		test	byte ptr [bp+var_4], 10h
		jz	short loc_5CE4
		test	[bp+arg_C], 1
		jz	short loc_5CB2

loc_5CAD:
		mov	ax, 1
		jmp	short loc_5CE6
; ---------------------------------------------------------------------------

loc_5CB2:
		test	byte ptr [bp+var_2], 10h
		jz	short loc_5CE4
		test	byte ptr [bp+var_2+1], 20h
		jz	short loc_5CC4
		test	byte ptr [bp+var_4+1], 20h
		jz	short loc_5CE4

loc_5CC4:
		test	byte ptr [bp+var_4], 40h
		jz	short loc_5CE4
		mov	ax, [bp+var_2]
		and	ax, 300h
		mov	dx, [bp+var_4]
		and	dx, 300h
		cmp	ax, dx
		jnz	short loc_5CE0
		mov	ax, 1
		jmp	short loc_5CE2
; ---------------------------------------------------------------------------

loc_5CE0:
		xor	ax, ax

loc_5CE2:
		jmp	short loc_5CE6
; ---------------------------------------------------------------------------

loc_5CE4:
		xor	ax, ax

loc_5CE6:
					; sub_5BE7:loc_5CE2j
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_5BE7	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_5CEC	proc near
					; sub_6FBD+1FDp

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah
arg_8		= dword	ptr  0Ch
arg_C		= word ptr  10h

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		les	bx, ss:16h
		mov	ax, es:[bx+6]
		mov	[bp+var_2], ax
		push	ds
		mov	ds, [bp+var_2]
		mov	ax, [bp+arg_C]
		and	ax, 1
		mov	[bp+var_4], ax
		test	byte ptr [bp+arg_C], 4
		jz	short loc_5D17
		or	[bp+var_4], 2

loc_5D17:
		test	byte ptr [bp+arg_C], 2
		jz	short loc_5D2B
		or	[bp+var_4], 4
		test	byte ptr [bp+arg_C+1], 1
		jnz	short loc_5D2B
		or	[bp+var_4], 20h

loc_5D2B:
		test	byte ptr [bp+arg_C], 20h
		jz	short loc_5D35
		or	[bp+var_4], 8

loc_5D35:
		test	byte ptr [bp+arg_C], 80h
		jz	short loc_5D3F
		or	[bp+var_4], 10h

loc_5D3F:
		test	byte ptr [bp+arg_C+1], 10h
		jnz	short loc_5D48
		jmp	loc_5ECD
; ---------------------------------------------------------------------------

loc_5D48:
		mov	bx, [bp+var_4]
		cmp	bx, 17h
		jbe	short loc_5D53
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5D53:
		add	bx, bx
		jmp	cs:off_600A[bx]

loc_5D5A:
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		push	word ptr [bp+arg_0]
		call	word ptr [bp+arg_8]
		add	sp, 6
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5D6C:
					; sub_5CEC+1EEj
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		push	word ptr [bp+arg_0]
		call	[bp+arg_8]
		add	sp, 6
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5D7E:
					; sub_5CEC+1EEj
		push	[bp+arg_6]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	word ptr [bp+arg_8]
		jmp	short loc_5DA4
; ---------------------------------------------------------------------------

loc_5D92:
					; sub_5CEC+1EEj
		push	[bp+arg_6]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	[bp+arg_8]

loc_5DA4:
		add	sp, 0Ah
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5DAA:
					; sub_5CEC+1EEj
		xor	ax, ax
		push	ax
		push	[bp+arg_4]
		push	word ptr [bp+arg_0]
		call	word ptr [bp+arg_8]
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5DB9:
					; sub_5CEC+1EEj
		xor	ax, ax
		push	ax
		push	[bp+arg_4]
		push	word ptr [bp+arg_0]
		call	[bp+arg_8]
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5DC8:
					; sub_5CEC+1EEj
		xor	ax, ax
		push	ax
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	word ptr [bp+arg_8]
		jmp	short loc_5DEE
; ---------------------------------------------------------------------------

loc_5DDC:
					; sub_5CEC+1EEj
		xor	ax, ax
		push	ax
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	[bp+arg_8]

loc_5DEE:
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5DF1:
					; sub_5CEC+1EEj
		mov	dx, word ptr [bp+arg_0]
		mov	bx, [bp+arg_4]
		xor	ax, ax
		push	bx
		pop	bx
		call	word ptr [bp+arg_8]
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5E01:
					; sub_5CEC+1EEj
		mov	dx, word ptr [bp+arg_0]
		mov	bx, [bp+arg_4]
		xor	ax, ax

loc_5E09:
		push	bx
		pop	bx
		call	[bp+arg_8]
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5E11:
					; sub_5CEC+1EEj
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		xor	ax, ax

loc_5E1F:
		call	word ptr [bp+arg_8]
		jmp	short loc_5E35
; ---------------------------------------------------------------------------

loc_5E24:
					; sub_5CEC+1EEj
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		xor	ax, ax

loc_5E32:
		call	[bp+arg_8]

loc_5E35:
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5E38:
					; sub_5CEC+1EEj
		mov	si, word ptr [bp+arg_0]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		call	word ptr [bp+arg_8]
		jmp	short loc_5E52
; ---------------------------------------------------------------------------

loc_5E46:
					; sub_5CEC+1EEj
		mov	si, word ptr [bp+arg_0]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax

loc_5E4F:
		call	[bp+arg_8]

loc_5E52:
					; sub_5CEC+1FCj
		pop	cx
		pop	cx
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5E57:
					; sub_5CEC+1EEj
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		call	word ptr [bp+arg_8]
		add	sp, 6
		pop	ds
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5E6E:
					; sub_5CEC+1EEj
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		xor	ax, ax
		push	ax
		call	[bp+arg_8]
		add	sp, 6
		pop	ds
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5E85:
					; sub_5CEC+1EEj
		mov	si, word ptr [bp+arg_0]
		xor	ax, ax
		push	ax
		push	[bp+arg_4]

loc_5E8E:
		call	word ptr [bp+arg_8]
		jmp	short loc_5E9F
; ---------------------------------------------------------------------------

loc_5E93:
					; sub_5CEC+1EEj
		mov	si, word ptr [bp+arg_0]
		xor	ax, ax
		push	ax
		push	[bp+arg_4]

loc_5E9C:
		call	[bp+arg_8]

loc_5E9F:
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5EA2:
					; sub_5CEC+1EEj
		push	ds
		lds	si, [bp+arg_0]
		xor	ax, ax
		push	ax
		push	[bp+arg_6]
		push	[bp+arg_4]
		call	word ptr [bp+arg_8]
		pop	ds
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5EB6:
					; sub_5CEC+1EEj
		push	ds
		lds	si, [bp+arg_0]
		xor	ax, ax
		push	ax
		push	[bp+arg_6]
		push	[bp+arg_4]
		call	[bp+arg_8]
		pop	ds
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5ECA:
					; sub_5CEC+1EEj
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5ECD:
		mov	bx, [bp+var_4]
		cmp	bx, 17h
		jbe	short loc_5ED8
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5ED8:
		add	bx, bx
		jmp	cs:off_5FDA[bx]

loc_5EDF:
		push	[bp+arg_4]
		push	word ptr [bp+arg_0]
		call	word ptr [bp+arg_8]
		jmp	loc_5E52
; ---------------------------------------------------------------------------

loc_5EEB:
		push	[bp+arg_4]
		push	word ptr [bp+arg_0]
		jmp	loc_5E4F
; ---------------------------------------------------------------------------

loc_5EF4:
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	word ptr [bp+arg_8]
		jmp	short loc_5F14
; ---------------------------------------------------------------------------

loc_5F05:
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	[bp+arg_8]

loc_5F14:
		add	sp, 8
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5F1A:
		push	[bp+arg_4]
		push	word ptr [bp+arg_0]
		jmp	loc_5E8E
; ---------------------------------------------------------------------------

loc_5F23:
		push	[bp+arg_4]
		push	word ptr [bp+arg_0]
		jmp	loc_5E9C
; ---------------------------------------------------------------------------

loc_5F2C:
		mov	ax, word ptr [bp+arg_0]
		mov	bx, [bp+arg_4]
		push	bx
		pop	bx
		call	word ptr [bp+arg_8]
		jmp	loc_5FD3
; ---------------------------------------------------------------------------

loc_5F3A:
		mov	ax, word ptr [bp+arg_0]
		mov	bx, [bp+arg_4]
		jmp	loc_5E09
; ---------------------------------------------------------------------------

loc_5F43:
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		jmp	loc_5E1F
; ---------------------------------------------------------------------------

loc_5F52:
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		jmp	loc_5E32
; ---------------------------------------------------------------------------

loc_5F61:
		mov	si, word ptr [bp+arg_0]
		push	[bp+arg_4]
		call	word ptr [bp+arg_8]
		pop	cx
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5F6D:
		mov	si, word ptr [bp+arg_0]
		push	[bp+arg_4]
		call	[bp+arg_8]
		pop	cx
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5F79:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		call	word ptr [bp+arg_8]
		pop	cx
		pop	cx
		pop	ds
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5F8B:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		call	[bp+arg_8]
		pop	cx
		pop	cx
		pop	ds
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5F9D:
		mov	si, word ptr [bp+arg_0]
		push	[bp+arg_4]
		call	word ptr [bp+arg_8]
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5FA8:
		mov	si, word ptr [bp+arg_0]
		push	[bp+arg_4]
		call	[bp+arg_8]
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5FB3:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		call	word ptr [bp+arg_8]
		pop	ds
		jmp	short loc_5FD3
; ---------------------------------------------------------------------------

loc_5FC3:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+arg_6]
		push	[bp+arg_4]
		call	[bp+arg_8]
		pop	ds
		jmp	short $+2

loc_5FD3:
		pop	ds
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_5CEC	endp

; ---------------------------------------------------------------------------
off_5FDA	dw offset loc_5EDF
		dw offset loc_5EEB
		dw offset loc_5EF4
		dw offset loc_5F05
		dw offset loc_5F1A
		dw offset loc_5F23
		dw offset loc_5F43
		dw offset loc_5F52
		dw offset loc_5F2C
		dw offset loc_5F3A
		dw offset loc_5F43
		dw offset loc_5F52
		dw offset loc_5FD3
		dw offset loc_5FD3
		dw offset loc_5FD3
		dw offset loc_5FD3
		dw offset loc_5F61
		dw offset loc_5F6D
		dw offset loc_5F79
		dw offset loc_5F8B
		dw offset loc_5F9D
		dw offset loc_5FA8
		dw offset loc_5FB3
		dw offset loc_5FC3
off_600A	dw offset loc_5D5A
		dw offset loc_5D6C
		dw offset loc_5D7E
		dw offset loc_5D92
		dw offset loc_5DAA
		dw offset loc_5DB9
		dw offset loc_5DC8
		dw offset loc_5DDC
		dw offset loc_5DF1
		dw offset loc_5E01
		dw offset loc_5E11
		dw offset loc_5E24
		dw offset loc_5ECA
		dw offset loc_5ECA
		dw offset loc_5ECA
		dw offset loc_5ECA
		dw offset loc_5E38
		dw offset loc_5E46
		dw offset loc_5E57
		dw offset loc_5E6E
		dw offset loc_5E85
		dw offset loc_5E93
		dw offset loc_5EA2
		dw offset loc_5EB6

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_603A	proc near
					; sub_6CC9+2Bp	...

var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  4
arg_4		= dword	ptr  8
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		cmp	[bp+arg_A], 0
		jz	short loc_604D
		mov	ax, 2
		jmp	short loc_604F
; ---------------------------------------------------------------------------

loc_604D:
		xor	ax, ax

loc_604F:
		mov	[bp+var_2], ax
		les	bx, ss:16h
		mov	ax, es:[bx+6]
		mov	[bp+var_4], ax
		push	ds
		mov	ds, [bp+var_4]
		mov	ax, [bp+arg_8]
		and	ax, 1
		mov	[bp+var_6], ax
		test	byte ptr [bp+arg_8], 4
		jz	short loc_6075
		or	[bp+var_6], 2

loc_6075:
		test	byte ptr [bp+arg_8], 2
		jz	short loc_6089
		or	[bp+var_6], 4
		test	byte ptr [bp+arg_8+1], 1
		jnz	short loc_6089
		or	[bp+var_6], 20h

loc_6089:
		test	byte ptr [bp+arg_8], 20h
		jz	short loc_6093
		or	[bp+var_6], 8

loc_6093:
		test	byte ptr [bp+arg_8], 80h
		jz	short loc_609D
		or	[bp+var_6], 10h

loc_609D:
		mov	bx, [bp+var_6]
		cmp	bx, 17h
		jbe	short loc_60A8
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_60A8:
		add	bx, bx
		jmp	cs:off_61C2[bx]

loc_60AF:
		push	[bp+var_2]
		push	word ptr [bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		pop	cx
		pop	cx
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_60BD:
		push	[bp+var_2]
		push	word ptr [bp+arg_0]
		call	[bp+arg_4]
		pop	cx
		pop	cx
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_60CB:
		push	[bp+var_2]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		add	sp, 6
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_60DD:
		push	[bp+var_2]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	[bp+arg_4]
		add	sp, 6
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_60EF:
		push	[bp+var_2]
		push	word ptr [bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_6155
; ---------------------------------------------------------------------------

loc_60FA:
		push	[bp+var_2]
		push	word ptr [bp+arg_0]
		jmp	short loc_6152
; ---------------------------------------------------------------------------

loc_6102:
		push	[bp+var_2]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_611C
; ---------------------------------------------------------------------------

loc_6110:
		push	[bp+var_2]
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		call	[bp+arg_4]

loc_611C:
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_611F:
		mov	bx, word ptr [bp+arg_0]
		mov	ax, [bp+var_2]
		push	bx
		pop	bx
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_612D:
		mov	bx, word ptr [bp+arg_0]
		mov	ax, [bp+var_2]
		push	bx
		pop	bx
		call	[bp+arg_4]
		jmp	loc_61BB
; ---------------------------------------------------------------------------

loc_613B:
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		mov	ax, [bp+var_2]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_6155
; ---------------------------------------------------------------------------

loc_6149:
		push	word ptr [bp+arg_0+2]
		push	word ptr [bp+arg_0]
		mov	ax, [bp+var_2]

loc_6152:
		call	[bp+arg_4]

loc_6155:
					; sub_603A+10Dj
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_6157:
		mov	si, word ptr [bp+arg_0]
		push	[bp+var_2]
		; Hack
		db 0ffh
		db 056h
		db 008h
		pop	cx
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_6163:
		mov	si, word ptr [bp+arg_0]
		push	[bp+var_2]
		call	[bp+arg_4]
		pop	cx
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_616F:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+var_2]
		; Hack
		db 0ffh
		db 056h
		db 008h
		pop	cx
		pop	ds
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_617D:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+var_2]
		call	[bp+arg_4]
		pop	cx
		pop	ds
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_618B:
		mov	si, word ptr [bp+arg_0]
		push	[bp+var_2]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_6196:
		mov	si, word ptr [bp+arg_0]
		push	[bp+var_2]
		call	[bp+arg_4]
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_61A1:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+var_2]
		; Hack
		db 0ffh
		db 056h
		db 008h
		pop	ds
		jmp	short loc_61BB
; ---------------------------------------------------------------------------

loc_61AE:
		push	ds
		lds	si, [bp+arg_0]
		push	[bp+var_2]
		call	[bp+arg_4]
		pop	ds
		jmp	short $+2

loc_61BB:
		pop	ds
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_603A	endp ; sp-analysis failed

; ---------------------------------------------------------------------------
off_61C2	dw offset loc_60AF
		dw offset loc_60BD
		dw offset loc_60CB
		dw offset loc_60DD
		dw offset loc_60EF
		dw offset loc_60FA
		dw offset loc_6102
		dw offset loc_6110
		dw offset loc_611F
		dw offset loc_612D
		dw offset loc_613B
		dw offset loc_6149
		dw offset loc_61BB
		dw offset loc_61BB
		dw offset loc_61BB
		dw offset loc_61BB
		dw offset loc_6157
		dw offset loc_6163
		dw offset loc_616F
		dw offset loc_617D
		dw offset loc_618B
		dw offset loc_6196
		dw offset loc_61A1
		dw offset loc_61AE

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_61F2	proc near

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= dword	ptr  8
arg_8		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		les	bx, ss:16h
		mov	ax, es:[bx+6]
		mov	[bp+var_2], ax
		push	ds
		mov	ds, [bp+var_2]
		mov	ax, [bp+arg_8]
		and	ax, 1
		mov	[bp+var_4], ax
		test	byte ptr [bp+arg_8], 4
		jz	short loc_621D
		or	[bp+var_4], 2

loc_621D:
		test	byte ptr [bp+arg_8], 2
		jz	short loc_6227
		or	[bp+var_4], 4

loc_6227:
		test	byte ptr [bp+arg_8], 20h
		jz	short loc_6231
		or	[bp+var_4], 8

loc_6231:
		mov	bx, [bp+var_4]
		cmp	bx, 0Bh
		ja	short loc_62A4
		add	bx, bx
		jmp	cs:off_62AB[bx]

loc_6240:
		push	[bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		pop	cx
		jmp	short loc_62A4
; ---------------------------------------------------------------------------

loc_6249:
		push	[bp+arg_0]
		call	[bp+arg_4]
		pop	cx
		jmp	short loc_62A4
; ---------------------------------------------------------------------------

loc_6252:
		push	[bp+arg_2]
		push	[bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_6266
; ---------------------------------------------------------------------------

loc_625D:
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	[bp+arg_4]

loc_6266:
		pop	cx
		pop	cx
		jmp	short loc_62A4
; ---------------------------------------------------------------------------

loc_626A:
		push	[bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_6278
; ---------------------------------------------------------------------------

loc_6272:
		push	[bp+arg_0]
		call	[bp+arg_4]

loc_6278:
		jmp	short loc_62A4
; ---------------------------------------------------------------------------

loc_627A:
		mov	bx, [bp+arg_0]
		push	bx
		pop	bx
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_62A4
; ---------------------------------------------------------------------------

loc_6284:
		mov	bx, [bp+arg_0]
		push	bx
		pop	bx
		call	[bp+arg_4]
		jmp	short loc_62A4
; ---------------------------------------------------------------------------

loc_628E:
		push	[bp+arg_2]
		push	[bp+arg_0]
		; Hack
		db 0ffh
		db 056h
		db 008h
		jmp	short loc_62A2
; ---------------------------------------------------------------------------

loc_6299:
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	[bp+arg_4]

loc_62A2:
		jmp	short $+2

loc_62A4:
		pop	ds
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_61F2	endp ; sp-analysis failed

; ---------------------------------------------------------------------------
off_62AB	dw offset loc_6240
		dw offset loc_6249
		dw offset loc_6252
		dw offset loc_625D
		dw offset loc_626A
		dw offset loc_6272
		dw offset loc_628E
		dw offset loc_6299
		dw offset loc_627A
		dw offset loc_6284
		dw offset loc_628E
		dw offset loc_6299
		db 4 dup(0), 81h, 65h
		dw seg seg000
		db 14h dup(0), 0DAh, 65h
		dw seg seg000
		db 14h dup(0), 0E2h, 0FFh, 2 dup(0), 3,	0, 0C3h, 62h
		dw seg seg000
		db 2 dup(0), 4,	3 dup(0), 3, 0,	0DBh, 62h
		dw seg seg000
		db 2 dup(0), 4,	0

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far sub_6311(int, int, void *src, int, int, int, int, int, int,	int, int, int, int, int, int)
sub_6311	proc far
					; _ReThrowException(uint,uchar *)+9Ep

var_48		= word ptr -48h
var_46		= word ptr -46h
var_44		= word ptr -44h
var_42		= word ptr -42h
var_40		= word ptr -40h
var_3E		= word ptr -3Eh
var_3C		= word ptr -3Ch
var_3A		= word ptr -3Ah
var_38		= dword	ptr -38h
var_34		= dword	ptr -34h
var_30		= dword	ptr -30h
var_2C		= word ptr -2Ch
var_2A		= word ptr -2Ah
n		= word ptr -28h
var_26		= dword	ptr -26h
var_22		= dword	ptr -22h
var_1E		= word ptr -1Eh
var_12		= word ptr -12h
arg_0		= word ptr  6
arg_2		= word ptr  8
src		= dword	ptr  0Ah
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h
arg_C		= word ptr  12h
arg_E		= word ptr  14h
arg_10		= word ptr  16h
arg_12		= word ptr  18h
arg_14		= word ptr  1Ah
arg_16		= word ptr  1Ch
arg_18		= word ptr  1Eh
arg_1A		= word ptr  20h
arg_1C		= word ptr  22h
arg_1E		= word ptr  24h

		push	bp
		mov	bp, sp
		sub	sp, 48h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 62F3h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	word ptr [bp+var_22+2],	dx
		mov	word ptr [bp+var_22], ax
		les	bx, ss:16h
		mov	word ptr es:[bx+6], ds
		mov	dx, ss:18h
		mov	ax, ss:16h
		add	ax, 28h	; '('
		les	bx, ss:16h
		mov	es:[bx+1Eh], dx
		mov	es:[bx+1Ch], ax
		les	bx, [bp+var_22]
		mov	dx, word ptr [bp+var_22+2]
		mov	ax, word ptr [bp+var_22]
		add	ax, es:[bx+4]
		mov	word ptr [bp+var_34+2],	dx
		mov	word ptr [bp+var_34], ax
		les	bx, ss:16h
		mov	dx, es:[bx+1Eh]
		mov	ax, es:[bx+1Ch]
		mov	word ptr [bp+var_38+2],	dx
		mov	word ptr [bp+var_38], ax
		jmp	short loc_639D
; ---------------------------------------------------------------------------

loc_637A:
		les	bx, ss:16h
		mov	ax, es:[bx+1Ch]
		add	ax, 7Fh	; ''
		cmp	ax, word ptr [bp+var_38]
		jbe	short loc_639A
		les	bx, [bp+var_34]
		mov	al, es:[bx]
		les	bx, [bp+var_38]
		mov	es:[bx], al
		inc	word ptr [bp+var_38]

loc_639A:
		inc	word ptr [bp+var_34]

loc_639D:
		les	bx, [bp+var_34]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_637A
		les	bx, [bp+var_38]
		mov	byte ptr es:[bx], 0
		les	bx, ss:16h
		mov	ax, [bp+arg_14]
		mov	es:[bx+1Ah], ax
		les	bx, ss:16h
		mov	dx, [bp+arg_18]
		mov	ax, [bp+arg_16]
		mov	es:[bx+18h], dx
		mov	es:[bx+16h], ax
		mov	dx, word ptr [bp+var_22+2]
		mov	ax, word ptr [bp+var_22]
		mov	word ptr [bp+var_26+2],	dx
		mov	word ptr [bp+var_26], ax
		les	bx, [bp+var_22]
		mov	ax, es:[bx]
		mov	[bp+n],	ax
		les	bx, [bp+var_22]
		mov	ax, es:[bx+2]
		mov	[bp+var_2A], ax
		test	byte ptr [bp+var_2A], 2
		jz	short loc_63FA
		les	bx, [bp+var_22]
		mov	ax, es:[bx+8]
		jmp	short loc_63FC
; ---------------------------------------------------------------------------

loc_63FA:
		xor	ax, ax

loc_63FC:
		mov	[bp+var_2C], ax
		test	byte ptr [bp+var_2A], 30h
		jz	short loc_6416
		les	bx, [bp+var_26]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_26+2],	dx
		mov	word ptr [bp+var_26], ax

loc_6416:
		mov	ax, [bp+n]
		add	ax, 3Ah	; ':'
		push	ax
		push	cs
		call	near ptr sub_5B52
		pop	cx
		mov	word ptr [bp+var_30+2],	dx
		mov	word ptr [bp+var_30], ax
		les	bx, ss:16h
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		les	bx, [bp+var_30]
		mov	es:[bx+2], dx
		mov	es:[bx], ax
		les	bx, ss:16h
		mov	dx, word ptr [bp+var_30+2]
		mov	ax, word ptr [bp+var_30]
		mov	es:[bx+2], dx
		mov	es:[bx], ax
		les	bx, [bp+var_30]
		mov	dx, word ptr [bp+var_22+2]
		mov	ax, word ptr [bp+var_22]
		mov	es:[bx+6], dx
		mov	es:[bx+4], ax
		les	bx, [bp+var_30]
		mov	ax, [bp+arg_12]
		mov	es:[bx+0Ch], ax
		les	bx, [bp+var_30]
		mov	ax, [bp+n]
		mov	es:[bx+0Eh], ax
		les	bx, [bp+var_30]
		mov	ax, [bp+var_2A]
		mov	es:[bx+14h], ax
		les	bx, [bp+var_30]
		mov	ax, [bp+var_2C]
		mov	es:[bx+16h], ax
		les	bx, [bp+var_30]
		mov	dx, word ptr [bp+var_26+2]
		mov	ax, word ptr [bp+var_26]
		mov	es:[bx+12h], dx
		mov	es:[bx+10h], ax
		les	bx, [bp+var_30]
		mov	dx, [bp+arg_A]
		mov	ax, [bp+arg_8]
		mov	es:[bx+0Ah], dx
		mov	es:[bx+8], ax
		les	bx, [bp+var_30]
		mov	word ptr es:[bx+24h], 0
		les	bx, [bp+var_30]
		mov	word ptr es:[bx+28h], 0
		mov	word ptr es:[bx+26h], 0
		les	bx, [bp+var_30]
		mov	word ptr es:[bx+18h], ds
		les	bx, [bp+var_30]
		mov	word ptr es:[bx+1Ch], seg seg000
		mov	word ptr es:[bx+1Ah], 5BAEh
		les	bx, [bp+var_30]
		mov	ax, [bp+arg_14]
		mov	es:[bx+2Ch], ax
		les	bx, [bp+var_30]
		mov	dx, [bp+arg_18]
		mov	ax, [bp+arg_16]
		mov	es:[bx+30h], dx
		mov	es:[bx+2Eh], ax
		les	bx, [bp+var_30]
		mov	dx, [bp+arg_E]
		mov	ax, [bp+arg_C]
		mov	es:[bx+20h], dx
		mov	es:[bx+1Eh], ax
		les	bx, [bp+var_30]
		mov	ax, [bp+arg_10]
		mov	es:[bx+22h], ax
		les	bx, [bp+var_30]
		mov	byte ptr es:[bx+39h], 0
		les	bx, [bp+var_30]
		mov	byte ptr es:[bx+38h], 1
		push	[bp+n]		; n
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		mov	ax, word ptr [bp+var_30]
		add	ax, 3Ah	; ':'
		push	word ptr [bp+var_30+2]
		push	ax		; dest
		nop
		push	cs
		call	near ptr _memcpy
		add	sp, 0Ah
		test	byte ptr [bp+var_2C], 1
		jz	short loc_65A0
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	[bp+var_3A], dx
		mov	[bp+var_3C], ax
		mov	[bp+var_12], 6
		push	[bp+arg_10]
		push	[bp+arg_E]
		push	[bp+arg_C]
		push	word ptr [bp+src+2]
		push	word ptr [bp+src]
		mov	ax, word ptr [bp+var_30]
		add	ax, 3Ah	; ':'
		push	word ptr [bp+var_30+2]
		push	ax
		call	sub_5CEC
		add	sp, 0Eh
		mov	[bp+var_12], 0
		jmp	short loc_658B
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr ___call_terminate
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr @_CatchCleanup$qv ; _CatchCleanup(void)

loc_658B:
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, [bp+var_3A]
		mov	cx, [bp+var_3C]
		mov	es, dx
		xchg	ax, bx
		mov	es:[bx+2], ax
		mov	es:[bx], cx

loc_65A0:
		cmp	[bp+arg_1E], 0
		jnz	short loc_65E4
		test	byte ptr [bp+var_2C], 2
		jz	short loc_65E4
		mov	[bp+var_12], 12h
		mov	ax, 1
		push	ax
		les	bx, [bp+var_22]
		push	word ptr es:[bx+22h]
		les	bx, [bp+var_22]
		push	word ptr es:[bx+20h]
		push	word ptr es:[bx+1Eh]
		push	word ptr [bp+src+2]
		push	word ptr [bp+src]
		call	sub_603A
		add	sp, 0Ch
		mov	[bp+var_12], 0
		jmp	short loc_65E4
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr ___call_terminate
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr @_CatchCleanup$qv ; _CatchCleanup(void)

loc_65E4:
					; sub_6311+299j ...
		les	bx, ss:16h
		mov	dx, es:[bx+1Eh]
		mov	ax, es:[bx+1Ch]
		mov	[bp+var_46], dx
		mov	[bp+var_48], ax
		mov	dx, [bp+arg_1C]
		mov	ax, [bp+arg_1A]
		mov	[bp+var_42], dx
		mov	[bp+var_44], ax
		mov	dx, word ptr [bp+var_30+2]
		mov	ax, word ptr [bp+var_30]
		mov	[bp+var_3E], dx
		mov	[bp+var_40], ax
		push	ss
		lea	ax, [bp+var_48]
		push	ax
		xor	ax, ax
		mov	dx, 3
		push	ax
		push	dx
		xor	ax, ax
		mov	dx, 1
		push	ax
		push	dx
		mov	ax, 0EEFh
		mov	dx, 0FACEh
		push	ax
		push	dx
		nop
		push	cs
		call	near ptr _RaiseException
		add	sp, 10h
		push	[bp+var_1E]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_6311	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far _ThrowException(int, int, void *src, int, int, int,	int, int, int, int, int, int)
@_ThrowException$qnvt1t1t1uiuiuinuc proc far
					; xalloc::raise(void)+6Cp ...

var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
src		= dword	ptr  0Ah
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h
arg_C		= word ptr  12h
arg_E		= word ptr  14h
arg_10		= word ptr  16h
arg_12		= word ptr  18h
arg_14		= word ptr  1Ah
arg_16		= word ptr  1Ch
arg_18		= word ptr  1Eh

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		mov	[bp+var_6], bp
		mov	bx, [bp+var_6]
		mov	dx, ss:[bx+4]
		mov	ax, ss:[bx+2]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		xor	ax, ax
		push	ax		; int
		push	[bp+var_2]	; int
		push	[bp+var_4]	; int
		push	[bp+arg_18]	; int
		push	[bp+arg_16]	; int
		push	[bp+arg_14]	; int
		push	[bp+arg_12]	; int
		push	[bp+arg_10]	; int
		push	[bp+arg_E]	; int
		push	[bp+arg_C]	; int
		push	[bp+arg_A]	; int
		push	[bp+arg_8]	; int
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		push	[bp+arg_2]	; int
		push	[bp+arg_0]	; int
		push	cs
		call	near ptr sub_6311
		add	sp, 20h
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@_ThrowException$qnvt1t1t1uiuiuinuc endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; _ReThrowException(unsigned int, unsigned char	*)
@_ReThrowException$quinuc proc far

var_A		= word ptr -0Ah
var_8		= dword	ptr -8
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 0Ah
		push	si
		push	di
		mov	[bp+var_A], bp
		mov	bx, [bp+var_A]
		mov	dx, ss:[bx+4]
		mov	ax, ss:[bx+2]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		les	bx, ss:16h
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		mov	ax, word ptr [bp+var_8]
		or	ax, word ptr [bp+var_8+2]
		jnz	short loc_66D4
		nop
		push	cs
		call	near ptr ___call_terminate
; ---------------------------------------------------------------------------

loc_66D4:
		mov	ax, 1
		push	ax		; int
		push	[bp+var_2]	; int
		push	[bp+var_4]	; int
		push	[bp+arg_4]	; int
		push	[bp+arg_2]	; int
		push	[bp+arg_0]	; int
		les	bx, [bp+var_8]
		push	word ptr es:[bx+0Ch] ; int
		les	bx, [bp+var_8]
		push	word ptr es:[bx+22h] ; int
		les	bx, [bp+var_8]
		push	word ptr es:[bx+20h] ; int
		push	word ptr es:[bx+1Eh] ; int
		les	bx, [bp+var_8]
		push	word ptr es:[bx+0Ah] ; int
		push	word ptr es:[bx+8] ; int
		les	bx, [bp+var_8]
		cmp	byte ptr es:[bx+38h], 0
		jz	short loc_6720
		mov	dx, word ptr [bp+var_8+2]
		mov	ax, word ptr [bp+var_8]
		add	ax, 3Ah	; ':'
		jmp	short loc_6729
; ---------------------------------------------------------------------------

loc_6720:
		les	bx, [bp+var_8]
		mov	ax, es:[bx+36h]
		mov	dx, ss

loc_6729:
		push	dx
		push	ax		; src
		les	bx, [bp+var_8]
		push	word ptr es:[bx+6] ; int
		push	word ptr es:[bx+4] ; int
		push	cs
		call	near ptr sub_6311
		add	sp, 20h
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@_ReThrowException$quinuc endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

sub_6743	proc far
		push	si
		push	di
		pop	di
		pop	si
		retf
sub_6743	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_6748	proc far
					; _RaiseException+2A6p	...

var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		mov	[bp+var_4], 0
		mov	bx, [bp+arg_0]
		test	byte ptr ss:[bx+4], 6
		jz	short loc_6762
		inc	[bp+var_4]

loc_6762:
		mov	ax, ss:14h
		mov	[bp+var_2], ax
		push	cs
		call	near ptr sub_6743
		jmp	short loc_67B0
; ---------------------------------------------------------------------------

loc_676F:
		mov	ax, [bp+var_2]
		mov	[bp+var_6], ax
		xor	ax, ax
		push	ax
		push	ax
		push	[bp+arg_4]
		push	[bp+arg_2]
		push	[bp+var_2]
		push	ss
		push	[bp+arg_0]
		mov	bx, [bp+var_6]
		call	dword ptr ss:[bx+2]
		add	sp, 0Eh
		mov	dx, ax
		or	dx, dx
		jnz	short loc_679A
		mov	ax, dx
		jmp	short loc_67CE
; ---------------------------------------------------------------------------

loc_679A:
		cmp	[bp+var_4], 0
		jz	short loc_67A7
		mov	ax, [bp+var_2]
		mov	ss:14h,	ax

loc_67A7:
		mov	bx, [bp+var_2]
		mov	ax, ss:[bx]
		mov	[bp+var_2], ax

loc_67B0:
		cmp	[bp+var_2], 0FFFFh
		jz	short loc_67BE
		mov	ax, [bp+var_2]
		cmp	ax, [bp+arg_6]
		jnz	short loc_676F

loc_67BE:
		cmp	[bp+var_4], 0
		jz	short loc_67CB
		mov	ax, [bp+var_2]
		mov	ss:14h,	ax

loc_67CB:
		mov	ax, 1

loc_67CE:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_6748	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

__Global_unwind	proc far

var_4C		= word ptr -4Ch
var_4A		= word ptr -4Ah
var_48		= word ptr -48h
var_46		= word ptr -46h
var_3E		= word ptr -3Eh
arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 4Ch
		push	si
		push	di
		mov	dx, [bp+arg_2]
		or	dx, dx
		jnz	short loc_67FF
		mov	[bp+var_4A], 0
		mov	[bp+var_4C], 26h ; '&'
		mov	[bp+var_46], 0
		mov	[bp+var_48], 2
		mov	[bp+var_3E], 0
		lea	dx, [bp+var_4C]

loc_67FF:
		mov	bx, dx
		or	word ptr ss:[bx+4], 2
		push	[bp+arg_0]
		xor	ax, ax
		push	ax
		push	ax
		push	dx
		push	cs
		call	near ptr sub_6748
		add	sp, 8
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__Global_unwind	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

sub_681B	proc far
		push	si
		push	di
		pop	di
		pop	si
		retf
sub_681B	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

_RaiseException	proc far

dest		= word ptr -186h
var_184		= word ptr -184h
var_182		= word ptr -182h
var_180		= word ptr -180h
var_17E		= word ptr -17Eh
var_17C		= word ptr -17Ch
var_176		= word ptr -176h
var_174		= word ptr -174h
var_172		= word ptr -172h
var_170		= word ptr -170h
var_16E		= word ptr -16Eh
var_16C		= word ptr -16Ch
var_16A		= word ptr -16Ah
var_168		= word ptr -168h
var_166		= word ptr -166h
var_164		= word ptr -164h
var_162		= word ptr -162h
var_160		= word ptr -160h
var_15E		= word ptr -15Eh
var_15A		= word ptr -15Ah
var_158		= word ptr -158h
var_156		= word ptr -156h
var_154		= word ptr -154h
var_152		= byte ptr -152h
var_C6		= word ptr -0C6h
var_C4		= word ptr -0C4h
var_C2		= word ptr -0C2h
var_C0		= word ptr -0C0h
var_BE		= word ptr -0BEh
var_BC		= word ptr -0BCh
var_BA		= word ptr -0BAh
var_B8		= word ptr -0B8h
var_B6		= word ptr -0B6h
var_B4		= word ptr -0B4h
var_B2		= word ptr -0B2h
var_B0		= word ptr -0B0h
var_AE		= word ptr -0AEh
var_AC		= word ptr -0ACh
var_AA		= word ptr -0AAh
var_A8		= word ptr -0A8h
var_A6		= word ptr -0A6h
var_A4		= word ptr -0A4h
var_A2		= word ptr -0A2h
var_A0		= word ptr -0A0h
var_9E		= word ptr -9Eh
var_9C		= word ptr -9Ch
var_9A		= word ptr -9Ah
var_98		= word ptr -98h
var_96		= word ptr -96h
var_94		= word ptr -94h
var_92		= word ptr -92h
var_90		= word ptr -90h
var_8E		= word ptr -8Eh
var_8C		= word ptr -8Ch
var_8A		= word ptr -8Ah
var_88		= word ptr -88h
var_86		= byte ptr -86h
var_56		= word ptr -56h
var_54		= word ptr -54h
var_52		= word ptr -52h
var_50		= word ptr -50h
var_4E		= word ptr -4Eh
var_4C		= word ptr -4Ch
var_4A		= word ptr -4Ah
var_48		= word ptr -48h
var_46		= byte ptr -46h
src		= dword	ptr -0Ah
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  18h
arg_2		= word ptr  1Ah
arg_4		= word ptr  1Ch
arg_6		= word ptr  1Eh
arg_8		= word ptr  20h
arg_A		= word ptr  22h
arg_C		= dword	ptr  24h

; FUNCTION CHUNK AT 6C92 SIZE 0000000D BYTES

		push	ax
		push	cx
		push	dx
		push	bx
		push	sp
		push	bp
		push	si
		push	di
		push	ds
		push	es
		mov	bp, sp
		sub	sp, 186h
		lea	ax, [bp+var_86]
		push	ax
		push	cs
		call	near ptr sub_681B
		pop	cx
		pushf
		pop	ax
		mov	word ptr [bp+src+2], ax
		cmp	byte ptr word_DC24, 3
		jnb	short loc_6849
		jmp	loc_68FF
; ---------------------------------------------------------------------------

loc_6849:
		pushad
		mov	word ptr [bp+src], sp
		mov	ax, 20h	; ' '
		push	ax		; n
		push	ss
		push	word ptr [bp+src] ; src
		push	ss
		lea	ax, [bp+dest]
		push	ax		; dest
		nop
		push	cs
		call	near ptr _memcpy
		add	sp, 0Ah
		popad
		mov	dx, [bp+var_184]
		mov	ax, [bp+dest]
		mov	[bp+var_B4], dx
		mov	[bp+var_B6], ax
		mov	dx, [bp+var_180]
		mov	ax, [bp+var_182]
		mov	[bp+var_B0], dx
		mov	[bp+var_B2], ax
		mov	dx, [bp+var_174]
		mov	ax, [bp+var_176]
		mov	[bp+var_AC], dx
		mov	[bp+var_AE], ax
		mov	dx, [bp+var_170]
		mov	ax, [bp+var_172]
		mov	[bp+var_A8], dx
		mov	[bp+var_AA], ax
		mov	dx, [bp+var_16C]
		mov	ax, [bp+var_16E]
		mov	[bp+var_A4], dx
		mov	[bp+var_A6], ax
		mov	dx, [bp+var_168]
		mov	ax, [bp+var_16A]
		mov	[bp+var_A0], dx
		mov	[bp+var_A2], ax
		mov	dx, [bp+var_17C]
		mov	ax, [bp+var_17E]
		mov	[bp+var_9C], dx
		mov	[bp+var_9E], ax
		pushfd
		pop	eax
		shr	eax, 10h
		mov	[bp+var_90], ax
		mov	ax, word ptr [bp+src+2]
		mov	[bp+var_92], ax
		mov	[bp+var_C0], 0
		mov	[bp+var_C2], fs
		mov	[bp+var_C4], 0
		mov	[bp+var_C6], gs
		jmp	short loc_6948
; ---------------------------------------------------------------------------

loc_68FF:
		xor	ax, ax
		xor	dx, dx
		mov	[bp+var_9C], ax
		mov	[bp+var_9E], dx
		mov	[bp+var_A0], ax
		mov	[bp+var_A2], dx
		mov	[bp+var_A4], ax
		mov	[bp+var_A6], dx
		mov	[bp+var_A8], ax
		mov	[bp+var_AA], dx
		mov	[bp+var_AC], ax
		mov	[bp+var_AE], dx
		mov	[bp+var_B0], ax
		mov	[bp+var_B2], dx
		mov	[bp+var_B4], ax
		mov	[bp+var_B6], dx
		mov	ax, word ptr [bp+src+2]
		mov	[bp+var_90], 0
		mov	[bp+var_92], ax

loc_6948:
		mov	dx, [bp+var_9C]
		mov	ax, [bp+var_9E]
		add	ax, 18h
		adc	dx, 0
		mov	[bp+var_8C], dx
		mov	[bp+var_8E], ax
		cmp	[bp+arg_2], 0EEFh
		jnz	short loc_6979
		cmp	[bp+arg_0], 0FACEh
		jnz	short loc_6979
		les	bx, [bp+arg_C]
		mov	dx, es:[bx+6]
		mov	ax, es:[bx+4]
		jmp	short loc_6987
; ---------------------------------------------------------------------------

loc_6979:
					; _RaiseException+14Aj
		mov	word ptr [bp+src], bp
		mov	bx, word ptr [bp+src]
		mov	dx, ss:[bx+16h]
		mov	ax, ss:[bx+14h]

loc_6987:
		mov	[bp+var_4], dx
		mov	[bp+var_6], ax
		mov	ax, [bp+var_6]
		mov	[bp+var_98], 0
		mov	[bp+var_9A], ax
		mov	ax, [bp+var_4]
		mov	[bp+var_94], 0
		mov	[bp+var_96], ax
		mov	ax, 14h
		push	ax		; n
		push	ss
		push	bp		; src
		push	ss
		lea	ax, [bp+var_166]
		push	ax		; dest
		nop
		push	cs
		call	near ptr _memcpy
		add	sp, 0Ah
		mov	ax, [bp+var_164]
		mov	[bp+var_B8], 0
		mov	[bp+var_BA], ax
		mov	ax, [bp+var_166]
		mov	[bp+var_BC], 0
		mov	[bp+var_BE], ax
		mov	[bp+var_88], 0
		mov	[bp+var_8A], ss
		mov	ax, [bp+var_154]
		mov	[bp+var_A2], ax
		mov	ax, [bp+var_15A]
		mov	[bp+var_AE], ax
		mov	ax, [bp+var_156]
		mov	[bp+var_A6], ax
		mov	ax, [bp+var_158]
		mov	[bp+var_AA], ax
		mov	ax, [bp+var_160]
		mov	[bp+var_B2], ax
		mov	ax, [bp+var_162]
		mov	[bp+var_B6], ax
		mov	ax, [bp+var_15E]
		mov	[bp+var_9E], ax
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		and	dx, 0EFFFh
		mov	[bp+var_54], dx
		mov	[bp+var_56], ax
		mov	dx, [bp+arg_6]
		mov	ax, [bp+arg_4]
		mov	[bp+var_50], dx
		mov	[bp+var_52], ax
		mov	dx, [bp+var_4]
		mov	ax, [bp+var_6]
		mov	[bp+var_4A], dx
		mov	[bp+var_4C], ax
		mov	[bp+var_4E], 0
		mov	ax, word ptr [bp+arg_C]
		or	ax, word ptr [bp+arg_C+2]
		jnz	short loc_6A58
		mov	[bp+arg_A], 0
		mov	[bp+arg_8], 0

loc_6A58:
		cmp	[bp+arg_A], 0
		jb	short loc_6A70
		ja	short loc_6A66
		cmp	[bp+arg_8], 0Fh
		jbe	short loc_6A70

loc_6A66:
		mov	[bp+arg_A], 0
		mov	[bp+arg_8], 0Fh

loc_6A70:
					; _RaiseException+244j
		mov	ax, [bp+arg_8]
		mov	[bp+var_48], ax
		mov	[bp+var_2], 0
		jmp	short loc_6AA6
; ---------------------------------------------------------------------------

loc_6A7D:
					; _RaiseException+295j
		mov	bx, [bp+var_2]
		mov	cl, 2
		shl	bx, cl
		lea	ax, [bp+var_46]
		add	bx, ax
		mov	ax, [bp+var_2]
		mov	cl, 2
		shl	ax, cl
		les	si, [bp+arg_C]
		add	si, ax
		mov	dx, es:[si+2]
		mov	ax, es:[si]
		mov	ss:[bx+2], dx
		mov	ss:[bx], ax
		inc	[bp+var_2]

loc_6AA6:
		mov	ax, [bp+var_2]
		xor	dx, dx
		cmp	dx, [bp+arg_A]
		jb	short loc_6A7D
		jnz	short loc_6AB7
		cmp	ax, [bp+arg_8]
		jb	short loc_6A7D

loc_6AB7:
					; _RaiseException+2E0j
		mov	ax, 0FFFFh
		push	ax
		push	ss
		lea	ax, [bp+var_152]
		push	ax
		lea	ax, [bp+var_56]
		push	ax
		push	cs
		call	near ptr sub_6748
		add	sp, 8
		or	ax, ax
		jnz	short loc_6B02
		test	byte ptr [bp+arg_4], 1
		jz	short loc_6B22
		mov	[bp+var_54], 0C000h
		mov	[bp+var_56], 25h ; '%'
		mov	dx, [bp+arg_6]
		mov	ax, [bp+arg_4]
		mov	[bp+var_50], dx
		mov	[bp+var_52], ax
		mov	[bp+var_4A], 0
		mov	[bp+var_4C], 0
		mov	[bp+var_4E], 0
		mov	[bp+var_48], 0
		jmp	short loc_6AB7
; ---------------------------------------------------------------------------

loc_6B02:
		or	[bp+var_52], 2
		mov	ax, 0FFFFh
		push	ax
		push	ss
		lea	ax, [bp+var_152]
		push	ax
		lea	ax, [bp+var_56]
		push	ax
		push	cs
		call	near ptr sub_6748
		add	sp, 8
		or	ax, ax
		jz	short loc_6B22
		jmp	loc_6C8D
; ---------------------------------------------------------------------------

loc_6B22:
					; _RaiseException+2FDj
		cmp	byte ptr word_DC24, 3
		jnb	short loc_6B2C
		jmp	loc_6C0C
; ---------------------------------------------------------------------------

loc_6B2C:
		mov	cx, [bp+var_8E]
		sub	cx, 30h	; '0'
		mov	es, [bp+var_8A]
		mov	bx, cx
		mov	ax, [bp+var_C6]
		mov	es:[bx], ax
		mov	ax, [bp+var_C2]
		mov	es:[bx+2], ax
		mov	ax, [bp+var_BE]
		mov	es:[bx+4], ax
		mov	ax, [bp+var_BA]
		mov	es:[bx+6], ax
		mov	dx, [bp+var_B4]
		mov	ax, [bp+var_B6]
		mov	es:[bx+0Ah], dx
		mov	es:[bx+8], ax
		mov	dx, [bp+var_B0]
		mov	ax, [bp+var_B2]
		mov	es:[bx+0Eh], dx
		mov	es:[bx+0Ch], ax
		mov	dx, [bp+var_9C]
		mov	ax, [bp+var_9E]
		mov	es:[bx+12h], dx
		mov	es:[bx+10h], ax
		mov	dx, [bp+var_8C]
		mov	ax, [bp+var_8E]
		mov	es:[bx+16h], dx
		mov	es:[bx+14h], ax
		mov	dx, [bp+var_AC]
		mov	ax, [bp+var_AE]
		mov	es:[bx+1Ah], dx
		mov	es:[bx+18h], ax
		mov	dx, [bp+var_A8]
		mov	ax, [bp+var_AA]
		mov	es:[bx+1Eh], dx
		mov	es:[bx+1Ch], ax
		mov	dx, [bp+var_A4]
		mov	ax, [bp+var_A6]
		mov	es:[bx+22h], dx
		mov	es:[bx+20h], ax
		mov	dx, [bp+var_A0]
		mov	ax, [bp+var_A2]
		mov	es:[bx+26h], dx
		mov	es:[bx+24h], ax
		mov	dx, [bp+var_90]
		mov	ax, [bp+var_92]
		mov	es:[bx+2Ah], dx
		mov	es:[bx+28h], ax
		mov	ax, [bp+var_9A]
		mov	es:[bx+2Ch], ax
		mov	ax, [bp+var_96]
		mov	es:[bx+2Eh], ax
		mov	ss, [bp+var_8A]
		mov	sp, bx
		pop	gs
		pop	fs
		pop	es
		pop	ds
		popad
		popfd
		retf
; ---------------------------------------------------------------------------
		jmp	loc_6C92
; ---------------------------------------------------------------------------

loc_6C0C:
		mov	cx, [bp+var_8E]
		sub	cx, 1Ah
		mov	es, [bp+var_8A]
		mov	bx, cx
		mov	ax, [bp+var_BE]
		mov	es:[bx], ax
		mov	ax, [bp+var_BA]
		mov	es:[bx+2], ax
		mov	ax, [bp+var_B6]
		mov	es:[bx+4], ax
		mov	ax, [bp+var_B2]
		mov	es:[bx+6], ax
		mov	ax, [bp+var_9E]
		mov	es:[bx+8], ax
		mov	ax, [bp+var_8E]
		mov	es:[bx+0Ah], ax
		mov	ax, [bp+var_AE]
		mov	es:[bx+0Ch], ax
		mov	ax, [bp+var_AA]
		mov	es:[bx+0Eh], ax
		mov	ax, [bp+var_A6]
		mov	es:[bx+10h], ax
		mov	ax, [bp+var_A2]
		mov	es:[bx+12h], ax
		mov	ax, [bp+var_92]
		mov	es:[bx+14h], ax
		mov	ax, [bp+var_9A]
		mov	es:[bx+16h], ax
		mov	ax, [bp+var_96]
		mov	es:[bx+18h], ax
		mov	ss, [bp+var_8A]
		mov	sp, bx
		pop	es
		pop	ds
		popa
		popf
		retf
; ---------------------------------------------------------------------------
		jmp	short loc_6C92
; ---------------------------------------------------------------------------

loc_6C8D:
		nop
		push	cs
		call	near ptr ___call_terminate
_RaiseException	endp

; ---------------------------------------------------------------------------
; START	OF FUNCTION CHUNK FOR _RaiseException

loc_6C92:
					; _RaiseException+46Bj
		mov	sp, bp
		pop	es
		pop	ds
		pop	di
		pop	si
		pop	bp
		pop	bx
		pop	bx
		pop	dx
		pop	cx
		pop	ax
		retf
; END OF FUNCTION CHUNK	FOR _RaiseException
; ---------------------------------------------------------------------------
		db 4 dup(0), 1,	6Dh
		dw seg seg000
		db 14h dup(0), 0E2h, 0FFh, 2 dup(0), 3,	0, 9Fh,	6Ch
		dw seg seg000
		db 2 dup(0), 4,	0

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_6CC9	proc near

var_1E		= word ptr -1Eh
var_12		= word ptr -12h
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 1Eh
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 6CB7h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	[bp+var_12], 6
		mov	ax, 1
		push	ax
		push	[bp+arg_8]
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	sub_603A
		add	sp, 0Ch
		mov	[bp+var_12], 0
		jmp	short loc_6D0B
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr ___call_terminate
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr @_CatchCleanup$qv ; _CatchCleanup(void)

loc_6D0B:
		push	[bp+var_1E]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_6CC9	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_6D19	proc near
					; sub_7263+138p

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  4

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		les	bx, [bp+arg_0]
		cmp	byte ptr es:[bx+38h], 0
		jz	short loc_6D94
		les	bx, [bp+arg_0]
		test	byte ptr es:[bx+16h], 2
		jz	short loc_6D8C
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+arg_0]
		les	bx, es:[bx+4]
		mov	word ptr [bp+var_4+2], es
		mov	word ptr [bp+var_4], bx
		push	word ptr es:[bx+22h]
		les	bx, [bp+var_4]
		push	word ptr es:[bx+20h]
		push	word ptr es:[bx+1Eh]
		mov	ax, word ptr [bp+arg_0]
		add	ax, 3Ah	; ':'
		push	word ptr [bp+arg_0+2]
		push	ax
		call	sub_6CC9
		add	sp, 0Ah
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, word ptr [bp+var_8+2]
		mov	cx, word ptr [bp+var_8]
		mov	es, dx
		xchg	ax, bx
		mov	es:[bx+2], ax
		mov	es:[bx], cx

loc_6D8C:
		les	bx, [bp+arg_0]
		mov	byte ptr es:[bx+38h], 0

loc_6D94:
		les	bx, [bp+arg_0]
		cmp	byte ptr es:[bx+39h], 0
		jz	short loc_6DEB
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+34h]
		mov	ax, es:[bx+32h]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		test	byte ptr es:[bx+2], 2
		jz	short loc_6DE3
		les	bx, [bp+var_8]
		test	byte ptr es:[bx+8], 2
		jz	short loc_6DE3
		les	bx, [bp+var_8]
		push	word ptr es:[bx+22h]
		les	bx, [bp+var_8]
		push	word ptr es:[bx+20h]
		push	word ptr es:[bx+1Eh]
		push	ss
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+36h]
		call	sub_6CC9
		add	sp, 0Ah

loc_6DE3:
		les	bx, [bp+arg_0]
		mov	byte ptr es:[bx+39h], 0

loc_6DEB:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_6D19	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; _CatchCleanup(void)
@_CatchCleanup$qv proc far
					; sub_6311+277p ...

var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= dword	ptr  6
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		les	bx, ss:16h
		mov	es:[bx+2], dx
		mov	es:[bx], ax
		les	bx, [bp+var_4]
		mov	ax, es:[bx+24h]
		mov	[bp+var_6], ax
		mov	bx, [bp+var_6]
		les	ax, ss:[bx+arg_0]
		mov	bx, [bp+var_6]
		add	ax, ss:[bx+arg_6]
		mov	bx, ax
		mov	ax, es:[bx]
		mov	bx, [bp+var_6]
		mov	ss:[bx+arg_6], ax
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4]
		call	sub_6D19
		pop	cx
		pop	cx
		push	ds
		les	bx, [bp+var_4]
		mov	ds, word ptr es:[bx+18h]
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4]
		les	bx, [bp+var_4]
		call	dword ptr es:[bx+1Ah]
		pop	cx
		pop	cx
		pop	ds
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@_CatchCleanup$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_6E6E	proc near

var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 0Ch
		push	si
		push	di

loc_6E76:
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		mov	ax, word ptr [bp+var_4]
		or	ax, word ptr [bp+var_4+2]
		jnz	short loc_6E93
		xor	ax, ax
		jmp	loc_6F34
; ---------------------------------------------------------------------------

loc_6E93:
		mov	bx, [bp+arg_A]
		mov	dx, ss:[bx+2]
		mov	ax, ss:[bx]
		les	bx, [bp+arg_0]
		add	ax, es:[bx+4]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		cmp	[bp+arg_4], 0
		jz	short loc_6EBF
		les	bx, [bp+var_8]
		mov	ax, es:[bx]
		mov	dx, word ptr [bp+var_8+2]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax

loc_6EBF:
		push	[bp+arg_8]
		push	[bp+arg_6]
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jnz	short loc_6F18
		les	bx, [bp+var_4]
		test	byte ptr es:[bx+2], 2
		jz	short loc_6F2D
		les	bx, [bp+var_4]
		mov	dx, word ptr [bp+var_4+2]
		mov	ax, word ptr [bp+var_4]
		add	ax, es:[bx+0Ah]
		mov	[bp+var_A], dx
		mov	[bp+var_C], ax
		mov	ax, [bp+var_C]
		or	ax, [bp+var_A]
		jz	short loc_6F2D
		lea	ax, [bp+var_8]
		push	ax
		push	[bp+arg_8]
		push	[bp+arg_6]
		xor	ax, ax
		push	ax
		push	[bp+var_A]
		push	[bp+var_C]
		call	sub_6E6E
		add	sp, 0Ch
		or	ax, ax
		jz	short loc_6F2D

loc_6F18:
		mov	bx, [bp+arg_A]
		mov	dx, word ptr [bp+var_8+2]
		mov	ax, word ptr [bp+var_8]
		mov	ss:[bx+2], dx
		mov	ss:[bx], ax
		mov	ax, 1
		jmp	short loc_6F34
; ---------------------------------------------------------------------------

loc_6F2D:
		add	word ptr [bp+arg_0], 8
		jmp	loc_6E76
; ---------------------------------------------------------------------------

loc_6F34:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_6E6E	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_6F3A	proc far
					; sub_6FBD+1C2p

var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= dword	ptr  0Ah
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		mov	ax, [bp+arg_0]
		or	ax, [bp+arg_2]
		jz	short loc_6FAB
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+0Ah]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		lea	ax, [bp+arg_0]
		push	ax
		push	[bp+arg_A]
		push	[bp+arg_8]
		xor	ax, ax
		push	ax
		push	[bp+var_2]
		push	[bp+var_4]
		call	sub_6E6E
		add	sp, 0Ch
		or	ax, ax
		jnz	short loc_6FAB
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+0Ch]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		lea	ax, [bp+arg_0]
		push	ax
		push	[bp+arg_A]
		push	[bp+arg_8]
		mov	ax, 1
		push	ax
		push	[bp+var_2]
		push	[bp+var_4]
		call	sub_6E6E
		add	sp, 0Ch
		or	ax, ax
		jz	short loc_6FB3

loc_6FAB:
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		jmp	short loc_6FB7
; ---------------------------------------------------------------------------

loc_6FB3:
		xor	dx, dx
		xor	ax, ax

loc_6FB7:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_6F3A	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_6FBD	proc near

var_18		= word ptr -18h
var_16		= word ptr -16h
var_14		= word ptr -14h
var_12		= word ptr -12h
var_10		= word ptr -10h
src		= dword	ptr -0Eh
n		= word ptr -0Ah
var_8		= dword	ptr -8
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  4
arg_6		= dword	ptr  0Ah
arg_A		= dword	ptr  0Eh
arg_E		= word ptr  12h

		push	bp
		mov	bp, sp
		sub	sp, 18h
		push	si
		push	di
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+6]
		mov	ax, es:[bx+4]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		les	bx, [bp+arg_6]
		mov	es:[bx+34h], dx
		mov	es:[bx+32h], ax
		mov	ax, [bp+var_4]
		or	ax, [bp+var_2]
		jnz	short loc_6FEC
		jmp	loc_725D
; ---------------------------------------------------------------------------

loc_6FEC:
		les	bx, [bp+arg_0]
		test	byte ptr es:[bx+8], 80h
		jz	short loc_6FF9
		jmp	loc_725D
; ---------------------------------------------------------------------------

loc_6FF9:
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+8]
		and	ax, 1
		neg	ax
		sbb	ax, ax
		inc	ax
		mov	[bp+var_14], ax
		mov	dx, word ptr [bp+arg_6+2]
		mov	ax, word ptr [bp+arg_6]
		add	ax, 3Ah	; ':'
		mov	word ptr [bp+src+2], dx
		mov	word ptr [bp+src], ax
		les	bx, [bp+arg_6]
		mov	byte ptr es:[bx+39h], 1
		les	bx, [bp+arg_A]
		mov	ax, es:[bx]
		add	ax, [bp+arg_E]
		les	bx, [bp+arg_6]
		mov	es:[bx+36h], ax
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		mov	ax, es:[bx]
		mov	[bp+n],	ax
		les	bx, [bp+var_8]
		mov	cx, es:[bx+2]
		mov	dx, cx
		test	cl, 30h
		jz	short loc_706D
		les	bx, [bp+var_8]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		mov	dx, es:[bx+2]

loc_706D:
		test	cl, 10h
		jz	short loc_7095
		les	bx, [bp+arg_6]
		test	byte ptr es:[bx+0Ch], 1
		jz	short loc_7095
		push	[bp+n]		; n
		xor	ax, ax
		push	ax		; c
		push	ss
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+36h] ; s
		nop
		push	cs
		call	near ptr _memset
		add	sp, 8
		jmp	loc_71C0
; ---------------------------------------------------------------------------

loc_7095:
		test	dl, 1
		jnz	short loc_709D
		jmp	loc_7141
; ---------------------------------------------------------------------------

loc_709D:
		test	cl, 30h
		jnz	short loc_70A5
		jmp	loc_7141
; ---------------------------------------------------------------------------

loc_70A5:
		test	cl, 20h
		jz	short loc_70AC
		jmp	short loc_70CF
; ---------------------------------------------------------------------------

loc_70AC:
		les	bx, [bp+src]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+src+2], dx
		mov	word ptr [bp+src], ax
		les	bx, [bp+arg_6]
		test	byte ptr es:[bx+15h], 10h
		jz	short loc_70D6
		mov	ax, word ptr [bp+src]
		mov	word ptr [bp+src+2], ds
		mov	word ptr [bp+src], ax

loc_70CF:
		mov	[bp+var_14], 1
		jmp	short $+2

loc_70D6:
		push	word ptr [bp+var_8+2]
		push	word ptr [bp+var_8]
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+12h]
		push	word ptr es:[bx+10h]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jnz	short loc_7137
		mov	dx, word ptr [bp+src+2]
		mov	ax, word ptr [bp+src]
		mov	[bp+var_16], dx
		mov	[bp+var_18], ax
		push	word ptr [bp+var_8+2]
		push	word ptr [bp+var_8]
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+12h]
		push	word ptr es:[bx+10h]
		push	word ptr [bp+src+2]
		push	word ptr [bp+src]
		push	cs
		call	near ptr sub_6F3A
		add	sp, 0Ch
		mov	word ptr [bp+src+2], dx
		mov	word ptr [bp+src], ax
		mov	dx, word ptr [bp+src+2]
		mov	ax, word ptr [bp+src]
		cmp	dx, [bp+var_16]
		jnz	short loc_7132
		cmp	ax, [bp+var_18]
		jz	short loc_7137

loc_7132:
		mov	[bp+var_14], 1

loc_7137:
					; sub_6FBD+173j
		push	[bp+n]
		push	ss
		lea	ax, [bp+src]
		jmp	loc_720B
; ---------------------------------------------------------------------------

loc_7141:
		les	bx, [bp+arg_6]
		test	byte ptr es:[bx+14h], 1
		jz	short loc_71C7
		push	word ptr [bp+var_8+2]
		push	word ptr [bp+var_8]
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+12h]
		push	word ptr es:[bx+10h]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jnz	short loc_7190
		push	word ptr [bp+var_8+2]
		push	word ptr [bp+var_8]
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+12h]
		push	word ptr es:[bx+10h]
		push	word ptr [bp+src+2]
		push	word ptr [bp+src]
		push	cs
		call	near ptr sub_6F3A
		add	sp, 0Ch
		mov	word ptr [bp+src+2], dx
		mov	word ptr [bp+src], ax
		mov	[bp+var_14], 1

loc_7190:
		les	bx, [bp+var_8]
		test	byte ptr es:[bx+8], 1
		jz	short loc_720E
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+0Eh]
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+0Ch]
		push	word ptr es:[bx+0Ah]
		push	word ptr [bp+src+2]
		push	word ptr [bp+src]
		push	ss
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+36h]
		call	sub_5CEC
		add	sp, 0Eh

loc_71C0:
					; sub_6FBD+227j
		mov	[bp+var_14], 1
		jmp	short loc_7227
; ---------------------------------------------------------------------------

loc_71C7:
		test	cl, 20h
		jz	short loc_71E6
		push	[bp+n]		; n
		push	ss
		lea	ax, [bp+src]
		push	ax		; src
		push	ss
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+36h] ; dest
		nop
		push	cs
		call	near ptr _memcpy
		add	sp, 0Ah
		jmp	short loc_71C0
; ---------------------------------------------------------------------------

loc_71E6:
		test	cl, 10h
		jz	short loc_720E
		les	bx, [bp+arg_6]
		mov	ax, es:[bx+0Eh]
		cmp	ax, [bp+n]
		jz	short loc_720E
		les	bx, [bp+src]
		mov	ax, es:[bx]
		mov	[bp+var_10], ds
		mov	[bp+var_12], ax
		mov	ax, 4
		push	ax
		push	ss
		lea	ax, [bp+var_12]

loc_720B:
		push	ax
		jmp	short loc_7217
; ---------------------------------------------------------------------------

loc_720E:
					; sub_6FBD+22Cj ...
		push	[bp+n]		; n
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src

loc_7217:
		push	ss
		les	bx, [bp+arg_6]
		push	word ptr es:[bx+36h] ; dest
		nop
		push	cs
		call	near ptr _memcpy
		add	sp, 0Ah

loc_7227:
		cmp	[bp+var_14], 0
		jnz	short loc_725D
		les	bx, [bp+var_8]
		test	byte ptr es:[bx+8], 2
		jz	short loc_7255
		les	bx, [bp+var_8]
		push	word ptr es:[bx+22h]
		les	bx, [bp+var_8]
		push	word ptr es:[bx+20h]
		push	word ptr es:[bx+1Eh]
		push	word ptr [bp+src+2]
		push	word ptr [bp+src]
		call	sub_6CC9
		add	sp, 0Ah

loc_7255:
		les	bx, [bp+arg_6]
		mov	byte ptr es:[bx+38h], 0

loc_725D:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_6FBD	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_7263	proc near
					; __Return_unwind+15p ...

var_20		= word ptr -20h
var_1E		= word ptr -1Eh
var_1C		= word ptr -1Ch
var_1A		= dword	ptr -1Ah
var_16		= dword	ptr -16h
var_12		= word ptr -12h
var_10		= word ptr -10h
var_E		= word ptr -0Eh
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_C		= word ptr  10h
arg_E		= word ptr  12h

		push	bp
		mov	bp, sp
		sub	sp, 20h
		push	si
		push	di
		mov	[bp+var_E], 0
		les	bx, ss:16h
		mov	si, [bp+arg_0]
		mov	ax, ss:[si+arg_A]
		mov	es:[bx+6], ax
		mov	[bp+var_C], ax
		les	bx, ss:16h
		mov	si, [bp+arg_0]
		mov	ax, ss:[si+arg_C]
		mov	es:[bx+8], ax
		mov	bx, [bp+arg_0]
		mov	dx, ss:[bx+arg_4]
		mov	ax, ss:[bx+arg_2]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	ax, [bp+arg_0]
		sub	ax, es:[bx+4]
		mov	[bp+var_A], ax
		mov	bx, [bp+arg_0]
		mov	ax, ss:[bx+arg_8]
		jmp	loc_7408
; ---------------------------------------------------------------------------

loc_72BB:
		mov	ax, [bp+var_6]
		mov	[bp+var_12], ax
		les	bx, [bp+var_4]
		add	bx, [bp+var_12]
		mov	ax, es:[bx]
		mov	[bp+var_8], ax
		add	[bp+var_12], 2
		les	bx, [bp+var_4]
		add	bx, [bp+var_12]
		mov	ax, es:[bx]
		mov	[bp+var_10], ax
		add	[bp+var_12], 2
		mov	bx, [bp+arg_0]
		mov	ax, [bp+var_8]
		mov	ss:[bx+arg_8], ax
		mov	bx, [bp+var_10]
		cmp	bx, 5
		jbe	short loc_72F6
		jmp	loc_7405
; ---------------------------------------------------------------------------

loc_72F6:
		add	bx, bx
		jmp	cs:off_7422[bx]

loc_72FD:
		les	bx, [bp+var_4]
		add	bx, [bp+var_12]
		mov	dx, es:[bx+6]
		mov	ax, es:[bx+4]
		mov	word ptr dword_FC58+2, dx
		mov	word ptr dword_FC58, ax
		mov	bx, [bp+arg_0]
		mov	ss:[bx+arg_E], 1
		push	ds
		pop	es
		assume es:dseg
		push	ds
		mov	ds, [bp+var_C]
		push	bp
		mov	bp, [bp+var_A]
		call	es:dword_FC58
		pop	bp
		pop	ds
		mov	bx, [bp+arg_0]
		mov	ss:[bx+arg_E], 0
		jmp	loc_7405
; ---------------------------------------------------------------------------

loc_7338:
		add	[bp+var_12], 4
		mov	dx, ss:18h
		mov	ax, ss:16h
		jmp	short loc_7367
; ---------------------------------------------------------------------------

loc_7347:
		les	bx, [bp+var_16]
		assume es:nothing
		mov	ax, es:[bx+24h]
		cmp	ax, [bp+arg_0]
		jnz	short loc_7361
		les	bx, [bp+var_16]
		mov	ax, es:[bx+2Ah]
		cmp	ax, [bp+var_6]
		jnz	short loc_7361
		jmp	short loc_7381
; ---------------------------------------------------------------------------

loc_7361:
		mov	dx, word ptr [bp+var_16+2]
		mov	ax, word ptr [bp+var_16]

loc_7367:
		mov	word ptr [bp+var_1A+2],	dx
		mov	word ptr [bp+var_1A], ax
		les	bx, [bp+var_1A]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_16+2],	dx
		mov	word ptr [bp+var_16], ax
		or	ax, dx
		jnz	short loc_7347

loc_7381:
		les	bx, [bp+var_16]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		les	bx, [bp+var_1A]
		mov	es:[bx+2], dx
		mov	es:[bx], ax
		push	word ptr [bp+var_16+2]
		push	word ptr [bp+var_16]
		call	sub_6D19
		pop	cx
		pop	cx
		push	ds
		les	bx, [bp+var_16]
		mov	ds, word ptr es:[bx+18h]
		push	word ptr [bp+var_16+2]
		push	word ptr [bp+var_16]
		les	bx, [bp+var_16]
		call	dword ptr es:[bx+1Ah]
		pop	cx
		pop	cx
		pop	ds
		jmp	short loc_7405
; ---------------------------------------------------------------------------

loc_73BA:
		les	bx, [bp+var_4]
		add	bx, [bp+var_12]
		mov	ax, es:[bx]
		mov	[bp+var_1C], ax
		add	[bp+var_12], 2
		les	bx, [bp+var_4]
		add	bx, [bp+var_12]
		mov	ax, es:[bx]
		mov	[bp+var_1E], ds
		mov	[bp+var_20], ax
		mov	ax, word ptr [bp+var_4+2]
		mov	dx, [bp+var_20]
		mov	[bp+var_1E], ax
		mov	[bp+var_20], dx
		push	[bp+var_A]
		push	[bp+arg_0]
		mov	ax, [bp+var_1C]
		add	ax, [bp+var_E]
		cwd
		push	dx
		push	ax
		push	[bp+var_1E]
		push	[bp+var_20]
		call	sub_7E39
		add	sp, 0Ch
		mov	[bp+var_E], ax
		jmp	short $+2

loc_7405:
		mov	ax, [bp+var_8]

loc_7408:
		mov	[bp+var_6], ax
		cmp	[bp+var_6], 0
		jz	short loc_741C
		mov	ax, [bp+var_6]
		cmp	ax, [bp+arg_2]
		jz	short loc_741C
		jmp	loc_72BB
; ---------------------------------------------------------------------------

loc_741C:
					; sub_7263+1B4j
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_7263	endp

; ---------------------------------------------------------------------------
off_7422	dw offset loc_72FD
		dw offset loc_7405
		dw offset loc_7405
		dw offset loc_7405
		dw offset loc_7338
		dw offset loc_73BA

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

__Local_unwind	proc far

var_2		= word ptr -2
arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		sub	sp, 2
		push	si
		push	di
		mov	ax, ss:14h
		mov	[bp+var_2], ax
		push	[bp+arg_0]
		push	[bp+var_2]
		call	sub_7263
		pop	cx
		pop	cx
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__Local_unwind	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

__Return_unwind	proc far

var_2		= word ptr -2

		push	bp
		mov	bp, sp
		sub	sp, 2
		push	si
		push	di
		mov	ax, ss:14h
		mov	[bp+var_2], ax
		xor	ax, ax
		push	ax
		push	[bp+var_2]
		call	sub_7263
		pop	cx
		pop	cx
		mov	bx, [bp+var_2]
		mov	ax, ss:[bx]
		mov	ss:14h,	ax
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__Return_unwind	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_7478	proc near

var_8		= word ptr -8
var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= dword	ptr  8

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		add	ax, 4
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		jmp	short loc_74E6
; ---------------------------------------------------------------------------

loc_7491:
		les	bx, [bp+var_4]
		mov	dx, es:[bx+6]
		mov	ax, es:[bx+4]
		mov	[bp+var_6], dx
		mov	[bp+var_8], ax
		mov	ax, [bp+var_8]
		or	ax, [bp+var_6]
		jz	short loc_74DA
		xor	ax, ax
		push	ax
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+0Ch]
		push	[bp+var_6]
		push	[bp+var_8]
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+0Ah]
		push	word ptr es:[bx+8]
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+6]
		push	word ptr es:[bx+4]
		call	sub_5BE7
		add	sp, 10h
		or	ax, ax
		jz	short loc_74E2

loc_74DA:
		mov	dx, word ptr [bp+var_4+2]
		mov	ax, word ptr [bp+var_4]
		jmp	short loc_74F6
; ---------------------------------------------------------------------------

loc_74E2:
		add	word ptr [bp+var_4], 10h

loc_74E6:
		les	bx, [bp+var_4]
		mov	ax, es:[bx]
		or	ax, es:[bx+2]
		jnz	short loc_7491
		xor	dx, dx
		xor	ax, ax

loc_74F6:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_7478	endp

; ---------------------------------------------------------------------------
		db 2 dup(2Ah), 42h, 2 dup(43h),	78h, 68h, 31h

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

__ExceptionHandler proc	far

var_38		= word ptr -38h
var_36		= word ptr -36h
var_34		= word ptr -34h
var_32		= word ptr -32h
var_30		= word ptr -30h
var_2E		= word ptr -2Eh
var_2C		= word ptr -2Ch
var_2A		= word ptr -2Ah
var_28		= word ptr -28h
var_26		= word ptr -26h
var_24		= dword	ptr -24h
var_20		= dword	ptr -20h
var_1C		= word ptr -1Ch
var_1A		= word ptr -1Ah
var_18		= word ptr -18h
var_16		= word ptr -16h
var_14		= word ptr -14h
var_12		= word ptr -12h
var_10		= dword	ptr -10h
var_C		= dword	ptr -0Ch
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h
arg_E		= word ptr  14h
arg_10		= word ptr  16h
arg_12		= word ptr  18h
arg_14		= word ptr  1Ah

		push	bp
		mov	bp, sp
		sub	sp, 38h
		push	si
		push	di
		mov	ax, [bp+arg_0]
		mov	[bp+var_2], ax
		mov	ax, [bp+arg_4]
		mov	[bp+var_4], ax
		mov	dx, [bp+arg_8]
		mov	ax, [bp+arg_6]
		mov	[bp+var_6], dx
		mov	[bp+var_8], ax
		mov	bx, [bp+var_2]
		mov	dx, ss:[bx+arg_14]
		mov	ax, ss:[bx+arg_12]
		mov	word ptr [bp+var_C+2], dx
		mov	word ptr [bp+var_C], ax
		mov	bx, [bp+var_4]
		mov	dx, ss:[bx+arg_2]
		mov	ax, ss:[bx+arg_0]
		mov	word ptr [bp+var_10+2],	dx
		mov	word ptr [bp+var_10], ax
		les	bx, [bp+var_10]
		mov	ax, [bp+var_4]
		sub	ax, es:[bx+4]
		mov	[bp+var_16], ax
		mov	bx, [bp+var_4]
		mov	ax, ss:[bx+arg_4]
		mov	[bp+var_18], ax
		les	bx, ss:16h
		mov	si, [bp+var_4]
		mov	ax, ss:[si+arg_8]
		mov	es:[bx+6], ax
		mov	[bp+var_1A], ax
		les	bx, ss:16h
		mov	si, [bp+var_4]
		mov	ax, ss:[si+arg_A]
		mov	es:[bx+8], ax
		mov	[bp+var_1C], ax
		mov	bx, [bp+var_2]
		test	byte ptr ss:[bx+4], 6
		jnz	short loc_7590
		jmp	loc_7638
; ---------------------------------------------------------------------------

loc_7590:
		xor	ax, ax
		push	ax
		push	[bp+var_4]
		call	sub_7263
		pop	cx
		pop	cx
		mov	bx, [bp+var_2]
		cmp	word ptr ss:[bx+2], 0EEFh
		jz	short loc_75A9
		jmp	loc_786B
; ---------------------------------------------------------------------------

loc_75A9:
		cmp	word ptr ss:[bx], 0FACEh
		jz	short loc_75B3
		jmp	loc_786B
; ---------------------------------------------------------------------------

loc_75B3:
		les	bx, [bp+var_10]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_20+2],	dx
		mov	word ptr [bp+var_20], ax
		mov	ax, word ptr [bp+var_20]
		or	ax, word ptr [bp+var_20+2]
		jnz	short loc_75CE
		jmp	loc_786B
; ---------------------------------------------------------------------------

loc_75CE:
		jmp	short loc_760C
; ---------------------------------------------------------------------------

loc_75D0:
		mov	ax, 1
		push	ax
		les	bx, [bp+var_C]
		push	word ptr es:[bx+0Ch]
		les	bx, [bp+var_20]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx]
		les	bx, [bp+var_C]
		push	word ptr es:[bx+0Ah]
		push	word ptr es:[bx+8]
		les	bx, [bp+var_C]
		push	word ptr es:[bx+6]
		push	word ptr es:[bx+4]
		call	sub_5BE7
		add	sp, 10h
		or	ax, ax
		jz	short loc_7608
		jmp	loc_786B
; ---------------------------------------------------------------------------

loc_7608:
		add	word ptr [bp+var_20], 4

loc_760C:
		les	bx, [bp+var_20]
		mov	ax, es:[bx]
		or	ax, es:[bx+2]
		jnz	short loc_75D0
		mov	ax, ss:14h
		mov	word ptr [bp+var_24+2],	ax
		mov	bx, [bp+var_4]
		mov	ax, ss:[bx]
		mov	ss:14h,	ax
		nop
		push	cs
		call	near ptr ___call_unexpected
; ---------------------------------------------------------------------------
		mov	ax, word ptr [bp+var_24+2]
		mov	ss:14h,	ax
		jmp	loc_786B
; ---------------------------------------------------------------------------

loc_7638:
		mov	bx, [bp+var_4]
		mov	ax, ss:[bx+arg_6]
		jmp	loc_785F
; ---------------------------------------------------------------------------

loc_7642:
		mov	ax, [bp+var_12]
		mov	word ptr [bp+var_20], ax
		les	bx, [bp+var_10]
		add	bx, word ptr [bp+var_20]
		mov	ax, es:[bx]
		mov	[bp+var_14], ax
		add	word ptr [bp+var_20], 2
		les	bx, [bp+var_10]
		add	bx, word ptr [bp+var_20]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_20+2],	ax
		add	word ptr [bp+var_20], 2
		mov	bx, word ptr [bp+var_20+2]
		cmp	bx, 5
		jbe	short loc_7673
		jmp	loc_785C
; ---------------------------------------------------------------------------

loc_7673:
		add	bx, bx
		jmp	cs:off_7874[bx]

loc_767A:
		mov	bx, [bp+var_2]
		cmp	word ptr ss:[bx+2], 0EEFh
		jz	short loc_7688
		jmp	loc_785C
; ---------------------------------------------------------------------------

loc_7688:
		cmp	word ptr ss:[bx], 0FACEh
		jz	short loc_7692
		jmp	loc_785C
; ---------------------------------------------------------------------------

loc_7692:
		les	bx, [bp+var_10]
		add	bx, word ptr [bp+var_20]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	[bp+var_26], dx
		mov	[bp+var_28], ax
		add	word ptr [bp+var_20], 4
		push	word ptr [bp+var_C+2]
		push	word ptr [bp+var_C]
		push	[bp+var_26]
		push	[bp+var_28]
		call	sub_7478
		add	sp, 8
		mov	word ptr [bp+var_24+2],	dx
		mov	word ptr [bp+var_24], ax
		mov	ax, word ptr [bp+var_24]
		or	ax, word ptr [bp+var_24+2]
		jnz	short loc_76CC
		jmp	loc_785C
; ---------------------------------------------------------------------------

loc_76CC:
		les	bx, [bp+var_C]
		mov	ax, [bp+var_4]
		mov	es:[bx+24h], ax
		les	bx, [bp+var_C]
		mov	dx, word ptr [bp+var_24+2]
		mov	ax, word ptr [bp+var_24]
		mov	es:[bx+28h], dx
		mov	es:[bx+26h], ax
		les	bx, [bp+var_C]
		mov	ax, word ptr [bp+var_20]
		mov	es:[bx+2Ah], ax
		mov	ax, [bp+var_12]
		mov	[bp+var_30], ax
		mov	ax, word ptr [bp+var_20]
		mov	[bp+var_2E], ax
		les	bx, [bp+var_24]

loc_7700:
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	[bp+var_2A], dx
		mov	[bp+var_2C], ax
		push	[bp+var_2]
		push	[bp+var_4]
		push	cs
		call	near ptr __Global_unwind
		pop	cx
		pop	cx
		push	[bp+var_30]
		push	[bp+var_4]
		call	sub_7263
		pop	cx
		pop	cx
		mov	bx, [bp+var_4]
		mov	ax, [bp+var_2E]
		mov	ss:[bx+arg_6], ax
		cmp	word ptr [bp+var_20+2],	3
		jnz	short loc_7752
		push	[bp+var_16]
		push	[bp+var_26]
		push	[bp+var_28]
		push	word ptr [bp+var_C+2]
		push	word ptr [bp+var_C]
		push	[bp+var_4]
		push	word ptr [bp+var_24+2]
		push	word ptr [bp+var_24]
		call	sub_6FBD
		add	sp, 10h

loc_7752:
		mov	dx, [bp+var_2A]
		mov	ax, [bp+var_2C]
		mov	si, [bp+var_1C]
		mov	ds, [bp+var_1A]
		mov	bx, [bp+var_18]
		mov	cx, [bp+var_16]
		push	cs
		call	near ptr ___JumpToCatch__
		jmp	loc_785C
; ---------------------------------------------------------------------------

loc_776B:
		mov	bx, [bp+var_2]
		cmp	word ptr ss:[bx+2], 0EEFh
		jnz	short loc_7780
		cmp	word ptr ss:[bx], 0FACEh
		jnz	short loc_7780
		jmp	loc_785C
; ---------------------------------------------------------------------------

loc_7780:
					; __ExceptionHandler+277j
		mov	ax, [bp+var_2]
		mov	[bp+var_36], ax
		mov	dx, [bp+var_6]
		mov	ax, [bp+var_8]
		mov	[bp+var_32], dx
		mov	[bp+var_34], ax
		mov	bx, [bp+var_2]
		mov	dx, ss:[bx+2]
		mov	ax, ss:[bx]
		mov	bx, [bp+var_4]
		mov	ss:[bx+arg_10],	dx
		mov	ss:[bx+arg_E], ax
		lea	ax, [bp+var_36]
		mov	bx, [bp+var_4]
		mov	ss:[bx+arg_12],	ax
		les	bx, [bp+var_10]
		add	bx, word ptr [bp+var_20]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr dword_FC5C+2, dx
		mov	word ptr dword_FC5C, ax
		mov	ax, ds
		mov	es, ax
		assume es:dseg
		push	si
		mov	si, [bp+var_1C]
		push	ds
		mov	ds, [bp+var_1A]
		push	bp
		mov	bp, [bp+var_16]
		call	es:dword_FC5C
		pop	bp
		pop	ds
		pop	si
		mov	[bp+var_38], ax
		jmp	short loc_7817
; ---------------------------------------------------------------------------

loc_77E2:
		mov	bx, [bp+var_2]
		cmp	word ptr ss:[bx+2], 0EEFh
		jnz	short loc_77F6
		cmp	word ptr ss:[bx], 0FACEh
		jnz	short loc_77F6
		jmp	short loc_785C
; ---------------------------------------------------------------------------

loc_77F6:
					; __ExceptionHandler+2EEj
		mov	bx, [bp+var_2]
		mov	dx, ss:[bx+2]
		mov	ax, ss:[bx]
		mov	bx, [bp+var_4]
		mov	ss:[bx+arg_10],	dx
		mov	ss:[bx+arg_E], ax
		les	bx, [bp+var_10]
		assume es:nothing
		add	bx, word ptr [bp+var_20]
		mov	ax, es:[bx]
		mov	[bp+var_38], ax

loc_7817:
		cmp	[bp+var_38], 0
		jge	short loc_7835
		mov	bx, [bp+var_2]
		test	byte ptr ss:[bx+4], 1
		jz	short loc_7831
		mov	bx, [bp+var_4]
		mov	ax, [bp+var_14]
		mov	ss:[bx+arg_6], ax

loc_7831:
		xor	ax, ax
		jmp	short loc_786E
; ---------------------------------------------------------------------------

loc_7835:
		cmp	[bp+var_38], 0
		jnz	short loc_783D
		jmp	short loc_785C
; ---------------------------------------------------------------------------

loc_783D:
		mov	bx, [bp+var_4]
		mov	ss:[bx+arg_12],	0
		add	word ptr [bp+var_20], 4
		mov	ax, [bp+var_14]
		mov	[bp+var_2E], ax
		mov	[bp+var_30], ax
		les	bx, [bp+var_10]
		add	bx, word ptr [bp+var_20]
		jmp	loc_7700
; ---------------------------------------------------------------------------

loc_785C:
					; __ExceptionHandler+171j ...
		mov	ax, [bp+var_14]

loc_785F:
		mov	[bp+var_12], ax
		cmp	[bp+var_12], 0
		jz	short loc_786B
		jmp	loc_7642
; ---------------------------------------------------------------------------

loc_786B:
					; __ExceptionHandler+ACj ...
		mov	ax, 1

loc_786E:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__ExceptionHandler endp

; ---------------------------------------------------------------------------
off_7874	dw offset loc_785C
		dw offset loc_776B
		dw offset loc_77E2
		dw offset loc_767A
		dw offset loc_785C
		dw offset loc_785C
		db 4 dup(0), 13h, 79h
		dw seg seg000
		db 14h dup(0), 23h, 79h
		dw seg seg000
		db 14h dup(0), 0E2h, 0FFh, 2 dup(0), 3,	0, 98h,	78h
		dw seg seg000
		dw 0
		db 4, 0, 6, 0, 3, 0, 80h, 78h
		dw seg seg000
		db 6, 0, 4, 0

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_78CE	proc far

var_1E		= word ptr -1Eh
var_12		= word ptr -12h
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= dword	ptr  0Ah
arg_8		= word ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 1Eh
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 78B0h
		nop
		push	cs
		call	near ptr ___InitExceptBlocks
		mov	[bp+var_12], 6
		mov	[bp+var_12], 12h
		push	[bp+arg_8]
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+22h]
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+20h]
		push	word ptr es:[bx+1Eh]
		push	[bp+arg_2]
		push	[bp+arg_0]
		call	sub_603A
		add	sp, 0Ch
		mov	[bp+var_12], 6
		jmp	short loc_791C
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr ___call_terminate
; ---------------------------------------------------------------------------
		push	cs
		call	near ptr @_CatchCleanup$qv ; _CatchCleanup(void)

loc_791C:
		mov	[bp+var_12], 0
		jmp	short loc_792C
; ---------------------------------------------------------------------------
		nop
		push	cs
		call	near ptr ___call_terminate
; ---------------------------------------------------------------------------
		push	cs
		call	near ptr @_CatchCleanup$qv ; _CatchCleanup(void)

loc_792C:
		push	[bp+var_1E]
		nop
		push	cs
		call	near ptr ___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_78CE	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_793A	proc far
					; sub_79BB+162p ...

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= dword	ptr  0Ah
arg_8		= word ptr  0Eh
arg_C		= word ptr  12h
arg_E		= word ptr  14h
arg_10		= word ptr  16h

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	cx, [bp+arg_C]
		jmp	short loc_79A9
; ---------------------------------------------------------------------------

loc_7947:
		les	bx, [bp+arg_4]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		add	ax, es:[bx+4]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		cmp	[bp+arg_E], 0
		jz	short loc_796F
		les	bx, [bp+var_4]
		mov	ax, es:[bx]
		mov	dx, word ptr [bp+var_4+2]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax

loc_796F:
		les	bx, [bp+arg_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		test	byte ptr es:[bx+8], 2
		jz	short loc_79A9
		push	[bp+arg_10]
		xor	ax, ax
		push	ax
		xor	ax, ax
		push	ax
		push	cx
		push	word ptr [bp+var_8+2]
		push	word ptr [bp+var_8]
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4]
		nop
		push	cs
		call	near ptr sub_79BB
		add	sp, 10h
		xor	cx, cx

loc_79A9:
		sub	word ptr [bp+arg_4], 8
		mov	ax, word ptr [bp+arg_4]
		cmp	ax, [bp+arg_8]
		jnb	short loc_7947
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_793A	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_79BB	proc far
					; sub_79BB+25Ep ...

var_2A		= word ptr -2Ah
var_28		= word ptr -28h
var_26		= word ptr -26h
var_24		= word ptr -24h
var_22		= dword	ptr -22h
var_1E		= word ptr -1Eh
var_1C		= word ptr -1Ch
var_1A		= word ptr -1Ah
var_18		= dword	ptr -18h
var_14		= word ptr -14h
var_12		= word ptr -12h
var_10		= dword	ptr -10h
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= dword	ptr -8
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= dword	ptr  0Ah
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h
arg_C		= word ptr  12h
arg_E		= word ptr  14h

		push	bp
		mov	bp, sp
		sub	sp, 2Ah
		push	si
		push	di
		cmp	[bp+arg_C], 0
		jz	short loc_79D2
		les	bx, [bp+arg_4]
		mov	ax, es:[bx+1Ah]
		jmp	short loc_79D9
; ---------------------------------------------------------------------------

loc_79D2:
		les	bx, [bp+arg_4]
		mov	ax, es:[bx+1Ch]

loc_79D9:
		mov	[bp+var_1A], 0
		mov	[bp+var_1C], ax
		mov	ax, [bp+arg_8]
		or	ax, [bp+arg_A]
		jz	short loc_79FB
		mov	dx, [bp+arg_A]
		mov	ax, [bp+arg_8]
		cmp	dx, [bp+var_1A]
		jb	short loc_7A14
		jnz	short loc_79FB
		cmp	ax, [bp+var_1C]
		jb	short loc_7A14

loc_79FB:
		push	[bp+arg_C]
		push	word ptr [bp+arg_4+2]
		push	word ptr [bp+arg_4]
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_78CE
		add	sp, 0Ah
		jmp	loc_7C80
; ---------------------------------------------------------------------------

loc_7A14:
		mov	dx, [bp+arg_A]
		mov	ax, [bp+arg_8]
		mov	[bp+var_1A], dx
		mov	[bp+var_1C], ax
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+0Ch]
		mov	word ptr [bp+var_10+2],	dx
		mov	word ptr [bp+var_10], ax
		mov	[bp+var_A], dx
		mov	[bp+var_C], ax
		cmp	[bp+arg_C], 0
		jz	short loc_7AAD

loc_7A3F:
		les	bx, [bp+var_10]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	[bp+var_1E], dx
		mov	word ptr [bp+var_22+2],	ax
		mov	ax, word ptr [bp+var_22+2]
		or	ax, [bp+var_1E]
		jz	short loc_7AAD
		les	bx, [bp+var_22+2]
		test	byte ptr es:[bx+8], 2
		jz	short loc_7AA7
		les	bx, [bp+var_22+2]
		mov	bx, es:[bx+1Ch]
		xor	ax, ax
		cmp	ax, [bp+var_1A]
		jb	short loc_7AA0
		jnz	short loc_7A76
		cmp	bx, [bp+var_1C]
		jb	short loc_7AA0

loc_7A76:
		push	[bp+arg_E]
		mov	ax, 1
		push	ax
		push	[bp+var_1C]
		push	[bp+var_A]
		push	[bp+var_C]
		mov	ax, word ptr [bp+var_10]
		add	ax, 8
		push	word ptr [bp+var_10+2]
		push	ax

loc_7A90:
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_793A
		add	sp, 12h
		jmp	loc_7C80
; ---------------------------------------------------------------------------

loc_7AA0:
		sub	[bp+var_1C], bx
		sbb	[bp+var_1A], 0

loc_7AA7:
		add	word ptr [bp+var_10], 8
		jmp	short loc_7A3F
; ---------------------------------------------------------------------------

loc_7AAD:
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+0Ah]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax

loc_7AC6:
		les	bx, [bp+var_8]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	[bp+var_1E], dx
		mov	word ptr [bp+var_22+2],	ax
		mov	ax, word ptr [bp+var_22+2]
		or	ax, [bp+var_1E]
		jz	short loc_7B3C
		les	bx, [bp+var_22+2]
		test	byte ptr es:[bx+8], 2
		jz	short loc_7B36
		les	bx, [bp+var_22+2]
		mov	bx, es:[bx+1Ch]
		xor	ax, ax
		cmp	ax, [bp+var_1A]
		jb	short loc_7B2F
		jnz	short loc_7AFD
		cmp	bx, [bp+var_1C]
		jb	short loc_7B2F

loc_7AFD:
		push	[bp+arg_E]
		xor	ax, ax
		push	ax
		push	[bp+var_1C]
		push	[bp+var_2]
		push	[bp+var_4]
		mov	ax, word ptr [bp+var_8]
		add	ax, 8
		push	word ptr [bp+var_8+2]
		push	ax
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_793A
		add	sp, 12h
		cmp	[bp+arg_C], 0
		jnz	short loc_7B2C
		jmp	loc_7C80
; ---------------------------------------------------------------------------

loc_7B2C:
		jmp	loc_7C60
; ---------------------------------------------------------------------------

loc_7B2F:
					; sub_79BB+140j
		sub	[bp+var_1C], bx
		sbb	[bp+var_1A], 0

loc_7B36:
		add	word ptr [bp+var_8], 8
		jmp	short loc_7AC6
; ---------------------------------------------------------------------------

loc_7B3C:
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+24h]
		mov	word ptr [bp+var_18+2],	dx
		mov	word ptr [bp+var_18], ax
		mov	[bp+var_12], dx
		mov	[bp+var_14], ax

loc_7B55:
		les	bx, [bp+var_18]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_22+2],	dx
		mov	word ptr [bp+var_22], ax
		mov	[bp+var_1E], 1
		les	bx, [bp+var_22]
		test	byte ptr es:[bx+3], 4
		jz	short loc_7B8F
		les	bx, [bp+var_22]
		mov	ax, es:[bx+0Ah]
		mov	[bp+var_1E], ax
		les	bx, [bp+var_22]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_22+2],	dx
		mov	word ptr [bp+var_22], ax

loc_7B8F:
		les	bx, [bp+var_22]
		mov	ax, es:[bx+1Ah]
		imul	[bp+var_1E]
		mov	bx, ax
		xor	ax, ax
		cmp	ax, [bp+var_1A]
		ja	short loc_7BB3
		jb	short loc_7BA9
		cmp	bx, [bp+var_1C]
		jnb	short loc_7BB3

loc_7BA9:
		sub	[bp+var_1C], bx
		sbb	[bp+var_1A], 0
		jmp	loc_7C79
; ---------------------------------------------------------------------------

loc_7BB3:
					; sub_79BB+1ECj ...
		les	bx, [bp+var_18]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		add	ax, es:[bx+4]
		mov	[bp+var_24], dx
		mov	[bp+var_26], ax
		les	bx, [bp+var_18]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	[bp+var_28], dx
		mov	[bp+var_2A], ax
		cmp	[bp+var_1E], 1
		jbe	short loc_7BFF
		push	[bp+arg_E]
		push	[bp+var_1A]
		push	[bp+var_1C]
		les	bx, [bp+var_18]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx]
		push	[bp+var_24]
		push	[bp+var_26]
		nop
		push	cs
		call	near ptr sub_7C86
		add	sp, 0Eh
		jmp	short loc_7C1F
; ---------------------------------------------------------------------------

loc_7BFF:
		push	[bp+arg_E]
		mov	ax, 1
		push	ax
		push	[bp+var_1A]
		push	[bp+var_1C]
		push	[bp+var_28]
		push	[bp+var_2A]
		push	[bp+var_24]
		push	[bp+var_26]
		push	cs
		call	near ptr sub_79BB
		add	sp, 10h

loc_7C1F:
		mov	[bp+var_1A], 0
		mov	[bp+var_1C], 0
		sub	word ptr [bp+var_18], 6
		mov	ax, word ptr [bp+var_18]
		cmp	ax, [bp+var_14]
		jb	short loc_7C38
		jmp	loc_7BB3
; ---------------------------------------------------------------------------

loc_7C38:
		push	[bp+arg_E]
		xor	ax, ax
		push	ax
		xor	ax, ax
		push	ax
		push	[bp+var_2]
		push	[bp+var_4]
		push	word ptr [bp+var_8+2]
		push	word ptr [bp+var_8]
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_793A
		add	sp, 12h
		cmp	[bp+arg_C], 0
		jz	short loc_7C80

loc_7C60:
		push	[bp+arg_E]
		mov	ax, 1
		push	ax
		xor	ax, ax
		push	ax
		push	[bp+var_A]
		push	[bp+var_C]
		push	word ptr [bp+var_10+2]
		push	word ptr [bp+var_10]
		jmp	loc_7A90
; ---------------------------------------------------------------------------

loc_7C79:
		add	word ptr [bp+var_18], 6
		jmp	loc_7B55
; ---------------------------------------------------------------------------

loc_7C80:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_79BB	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_7C86	proc far
					; sub_7E39+316p

var_E		= word ptr -0Eh
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h
arg_C		= word ptr  12h

		push	bp
		mov	bp, sp
		sub	sp, 0Eh
		push	si
		push	di
		mov	dx, [bp+arg_6]
		mov	ax, [bp+arg_4]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	ax, es:[bx+0Ah]
		mov	[bp+var_6], ax
		les	bx, [bp+var_4]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	ax, es:[bx+1Ah]
		mov	[bp+var_8], 0
		mov	[bp+var_A], ax
		mov	ax, [bp+arg_8]
		or	ax, [bp+arg_A]
		jnz	short loc_7CE0
		mov	bx, [bp+var_6]
		xor	cx, cx
		mov	dx, [bp+var_8]
		mov	ax, [bp+var_A]
		call	N_LXMUL@
		mov	[bp+arg_A], dx
		mov	[bp+arg_8], ax

loc_7CE0:
		push	[bp+var_8]
		push	[bp+var_A]
		push	[bp+arg_A]
		push	[bp+arg_8]
		call	near ptr N_LUDIV@
		mov	[bp+var_C], dx
		mov	[bp+var_E], ax
		mov	cx, [bp+var_C]
		mov	bx, [bp+var_E]
		mov	dx, [bp+var_8]
		mov	ax, [bp+var_A]
		call	N_LXMUL@
		sub	[bp+arg_8], ax
		sbb	[bp+arg_A], dx
		les	bx, [bp+var_4]
		mov	bx, es:[bx]
		xor	cx, cx
		mov	dx, [bp+var_C]
		mov	ax, [bp+var_E]
		call	N_LXMUL@
		mov	dx, [bp+arg_2]
		add	ax, [bp+arg_0]
		mov	[bp+arg_2], dx
		mov	[bp+arg_0], ax
		mov	ax, [bp+arg_8]
		or	ax, [bp+arg_A]
		jz	short loc_7D70
		push	[bp+arg_C]
		mov	ax, 1
		push	ax
		push	[bp+arg_A]
		push	[bp+arg_8]
		jmp	short loc_7D5D
; ---------------------------------------------------------------------------

loc_7D3E:
		les	bx, [bp+var_4]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		sub	ax, es:[bx]
		mov	[bp+arg_2], dx
		mov	[bp+arg_0], ax
		push	[bp+arg_C]
		mov	ax, 1
		push	ax
		push	[bp+var_8]
		push	[bp+var_A]

loc_7D5D:
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4]
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr sub_79BB
		add	sp, 10h

loc_7D70:
		mov	ax, [bp+var_C]
		mov	dx, [bp+var_E]
		sub	[bp+var_E], 1
		sbb	[bp+var_C], 0
		or	dx, ax
		jnz	short loc_7D3E
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_7C86	endp ; sp-analysis failed


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_7D88	proc far
					; sub_7E39+2E4p

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	cx, [bp+arg_4]
		mov	bx, cx
		mov	dx, ss:[bx+2]
		mov	ax, ss:[bx]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		mov	ax, es:[bx+8]
		and	ax, 50h
		cmp	ax, 50h	; 'P'
		jnz	short loc_7E2D
		les	bx, [bp+var_4]
		cmp	word ptr es:[bx+6], 0FFFFh
		jz	short loc_7E2D
		les	bx, [bp+var_4]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		add	ax, es:[bx+6]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_4]
		test	byte ptr es:[bx+9], 10h
		jz	short loc_7DE7
		les	bx, [bp+var_8]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_8+2], dx
		jmp	short loc_7DF0
; ---------------------------------------------------------------------------

loc_7DE7:
		les	bx, [bp+var_8]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_8+2], ds

loc_7DF0:
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		sub	ax, es:[bx-4]
		mov	[bp+arg_2], dx
		mov	[bp+arg_0], ax
		les	bx, [bp+var_8]
		mov	dx, word ptr [bp+var_8+2]
		mov	ax, word ptr [bp+var_8]
		sub	ax, es:[bx-2]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		mov	dx, es:[bx-6]
		mov	ax, es:[bx-8]
		mov	bx, cx
		mov	ss:[bx+2], dx
		mov	ss:[bx], ax

loc_7E2D:
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_7D88	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_7E39	proc near

driver		= dword	ptr -20h
var_1C		= dword	ptr -1Ch
var_18		= word ptr -18h
var_16		= dword	ptr -16h
var_12		= dword	ptr -12h
var_E		= word ptr -0Eh
var_C		= dword	ptr -0Ch
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_16		= word ptr  1Ah
arg_18		= word ptr  1Ch

		push	bp
		mov	bp, sp
		sub	sp, 20h
		push	si
		push	di
		mov	[bp+var_E], 0
		cmp	word ptr [bp+arg_0], 0FFFFh
		jnz	short loc_7E4F
		jmp	loc_823C
; ---------------------------------------------------------------------------

loc_7E4F:
		mov	bx, [bp+arg_8]
		mov	dx, ss:[bx+arg_18]
		mov	ax, ss:[bx+arg_16]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		sub	ax, [bp+var_4]
		sbb	dx, [bp+var_2]
		mov	[bp+var_6], dx
		mov	[bp+var_8], ax
		mov	dx, [bp+arg_6]
		mov	ax, [bp+arg_4]
		sub	[bp+var_8], ax
		sbb	[bp+var_6], dx
		les	bx, [bp+arg_0]
		test	byte ptr es:[bx+4], 20h
		jz	short loc_7EA8
		les	bx, [bp+arg_0]
		les	bx, es:[bx]
		les	bx, es:[bx+6]
		mov	ax, es:[bx+1Ah]
		mov	[bp+var_6], 0
		mov	[bp+var_8], ax

loc_7EA8:
		les	bx, [bp+arg_0]
		test	byte ptr es:[bx+5], 1
		jz	short loc_7EBF
		les	bx, [bp+arg_0]
		les	bx, es:[bx]
		mov	ax, es:[bx+1Ch]
		jmp	loc_823E
; ---------------------------------------------------------------------------

loc_7EBF:
		cmp	[bp+var_6], 0
		jg	short loc_7EF1
		jnz	short loc_7ECD
		cmp	[bp+var_8], 0
		ja	short loc_7EF1

loc_7ECD:
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+4]
		and	ax, 3
		cmp	ax, 3
		jz	short loc_7EDF
		jmp	loc_823C
; ---------------------------------------------------------------------------

loc_7EDF:
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		mov	word ptr [bp+var_C+2], dx
		mov	word ptr [bp+var_C], ax
		inc	[bp+var_E]
		jmp	loc_8056
; ---------------------------------------------------------------------------

loc_7EF1:
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		mov	word ptr [bp+var_C+2], dx
		mov	word ptr [bp+var_C], ax

loc_7EFD:
		les	bx, [bp+var_C]
		mov	ax, es:[bx]
		or	ax, es:[bx+2]
		jnz	short loc_7F10
		sub	word ptr [bp+var_C], 0Ah
		jmp	loc_8056
; ---------------------------------------------------------------------------

loc_7F10:
		les	bx, [bp+var_C]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_16+2],	dx
		mov	word ptr [bp+var_16], ax
		mov	word ptr [bp+var_12+2],	dx
		mov	word ptr [bp+var_12], ax
		mov	[bp+var_18], 1
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+2], 10h
		jnz	short loc_7F38
		jmp	loc_8002
; ---------------------------------------------------------------------------

loc_7F38:
		les	bx, [bp+var_12]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_16+2],	dx
		mov	word ptr [bp+var_16], ax
		mov	word ptr [bp+var_12+2],	dx
		mov	word ptr [bp+var_12], ax
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+2], 2
		jnz	short loc_7F5C
		jmp	loc_8002
; ---------------------------------------------------------------------------

loc_7F5C:
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+8], 20h
		jnz	short loc_7F69
		jmp	loc_8002
; ---------------------------------------------------------------------------

loc_7F69:
		les	bx, [bp+var_C]
		test	byte ptr es:[bx+4], 8
		jnz	short loc_7F76
		jmp	loc_8002
; ---------------------------------------------------------------------------

loc_7F76:
		les	bx, [bp+var_C]
		test	byte ptr es:[bx+4], 4
		jz	short loc_7F8F
		les	bx, [bp+var_C]
		mov	ax, es:[bx+6]
		add	ax, [bp+arg_A]
		mov	word ptr [bp+var_1C+2],	ss
		jmp	short loc_7F9D
; ---------------------------------------------------------------------------

loc_7F8F:
		les	bx, [bp+var_C]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_1C+2],	dx

loc_7F9D:
		mov	word ptr [bp+var_1C], ax
		mov	dx, word ptr [bp+var_1C+2]
		mov	ax, word ptr [bp+var_1C]
		mov	word ptr [bp+driver+2],	dx
		mov	word ptr [bp+driver], ax
		les	bx, [bp+var_C]
		test	byte ptr es:[bx+4], 80h
		jz	short loc_7FC5
		les	bx, [bp+driver]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_1C+2],	dx
		jmp	short loc_7FCE
; ---------------------------------------------------------------------------

loc_7FC5:
		les	bx, [bp+driver]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_1C+2],	ds

loc_7FCE:
		mov	word ptr [bp+var_1C], ax
		les	bx, [bp+var_C]
		test	byte ptr es:[bx+4], 40h
		jz	short loc_7FDF
		add	word ptr [bp+var_1C], 4

loc_7FDF:
		lea	ax, [bp+var_12]
		push	ax
		push	word ptr [bp+var_1C+2]
		push	word ptr [bp+var_1C]
		push	cs
		call	near ptr sub_7D88
		add	sp, 6
		mov	word ptr [bp+var_1C+2],	dx
		mov	word ptr [bp+var_1C], ax
		mov	dx, word ptr [bp+var_12+2]
		mov	ax, word ptr [bp+var_12]
		mov	word ptr [bp+var_16+2],	dx
		mov	word ptr [bp+var_16], ax

loc_8002:
					; sub_7E39+120j ...
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+3], 4
		jz	short loc_8027
		les	bx, [bp+var_16]
		mov	ax, es:[bx+0Ah]
		mov	[bp+var_18], ax
		les	bx, [bp+var_16]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_16+2],	dx
		mov	word ptr [bp+var_16], ax

loc_8027:
		les	bx, [bp+var_16]
		mov	ax, es:[bx+1Ah]
		imul	[bp+var_18]
		mov	[bp+var_18], ax
		mov	ax, [bp+var_18]
		xor	dx, dx
		cmp	dx, [bp+var_6]
		jb	short loc_8045
		jnz	short loc_8056
		cmp	ax, [bp+var_8]
		jnb	short loc_8056

loc_8045:
		mov	ax, [bp+var_18]
		sub	[bp+var_8], ax
		sbb	[bp+var_6], 0
		add	word ptr [bp+var_C], 0Ah
		jmp	loc_7EFD
; ---------------------------------------------------------------------------

loc_8056:
		les	bx, [bp+var_C]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_12+2],	dx
		mov	word ptr [bp+var_12], ax
		les	bx, [bp+var_C]
		mov	ax, es:[bx+4]
		mov	word ptr [bp+var_16+2],	ax
		test	byte ptr [bp+var_16+2],	4
		jz	short loc_8085
		les	bx, [bp+var_C]
		mov	ax, es:[bx+6]
		add	ax, [bp+arg_A]
		mov	word ptr [bp+var_16], ss
		jmp	short loc_8093
; ---------------------------------------------------------------------------

loc_8085:
		les	bx, [bp+var_C]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_16], dx

loc_8093:
		mov	[bp+var_18], ax
		test	byte ptr [bp+var_16+2],	11h
		jnz	short loc_809F
		jmp	loc_8129
; ---------------------------------------------------------------------------

loc_809F:
		les	bx, [bp+var_12]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_12+2],	dx
		mov	word ptr [bp+var_12], ax
		mov	dx, word ptr [bp+var_16]
		mov	ax, [bp+var_18]
		mov	word ptr [bp+var_1C+2],	dx
		mov	word ptr [bp+var_1C], ax
		test	byte ptr [bp+var_16+2],	80h
		jz	short loc_80D1
		les	bx, [bp+var_1C]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_16], dx
		jmp	short loc_80DA
; ---------------------------------------------------------------------------

loc_80D1:
		les	bx, [bp+var_1C]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_16], ds

loc_80DA:
		mov	[bp+var_18], ax
		mov	dx, word ptr [bp+var_16]
		mov	ax, [bp+var_18]
		mov	word ptr [bp+driver+2],	dx
		mov	word ptr [bp+driver], ax
		mov	ax, word ptr [bp+var_16+2]
		and	ax, 48h
		cmp	ax, 40h	; '@'
		jnz	short loc_80F8
		add	[bp+var_18], 4

loc_80F8:
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+2], 2
		jz	short loc_8129
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+8], 20h
		jz	short loc_8129
		test	byte ptr [bp+var_16+2],	8
		jz	short loc_8129
		lea	ax, [bp+var_12]
		push	ax
		push	word ptr [bp+var_16]
		push	[bp+var_18]
		push	cs
		call	near ptr sub_7D88
		add	sp, 6
		mov	word ptr [bp+var_16], dx
		mov	[bp+var_18], ax

loc_8129:
					; sub_7E39+2C7j ...
		cmp	[bp+var_E], 0
		jnz	short loc_8177
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+3], 4
		jz	short loc_8157
		push	[bp+arg_A]
		push	[bp+var_6]
		push	[bp+var_8]
		push	word ptr [bp+var_12+2]
		push	word ptr [bp+var_12]
		push	word ptr [bp+var_16]
		push	[bp+var_18]
		push	cs
		call	near ptr sub_7C86
		add	sp, 0Eh
		jmp	short loc_8177
; ---------------------------------------------------------------------------

loc_8157:
		push	[bp+arg_A]
		mov	ax, 1
		push	ax
		push	[bp+var_6]
		push	[bp+var_8]
		push	word ptr [bp+var_12+2]
		push	word ptr [bp+var_12]
		push	word ptr [bp+var_16]
		push	[bp+var_18]
		push	cs
		call	near ptr sub_79BB
		add	sp, 10h

loc_8177:
					; sub_7E39+31Cj
		mov	ax, word ptr [bp+var_16+2]
		and	ax, 3
		cmp	ax, 3
		jz	short loc_8185
		jmp	loc_8223
; ---------------------------------------------------------------------------

loc_8185:
		mov	ax, word ptr [bp+var_16+2]
		and	ax, 48h
		cmp	ax, 48h	; 'H'
		jnz	short loc_8194
		sub	word ptr [bp+driver], 4

loc_8194:
		les	bx, [bp+var_12]
		test	byte ptr es:[bx+3], 4
		jz	short loc_81E3
		les	bx, [bp+var_12]
		mov	dx, es:[bx+8]
		mov	ax, es:[bx+6]
		mov	word ptr [bp+var_12+2],	dx
		mov	word ptr [bp+var_12], ax
		les	bx, [bp+var_12]
		mov	ax, es:[bx+16h]
		or	ax, es:[bx+18h]
		jz	short loc_81D0
		les	bx, [bp+var_12]
		push	word ptr es:[bx+14h]
		les	bx, [bp+var_12]
		push	word ptr es:[bx+18h]
		push	word ptr es:[bx+16h]
		jmp	short loc_8202
; ---------------------------------------------------------------------------

loc_81D0:
		test	byte ptr [bp+var_16+2],	80h
		jz	short loc_8223
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; font
		nop
		push	cs
		call	near ptr _registerbgifont
		jmp	short loc_8221
; ---------------------------------------------------------------------------

loc_81E3:
		les	bx, [bp+var_12]
		mov	ax, es:[bx+0Eh]
		or	ax, es:[bx+10h]
		jz	short loc_8210
		les	bx, [bp+var_12]
		push	word ptr es:[bx+12h]
		les	bx, [bp+var_12]
		push	word ptr es:[bx+10h]
		push	word ptr es:[bx+0Eh]

loc_8202:
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver]
		call	sub_61F2
		add	sp, 0Ah
		jmp	short loc_8223
; ---------------------------------------------------------------------------

loc_8210:
		test	byte ptr [bp+var_16+2],	80h
		jz	short loc_8223
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; driver
		nop
		push	cs
		call	near ptr _registerbgidriver

loc_8221:
		pop	cx
		pop	cx

loc_8223:
					; sub_7E39+39Bj ...
		mov	[bp+var_6], 0
		mov	[bp+var_8], 0
		mov	ax, word ptr [bp+var_C]
		sub	word ptr [bp+var_C], 0Ah
		cmp	ax, word ptr [bp+arg_0]
		jbe	short loc_823C
		jmp	loc_8056
; ---------------------------------------------------------------------------

loc_823C:
		xor	ax, ax

loc_823E:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_7E39	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

__CurrExcContext proc far

s1		= dword	ptr -6
var_2		= word ptr -2
arg_0		= word ptr  6
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 6
		push	si
		push	di
		mov	ax, [bp+arg_0]
		mov	[bp+var_2], ax
		cmp	[bp+var_2], 0FFFFh
		jz	short loc_8287
		mov	bx, [bp+var_2]
		mov	dx, ss:[bx+4]
		mov	ax, ss:[bx+2]
		add	ax, 0FFF8h
		mov	word ptr [bp+s1+2], dx
		mov	word ptr [bp+s1], ax
		mov	ax, 8
		push	ax		; n
		push	ds
		mov	ax, 0CF1h
		push	ax		; s2
		push	word ptr [bp+s1+2]
		push	word ptr [bp+s1] ; s1
		nop
		push	cs
		call	near ptr _memcmp
		add	sp, 0Ah
		or	ax, ax
		jz	short loc_828C

loc_8287:
		mov	ax, 0FFFFh
		jmp	short loc_8293
; ---------------------------------------------------------------------------

loc_828C:
		mov	bx, [bp+var_2]
		mov	ax, ss:[bx+arg_6]

loc_8293:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
__CurrExcContext endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

; __ThrowFileName(void)
@__ThrowFileName$qv proc far
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+18h]
		mov	ax, es:[bx+16h]
		pop	di
		pop	si
		retf
@__ThrowFileName$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

; __ThrowLineNumber(void)
@__ThrowLineNumber$qv proc far
		push	si
		push	di
		les	bx, ss:16h
		mov	ax, es:[bx+1Ah]
		pop	di
		pop	si
		retf
@__ThrowLineNumber$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function

; __ThrowExceptionName(void)
@__ThrowExceptionName$qv proc far
		push	si
		push	di
		les	bx, ss:16h
		mov	dx, es:[bx+1Eh]
		mov	ax, es:[bx+1Ch]
		pop	di
		pop	si
		retf
@__ThrowExceptionName$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __fastcall __far typeinfo__typeinfo(int, int, int, __int32)
@typeinfo@0$bctr$qmx8typeinfo proc far

src		= word ptr -4
var_2		= word ptr -2
arg_0		= dword	ptr  6

		push	bp
		mov	bp, sp
		sub	sp, 4
		push	si
		push	di
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_82EF
		mov	ax, 8
		push	ax
		nop
		push	cs
		call	near ptr @$bnew$qui ; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jz	short loc_832D

loc_82EF:
		les	bx, [bp+arg_0]
		mov	word ptr es:[bx+2], seg	seg000
		mov	word ptr es:[bx], 88CBh
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		mov	[bp+var_2], 0
		mov	[bp+src], 0
		lea	ax, [bp+src]
		push	ss
		push	ax		; src
		push	cs		; int
		mov	ax, 88ADh
		push	ax		; int
		push	cs
		call	near ptr @_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void *,uint,uint,uint,uchar	*)
		add	sp, 1Ah

loc_832D:
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@typeinfo@0$bctr$qmx8typeinfo endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; typeinfo::operator=(typeinfo const &)
@typeinfo@0$basg$qmx8typeinfo proc far

arg_0		= word ptr  6
arg_2		= word ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		pop	di
		pop	si
		pop	bp
		retf
@typeinfo@0$basg$qmx8typeinfo endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far typeinfo___typeinfo(void (*driver)(void), int)
@typeinfo@0$bdtr$qv proc far

driver		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	dx, [bp+arg_4]
		mov	ax, word ptr [bp+driver]
		or	ax, word ptr [bp+driver+2]
		jz	short loc_8378
		les	bx, [bp+driver]
		mov	word ptr es:[bx+2], seg	seg000
		mov	word ptr es:[bx], 88CBh
		test	dl, 1
		jz	short loc_8378
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; driver
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx

loc_8378:
					; typeinfo::~typeinfo(void)+21j
		pop	di
		pop	si
		pop	bp
		retf
@typeinfo@0$bdtr$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; typeinfo::operator==(typeinfo	const &)const
@typeinfo@0$beql$xqmx8typeinfo proc far

arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	di
		les	bx, [bp+arg_4]
		push	word ptr es:[bx+6]
		push	word ptr es:[bx+4]
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+6]
		push	word ptr es:[bx+4]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		pop	di
		pop	si
		pop	bp
		retf
@typeinfo@0$beql$xqmx8typeinfo endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; typeinfo::operator!=(typeinfo	const &)const
@typeinfo@0$bneq$xqmx8typeinfo proc far

arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		push	si
		push	di
		push	[bp+arg_6]
		push	[bp+arg_4]
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	cs
		call	near ptr @typeinfo@0$beql$xqmx8typeinfo	; typeinfo::operator==(typeinfo	&)
		add	sp, 8
		neg	ax
		sbb	ax, ax
		inc	ax
		pop	di
		pop	si
		pop	bp
		retf
@typeinfo@0$bneq$xqmx8typeinfo endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; typeinfo::before(typeinfo const &)const
@typeinfo@0before$xqmx8typeinfo	proc far

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+4]
		or	ax, es:[bx+6]
		jnz	short loc_83DC
		xor	ax, ax
		jmp	short loc_8435
; ---------------------------------------------------------------------------

loc_83DC:
		les	bx, [bp+arg_4]
		mov	ax, es:[bx+4]
		or	ax, es:[bx+6]
		jnz	short loc_83EE
		mov	ax, 1
		jmp	short loc_8435
; ---------------------------------------------------------------------------

loc_83EE:
		les	bx, [bp+arg_4]
		mov	dx, es:[bx+6]
		mov	word ptr [bp+var_4+2], dx
		mov	ax, es:[bx+4]
		mov	word ptr [bp+var_4], ax
		les	bx, [bp+var_4]
		add	ax, es:[bx+4]
		push	dx
		push	ax		; s2
		les	bx, [bp+arg_0]
		mov	dx, es:[bx+6]
		mov	word ptr [bp+var_8+2], dx
		mov	ax, es:[bx+4]
		mov	word ptr [bp+var_8], ax
		les	bx, [bp+var_8]
		add	ax, es:[bx+4]
		push	dx
		push	ax		; s1
		nop
		push	cs
		call	near ptr _strcmp
		add	sp, 8
		or	ax, ax
		jge	short loc_8433
		mov	ax, 1
		jmp	short loc_8435
; ---------------------------------------------------------------------------

loc_8433:
		xor	ax, ax

loc_8435:
					; typeinfo::before(typeinfo &)+29j ...
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@typeinfo@0before$xqmx8typeinfo	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; typeinfo::name(void)const
@typeinfo@0name$xqv proc far

arg_0		= dword	ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+6]
		push	word ptr es:[bx+4]
		push	cs
		call	near ptr sub_57C9
		pop	cx
		pop	cx
		pop	di
		pop	si
		pop	bp
		retf
@typeinfo@0name$xqv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __fastcall __far __GetTypeInfo(int, int, int, int, int, __int32, int, int, int, int)
@__GetTypeInfo$qnvt1t1t1 proc far

var_8		= dword	ptr -8
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_C		= word ptr  12h
arg_E		= word ptr  14h

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	dx, [bp+arg_E]
		mov	ax, [bp+arg_C]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		mov	ax, [bp+arg_0]
		or	ax, [bp+arg_2]
		jnz	short loc_8497
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ds
		mov	ax, 2CE0h
		push	ax		; src
		push	cs		; int
		mov	ax, 8897h
		push	ax		; int
		push	cs
		call	near ptr @_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void *,uint,uint,uint,uchar	*)
		add	sp, 1Ah

loc_8497:
		les	bx, dword ptr [bp+arg_4]
		mov	dx, [bp+arg_4+2]
		mov	ax, [bp+arg_4]
		sub	ax, es:[bx-2]
		mov	[bp+arg_4+2], dx
		mov	[bp+arg_4], ax
		les	bx, dword ptr [bp+arg_4]
		mov	dx, es:[bx-6]
		mov	ax, es:[bx-8]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		les	bx, [bp+var_8]
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		mov	es:[bx+6], dx
		mov	es:[bx+4], ax
		mov	dx, word ptr [bp+var_8+2]
		mov	ax, word ptr [bp+var_8]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@__GetTypeInfo$qnvt1t1t1 endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_84D8	proc near
					; sub_84D8+1C4p ...

var_20		= word ptr -20h
var_1E		= word ptr -1Eh
var_1C		= dword	ptr -1Ch
var_18		= word ptr -18h
var_16		= word ptr -16h
var_14		= dword	ptr -14h
var_10		= word ptr -10h
var_E		= word ptr -0Eh
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= dword	ptr  8
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_C		= word ptr  10h
arg_E		= word ptr  12h
arg_10		= word ptr  14h
arg_12		= word ptr  16h
arg_14		= word ptr  18h
arg_16		= word ptr  1Ah
arg_18		= word ptr  1Ch
arg_1A		= word ptr  1Eh
arg_1C		= word ptr  20h
arg_1E		= word ptr  22h

		push	bp
		mov	bp, sp
		sub	sp, 20h
		push	si
		push	di
		mov	[bp+var_8], 0
		mov	[bp+var_A], 0
		mov	[bp+var_C], 0
		mov	[bp+var_E], 0
		mov	ax, [bp+arg_14]
		or	ax, [bp+arg_16]
		jz	short loc_8513
		push	word ptr [bp+arg_4+2]
		push	word ptr [bp+arg_4]
		push	[bp+arg_16]
		push	[bp+arg_14]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jnz	short loc_851D

loc_8513:
		les	bx, [bp+arg_4]
		test	byte ptr es:[bx+8], 4
		jnz	short loc_8524

loc_851D:
		xor	dx, dx
		xor	ax, ax
		jmp	loc_8718
; ---------------------------------------------------------------------------

loc_8524:
		mov	[bp+var_6], 0
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+0Ch]

loc_8536:
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax

loc_853C:
		les	bx, [bp+var_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		mov	word ptr [bp+var_1C+2],	dx
		mov	word ptr [bp+var_1C], ax
		mov	ax, word ptr [bp+var_1C]
		or	ax, word ptr [bp+var_1C+2]
		jnz	short loc_8557
		jmp	loc_86E0
; ---------------------------------------------------------------------------

loc_8557:
		les	bx, [bp+var_4]
		test	byte ptr es:[bx+6], 8
		jz	short loc_8564
		jmp	loc_86D9
; ---------------------------------------------------------------------------

loc_8564:
		cmp	[bp+arg_1A], 0
		jz	short loc_857E
		les	bx, [bp+var_4]
		mov	ax, es:[bx+6]
		and	ax, 3
		cmp	ax, 3
		jnz	short loc_857E
		mov	ax, 1
		jmp	short loc_8580
; ---------------------------------------------------------------------------

loc_857E:
		xor	ax, ax

loc_8580:
		mov	[bp+var_10], ax
		les	bx, [bp+var_4]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		add	ax, es:[bx+4]
		mov	word ptr [bp+var_14+2],	dx
		mov	word ptr [bp+var_14], ax
		mov	dx, [bp+arg_1E]
		mov	ax, [bp+arg_1C]
		mov	[bp+var_16], dx
		mov	[bp+var_18], ax
		les	bx, [bp+var_4]
		test	byte ptr es:[bx+6], 4
		jz	short loc_85C7
		les	bx, [bp+var_14]
		mov	ax, es:[bx]
		mov	dx, word ptr [bp+var_14+2]
		mov	word ptr [bp+var_14+2],	dx
		mov	word ptr [bp+var_14], ax
		mov	dx, word ptr [bp+var_1C+2]
		mov	ax, word ptr [bp+var_1C]
		mov	[bp+var_16], dx
		mov	[bp+var_18], ax

loc_85C7:
		push	word ptr [bp+var_1C+2]
		push	word ptr [bp+var_1C]
		push	[bp+arg_E]
		push	[bp+arg_C]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jnz	short loc_8649
		les	bx, [bp+var_1C]
		test	byte ptr es:[bx+8], 4
		jnz	short loc_85EB
		jmp	loc_86D9
; ---------------------------------------------------------------------------

loc_85EB:
		push	[bp+var_16]
		push	[bp+var_18]
		push	[bp+var_10]
		push	[bp+arg_18]
		push	[bp+arg_16]
		push	[bp+arg_14]
		push	[bp+arg_12]
		push	[bp+arg_10]
		push	[bp+arg_E]
		push	[bp+arg_C]
		push	[bp+arg_A]
		push	[bp+arg_8]
		push	word ptr [bp+var_1C+2]
		push	word ptr [bp+var_1C]
		push	word ptr [bp+var_14+2]
		push	word ptr [bp+var_14]
		call	sub_84D8
		add	sp, 20h
		mov	[bp+var_1E], dx
		mov	[bp+var_20], ax
		mov	ax, [bp+var_20]
		or	ax, [bp+var_1E]
		jnz	short loc_8632
		jmp	loc_86D9
; ---------------------------------------------------------------------------

loc_8632:
		mov	dx, [bp+var_1E]
		mov	ax, [bp+var_20]
		mov	word ptr [bp+var_14+2],	dx
		mov	word ptr [bp+var_14], ax
		mov	bx, [bp+arg_18]
		mov	ax, ss:[bx]
		mov	[bp+var_10], ax
		jmp	short loc_86A6
; ---------------------------------------------------------------------------

loc_8649:
		mov	ax, [bp+arg_8]
		or	ax, [bp+arg_A]
		jz	short loc_866A
		mov	dx, [bp+arg_A]
		mov	ax, [bp+arg_8]
		cmp	dx, word ptr [bp+var_14+2]
		jnz	short loc_86D9
		cmp	ax, word ptr [bp+var_14]
		jnz	short loc_86D9
		mov	dx, word ptr [bp+var_14+2]
		mov	ax, word ptr [bp+var_14]
		jmp	loc_8718
; ---------------------------------------------------------------------------

loc_866A:
		mov	ax, [bp+arg_10]
		or	ax, [bp+arg_12]
		jz	short loc_86A6
		xor	ax, ax
		push	ax
		push	ax
		xor	ax, ax
		push	ax
		push	[bp+arg_18]
		xor	ax, ax
		push	ax
		push	ax
		xor	ax, ax
		push	ax
		push	ax
		push	[bp+arg_16]
		push	[bp+arg_14]
		push	[bp+arg_12]
		push	[bp+arg_10]
		push	word ptr [bp+var_1C+2]
		push	word ptr [bp+var_1C]
		push	word ptr [bp+var_14+2]
		push	word ptr [bp+var_14]
		call	sub_84D8
		add	sp, 20h
		or	ax, dx
		jz	short loc_86D9

loc_86A6:
					; sub_84D8+198j
		cmp	[bp+var_E], 0
		jz	short loc_86C4
		mov	dx, word ptr [bp+var_14+2]
		mov	ax, word ptr [bp+var_14]
		cmp	dx, [bp+var_A]
		jnz	short loc_86C4
		cmp	ax, [bp+var_C]
		jnz	short loc_86C4
		mov	ax, [bp+var_10]
		or	[bp+var_8], ax
		jmp	short loc_86D9
; ---------------------------------------------------------------------------

loc_86C4:
					; sub_84D8+1DDj ...
		inc	[bp+var_E]
		mov	dx, word ptr [bp+var_14+2]
		mov	ax, word ptr [bp+var_14]
		mov	[bp+var_A], dx
		mov	[bp+var_C], ax
		mov	ax, [bp+var_10]
		mov	[bp+var_8], ax

loc_86D9:
					; sub_84D8+110j ...
		add	word ptr [bp+var_4], 8
		jmp	loc_853C
; ---------------------------------------------------------------------------

loc_86E0:
		cmp	[bp+var_6], 0
		jnz	short loc_86F9
		inc	[bp+var_6]
		les	bx, [bp+arg_4]
		mov	dx, word ptr [bp+arg_4+2]
		mov	ax, word ptr [bp+arg_4]
		add	ax, es:[bx+0Ah]
		jmp	loc_8536
; ---------------------------------------------------------------------------

loc_86F9:
		mov	bx, [bp+arg_18]
		mov	ax, [bp+var_8]
		mov	ss:[bx], ax
		cmp	[bp+var_E], 1
		jz	short loc_8712
		mov	[bp+var_A], 0
		mov	[bp+var_C], 0

loc_8712:
		mov	dx, [bp+var_A]
		mov	ax, [bp+var_C]

loc_8718:
					; sub_84D8+18Fj
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_84D8	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __fastcall __far __DynamicCast(int, int, int, int, int, __int32, int, int, int, int, int)
@__DynamicCast$qnvt1t1t1i proc far

var_16		= word ptr -16h
var_14		= word ptr -14h
var_12		= word ptr -12h
var_10		= word ptr -10h
var_E		= word ptr -0Eh
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_8		= word ptr  0Eh
arg_A		= word ptr  10h
arg_C		= word ptr  12h
arg_E		= word ptr  14h
arg_10		= word ptr  16h

		push	bp
		mov	bp, sp
		sub	sp, 16h
		push	si
		push	di
		mov	dx, [bp+arg_A]
		mov	ax, [bp+arg_8]
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		mov	dx, [bp+arg_E]
		mov	ax, [bp+arg_C]
		mov	[bp+var_6], dx
		mov	[bp+var_8], ax
		mov	ax, [bp+arg_0]
		or	ax, [bp+arg_2]
		jnz	short loc_8749
		jmp	loc_884D
; ---------------------------------------------------------------------------

loc_8749:
		les	bx, dword ptr [bp+arg_4]
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		sub	ax, es:[bx-4]
		mov	[bp+var_E], dx
		mov	[bp+var_10], ax
		les	bx, dword ptr [bp+arg_4]
		mov	dx, [bp+arg_4+2]
		mov	ax, [bp+arg_4]
		sub	ax, es:[bx-2]
		mov	[bp+arg_4+2], dx
		mov	[bp+arg_4], ax
		les	bx, dword ptr [bp+arg_4]
		mov	dx, es:[bx-6]
		mov	ax, es:[bx-8]
		mov	[bp+var_A], dx
		mov	[bp+var_C], ax
		mov	ax, [bp+arg_C]
		or	ax, [bp+arg_E]
		jz	short loc_879F
		push	[bp+var_A]
		push	[bp+var_C]
		push	[bp+var_6]
		push	[bp+var_8]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jz	short loc_87A8

loc_879F:
		mov	dx, [bp+var_E]
		mov	ax, [bp+var_10]
		jmp	loc_887D
; ---------------------------------------------------------------------------

loc_87A8:
		push	[bp+var_A]
		push	[bp+var_C]
		push	[bp+var_2]
		push	[bp+var_4]
		push	cs
		call	near ptr sub_57EE
		add	sp, 8
		or	ax, ax
		jnz	short loc_8801
		xor	ax, ax
		push	ax
		push	ax
		mov	ax, 1
		push	ax
		lea	ax, [bp+var_16]
		push	ax
		push	[bp+var_2]
		push	[bp+var_4]
		push	[bp+arg_2]
		push	[bp+arg_0]
		push	[bp+var_6]
		push	[bp+var_8]
		xor	ax, ax
		push	ax
		push	ax
		push	[bp+var_A]
		push	[bp+var_C]
		push	[bp+var_E]
		push	[bp+var_10]
		call	sub_84D8
		add	sp, 20h
		mov	[bp+var_12], dx
		mov	[bp+var_14], ax
		mov	ax, [bp+var_14]
		or	ax, [bp+var_12]
		jnz	short loc_8845

loc_8801:
		xor	ax, ax
		push	ax
		push	ax
		mov	ax, 1
		push	ax
		lea	ax, [bp+var_16]
		push	ax
		xor	ax, ax
		push	ax
		push	ax
		xor	ax, ax
		push	ax
		push	ax
		push	[bp+var_6]
		push	[bp+var_8]
		xor	ax, ax
		push	ax
		push	ax
		push	[bp+var_A]
		push	[bp+var_C]
		push	[bp+var_E]
		push	[bp+var_10]
		call	sub_84D8
		add	sp, 20h
		mov	[bp+var_12], dx
		mov	[bp+var_14], ax
		mov	ax, [bp+var_14]
		or	ax, [bp+var_12]
		jz	short loc_884D
		cmp	[bp+var_16], 0
		jz	short loc_884D

loc_8845:
		mov	dx, [bp+var_12]
		mov	ax, [bp+var_14]
		jmp	short loc_887D
; ---------------------------------------------------------------------------

loc_884D:
					; __DynamicCast(void *,void *,void *,void *,int)+11Fj ...
		cmp	[bp+arg_10], 0
		jz	short loc_8879
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ds
		mov	ax, 2CE1h
		push	ax		; src
		push	cs		; int
		mov	ax, 8883h
		push	ax		; int
		push	cs
		call	near ptr @_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void *,uint,uint,uint,uchar	*)
		add	sp, 1Ah

loc_8879:
		xor	dx, dx
		xor	ax, ax

loc_887D:
					; __DynamicCast(void *,void *,void *,void *,int)+12Dj
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@__DynamicCast$qnvt1t1t1i endp

; ---------------------------------------------------------------------------
		db 1, 0, 1, 0, 0Ah, 0, 2 dup(0FFh), 2 dup(0), 42h, 61h
		db 64h,	5Fh, 63h, 61h, 73h, 74h, 2 dup(0), 1, 0, 1, 0
		db 0Ah,	0, 2 dup(0FFh),	2 dup(0), 42h, 61h, 64h, 5Fh, 74h
		db 79h,	70h, 65h, 69h, 64h, 2 dup(0), 4, 0, 10h, 20h, 0Ah
		db 0, 0CFh, 88h
		dw seg seg000
aTypeinfo	db 'typeinfo *',0
		db 0, 0CFh, 88h
		dw seg seg000
		db 4 dup(0), 48h, 83h
		dw seg seg000
		db 8			; Method
		db 0
		db 3			; Destructor/SafeFunction
		db 0
		db 26h,	3 dup(0), 73h, 10h, 30h, 0, 34h, 0Dh dup(0), 1
		db 0, 1, 0, 48h, 83h
		dw seg seg000
		db 5, 0, 38h, 0, 74h, 79h, 70h,	65h, 69h, 6Eh, 66h, 6Fh
		db 0Eh dup(0)

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __stdcall	_DOSCMD(int, int, char *s, int,	int)
__DOSCMD	proc near

dest		= dword	ptr -0Eh
var_A		= dword	ptr -0Ah
var_6		= dword	ptr -6
var_2		= word ptr -2
arg_0		= word ptr  4
arg_2		= word ptr  6
s		= dword	ptr  8
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh

		push	bp
		mov	bp, sp
		sub	sp, 0Eh
		push	si
		push	di
		mov	[bp+var_2], 3
		mov	ax, word ptr [bp+s]
		or	ax, word ptr [bp+s+2]
		jz	short loc_8934
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		add	ax, [bp+var_2]
		inc	ax
		mov	[bp+var_2], ax

loc_8934:
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	word ptr [bp+var_6+2], dx
		mov	word ptr [bp+var_6], ax
		jmp	short loc_895E
; ---------------------------------------------------------------------------

loc_8942:
		les	bx, [bp+var_6]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx] ; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		add	ax, [bp+var_2]
		inc	ax
		mov	[bp+var_2], ax
		add	word ptr [bp+var_6], 4

loc_895E:
		les	bx, [bp+var_6]
		mov	ax, es:[bx]
		or	ax, es:[bx+2]
		jnz	short loc_8942
		push	[bp+var_2]
		nop
		push	cs
		call	near ptr _malloc
		pop	cx
		mov	word ptr [bp+var_A+2], dx
		mov	word ptr [bp+var_A], ax
		or	ax, dx
		jnz	short loc_8984
		xor	dx, dx
		xor	ax, ax
		jmp	loc_8A3A
; ---------------------------------------------------------------------------

loc_8984:
		mov	dx, word ptr [bp+var_A+2]
		mov	ax, word ptr [bp+var_A]
		inc	ax
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 20h ;	' '
		inc	word ptr [bp+dest]
		mov	ax, word ptr [bp+s]
		or	ax, word ptr [bp+s+2]
		jz	short loc_89C7
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; src
		push	word ptr [bp+dest+2]
		push	word ptr [bp+dest] ; dest
		nop
		call	_stpcpy
		add	sp, 8
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 20h ;	' '
		inc	word ptr [bp+dest]

loc_89C7:
		mov	ax, [bp+arg_8]
		or	ax, [bp+arg_A]
		jz	short loc_8A15
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	word ptr [bp+var_6+2], dx
		mov	word ptr [bp+var_6], ax
		jmp	short loc_8A09
; ---------------------------------------------------------------------------

loc_89DD:
		les	bx, [bp+var_6]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx] ; src
		push	word ptr [bp+dest+2]
		push	word ptr [bp+dest] ; dest
		nop
		call	_stpcpy
		add	sp, 8
		mov	word ptr [bp+dest+2], dx
		mov	word ptr [bp+dest], ax
		les	bx, [bp+dest]
		mov	byte ptr es:[bx], 20h ;	' '
		inc	word ptr [bp+dest]
		add	word ptr [bp+var_6], 4

loc_8A09:
		les	bx, [bp+var_6]
		mov	ax, es:[bx]
		or	ax, es:[bx+2]
		jnz	short loc_89DD

loc_8A15:
		les	bx, [bp+dest]
		mov	byte ptr es:[bx-1], 0Dh
		mov	byte ptr es:[bx], 0
		mov	ax, word ptr [bp+dest]
		xor	dx, dx
		sub	ax, word ptr [bp+var_A]
		sbb	dx, 0
		add	al, 0FEh ; 'þ'
		les	bx, [bp+var_A]
		mov	es:[bx], al
		mov	dx, word ptr [bp+var_A+2]
		mov	ax, word ptr [bp+var_A]

loc_8A3A:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn	0Ch
__DOSCMD	endp

include libs/BorlandC/exec.asm

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int execl(char *path,	char *arg0, ...)
_execl		proc far

s		= dword	ptr  6
arg0		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	di
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ss		; int
		lea	ax, [bp+arg0]
		push	ax		; int
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; s
		mov	ax, 8BA9h
		push	ax		; int
		call	sub_9349
		add	sp, 10h
		pop	di
		pop	si
		pop	bp
		retf
_execl		endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl setblock(unsigned	int ___psp, unsigned int	newsize)
_setblock	proc far

___psp		= word ptr  6
newsize		= word ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ah, 4Ah	; 'J'
		mov	bx, [bp+newsize]
		mov	es, [bp+___psp]
		int	21h		; DOS -	2+ - ADJUST MEMORY BLOCK SIZE (SETBLOCK)
					; ES = segment address of block	to change
					; BX = new size	in paragraphs
		jb	short loc_8E20
		mov	ax, 0FFFFh
		jmp	short loc_8E26
; ---------------------------------------------------------------------------

loc_8E20:
		push	bx
		push	ax
		call	__IOERROR
		pop	ax

loc_8E26:
		pop	di
		pop	si
		pop	bp
		retf
_setblock	endp

include libs/BorlandC/setenvp.asm

unknown_libname_2:			; BCC v4.x/5.x DOS runtime
		push	si
		push	di
		pop	di
		pop	si
		retf
; ---------------------------------------------------------------------------
		dd byte_C3A2
		db 4 dup(0), 87h, 8Eh
		dw seg seg000
		db 0E2h, 0FFh
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_8EDC
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_8EDA
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_8EDE
; ---------------------------------------------------------------------------

loc_8EDA:
		jmp	short loc_8EDE
; ---------------------------------------------------------------------------

loc_8EDC:
		xor	ax, ax

loc_8EDE:
					; seg000:loc_8EDAj
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------

unknown_libname_3:			; BCC v4.x/5.x DOS runtime
		push	si
		push	di
		pop	di
		pop	si
		retf
; ---------------------------------------------------------------------------
		dd byte_C54A
		dd byte_C4FC
		db 4 dup(0), 0B5h, 1
		dw seg seg006
		db 87h,	20h, 0FCh, 0FFh, 6 dup(0), 0E7h, 8Eh
		dw seg seg000
		db 0DEh, 0FFh, 2 dup(0), 5, 3 dup(0), 2	dup(0FFh), 6, 0
		db 5, 3	dup(0),	0F3h, 8Eh
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_8F5E
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_8F5C
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_8F60
; ---------------------------------------------------------------------------

loc_8F5C:
		jmp	short loc_8F60
; ---------------------------------------------------------------------------

loc_8F5E:
		xor	ax, ax

loc_8F60:
					; seg000:loc_8F5Cj
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_8FAB
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_8FA9
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_8FAD
; ---------------------------------------------------------------------------

loc_8FA9:
		jmp	short loc_8FAD
; ---------------------------------------------------------------------------

loc_8FAB:
		xor	ax, ax

loc_8FAD:
					; seg000:loc_8FA9j
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------

unknown_libname_4:			; BCC v4.x/5.x DOS runtime
		push	si
		push	di
		pop	di
		pop	si
		retf
; ---------------------------------------------------------------------------
		db 4 dup(0), 0B6h, 8Fh
		dw seg seg000
		db 0E2h, 0FFh, 0FDh, 0Bh
		dw seg seg006
		dd 0
		dd byte_CEF3
		db 4, 0, 0FCh, 0FFh, 2 dup(0), 0FDh, 0Bh
		dw seg seg006
		db 4, 0, 0F8h, 0FFh, 6 dup(0), 8Bh, 0Bh
		dw seg seg006
		db 0, 2	dup(1),	7 dup(0), 0C0h,	8Fh
		dw seg seg000
		db 0DAh, 0FFh, 2 dup(0), 5, 3 dup(0), 0C8h, 8Fh, 6, 0
		db 5, 0, 1, 0, 0E0h, 8Fh, 0FDh,	0Bh
		dw seg seg006
		db 4 dup(0), 0C3h, 0Bh
		dw seg seg006
		db 4, 0, 0FCh, 0FFh, 2 dup(0), 0FDh, 0Bh
		dw seg seg006
		db 4, 0, 0F8h, 0FFh, 6 dup(0), 8Bh, 0Bh
		dw seg seg006
		db 0, 2	dup(1),	7 dup(0), 4, 90h
		dw seg seg000
		db 0DAh, 0FFh, 2 dup(0), 5, 3 dup(0), 0Ch, 90h,	6, 0, 5
		db 0, 1, 0, 24h, 90h, 0FDh, 0Bh
		dw seg seg006
		dd 0
		dd byte_CEF3
		db 4, 0, 0FCh, 0FFh, 2 dup(0), 0FDh, 0Bh
		dw seg seg006
		db 4, 0, 0F8h, 0FFh, 6 dup(0), 8Bh, 0Bh
		dw seg seg006
		db 0, 2	dup(1),	7 dup(0), 48h, 90h
		dw seg seg000
		db 0DAh, 0FFh, 2 dup(0), 5, 3 dup(0), 50h, 90h,	6, 0, 5
		db 0, 1, 0, 68h, 90h, 4	dup(0),	8Ch, 90h
		dw seg seg000
		db 0E2h, 0FFh, 49h, 0Bh
		dw seg seg006
		dd byte_CF2D
		db 4 dup(0), 96h, 90h
		dw seg seg000
		db 0E2h, 0FFh, 4 dup(0), 0A8h, 90h
		dw seg seg000
		db 0E2h, 0FFh, 49h, 0Bh
		dw seg seg006
		dd byte_CE2B
		db 4 dup(0), 0B2h, 90h
		dw seg seg000
		db 0E2h, 0FFh, 4 dup(0), 0C4h, 90h
		dw seg seg000
		db 0E2h, 0FFh, 49h, 0Bh
		dw seg seg006
		dd byte_CE2B
		db 4 dup(0), 0CEh, 90h
		dw seg seg000
		db 0E2h, 0FFh
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		push	word ptr [bp+0Ch]
		push	word ptr [bp+0Ah]
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bctr$qmx4xmsg ;	xmsg::xmsg(xmsg	&)
		add	sp, 8
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	dx, [bp+8]
		mov	ax, [bp+6]
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_915C
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_915A
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_915E
; ---------------------------------------------------------------------------

loc_915A:
		jmp	short loc_915E
; ---------------------------------------------------------------------------

loc_915C:
		xor	ax, ax

loc_915E:
					; seg000:loc_915Aj
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_91A9
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_91A7
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_91AB
; ---------------------------------------------------------------------------

loc_91A7:
		jmp	short loc_91AB
; ---------------------------------------------------------------------------

loc_91A9:
		xor	ax, ax

loc_91AB:
					; seg000:loc_91A7j
		pop	di
		pop	si
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+6]
		or	ax, [bp+8]
		jz	short loc_91F6
		nop
		push	cs
		call	near ptr @__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		xor	ax, ax
		push	ax
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr @xmsg@$bdtr$qv	; xmsg::~xmsg(void)
		add	sp, 6
		test	byte ptr [bp+0Ah], 1
		jz	short loc_91F4
		push	word ptr [bp+8]
		push	word ptr [bp+6]
		nop
		push	cs
		call	near ptr _registerbgidriver
		pop	cx
		pop	cx
		jmp	short loc_91F8
; ---------------------------------------------------------------------------

loc_91F4:
		jmp	short loc_91F8
; ---------------------------------------------------------------------------

loc_91F6:
		xor	ax, ax

loc_91F8:
					; seg000:loc_91F4j
		pop	di
		pop	si
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_91FC	proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, [bp+arg_0]
		cmp	ah, 81h	; ''
		jb	short loc_9236
		cmp	ah, 0A0h ; ' '
		jb	short loc_9218
		cmp	ah, 0E0h ; 'à'
		jb	short loc_9236
		cmp	ah, 0F0h ; 'ð'
		jnb	short loc_9236

loc_9218:
		cmp	al, 40h	; '@'
		jb	short loc_9236
		cmp	al, 0FDh ; 'ý'
		jnb	short loc_9236
		cmp	al, 7Fh	; ''
		jz	short loc_9236
		cmp	al, 80h	; '€'
		adc	al, 61h	; 'a'
		jb	short loc_922C
		sub	al, 0A2h ; '¢'

loc_922C:
		rcl	ah, 1
		and	ah, 7Fh
		add	ax, 1F21h
		jmp	short loc_9238
; ---------------------------------------------------------------------------

loc_9236:
		xor	ax, ax

loc_9238:
		pop	di
		pop	si
		pop	bp
		retf
sub_91FC	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_923C	proc far

var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= word ptr  0Ch

		push	bp
		mov	bp, sp
		sub	sp, 8
		push	si
		push	di
		mov	dx, [bp+arg_2]
		mov	ax, [bp+arg_0]
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		jmp	short loc_92AD
; ---------------------------------------------------------------------------

loc_9252:
		les	bx, [bp+var_4]
		mov	al, es:[bx]
		push	ax
		nop
		push	cs
		call	sub_4305
		pop	cx
		or	ax, ax
		jz	short loc_9271
		inc	word ptr [bp+var_4]
		les	bx, [bp+var_4]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_92AA
		jmp	short loc_92B6
; ---------------------------------------------------------------------------

loc_9271:
		mov	dx, [bp+arg_6]
		mov	ax, [bp+arg_4]
		mov	word ptr [bp+var_8+2], dx
		mov	word ptr [bp+var_8], ax
		jmp	short loc_9290
; ---------------------------------------------------------------------------

loc_927F:
		les	bx, [bp+var_4]
		mov	al, es:[bx]
		les	bx, [bp+var_8]
		cmp	al, es:[bx]
		jz	short loc_9299
		inc	word ptr [bp+var_8]

loc_9290:
		les	bx, [bp+var_8]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_927F

loc_9299:
		les	bx, [bp+var_8]
		cmp	byte ptr es:[bx], 0
		jz	short loc_92AA
		mov	dx, word ptr [bp+var_4+2]
		mov	ax, word ptr [bp+var_4]
		jmp	short loc_92BA
; ---------------------------------------------------------------------------

loc_92AA:
		inc	word ptr [bp+var_4]

loc_92AD:
		les	bx, [bp+var_4]
		cmp	byte ptr es:[bx], 0
		jnz	short loc_9252

loc_92B6:
		xor	dx, dx
		xor	ax, ax

loc_92BA:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_923C	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

; int __cdecl __far sub_92C0(int, int, char *pathname, char *src, int)
sub_92C0	proc far

dest		= byte ptr -50h
arg_0		= word ptr  6
arg_2		= word ptr  8
pathname	= dword	ptr  0Ah
src		= dword	ptr  0Eh
arg_C		= word ptr  12h

		push	bp
		mov	bp, sp
		sub	sp, 50h
		push	si
		push	di
		push	[bp+arg_2]
		push	[bp+arg_0]	; src
		push	ss
		lea	ax, [bp+dest]
		push	ax		; dest
		nop
		push	cs
		call	near ptr _strcpy
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		push	ss
		lea	ax, [bp+dest]
		push	ax		; dest
		nop
		push	cs
		call	near ptr _strcat
		add	sp, 10h
		cmp	[bp+arg_C], 0
		jz	short loc_9314
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; pathname
		push	ds
		mov	ax, 0E66h
		push	ax		; varname
		push	ss
		lea	ax, [bp+dest]
		push	ax		; file
		nop
		push	cs
		call	near ptr __searchenv
		add	sp, 0Ch
		les	bx, [bp+pathname]
		cmp	byte ptr es:[bx], 0
		jz	short loc_9341
		jmp	short loc_933C
; ---------------------------------------------------------------------------

loc_9314:
		push	ss
		lea	ax, [bp+dest]
		push	ax		; src
		push	word ptr [bp+pathname+2]
		push	word ptr [bp+pathname] ; dest
		nop
		push	cs
		call	near ptr _strcpy
		add	sp, 8
		mov	ax, 4
		push	ax		; char
		push	ss
		lea	ax, [bp+dest]
		push	ax		; pathname
		nop
		push	cs
		call	near ptr __access
		add	sp, 6
		or	ax, ax
		jnz	short loc_9341

loc_933C:
		mov	ax, 1
		jmp	short loc_9343
; ---------------------------------------------------------------------------

loc_9341:
		xor	ax, ax

loc_9343:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_92C0	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

; int __cdecl sub_9349(int, char *s, int, int, int, int, int)
sub_9349	proc near

pathname	= word ptr -9Ch
var_1A		= word ptr -1Ah
var_18		= word ptr -18h
var_16		= word ptr -16h
var_14		= dword	ptr -14h
s1		= dword	ptr -10h
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  4
s		= dword	ptr  6
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh
arg_C		= word ptr  10h
arg_E		= word ptr  12h

		push	bp
		mov	bp, sp
		sub	sp, 9Ch
		push	si
		push	di
		les	bx, [bp+s]
		mov	al, es:[bx]
		cbw
		mov	dx, ax
		cmp	ax, 61h	; 'a'
		jb	short loc_9363
		sub	dx, 20h	; ' '

loc_9363:
		cmp	dx, 41h	; 'A'
		jb	short loc_9377
		cmp	dx, 5Ah	; 'Z'
		ja	short loc_9377
		les	bx, [bp+s]
		cmp	byte ptr es:[bx+1], 3Ah	; ':'
		jz	short loc_938D

loc_9377:
		push	ds
		mov	ax, 0E6Bh
		push	ax
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]
		push	cs
		call	near ptr sub_923C
		add	sp, 8
		or	ax, dx
		jz	short loc_9392

loc_938D:
		mov	[bp+arg_E], 0

loc_9392:
		mov	[bp+var_1A], 0
		mov	ax, 2Eh	; '.'
		push	ax		; char
		push	word ptr [bp+s+2]
		push	word ptr [bp+s]	; s
		nop
		push	cs
		call	near ptr strrchr
		add	sp, 6
		mov	word ptr [bp+s1+2], dx
		mov	word ptr [bp+s1], ax
		or	ax, dx
		jz	short loc_93F1
		push	[bp+arg_E]	; int
		push	ds
		mov	ax, 0E6Eh
		push	ax		; src
		push	ss
		lea	ax, [bp+pathname]
		push	ax		; pathname
		push	word ptr [bp+s+2] ; int
		push	word ptr [bp+s]	; int
		push	cs
		call	near ptr sub_92C0
		add	sp, 0Eh
		mov	[bp+var_18], ax
		or	ax, ax
		jnz	short loc_93D8
		jmp	loc_945C
; ---------------------------------------------------------------------------

loc_93D8:
		push	ds
		mov	ax, 0E6Fh
		push	ax		; s2
		push	word ptr [bp+s1+2]
		push	word ptr [bp+s1] ; s1
		nop
		push	cs
		call	near ptr _stricmp
		add	sp, 8
		or	ax, ax
		jnz	short loc_945C
		jmp	short loc_9457
; ---------------------------------------------------------------------------

loc_93F1:
		push	[bp+arg_E]	; int
		push	ds
		mov	ax, 0E74h
		push	ax		; src
		push	ss
		lea	ax, [bp+pathname]
		push	ax		; pathname
		push	word ptr [bp+s+2] ; int
		push	word ptr [bp+s]	; int
		push	cs
		call	near ptr sub_92C0
		add	sp, 0Eh
		mov	[bp+var_18], ax
		or	ax, ax
		jnz	short loc_945C
		push	[bp+arg_E]	; int
		push	ds
		mov	ax, 0E79h
		push	ax		; src
		push	ss
		lea	ax, [bp+pathname]
		push	ax		; pathname
		push	word ptr [bp+s+2] ; int
		push	word ptr [bp+s]	; int
		push	cs
		call	near ptr sub_92C0
		add	sp, 0Eh
		mov	[bp+var_18], ax
		or	ax, ax
		jnz	short loc_945C
		push	[bp+arg_E]	; int
		push	ds
		mov	ax, 0E7Eh
		push	ax		; src
		push	ss
		lea	ax, [bp+pathname]
		push	ax		; pathname
		push	word ptr [bp+s+2] ; int
		push	word ptr [bp+s]	; int
		push	cs
		call	near ptr sub_92C0
		add	sp, 0Eh
		mov	[bp+var_18], ax
		or	ax, ax
		jz	short loc_945C

loc_9457:
		mov	[bp+var_1A], 1

loc_945C:
		cmp	[bp+var_18], 0
		jz	short loc_947E
		cmp	[bp+var_1A], 0
		jz	short loc_9487
		push	ds
		mov	ax, 0E83h
		push	ax		; name
		nop
		push	cs
		call	near ptr _getenv
		pop	cx
		pop	cx
		mov	[bp+var_2], dx
		mov	[bp+var_4], ax
		or	ax, dx
		jnz	short loc_9487

loc_947E:
		mov	_errno, 2
		jmp	loc_954D
; ---------------------------------------------------------------------------

loc_9487:
					; sub_9349+133j
		cmp	[bp+var_1A], 0
		jz	short loc_94A0
		push	[bp+var_2]
		push	[bp+var_4]
		push	ds
		mov	ax, 0E8Bh
		push	ax
		push	[bp+arg_8]
		push	[bp+arg_6]
		jmp	short loc_94B4
; ---------------------------------------------------------------------------

loc_94A0:
		push	ss		; int
		lea	ax, [bp+pathname]
		push	ax		; int
		xor	ax, ax
		push	ax
		push	ax		; s
		mov	ax, [bp+arg_6]
		add	ax, 4
		push	[bp+arg_8]	; int
		push	ax		; int

loc_94B4:
		call	__DOSCMD
		mov	[bp+var_6], dx
		mov	[bp+var_8], ax
		mov	ax, [bp+var_8]
		or	ax, [bp+var_6]
		jnz	short loc_94CE
		mov	_errno, 8
		; Hack (jmp loc_954D)
		db 0e9h, 07fh, 000h
; ---------------------------------------------------------------------------

loc_94CE:
		mov	ax, [bp+var_8]
		inc	ax
		push	[bp+var_6]
		push	ax		; s
		nop
		push	cs
		call	near ptr _strlen
		pop	cx
		pop	cx
		cmp	ax, 80h	; '€'
		jb	short loc_94F7
		mov	_errno, 14h
		push	[bp+var_6]
		push	[bp+var_8]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx
		jmp	short loc_954D
; ---------------------------------------------------------------------------

loc_94F7:
		mov	ax, [bp+arg_A]
		or	ax, [bp+arg_C]
		jnz	short loc_950C
		mov	dx, word ptr environ@+2
		mov	ax, word ptr environ@
		mov	[bp+arg_C], dx
		mov	[bp+arg_A], ax

loc_950C:
		push	[bp+arg_C]	; int
		push	[bp+arg_A]	; int
		cmp	[bp+var_1A], 0
		jz	short loc_9520
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		jmp	short loc_9526
; ---------------------------------------------------------------------------

loc_9520:
		mov	dx, ss
		lea	ax, [bp+pathname]

loc_9526:
		push	dx
		push	ax		; s
		push	ss
		lea	ax, [bp+var_14]
		push	ax		; __int32
		call	__DOSENV
		mov	[bp+var_A], dx
		mov	[bp+var_C], ax
		or	ax, dx
		jnz	short loc_9552
		mov	_errno, 8
		push	[bp+var_6]
		push	[bp+var_8]
		nop
		push	cs
		call	near ptr _farfree
		pop	cx
		pop	cx

loc_954D:
					; sub_9349+182j ...
		mov	ax, 0FFFFh
		jmp	short loc_959D
; ---------------------------------------------------------------------------

loc_9552:
		call	_exitbuf
		push	[bp+var_A]
		push	[bp+var_C]
		push	[bp+var_6]
		push	[bp+var_8]
		cmp	[bp+var_1A], 0
		jz	short loc_9570
		mov	dx, [bp+var_2]
		mov	ax, [bp+var_4]
		jmp	short loc_9576
; ---------------------------------------------------------------------------

loc_9570:
		mov	dx, ss
		lea	ax, [bp+pathname]

loc_9576:
		push	dx
		push	ax
		call	[bp+arg_0]
		add	sp, 0Ch
		mov	[bp+var_16], ax
		push	word ptr [bp+var_14+2]
		push	word ptr [bp+var_14]
		nop
		push	cs
		call	near ptr _farfree
		push	[bp+var_6]
		push	[bp+var_8]
		nop
		push	cs
		call	near ptr _farfree
		add	sp, 8
		mov	ax, [bp+var_16]

loc_959D:
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retn
sub_9349	endp

seg000		ends

; ===========================================================================

; Segment type:	Pure code
seg001		segment	byte public 'CODE' use16
		assume cs:seg001
		;org 3
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_95A3	proc near

var_2		= word ptr -2
arg_0		= dword	ptr  4

		enter	2, 0
		push	large [bp+arg_0]
		call	sub_B9C
		call	sub_C1A
		mov	[bp+var_2], ax
		push	ds
		push	offset unk_DE32
		push	ax
		call	sub_AE8
		call	sub_ABC
		leave
		retn	4
sub_95A3	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_95CB	proc near

var_9		= byte ptr -9
var_8		= dword	ptr -8
var_4		= dword	ptr -4
arg_0		= dword	ptr  4
arg_4		= word ptr  8
arg_6		= word ptr  0Ah

		enter	0Ah, 0
		push	si
		push	di
		mov	di, 0A0h ; ' '
		mov	[bp+var_4], 989680h
		mov	[bp+var_9], 0
		xor	si, si
		jmp	short loc_9638
; ---------------------------------------------------------------------------

loc_95E4:
		mov	eax, [bp+arg_0]
		cdq
		idiv	[bp+var_4]
		mov	ebx, 0Ah
		cdq
		idiv	ebx
		mov	[bp+var_8], edx
		mov	eax, [bp+var_4]
		cdq
		idiv	ebx
		mov	[bp+var_4], eax
		mov	ax, word ptr [bp+var_8]
		add	ax, 0A0h ; ' '
		mov	di, ax
		cmp	[bp+var_8], 0
		jz	short loc_961D
		mov	[bp+var_9], 1

loc_961D:
		cmp	[bp+var_9], 0
		jz	short loc_9637
		mov	ax, si
		shl	ax, 4
		add	ax, [bp+arg_6]
		push	ax
		push	[bp+arg_4]
		push	di
		push	0Fh
		call	sub_1322

loc_9637:
		inc	si

loc_9638:
		cmp	si, 8
		jl	short loc_95E4
		pop	di
		pop	si
		leave
		retn	8
sub_95CB	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9643	proc near

var_50		= byte ptr -50h
arg_0		= word ptr  4
arg_2		= dword	ptr  6
arg_6		= word ptr  0Ah
arg_8		= word ptr  0Ch
arg_A		= word ptr  0Eh

		enter	50h, 0
		push	si
		push	di
		lea	ax, [bp+var_50]
		push	ss
		push	ax
		push	ds
		push	offset unk_D030
		mov	cx, 50h	; 'P'
		call	SCOPY@
		xor	si, si
		xor	di, di
		jmp	short loc_96C4
; ---------------------------------------------------------------------------

loc_9660:
		call	sub_B536
		les	bx, [bp+arg_2]
		add	bx, si
		mov	al, es:[bx]
		mov	[bp+si+var_50],	al
		inc	si
		mov	bx, word ptr [bp+arg_2]
		add	bx, si
		mov	al, es:[bx]
		mov	[bp+si+var_50],	al
		inc	si
		mov	[bp+si+var_50],	0
		push	ss
		lea	ax, [bp+var_50]
		push	ax
		mov	al, byte_F02A
		cbw
		push	ax
		push	[bp+arg_8]
		push	[bp+arg_A]
		call	sub_B200
		add	sp, 0Ah
		cmp	byte_F02B, 0
		jz	short loc_96B9
		cmp	word_FAEE, 0
		jz	short loc_96B9
		test	di, 3
		jz	short loc_96C1
		mov	ax, [bp+arg_0]
		mov	bx, 3
		cwd
		idiv	bx
		push	ax
		jmp	short loc_96BC
; ---------------------------------------------------------------------------

loc_96B9:
		push	[bp+arg_0]

loc_96BC:
		call	sub_B520

loc_96C1:
		add	di, 2

loc_96C4:
		cmp	di, [bp+arg_6]
		jl	short loc_9660
		xor	si, si
		jmp	short loc_96EC
; ---------------------------------------------------------------------------

loc_96CD:
		call	sub_B536
		cmp	byte_F02B, 0
		jz	short loc_96E4
		cmp	word_FAEE, 0
		jz	short loc_96E4
		push	0
		jmp	short loc_96E6
; ---------------------------------------------------------------------------

loc_96E4:
		push	2

loc_96E6:
		call	sub_B520
		inc	si

loc_96EC:
		cmp	si, 14h
		jl	short loc_96CD
		cmp	byte_F02B, 0
		jz	short loc_96FB
		call	sub_9A7E

loc_96FB:
		pop	di
		pop	si
		leave
		retn	0Ch
sub_9643	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9701	proc far

var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= dword	ptr  0Ah

		enter	8, 0
		push	si
		push	di
		mov	ax, [bp+arg_0]
		sar	ax, 3
		mov	dx, [bp+arg_2]
		shl	dx, 6
		add	ax, dx
		mov	dx, [bp+arg_2]
		shl	dx, 4
		add	ax, dx
		mov	si, ax
		xor	di, di
		jmp	loc_97E6
; ---------------------------------------------------------------------------

loc_9724:
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		les	bx, dword_F892
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_8], ax
		les	bx, dword_F896
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_6], ax
		les	bx, dword_F89A
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_4], ax
		les	bx, dword_F89E
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_2], ax
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		push	large 0C00000h
		call	sub_F72
		mov	ax, di
		add	ax, ax
		les	bx, [bp+arg_4]
		add	bx, ax
		mov	ax, es:[bx]
		les	bx, dword_F892
		add	bx, si
		mov	es:[bx], ax
		call	sub_F9C
		mov	ax, di
		add	ax, ax
		les	bx, [bp+arg_4]
		add	bx, ax
		mov	ax, es:[bx]
		and	ax, [bp+var_8]
		les	bx, dword_F892
		add	bx, si
		or	es:[bx], ax
		mov	ax, di
		add	ax, ax
		les	bx, [bp+arg_4]
		add	bx, ax
		mov	ax, es:[bx]
		and	ax, [bp+var_6]
		les	bx, dword_F896
		add	bx, si
		or	es:[bx], ax
		mov	ax, di
		add	ax, ax
		les	bx, [bp+arg_4]
		add	bx, ax
		mov	ax, es:[bx]
		and	ax, [bp+var_4]
		les	bx, dword_F89A
		add	bx, si
		or	es:[bx], ax
		mov	ax, di
		add	ax, ax
		les	bx, [bp+arg_4]
		add	bx, ax
		mov	ax, es:[bx]
		and	ax, [bp+var_2]
		les	bx, dword_F89E
		add	bx, si
		or	es:[bx], ax
		add	si, 50h	; 'P'
		inc	di

loc_97E6:
		cmp	di, 10h
		jl	loc_9724
		pop	di
		pop	si
		leave
		retf
sub_9701	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_97F1	proc far
					; sub_A8FA+456p ...

var_60		= byte ptr -60h
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		enter	60h, 0
		push	si
		push	di
		lea	ax, [bp+var_60]
		push	ss
		push	ax
		push	ds
		push	offset aKkuukkuukkuukk ; "ªªUUªªUUªªUUªªUUªªUUªªUUªªUUªªUU3333ÌÌÌ"...
		mov	cx, 60h	; '`'
		call	SCOPY@
		xor	di, di
		jmp	short loc_983D
; ---------------------------------------------------------------------------

loc_980C:
		xor	si, si
		jmp	short loc_9830
; ---------------------------------------------------------------------------

loc_9810:
		mov	ax, di
		shl	ax, 5
		lea	dx, [bp+var_60]
		add	ax, dx
		push	ss
		push	ax
		push	[bp+arg_2]
		mov	ax, si
		shl	ax, 4
		add	ax, [bp+arg_0]
		push	ax
		push	cs
		call	near ptr sub_9701
		add	sp, 8
		inc	si

loc_9830:
		cmp	si, [bp+arg_4]
		jl	short loc_9810
		push	0Ah
		call	sub_B520
		inc	di

loc_983D:
		cmp	di, 3
		jl	short loc_980C
		pop	di
		pop	si
		leave
		retf
sub_97F1	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9846	proc near

var_2		= byte ptr -2
var_1		= byte ptr -1
arg_0		= dword	ptr  4
arg_4		= word ptr  8

		enter	2, 0
		push	si
		push	di
		mov	di, [bp+arg_4]
		mov	si, 64h	; 'd'
		mov	[bp+var_2], 0
		xor	cx, cx
		jmp	short loc_98A1
; ---------------------------------------------------------------------------

loc_985A:
		mov	ax, di
		cwd
		idiv	si
		mov	[bp+var_1], al
		cmp	[bp+var_2], 0
		jnz	short loc_986B
		mov	[bp+var_2], al

loc_986B:
		cmp	[bp+var_2], 0
		jnz	short loc_9876
		cmp	cx, 2
		jnz	short loc_9885

loc_9876:
		les	bx, [bp+arg_0]
		add	bx, cx
		mov	al, [bp+var_1]
		add	al, 0A0h ; ' '
		mov	es:[bx], al
		jmp	short loc_988E
; ---------------------------------------------------------------------------

loc_9885:
		les	bx, [bp+arg_0]
		add	bx, cx
		mov	byte ptr es:[bx], 0CFh ; 'Ï'

loc_988E:
		mov	al, [bp+var_1]
		cbw
		imul	si
		sub	di, ax
		inc	cx
		mov	bx, 0Ah
		mov	ax, si
		cwd
		idiv	bx
		mov	si, ax

loc_98A1:
		cmp	cx, 3
		jl	short loc_985A
		les	bx, [bp+arg_0]
		add	bx, cx
		mov	byte ptr es:[bx], 0
		pop	di
		pop	si
		leave
		retn	6
sub_9846	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_98B5	proc near

var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  4

		enter	6, 0
		push	si
		push	di
		cmp	[bp+arg_0], 0
		jnz	short loc_98C5
		xor	ax, ax
		jmp	short loc_98DE
; ---------------------------------------------------------------------------

loc_98C5:
		cmp	[bp+arg_0], 1
		jnz	short loc_98D0
		mov	ax, 28h	; '('
		jmp	short loc_98DE
; ---------------------------------------------------------------------------

loc_98D0:
		cmp	[bp+arg_0], 2
		jnz	short loc_98DB
		mov	ax, 3E80h
		jmp	short loc_98DE
; ---------------------------------------------------------------------------

loc_98DB:
		mov	ax, 3EA8h

loc_98DE:
		mov	si, ax
		mov	di, 1F54h
		call	sub_C10B
		mov	[bp+var_2], 0
		jmp	short loc_9930
; ---------------------------------------------------------------------------

loc_98EF:
		mov	[bp+var_4], 0
		jmp	short loc_9921
; ---------------------------------------------------------------------------

loc_98F6:
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		les	bx, dword_F892
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_6], ax
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	bx, word ptr dword_F892
		add	bx, di
		mov	ax, [bp+var_6]
		mov	es:[bx], ax
		add	[bp+var_4], 2
		add	si, 2
		add	di, 2

loc_9921:
		cmp	[bp+var_4], 28h	; '('
		jl	short loc_98F6
		inc	[bp+var_2]
		add	di, 28h	; '('
		add	si, 28h	; '('

loc_9930:
		cmp	[bp+var_2], 0C8h ; 'È'
		jl	short loc_98EF
		call	egc_off
		pop	di
		pop	si
		leave
		retn	2
sub_98B5	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9942	proc near
					; sub_A8FA+152p ...

var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8

		enter	6, 0
		push	si
		push	di
		cmp	[bp+arg_0], 0
		jnz	short loc_9952
		xor	ax, ax
		jmp	short loc_996B
; ---------------------------------------------------------------------------

loc_9952:
		cmp	[bp+arg_0], 1
		jnz	short loc_995D
		mov	ax, 28h	; '('
		jmp	short loc_996B
; ---------------------------------------------------------------------------

loc_995D:
		cmp	[bp+arg_0], 2
		jnz	short loc_9968
		mov	ax, 3E80h
		jmp	short loc_996B
; ---------------------------------------------------------------------------

loc_9968:
		mov	ax, 3EA8h

loc_996B:
		mov	si, ax
		mov	ax, [bp+arg_4]
		sar	ax, 3
		mov	dx, [bp+arg_2]
		shl	dx, 6
		add	ax, dx
		mov	dx, [bp+arg_2]
		shl	dx, 4
		add	ax, dx
		mov	di, ax
		call	sub_C10B
		mov	[bp+var_2], 0
		jmp	short loc_99D2
; ---------------------------------------------------------------------------

loc_9991:
		mov	[bp+var_4], 0
		jmp	short loc_99C3
; ---------------------------------------------------------------------------

loc_9998:
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		les	bx, dword_F892
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_6], ax
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	bx, word ptr dword_F892
		add	bx, di
		mov	ax, [bp+var_6]
		mov	es:[bx], ax
		add	[bp+var_4], 2
		add	si, 2
		add	di, 2

loc_99C3:
		cmp	[bp+var_4], 28h	; '('
		jl	short loc_9998
		inc	[bp+var_2]
		add	di, 28h	; '('
		add	si, 28h	; '('

loc_99D2:
		cmp	[bp+var_2], 0C8h ; 'È'
		jl	short loc_9991
		call	egc_off
		pop	di
		pop	si
		leave
		retn	6
sub_9942	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_99E4	proc near

var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8

		enter	6, 0
		push	si
		push	di
		cmp	[bp+arg_4], 0
		jnz	short loc_99F4
		xor	ax, ax
		jmp	short loc_9A0D
; ---------------------------------------------------------------------------

loc_99F4:
		cmp	[bp+arg_4], 1
		jnz	short loc_99FF
		mov	ax, 28h	; '('
		jmp	short loc_9A0D
; ---------------------------------------------------------------------------

loc_99FF:
		cmp	[bp+arg_4], 2
		jnz	short loc_9A0A
		mov	ax, 3E80h
		jmp	short loc_9A0D
; ---------------------------------------------------------------------------

loc_9A0A:
		mov	ax, 3EA8h

loc_9A0D:
		mov	si, ax
		mov	di, 1F54h
		mov	ax, [bp+arg_2]
		imul	ax, 50h
		add	si, ax
		call	sub_C10B
		mov	ax, [bp+arg_2]
		mov	[bp+var_2], ax
		jmp	short loc_9A68
; ---------------------------------------------------------------------------

loc_9A27:
		mov	[bp+var_4], 0
		jmp	short loc_9A59
; ---------------------------------------------------------------------------

loc_9A2E:
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		les	bx, dword_F892
		add	bx, si
		mov	ax, es:[bx]
		mov	[bp+var_6], ax
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	bx, word ptr dword_F892
		add	bx, di
		mov	ax, [bp+var_6]
		mov	es:[bx], ax
		add	[bp+var_4], 2
		add	si, 2
		add	di, 2

loc_9A59:
		cmp	[bp+var_4], 28h	; '('
		jl	short loc_9A2E
		inc	[bp+var_2]
		add	di, 28h	; '('
		add	si, 28h	; '('

loc_9A68:
		mov	ax, [bp+arg_0]
		add	ax, [bp+arg_2]
		cmp	ax, [bp+var_2]
		jg	short loc_9A27
		call	egc_off
		pop	di
		pop	si
		leave
		retn	6
sub_99E4	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9A7E	proc near

var_2		= word ptr -2

		enter	2, 0
		push	si
		push	di
		push	large 0C00000h
		call	sub_F72
		mov	si, 14Ch
		jmp	short loc_9AC5
; ---------------------------------------------------------------------------

loc_9A94:
		mov	di, 90h	; ''
		jmp	short loc_9ABE
; ---------------------------------------------------------------------------

loc_9A99:
		mov	ax, di
		sar	ax, 3
		mov	dx, si
		shl	dx, 6
		add	ax, dx
		mov	dx, si
		shl	dx, 4
		add	ax, dx
		mov	[bp+var_2], ax
		les	bx, dword_F892
		add	bx, [bp+var_2]
		mov	word ptr es:[bx], 0FFFFh
		add	di, 10h

loc_9ABE:
		cmp	di, 1F0h
		jl	short loc_9A99
		inc	si

loc_9AC5:
		cmp	si, 15Ch
		jl	short loc_9A94
		call	sub_F9C
		pop	di
		pop	si
		leave
		retn
sub_9A7E	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9AD4	proc near
					; sub_A09D+7D1p
		push	bp
		mov	bp, sp
		push	si
		push	ds
		push	(offset	aKkuukkuukkuukk+60h)
		call	sub_95A3
		push	1Eh
		call	sub_B520
		push	1
		call	sub_249A
		push	600h
		push	ds
		push	offset aEnding_m ; "ending.m"
		call	sub_B6E6
		add	sp, 6
		push	0
		call	sub_B839
		pop	cx
		call	sub_9A7E
		push	4
		call	sub_245A
		push	5
		call	sub_B855
		pop	cx
		mov	si, 0A0h ; ' '
		jmp	short loc_9B5C
; ---------------------------------------------------------------------------

loc_9B1B:
		push	si
		push	64h ; 'd'
		lea	ax, [si+13Fh]
		push	ax
		push	large 12B0004h
		call	sub_8FA
		push	large 0C00000h
		call	sub_F72
		lea	ax, [si+138h]
		push	ax
		push	64h ; 'd'
		lea	ax, [si+13Fh]
		push	ax
		push	12Bh
		call	sub_D04
		call	sub_F9C
		push	1
		call	sub_B520
		sub	si, 4

loc_9B5C:
		cmp	si, 24h	; '$'
		jg	short loc_9B1B
		pop	si
		pop	bp
		retn
sub_9AD4	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_9B64	proc near
		push	bp
		mov	bp, sp
		push	si
		push	ds
		push	offset aEnd1_txt ; "end1.txt"
		call	sub_95A3
		push	600h
		push	ds
		push	offset aEnd1_m	; "end1.m"
		call	sub_B6E6
		add	sp, 6
		push	0
		call	sub_B839
		pop	cx
		mov	word_D3B0, 0
		call	far ptr	loc_1C2C
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd01_pi	; "ed01.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	2
		call	sub_536
		push	28h ; '('
		call	sub_B520
		push	0
		call	sub_98B5
		mov	byte_F02A, 2Fh ; '/'
		mov	byte_F02B, 1
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_DE32
		push	6
		call	sub_9643
		push	14h
		call	sub_B520
		push	1
		call	sub_57A
		push	1
		call	sub_98B5
		push	1
		call	sub_536
		mov	si, 1
		jmp	short loc_9C2D
; ---------------------------------------------------------------------------

loc_9C15:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9C2D:
		cmp	si, 3
		jle	short loc_9C15
		push	2
		call	sub_98B5
		mov	si, 4
		jmp	short loc_9C54
; ---------------------------------------------------------------------------

loc_9C3C:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9C54:
		cmp	si, 5
		jle	short loc_9C3C
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_DF46
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 7
		jmp	short loc_9C91
; ---------------------------------------------------------------------------

loc_9C79:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9C91:
		cmp	si, 9
		jle	short loc_9C79
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_DFFE
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E02C
		push	6
		call	sub_9643
		push	14h
		call	sub_B520
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E05A
		push	6
		call	sub_9643
		xor	si, si
		jmp	short loc_9D10
; ---------------------------------------------------------------------------

loc_9CDE:
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		push	large 0A00064h
		push	large 1DF0129h
		push	2
		call	sub_7F4
		push	3
		mov	ax, si
		add	ax, ax
		mov	dx, 0C6h ; 'Æ'
		sub	dx, ax
		push	dx
		push	2
		call	sub_99E4
		push	1
		call	sub_B520
		inc	si

loc_9D10:
		cmp	si, 64h	; 'd'
		jl	short loc_9CDE
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E088
		push	6
		call	sub_9643
		mov	byte_F02A, 26h ; '&'
		mov	si, 0Eh
		jmp	short loc_9D48
; ---------------------------------------------------------------------------

loc_9D30:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9D48:
		cmp	si, 0Fh
		jle	short loc_9D30
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 10h
		jmp	short loc_9D6F
; ---------------------------------------------------------------------------

loc_9D57:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9D6F:
		cmp	si, 11h
		jle	short loc_9D57
		mov	byte_F02A, 26h ; '&'
		mov	si, 12h
		jmp	short loc_9D96
; ---------------------------------------------------------------------------

loc_9D7E:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9D96:
		cmp	si, 14h
		jle	short loc_9D7E
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E1F8
		push	6
		call	sub_9643
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E226
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E254
		push	6
		call	sub_9643
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd02_pi	; "ed02.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	2
		call	sub_57A
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 0
		jnz	short loc_9E2A
		push	0
		jmp	short loc_9E3B
; ---------------------------------------------------------------------------

loc_9E2A:
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 1
		jnz	short loc_9E39
		push	2
		jmp	short loc_9E3B
; ---------------------------------------------------------------------------

loc_9E39:
		push	3

loc_9E3B:
					; sub_9B64+2D3j
		call	sub_98B5
		push	2
		call	sub_536
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E282
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 19h
		jmp	short loc_9E7D
; ---------------------------------------------------------------------------

loc_9E65:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9E7D:
		cmp	si, 1Ah
		jle	short loc_9E65
		mov	byte_F02A, 26h ; '&'
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 0
		jnz	loc_9F22
		mov	si, 1Bh
		jmp	short loc_9EB1
; ---------------------------------------------------------------------------

loc_9E99:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9EB1:
		cmp	si, 1Ch
		jle	short loc_9E99
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 1Dh
		jmp	short loc_9ED8
; ---------------------------------------------------------------------------

loc_9EC0:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9ED8:
		cmp	si, 1Eh
		jle	short loc_9EC0
		push	1
		call	sub_98B5
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E3C4
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E3F2
		push	0Ch
		call	sub_9643
		mov	byte_F02B, 0
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E420
		jmp	loc_A092
; ---------------------------------------------------------------------------

loc_9F22:
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 1
		jnz	loc_9FD3
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E44E
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E47C
		push	6
		call	sub_9643
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E4AA
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 25h	; '%'
		jmp	short loc_9F8E
; ---------------------------------------------------------------------------

loc_9F76:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_9F8E:
		cmp	si, 26h	; '&'
		jle	short loc_9F76
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E534
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E562
		push	0Ch
		call	sub_9643
		mov	byte_F02B, 0
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E590
		jmp	loc_A092
; ---------------------------------------------------------------------------

loc_9FD3:
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 2
		jnz	loc_A097
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E5BE
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E5EC
		push	6
		call	sub_9643
		mov	byte_F02A, 26h ; '&'
		mov	si, 2Ch	; ','
		jmp	short loc_A029
; ---------------------------------------------------------------------------

loc_A011:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A029:
		cmp	si, 2Dh	; '-'
		jle	short loc_A011
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 2Eh	; '.'
		jmp	short loc_A050
; ---------------------------------------------------------------------------

loc_A038:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A050:
		cmp	si, 2Fh	; '/'
		jle	short loc_A038
		mov	byte_F02A, 26h ; '&'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E6D2
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E700
		push	0Ch
		call	sub_9643
		mov	byte_F02B, 0
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E72E

loc_A092:
					; sub_9B64+46Cj
		push	9
		call	sub_9643

loc_A097:
		call	sub_9AD4
		pop	si
		pop	bp
		retn
sub_9B64	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_A09D	proc near
		push	bp
		mov	bp, sp
		push	si
		push	ds
		push	offset aEnd2_txt ; "end2.txt"
		call	sub_95A3
		push	600h
		push	ds
		push	offset aEnd1_m	; "end1.m"
		call	sub_B6E6
		add	sp, 6
		push	0
		call	sub_B839
		pop	cx
		mov	word_D3B0, 0
		call	far ptr	loc_1C2C
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd01_pi	; "ed01.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	2
		call	sub_536
		push	28h ; '('
		call	sub_B520
		push	0
		call	sub_98B5
		mov	byte_F02A, 2Fh ; '/'
		mov	byte_F02B, 1
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_DE32
		push	6
		call	sub_9643
		push	14h
		call	sub_B520
		push	1
		call	sub_57A
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd03_pi	; "ed03.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	0
		call	sub_98B5
		push	1
		call	sub_536
		mov	si, 1
		jmp	short loc_A19D
; ---------------------------------------------------------------------------

loc_A185:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A19D:
		cmp	si, 3
		jle	short loc_A185
		push	1
		call	sub_98B5
		mov	si, 4
		jmp	short loc_A1C4
; ---------------------------------------------------------------------------

loc_A1AC:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A1C4:
		cmp	si, 9
		jle	short loc_A1AC
		push	2
		call	sub_98B5
		mov	si, 0Ah
		jmp	short loc_A1EB
; ---------------------------------------------------------------------------

loc_A1D3:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A1EB:
		cmp	si, 0Bh
		jle	short loc_A1D3
		push	3
		call	sub_98B5
		mov	si, 0Ch
		jmp	short loc_A212
; ---------------------------------------------------------------------------

loc_A1FA:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A212:
		cmp	si, 0Dh
		jle	short loc_A1FA
		push	ds
		push	offset aEd03a_rgb ; "ed03a.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		mov	byte_F02A, 29h ; ')'
		mov	si, 0Eh
		jmp	short loc_A247
; ---------------------------------------------------------------------------

loc_A22F:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A247:
		cmp	si, 0Fh
		jle	short loc_A22F
		push	2
		call	sub_57A
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd04_pi	; "ed04.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		push	0
		call	sub_98B5
		push	2
		call	sub_536
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E112
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E140
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 12h
		jmp	short loc_A2EA
; ---------------------------------------------------------------------------

loc_A2D2:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A2EA:
		cmp	si, 13h
		jle	short loc_A2D2
		push	1
		call	sub_98B5
		mov	byte_F02A, 29h ; ')'
		mov	si, 14h
		jmp	short loc_A316
; ---------------------------------------------------------------------------

loc_A2FE:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A316:
		cmp	si, 15h
		jle	short loc_A2FE
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E226
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		mov	si, 17h
		jmp	short loc_A353
; ---------------------------------------------------------------------------

loc_A33B:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A353:
		cmp	si, 18h
		jle	short loc_A33B
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E2B0
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E2DE
		push	6
		call	sub_9643
		push	0Ah
		call	sub_B520
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 0
		jnz	loc_A4EC
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E30C
		push	6
		call	sub_9643
		push	1Eh
		call	sub_B520
		push	2
		call	sub_98B5
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E33A
		push	6
		call	sub_9643
		push	3
		call	sub_98B5
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E368
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		mov	si, 1Eh
		jmp	short loc_A403
; ---------------------------------------------------------------------------

loc_A3EB:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A403:
		cmp	si, 1Fh
		jle	short loc_A3EB
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 20h	; ' '
		jmp	short loc_A42A
; ---------------------------------------------------------------------------

loc_A412:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A42A:
		cmp	si, 24h	; '$'
		jle	short loc_A412
		mov	byte_F02A, 29h ; ')'
		mov	si, 25h	; '%'
		jmp	short loc_A451
; ---------------------------------------------------------------------------

loc_A439:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A451:
		cmp	si, 26h	; '&'
		jle	short loc_A439
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E534
		push	6
		call	sub_9643
		push	2
		call	sub_57A
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd05_pi	; "ed05.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	0
		call	sub_98B5
		push	2
		call	sub_536
		mov	si, 28h	; '('
		jmp	short loc_A4D3
; ---------------------------------------------------------------------------

loc_A4BB:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A4D3:
		cmp	si, 2Eh	; '.'
		jle	short loc_A4BB
		mov	byte_F02B, 0
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E6A4
		jmp	loc_A869
; ---------------------------------------------------------------------------

loc_A4EC:
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+26h], 1
		jnz	loc_A6B6
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E6D2
		push	6
		call	sub_9643
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E700
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E72E
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E75C
		push	6
		call	sub_9643
		push	1Eh
		call	sub_B520
		push	2
		call	sub_98B5
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E78A
		push	6
		call	sub_9643
		push	3
		call	sub_98B5
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E7B8
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E7E6
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E814
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E842
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_E870
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		mov	si, 3Ah	; ':'
		jmp	short loc_A5F9
; ---------------------------------------------------------------------------

loc_A5E1:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A5F9:
		cmp	si, 3Dh	; '='
		jle	short loc_A5E1
		mov	byte_F02A, 2Fh ; '/'
		mov	si, 3Eh	; '>'
		jmp	short loc_A620
; ---------------------------------------------------------------------------

loc_A608:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A620:
		cmp	si, 42h	; 'B'
		jle	short loc_A608
		push	2
		call	sub_57A
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd05_pi	; "ed05.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	1
		call	sub_98B5
		push	2
		call	sub_536
		mov	si, 43h	; 'C'
		jmp	short loc_A68C
; ---------------------------------------------------------------------------

loc_A674:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A68C:
		cmp	si, 44h	; 'D'
		jle	short loc_A674
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EA98
		push	0Ch
		call	sub_9643
		mov	byte_F02B, 0
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EAC6
		jmp	loc_A869
; ---------------------------------------------------------------------------

loc_A6B6:
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EAF4
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EB22
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EB50
		push	6
		call	sub_9643
		push	1Eh
		call	sub_B520
		push	2
		call	sub_98B5
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EB7E
		push	6
		call	sub_9643
		push	3
		call	sub_98B5
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EBAC
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EBDA
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EC08
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EC36
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EC64
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EC92
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_ECC0
		push	6
		call	sub_9643
		mov	byte_F02A, 29h ; ')'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_ECEE
		push	6
		call	sub_9643
		mov	byte_F02A, 2Fh ; '/'
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_ED1C
		push	6
		call	sub_9643
		push	2
		call	sub_57A
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd05_pi	; "ed05.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	2
		call	sub_98B5
		push	2
		call	sub_536
		mov	si, 54h	; 'T'
		jmp	short loc_A842
; ---------------------------------------------------------------------------

loc_A82A:
		push	large 90014Ch
		push	2Ch ; ','
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		push	6
		call	sub_9643
		inc	si

loc_A842:
		cmp	si, 5Bh	; '['
		jle	short loc_A82A
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EEBA
		push	6
		call	sub_9643
		mov	byte_F02B, 0
		push	large 90014Ch
		push	2Ch ; ','
		push	ds
		push	offset unk_EEE8

loc_A869:
					; sub_A09D+616j
		push	0Ch
		call	sub_9643
		call	sub_9AD4
		pop	si
		pop	bp
		retn
sub_A09D	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_A874	proc near

var_2		= word ptr -2
arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8

		enter	2, 0
		push	si
		push	di
		mov	si, [bp+arg_4]
		mov	di, [bp+arg_0]
		mov	[bp+var_2], 0
		jmp	short loc_A898
; ---------------------------------------------------------------------------

loc_A887:
		push	si
		push	[bp+arg_2]
		push	di
		call	sub_1B86
		inc	[bp+var_2]
		inc	di
		add	si, 10h

loc_A898:
		cmp	[bp+var_2], 5
		jl	short loc_A887
		pop	di
		pop	si
		leave
		retn	6
sub_A874	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_A8A4	proc near
					; sub_A8FA+1A9p ...
		push	bp
		mov	bp, sp
		push	large 0C00000h
		call	sub_F72
		push	large 1A000C0h
		push	large 27F010Fh
		call	sub_D04
		call	sub_F9C
		pop	bp
		retn
sub_A8A4	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_A8CA	proc near
					; sub_A8FA+13Fp ...

arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8

		push	bp
		mov	bp, sp
		push	[bp+arg_4]
		push	[bp+arg_0]
		call	sub_C1C6
		push	large 200064h
		push	[bp+arg_2]
		call	sub_9942
		push	4
		call	sub_B520
		mov	word_D3B0, 64h ; 'd'
		call	far ptr	loc_1C2C
		pop	bp
		retn	6
sub_A8CA	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_A8FA	proc near

var_4		= byte ptr -4

		enter	4, 0
		push	si
		push	di
		push	6
		call	sub_B855
		pop	cx
		xor	si, si
		jmp	short loc_A920
; ---------------------------------------------------------------------------

loc_A90C:
		push	large 1B000B8h
		push	si
		call	sub_A874
		push	4
		call	sub_B520
		add	si, 5

loc_A920:
		cmp	si, 37h	; '7'
		jl	short loc_A90C
		push	ds
		push	offset aVer1_00	; "ver 1.00"
		push	large 2F00C0h
		push	210h
		call	sub_B200
		add	sp, 0Ah
		push	8
		call	sub_B855
		pop	cx
		mov	si, 0B8h ; '¸'
		jmp	short loc_A992
; ---------------------------------------------------------------------------

loc_A947:
		push	large 0C00000h
		call	sub_F72
		push	210h
		lea	ax, [si+4]
		push	ax
		push	24Fh
		lea	ax, [si+13h]
		push	ax
		call	sub_D04
		call	sub_F9C
		push	1B0h
		push	si
		push	32h ; '2'
		call	sub_A874
		push	ds
		push	offset aVer1_00	; "ver 1.00"
		push	2Fh ; '/'
		lea	ax, [si+8]
		push	ax
		push	210h
		call	sub_B200
		add	sp, 0Ah
		push	1
		call	sub_B520
		add	si, 4

loc_A992:
		cmp	si, 170h
		jl	short loc_A947
		push	9
		call	sub_B855
		pop	cx
		mov	byte_F02A, 2Fh ; '/'
		push	large 1B000C0h
		push	14h
		push	ds
		push	offset aXxcvsB@b@vrvsv ; "••–‚˜^@@‚r‚s‚`‚e‚e"
		push	0Ch
		call	sub_9643
		push	0Dh
		call	sub_B855
		pop	cx
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd06_pi	; "ed06.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		push	4
		push	0
		push	29h ; ')'
		call	sub_A8CA
		call	sub_A8A4
		push	ds
		push	offset aGvgngogigab@b@ ; "ƒvƒƒOƒ‰ƒ€@@@‚y‚t‚m"
		push	large 2F00C0h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	11h
		call	sub_B855
		pop	cx
		push	ds
		push	offset aEd06b_rgb ; "ed06b.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	0FCh ; 'ü'
		push	2
		push	29h ; ')'
		call	sub_A8CA
		push	15h
		call	sub_B855
		pop	cx
		push	large 200064h
		push	3
		call	sub_9942
		push	ds
		push	offset aEd06c_rgb ; "ed06c.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	4
		push	3
		push	29h ; ')'
		call	sub_A8CA
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd07_pi	; "ed07.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		push	19h
		call	sub_B855
		pop	cx
		call	sub_A8A4
		push	ds
		push	offset aGogigtgbgbgnb@ ; "ƒOƒ‰ƒtƒBƒbƒN@‚y‚t‚m"
		push	large 2F00C0h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aB@b@b@b@b@b@b@ ; "@@@@@@@‚•“úŒü"
		push	large 2F00E0h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aB@b@b@b@bigibG ; "@@@@iƒI[ƒ‹ƒNƒŠƒA‰æj"
		push	large 2F00F0h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aEd07a_rgb ; "ed07a.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	0FCh ; 'ü'
		push	0
		push	29h ; ')'
		call	sub_A8CA
		push	1Dh
		call	sub_B855
		pop	cx
		push	ds
		push	offset aEd07b_rgb ; "ed07b.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	8
		push	1
		push	0E9h ; 'é'
		call	sub_A8CA
		push	21h ; '!'
		call	sub_B855
		pop	cx
		push	large 200064h
		push	2
		call	sub_9942
		push	0F8h ; 'ø'
		push	2
		push	0E9h ; 'é'
		call	sub_A8CA
		push	25h ; '%'
		call	sub_B855
		pop	cx
		call	sub_A8A4
		push	ds
		push	offset aVlvtvrvhvbb@b@ ; "‚l‚t‚r‚h‚b@@‚y‚t‚m"
		push	large 2F00C0h
		push	1B0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aEd07b_rgb ; "ed07b.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	8
		push	3
		push	0E9h ; 'é'
		call	sub_A8CA
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd08_pi	; "ed08.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		push	29h ; ')'
		call	sub_B855
		pop	cx
		push	0
		call	sub_B790
		pop	cx
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	0F8h ; 'ø'
		push	0
		push	0E9h ; 'é'
		call	sub_A8CA
		push	2Dh ; '-'
		call	sub_B855
		pop	cx
		push	ds
		push	offset aEd08a_rgb ; "ed08a.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	0Ch
		push	1
		push	29h ; ')'
		call	sub_A8CA
		push	31h ; '1'
		call	sub_B855
		pop	cx
		call	sub_A8A4
		push	ds
		push	offset aVsvdvrvsb@vovk ; "‚s‚d‚r‚s@‚o‚k‚`‚x‚d‚q"
		push	large 2F00C0h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aB@b@b@b@vivivs ; "@@@@‚©‚¨‚é"
		push	large 2F00E0h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aB@b@b@b@vbbVv ;	"@@@@‚b|‚v"
		push	large 2F00F8h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aB@b@Orucb@mbiS ; "@@ ŽR“c@Œbˆê˜Y"
		push	large 2F0110h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aVVSSxrivVVVV ; " ‚»‚Ì‘¼‘吨‚Ì‚Ý‚È‚³‚ñ"
		push	large 2F0128h
		push	1A0h
		call	sub_B200
		add	sp, 0Ah
		push	ds
		push	offset aEd08b_rgb ; "ed08b.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	0F4h ; 'ô'
		push	2
		push	29h ; ')'
		call	sub_A8CA
		push	35h ; '5'
		call	sub_B855
		pop	cx
		push	ds
		push	offset aEd08c_rgb ; "ed08c.rgb"
		call	sub_1E9A
		call	far ptr	loc_1C2C
		push	0Ch
		push	3
		push	29h ; ')'
		call	sub_A8CA
		push	39h ; '9'
		call	sub_B855
		pop	cx
		push	4
		call	sub_57A
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEd09_pi	; "ED09.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	0
		call	sub_1276
		push	4
		call	sub_536
		push	64h ; 'd'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aVsvivbvovlb@vs ; "‚s‚ˆ‚‚Ž‚‹@‚™‚‚•@‚†‚‚’@‚‚Œ‚‚™‚‰‚"...
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 600018h
		call	sub_B200
		add	sp, 0Ah
		push	large 150060h
		push	18h
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	0C8h ; 'È'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aB@nPiuU_ ; "@ÅI“¾“_"
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 800040h
		call	sub_B200
		add	sp, 0Ah
		push	large 0C00080h
		push	large [dword_FB0C]
		call	sub_95CB
		push	large 100080h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	64h ; 'd'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aGrgugegbgjgeb ;	"ƒRƒ“ƒeƒBƒjƒ…["
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 0A00040h
		call	sub_B200
		add	sp, 0Ah
		push	large 10000A0h
		les	bx, dword_FB02
		mov	ax, es:[bx+12h]
		add	ax, 0A0h ; ' '
		push	ax
		push	0Fh
		call	sub_1322
		push	large 1000A0h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	64h ; 'd'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aB@Gigugn ; "@ ƒ‰ƒ“ƒN"
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 0C00040h
		call	sub_B200
		add	sp, 0Ah
		push	large 0D000C0h
		push	10h
		push	ds
		mov	al, byte_D722
		cbw
		shl	ax, 3
		add	ax, 90h	; ''
		push	ax
		push	0Fh
		call	sub_13B6
		push	large 1000C0h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	64h ; 'd'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aGvgmgcgdbPik ; "ƒvƒŒƒCƒ„[‰Šú"
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 0E00040h
		call	sub_B200
		add	sp, 0Ah
		push	large 10000E0h
		les	bx, dword_FB02
		mov	al, es:[bx+1Ah]
		mov	ah, 0
		add	ax, 0A1h ; '¡'
		push	ax
		push	0Fh
		call	sub_1322
		push	large 1000E0h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	64h ; 'd'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aCMvpik	; " —쌂‰Šú”"
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 1000040h
		call	sub_B200
		add	sp, 0Ah
		push	large 1000100h
		les	bx, dword_FB02
		mov	al, es:[bx+19h]
		mov	ah, 0
		add	ax, 0A0h ; ' '
		push	ax
		push	0Fh
		call	sub_1322
		push	large 100100h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	96h ; '–'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		les	bx, dword_FB02
		mov	di, es:[bx+28h]
		cmp	di, 64h	; 'd'
		jle	short loc_AEAC
		mov	di, 64h	; 'd'
		jmp	short loc_AEB2
; ---------------------------------------------------------------------------

loc_AEAC:
		or	di, di
		jge	short loc_AEB2
		xor	di, di

loc_AEB2:
					; sub_A8FA+5B4j
		push	ds
		push	offset aVavVVSrso ; "‚ ‚È‚½‚̘r‘O"
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 1200040h
		call	sub_B200
		add	sp, 0Ah
		push	di
		push	ss
		lea	ax, [bp+var_4]
		push	ax
		call	sub_9846
		push	large 0C00120h
		push	10h
		push	ss
		lea	ax, [bp+var_4]
		push	ax
		push	0Fh
		call	sub_13B6
		cmp	di, 64h	; 'd'
		jnz	short loc_AEEF
		xor	si, si
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AEEF:
		cmp	di, 5Ah	; 'Z'
		jl	short loc_AEF9
		mov	si, 1
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AEF9:
		cmp	di, 50h	; 'P'
		jl	short loc_AF03
		mov	si, 2
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF03:
		cmp	di, 46h	; 'F'
		jl	short loc_AF17
		cmp	di, 4Dh	; 'M'
		jnz	short loc_AF12
		mov	si, 3
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF12:
		mov	si, 4
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF17:
		cmp	di, 3Ch	; '<'
		jl	short loc_AF21
		mov	si, 5
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF21:
		cmp	di, 32h	; '2'
		jl	short loc_AF2B
		mov	si, 6
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF2B:
		cmp	di, 28h	; '('
		jl	short loc_AF35
		mov	si, 7
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF35:
		cmp	di, 1Eh
		jl	short loc_AF3F
		mov	si, 8
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF3F:
		cmp	di, 14h
		jl	short loc_AF49
		mov	si, 9
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF49:
		cmp	di, 0Ah
		jl	short loc_AF53
		mov	si, 0Ah
		jmp	short loc_AF56
; ---------------------------------------------------------------------------

loc_AF53:
		mov	si, 0Bh

loc_AF56:
					; sub_A8FA+5FDj ...
		mov	ax, si
		imul	ax, 2Eh
		add	ax, 0EB2h
		push	ds
		push	ax
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 12000F0h
		call	sub_B200
		add	sp, 0Ah
		push	large 60120h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	78h ; 'x'
		call	sub_B520
		push	large 180120h
		push	0C0h ; 'À'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		push	0C8h ; 'È'
		call	sub_B520
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aVpvxvxvvb@vyvt ; "‚P‚X‚X‚V@‚y‚t‚m  (Amusement Makers)"
		mov	al, byte_F02A
		cbw
		push	ax
		push	large 1600040h
		call	sub_B200
		add	sp, 0Ah
		push	large 120160h
		push	40h ; '@'
		push	cs
		call	near ptr sub_97F1
		add	sp, 6
		call	sub_B4B7
		push	5
		call	sub_57A
		nop
		push	cs
		call	near ptr sub_AFE7
		call	sub_123C
		pop	di
		pop	si
		leave
		retn
sub_A8FA	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_AFE7	proc far
		push	bp
		mov	bp, sp
		call	sub_BFE8
		or	ax, ax
		jz	loc_B07D
		les	bx, dword_FB02
		cmp	word ptr es:[bx+12h], 0
		jnz	short loc_B07D
		push	ds
		push	offset aAll_pi	; "all.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	2
		call	sub_536
		push	96h ; '–'
		call	sub_B520
		push	ds
		push	offset aBut_pi	; "but.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		call	sub_B4B7
		push	5
		call	sub_57A

loc_B07D:
		pop	bp
		retf
sub_AFE7	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B07F	proc far
		push	bp
		mov	bp, sp
		call	sub_BFE8
		or	ax, ax
		jz	loc_B115
		mov	word_D3B0, 0
		call	far ptr	loc_1C2C
		push	ds
		push	offset aAll_pi	; "all.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		push	2
		call	sub_536
		push	96h ; '–'
		call	sub_B520
		push	ds
		push	offset aExtra_pi ; "extra.pi"
		push	0
		call	sub_B4F5
		add	sp, 6
		push	0
		call	sub_B790
		pop	cx
		push	large 0
		push	0
		call	sub_B7B3
		add	sp, 6
		push	ds
		push	offset unk_F8BA
		push	large [dword_F8A2]
		call	sub_1460
		call	sub_B4B7
		push	5
		call	sub_57A

loc_B115:
		pop	bp
		retf
sub_B07F	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

; int __cdecl main(int _argc, const char **_argv, const	char **_envp)
_main		proc far

_argc		= word ptr  6
_argv		= dword	ptr  8
_envp		= dword	ptr  0Ch

		push	bp
		mov	bp, sp
		call	sub_B888
		or	ax, ax
		jz	loc_B1FE
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+0Bh], 7Fh ; ''
		jnz	loc_B1FE
		call	sub_B756
		call	sub_FA2
		push	ds
		push	offset aMikoft_bft ; "MIKOFT.bft"
		call	sub_FE2
		call	sub_B6AC
		call	sub_B654
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+18h], 0
		jnz	short loc_B161
		mov	byte_FAF1, 0
		jmp	short loc_B189
; ---------------------------------------------------------------------------

loc_B161:
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+18h], 1
		jnz	short loc_B173
		mov	byte_FAF1, 0
		jmp	short loc_B184
; ---------------------------------------------------------------------------

loc_B173:
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+18h], 2
		jnz	short loc_B189
		mov	al, byte_FAF3
		mov	byte_FAF1, al

loc_B184:
		call	sub_B68E

loc_B189:
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	dx, 0A4h ; '¤'
		out	dx, al		; Interrupt Controller #2, 8259A
		push	ds
		push	offset aEndft_bft ; "endft.bft"
		call	sub_2882
		push	64h ; 'd'
		call	sub_B520
		les	bx, dword_FB02
		cmp	byte ptr es:[bx+16h], 4
		jz	short loc_B1C2
		cmp	word ptr es:[bx+12h], 0
		jz	short loc_B1BA
		call	sub_9B64
		jmp	short loc_B1BD
; ---------------------------------------------------------------------------

loc_B1BA:
		call	sub_A09D

loc_B1BD:
		call	sub_A8FA
		jmp	short loc_B1C6
; ---------------------------------------------------------------------------

loc_B1C2:
		push	cs
		call	near ptr sub_B07F

loc_B1C6:
		mov	word_D3B0, 32h ; '2'
		call	far ptr	loc_1C2C
		call	sub_BC9E
		mov	word_D3B0, 0
		call	far ptr	loc_1C2C
		call	sub_FC6
		call	sub_B616
		push	large 0
		push	ds
		push	offset path	; "op"
		push	ds
		push	offset path	; "op"
		call	_execl
		add	sp, 0Ch

loc_B1FE:
		pop	bp
		retf
_main		endp

seg001		ends

; ===========================================================================

; Segment type:	Pure code
seg002		segment	byte public 'CODE' use16
		assume cs:seg002
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B200	proc far

var_32		= byte ptr -32h
var_12		= word ptr -12h
var_10		= word ptr -10h
var_E		= word ptr -0Eh
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= dword	ptr -8
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah
arg_6		= dword	ptr  0Ch

		enter	32h, 0
		push	si
		push	di
		mov	di, [bp+arg_0]
		mov	ax, [bp+arg_4]
		sar	ax, 4
		and	ax, 3
		mov	[bp+var_E], ax
		mov	ax, [bp+arg_4]
		sar	ax, 6
		and	ax, 7
		mov	[bp+var_10], ax
		push	0C0h ; 'À'
		push	[bp+arg_4]
		call	sub_F72
		mov	dx, 68h	; 'h'
		mov	al, 0Bh
		out	dx, al
		jmp	loc_B445
; ---------------------------------------------------------------------------

loc_B235:
		mov	ax, [bp+arg_2]
		imul	ax, 50h
		push	ax
		mov	ax, di
		mov	bx, 8
		cwd
		idiv	bx
		pop	dx
		add	dx, ax
		mov	word ptr [bp+var_8+2], 0A800h
		mov	word ptr [bp+var_8], dx
		mov	ax, di
		cwd
		idiv	bx
		mov	[bp+var_C], dx
		les	bx, [bp+arg_6]
		mov	al, es:[bx]
		mov	ah, 0
		mov	bx, ax
		test	byte ptr [bx+0D65h], 4
		jz	short loc_B28A
		mov	bx, word ptr [bp+arg_6]
		mov	al, es:[bx]
		cbw
		shl	ax, 8
		mov	dl, es:[bx+1]
		mov	dh, 0
		add	ax, dx
		push	ax
		call	sub_91FC
		pop	cx
		mov	[bp+var_2], ax
		add	word ptr [bp+arg_6], 2
		jmp	short loc_B2D0
; ---------------------------------------------------------------------------

loc_B28A:
		les	bx, [bp+arg_6]
		mov	al, es:[bx]
		mov	ah, 0
		mov	bx, ax
		test	byte ptr [bx+0D65h], 3
		jz	short loc_B2A8
		mov	bx, word ptr [bp+arg_6]
		mov	al, es:[bx]
		mov	ah, 0
		add	ax, 2980h
		jmp	short loc_B2C3
; ---------------------------------------------------------------------------

loc_B2A8:
		les	bx, [bp+arg_6]
		mov	al, es:[bx]
		cbw
		mov	bx, ax
		test	byte ptr [bx+0A7Bh], 5Eh
		jz	short loc_B2C8
		mov	bx, word ptr [bp+arg_6]
		mov	al, es:[bx]
		mov	ah, 0
		add	ax, 2900h

loc_B2C3:
		mov	[bp+var_2], ax
		jmp	short loc_B2CD
; ---------------------------------------------------------------------------

loc_B2C8:
		mov	[bp+var_2], 2B21h

loc_B2CD:
		inc	word ptr [bp+arg_6]

loc_B2D0:
		mov	al, byte ptr [bp+var_2]
		and	al, 0FFh
		mov	dx, 0A1h ; '¡'
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	ax, [bp+var_2]
		shr	ax, 8
		sub	al, 20h	; ' '
		mov	dx, 0A3h ; '£'
		out	dx, al		; Interrupt Controller #2, 8259A
		cmp	[bp+var_2], 2921h
		jb	short loc_B331
		cmp	[bp+var_2], 2B7Eh
		ja	short loc_B331
		cmp	di, 278h
		jg	loc_B450
		mov	[bp+var_12], 0
		jmp	short loc_B324
; ---------------------------------------------------------------------------

loc_B302:
		mov	al, byte ptr [bp+var_12]
		or	al, 20h
		mov	dx, 0A5h ; '¥'
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	dx, 0A9h ; '©'
		in	al, dx		; Interrupt Controller #2, 8259A
		mov	ah, 0
		shl	ax, 8
		mov	bx, [bp+var_12]
		add	bx, bx
		lea	dx, [bp+var_32]
		add	bx, dx
		mov	ss:[bx], ax
		inc	[bp+var_12]

loc_B324:
		cmp	[bp+var_12], 10h
		jl	short loc_B302
		mov	[bp+var_A], 0
		jmp	short loc_B387
; ---------------------------------------------------------------------------

loc_B331:
		cmp	di, 270h
		jg	loc_B450
		mov	[bp+var_12], 0
		jmp	short loc_B37C
; ---------------------------------------------------------------------------

loc_B340:
		mov	al, byte ptr [bp+var_12]
		or	al, 20h
		mov	dx, 0A5h ; '¥'
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	dx, 0A9h ; '©'
		in	al, dx		; Interrupt Controller #2, 8259A
		mov	ah, 0
		shl	ax, 8
		mov	bx, [bp+var_12]
		add	bx, bx
		lea	dx, [bp+var_32]
		add	bx, dx
		mov	ss:[bx], ax
		mov	dx, 0A5h ; '¥'
		mov	al, byte ptr [bp+var_12]
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	dx, 0A9h ; '©'
		in	al, dx		; Interrupt Controller #2, 8259A
		mov	ah, 0
		mov	bx, [bp+var_12]
		add	bx, bx
		lea	dx, [bp+var_32]
		add	bx, dx
		add	ss:[bx], ax
		inc	[bp+var_12]

loc_B37C:
		cmp	[bp+var_12], 10h
		jl	short loc_B340
		mov	[bp+var_A], 1

loc_B387:
		mov	[bp+var_12], 0
		jmp	loc_B42C
; ---------------------------------------------------------------------------

loc_B38F:
		mov	bx, [bp+var_12]
		add	bx, bx
		lea	ax, [bp+var_32]
		add	bx, ax
		mov	ax, ss:[bx]
		mov	[bp+var_4], ax
		mov	ax, [bp+var_E]
		cmp	ax, 1
		jz	short loc_B3B3
		cmp	ax, 2
		jz	short loc_B3C9
		cmp	ax, 3
		jz	short loc_B3BF
		jmp	short loc_B3DF
; ---------------------------------------------------------------------------

loc_B3B3:
		mov	si, [bp+var_4]
		mov	ax, si
		add	ax, ax
		or	[bp+var_4], ax
		jmp	short loc_B3DF
; ---------------------------------------------------------------------------

loc_B3BF:
		mov	si, [bp+var_4]
		mov	ax, si
		add	ax, ax
		or	[bp+var_4], ax

loc_B3C9:
		mov	si, [bp+var_4]
		mov	ax, si
		add	ax, ax
		or	[bp+var_4], ax
		xor	si, [bp+var_4]
		mov	ax, si
		add	ax, ax
		not	ax
		and	[bp+var_4], ax

loc_B3DF:
					; sub_B200+1BDj
		cmp	[bp+var_C], 0
		jz	short loc_B412
		mov	cl, byte ptr [bp+var_C]
		add	cl, 8
		mov	ax, [bp+var_4]
		shr	ax, cl
		les	bx, [bp+var_8]
		mov	es:[bx], al
		mov	ax, [bp+var_4]
		mov	cl, byte ptr [bp+var_C]
		shr	ax, cl
		mov	es:[bx+1], al
		mov	cl, 8
		sub	cl, byte ptr [bp+var_C]
		mov	al, byte ptr [bp+var_4]
		shl	al, cl
		mov	es:[bx+2], al
		jmp	short loc_B425
; ---------------------------------------------------------------------------

loc_B412:
		mov	ax, [bp+var_4]
		shr	ax, 8
		les	bx, [bp+var_8]
		mov	es:[bx], al
		mov	al, byte ptr [bp+var_4]
		mov	es:[bx+1], al

loc_B425:
		add	word ptr [bp+var_8], 50h ; 'P'
		inc	[bp+var_12]

loc_B42C:
		cmp	[bp+var_12], 10h
		jl	loc_B38F
		cmp	[bp+var_A], 0
		jz	short loc_B43D
		add	di, 8

loc_B43D:
		mov	ax, [bp+var_10]
		add	ax, 8
		add	di, ax

loc_B445:
		les	bx, [bp+arg_6]
		cmp	byte ptr es:[bx], 0
		jnz	loc_B235

loc_B450:
					; sub_B200+135j
		mov	dx, 68h	; 'h'
		mov	al, 0Ah
		out	dx, al
		call	sub_F9C
		pop	di
		pop	si
		leave
		retf
sub_B200	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B45F	proc far
		push	bp
		mov	bp, sp
		push	si
		mov	al, byte_D70A
		cbw
		push	ax
		call	sub_1B74
		mov	si, ax
		mov	al, byte_D70B
		cbw
		push	ax
		call	sub_1B74
		or	si, ax
		mov	al, byte_D70C
		cbw
		push	ax
		call	sub_1B74
		or	si, ax
		push	2
		nop
		push	cs
		call	near ptr sub_B520
		mov	al, byte_D70A
		cbw
		push	ax
		call	sub_1B74
		or	si, ax
		mov	al, byte_D70B
		cbw
		push	ax
		call	sub_1B74
		or	si, ax
		mov	al, byte_D70C
		cbw
		push	ax
		call	sub_1B74
		or	si, ax
		mov	ax, si
		pop	si
		pop	bp
		retf
sub_B45F	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B4B7	proc far
					; sub_AFE7+8AP	...
		push	bp
		mov	bp, sp

loc_B4BA:
		push	cs
		call	near ptr sub_B45F
		or	ax, ax
		jnz	short loc_B4BA

loc_B4C2:
		push	cs
		call	near ptr sub_B45F
		or	ax, ax
		jz	short loc_B4C2
		pop	bp
		retf
sub_B4B7	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B4CC	proc far
		push	bp
		mov	bp, sp
		mov	dword_F892, 0A8000000h
		mov	dword_F896, 0B0000000h
		mov	dword_F89A, 0B8000000h
		mov	dword_F89E, 0E0000000h
		pop	bp
		retf
sub_B4CC	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B4F5	proc far
					; sub_9B64+285P ...

var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= dword	ptr  8

		enter	2, 0
		push	si
		mov	si, [bp+arg_0]
		push	large [bp+arg_2]
		mov	ax, si
		imul	ax, 48h
		add	ax, 293Ah
		push	ds
		push	ax
		mov	ax, si
		shl	ax, 2
		add	ax, 2922h
		push	ds
		push	ax
		call	sub_14B8
		mov	[bp+var_2], ax
		pop	si
		leave
		retf
sub_B4F5	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B520	proc far
					; sub_9643:loc_96E6P ...

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		mov	word_F080, 0

loc_B529:
		mov	ax, word_F080
		cmp	ax, [bp+arg_0]
		jb	short loc_B529
		pop	bp
		retf	2
sub_B520	endp

; ---------------------------------------------------------------------------
		db 0

; =============== S U B	R O U T	I N E =======================================


sub_B536	proc far
					; sub_9643:loc_96CDP ...
		mov	word_FAEE, 0
		mov	al, 7
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		mov	bh, ah
		mov	al, 8
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	bh, 4
		jnz	short loc_B554
		test	ah, 8
		jz	short loc_B559

loc_B554:
		or	word_FAEE, 1

loc_B559:
		test	bh, 8
		jnz	short loc_B563
		test	ah, 40h
		jz	short loc_B568

loc_B563:
		or	word_FAEE, 4

loc_B568:
		test	ah, 4
		jz	short loc_B573
		or	word_FAEE, 1000h

loc_B573:
		test	ah, 10h
		jz	short loc_B57E
		or	word_FAEE, 2000h

loc_B57E:
		mov	al, 9
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	bh, 20h
		jnz	short loc_B58E
		test	ah, 8
		jz	short loc_B593

loc_B58E:
		or	word_FAEE, 2

loc_B593:
		test	bh, 10h
		jnz	short loc_B59D
		test	ah, 1
		jz	short loc_B5A2

loc_B59D:
		or	word_FAEE, 8

loc_B5A2:
		test	ah, 4
		jz	short loc_B5AD
		or	word_FAEE, 4000h

loc_B5AD:
		test	ah, 10h
		jz	short loc_B5B8
		or	word_FAEE, 8000h

loc_B5B8:
		mov	al, 5
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	ah, 2
		jz	short loc_B5C8
		or	word_FAEE, 10h

loc_B5C8:
		test	ah, 4
		jz	short loc_B5D2
		or	word_FAEE, 20h

loc_B5D2:
		mov	al, 0
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	ah, 1
		jz	short loc_B5E2
		or	word_FAEE, 40h

loc_B5E2:
		mov	al, 3
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	ah, 10h
		jz	short loc_B5F3
		or	word_FAEE, 80h

loc_B5F3:
		mov	al, 2
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	ah, 1
		jz	short loc_B604
		or	word_FAEE, 100h

loc_B604:
		mov	al, 6
		mov	ah, 4
		int	18h		; TRANSFER TO ROM BASIC
					; causes transfer to ROM-based BASIC (IBM-PC)
					; often	reboots	a compatible; often has	no effect at all
		test	ah, 10h
		jz	short locret_B614
		or	word_FAEE, 10h

locret_B614:
		retf
sub_B536	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B616	proc far
		push	bp
		mov	bp, sp
		call	sub_2972
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		call	sub_123C
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		call	sub_123C
		mov	dx, 0A6h ; '¦'
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	dx, 0A4h ; '¤'
		out	dx, al		; Interrupt Controller #2, 8259A
		call	sub_23EC
		call	sub_272A
		call	text_clear
		call	egc_start
		pop	bp
		retf
sub_B616	endp


; =============== S U B	R O U T	I N E =======================================


sub_B654	proc far
		xor	ax, ax
		mov	es, ax
		les	bx, dword ptr es:[0184h]
		assume es:nothing
		cmp	byte ptr es:[bx+2], 4Dh	; 'M'
		jnz	short loc_B685
		cmp	byte ptr es:[bx+3], 4Dh	; 'M'
		jnz	short loc_B685
		cmp	byte ptr es:[bx+4], 44h	; 'D'
		jnz	short loc_B685
		mov	byte_FAF2, 61h ; 'a'
		mov	byte_FAF1, 1
		mov	byte_FAF3, 1
		mov	ax, 1
		retf
; ---------------------------------------------------------------------------

loc_B685:
		mov	byte_FAF3, 0
		xor	ax, ax
		retf
sub_B654	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_B68E	proc far
		mov	ah, 9
		int	60h
		xor	bx, bx
		cmp	al, 0FFh
		jz	short loc_B6A0
		inc	bx
		mov	byte_FAF0, 1
		jmp	short loc_B6A4
; ---------------------------------------------------------------------------

loc_B6A0:
		mov	bl, byte_FAF1

loc_B6A4:
		mov	byte_D714, bl
		mov	ax, bx
		retf
sub_B68E	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================


sub_B6AC	proc far
		mov	byte_FAF2, 60h ; '`'
		mov	byte_FAF1, 0
		mov	byte_FAF0, 0
		mov	byte_FAF3, 0
		xor	ax, ax
		mov	es, ax
		les	bx, dword ptr es:[0180h]
		assume es:nothing
		cmp	byte ptr es:[bx+2], 50h	; 'P'
		jnz	short loc_B6E2
		cmp	byte ptr es:[bx+3], 4Dh	; 'M'
		jnz	short loc_B6E2
		cmp	byte ptr es:[bx+4], 44h	; 'D'
		jnz	short loc_B6E2
		mov	ax, 1
		retf
; ---------------------------------------------------------------------------

loc_B6E2:
		xor	ax, ax
		retf
sub_B6AC	endp

; ---------------------------------------------------------------------------
		nop

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B6E6	proc far

arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		push	si
		push	ds
		mov	cx, 0Dh
		xor	si, si

loc_B6F0:
		les	bx, [bp+arg_0]
		add	bx, si
		mov	al, es:[bx]
		mov	[si+2B74h], al
		inc	si
		loop	loc_B6F0
		mov	ax, [bp+arg_4]
		cmp	ax, 600h
		jnz	short loc_B727
		cmp	byte_FAF1, 0
		jz	short loc_B727
		xor	bx, bx

loc_B710:
		inc	bx
		cmp	byte ptr [bx+2B74h], 0
		jnz	short loc_B710
		mov	byte ptr [bx+2B74h], 6Dh ; 'm'
		mov	byte ptr [bx+2B75h], 64h ; 'd'
		mov	byte ptr [bx+2B76h], 0

loc_B727:
		mov	dx, 2B74h
		mov	ax, 3D00h
		int	21h		; DOS -	2+ - OPEN DISK FILE WITH HANDLE
					; DS:DX	-> ASCIZ filename
					; AL = access mode
					; 0 - read
		mov	bx, ax
		mov	ax, [bp+arg_4]
		cmp	ax, 600h
		jnz	short loc_B744
		cmp	byte_FAF1, 0
		jz	short loc_B744
		int	61h		; reserved for user interrupt
		jmp	short loc_B746
; ---------------------------------------------------------------------------

loc_B744:
		int	60h

loc_B746:
		mov	ax, 3F00h
		mov	cx, 5000h
		int	21h		; DOS -	2+ - READ FROM FILE WITH HANDLE
					; BX = file handle, CX = number	of bytes to read
					; DS:DX	-> buffer
		pop	ds
		mov	ah, 3Eh
		int	21h		; DOS -	2+ - CLOSE A FILE WITH HANDLE
					; BX = file handle
		pop	si
		pop	bp
		retf
sub_B6E6	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B756	proc far
		push	bp
		mov	bp, sp
		push	4650h
		call	mem_assign_dos
		or	ax, ax
		jz	short loc_B76A
		mov	ax, 1
		pop	bp
		retf
; ---------------------------------------------------------------------------

loc_B76A:
		nop
		push	cs
		call	near ptr sub_B4CC
		call	sub_233E
		call	egc_start
		call	sub_11EE
		mov	byte_D3EC, 12h
		push	ds
		push	offset aUmx	; "“Œ•û••–‚.˜^"
		call	sub_2912
		xor	ax, ax
		pop	bp
		retf
sub_B756	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B790	proc far
					; sub_9B64+28FP ...

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		push	30h ; '0'       ; n
		push	ds
		mov	ax, [bp+arg_0]
		imul	ax, 48h
		add	ax, 2952h
		push	ax		; src
		push	ds
		push	offset unk_F050	; dest
		call	_memcpy
		add	sp, 0Ah
		call	far ptr	loc_1C2C
		pop	bp
		retf
sub_B790	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B7B3	proc far
					; sub_9B64+29AP ...

var_6		= word ptr -6
var_4		= dword	ptr -4
arg_0		= word ptr  6
arg_2		= word ptr  8
arg_4		= word ptr  0Ah

		enter	6, 0
		push	si
		push	di
		mov	si, [bp+arg_2]
		mov	di, [bp+arg_4]
		mov	bx, di
		shl	bx, 2
		mov	ax, [bx+2924h]
		mov	dx, [bx+2922h]
		mov	word ptr [bp+var_4+2], ax
		mov	word ptr [bp+var_4], dx
		mov	[bp+var_6], 0
		jmp	short loc_B827
; ---------------------------------------------------------------------------

loc_B7D9:
		push	[bp+arg_0]
		push	si
		push	large [bp+var_4]
		mov	bx, di
		imul	bx, 48h
		push	word ptr [bx+294Eh]
		call	sub_1AA6
		inc	si
		cmp	si, 190h
		jl	short loc_B7FA
		sub	si, 190h

loc_B7FA:
		mov	bx, di
		imul	bx, 48h
		mov	ax, [bx+294Eh]
		shr	ax, 1
		add	word ptr [bp+var_4], ax
		mov	eax, [bp+var_4]
		shr	eax, 10h
		mov	dx, word ptr [bp+var_4]
		shr	dx, 4
		add	ax, dx
		mov	dx, word ptr [bp+var_4]
		and	dx, 0Fh
		mov	word ptr [bp+var_4+2], ax
		mov	word ptr [bp+var_4], dx
		inc	[bp+var_6]

loc_B827:
		mov	bx, di
		imul	bx, 48h
		mov	ax, [bx+2950h]
		cmp	ax, [bp+var_6]
		ja	short loc_B7D9
		pop	di
		pop	si
		leave
		retf
sub_B7B3	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B839	proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		cmp	byte_D714, 0
		jz	short loc_B853
		mov	ax, [bp+arg_0]
		cmp	byte_FAF1, 1
		jz	short loc_B851
		int	60h
		jmp	short loc_B853
; ---------------------------------------------------------------------------

loc_B851:
		int	61h		; reserved for user interrupt

loc_B853:
		pop	bp
		retf
sub_B839	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B855	proc far

arg_0		= word ptr  6

		push	bp
		mov	bp, sp
		cmp	byte_D714, 0
		jnz	short loc_B868
		push	64h ; 'd'
		nop
		push	cs
		call	near ptr sub_B520
		pop	bp
		retf
; ---------------------------------------------------------------------------

loc_B868:
		push	1
		nop
		push	cs
		call	near ptr sub_B520
		mov	ah, 5
		cmp	byte_FAF1, 1
		jz	short loc_B87C
		int	60h		; - FTP	Packet Driver -	BASIC FUNC - TERMINATE DRIVER FOR HANDLE
					; BX = handle
					; Return: CF set on error, DH =	error code
					; CF clear if successful
		jmp	short loc_B881
; ---------------------------------------------------------------------------

loc_B87C:
		mov	dx, 0C0h ; 'À'
		int	61h		; reserved for user interrupt

loc_B881:
		cmp	ax, [bp+arg_0]
		jb	short loc_B868
		pop	bp
		retf
sub_B855	endp

seg002		ends

; ===========================================================================

; Segment type:	Pure code
seg003		segment	byte public 'CODE' use16
		assume cs:seg003
		;org 8
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B888	proc far

var_2		= word ptr -2

		enter	2, 0
		push	ds
		push	offset aHuuma_cfg ; "huuma.cfg"
		call	sub_B9C
		push	large 5
		push	0
		call	sub_BD8
		push	ss
		lea	ax, [bp+var_2]
		push	ax
		push	2
		call	sub_AE8
		call	sub_ABC
		cmp	[bp+var_2], 0
		jnz	short loc_B8BA
		xor	ax, ax
		leave
		retf
; ---------------------------------------------------------------------------

loc_B8BA:
		mov	ax, [bp+var_2]
		mov	word ptr dword_FB02+2, ax
		mov	word ptr dword_FB02, 0
		les	bx, dword_FB02
		mov	al, es:[bx+15h]
		mov	byte_FB07, al
		mov	al, es:[bx+14h]
		mov	byte_FB08, al
		mov	al, es:[bx+16h]
		mov	byte_D722, al
		mov	eax, es:[bx+0Eh]
		mov	dword_FB0C, eax
		mov	ax, 1
		leave
		retf
sub_B888	endp

seg003		ends

; ===========================================================================

; Segment type:	Pure code
seg004		segment	byte public 'CODE' use16
		assume cs:seg004
		;org 0Dh
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B8ED	proc far
		push	bp
		mov	bp, sp
		push	si
		xor	si, si
		jmp	short loc_B95F
; ---------------------------------------------------------------------------

loc_B8F5:
		mov	ax, si
		imul	ax, 3E8h
		mov	dx, 2710h
		sub	dx, ax
		movsx	eax, dx
		mov	bx, si
		shl	bx, 2
		mov	[bx+2B98h], eax
		mov	ax, si
		sar	ax, 1
		mov	dl, 5
		sub	dl, al
		mov	[si+2C0Bh], dl
		xor	cx, cx
		jmp	short loc_B92B
; ---------------------------------------------------------------------------

loc_B91E:
		mov	bx, si
		imul	bx, 7
		add	bx, cx
		mov	byte ptr [bx+2BC4h], 0DAh ; 'Ú'
		inc	cx

loc_B92B:
		cmp	cx, 6
		jl	short loc_B91E
		mov	bx, si
		imul	bx, 7
		mov	byte ptr [bx+2BCAh], 0
		mov	bx, si
		shl	bx, 2
		mov	word ptr [bx+2C16h], 76Ch
		mov	bx, si
		shl	bx, 2
		mov	byte ptr [bx+2C18h], 1
		mov	bx, si
		shl	bx, 2
		mov	byte ptr [bx+2C19h], 1
		mov	byte ptr [si+2C3Eh], 1
		inc	si

loc_B95F:
		cmp	si, 0Ah
		jl	short loc_B8F5
		pop	si
		pop	bp
		retf
sub_B8ED	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B967	proc near
					; seg004:loc_BFCEp ...
		push	bp
		mov	bp, sp
		push	si
		push	large [off_D72E]
		call	sub_B9C
		mov	al, byte_D722
		cbw
		imul	ax, 0B6h
		movzx	eax, ax
		push	eax
		push	0
		call	sub_BD8
		push	ds
		push	offset word_FB16
		push	0B6h ; '¶'
		call	sub_AE8
		xor	si, si
		jmp	short loc_B9A5
; ---------------------------------------------------------------------------

loc_B99A:
		mov	al, [si+2B96h]
		add	al, 0EEh ; 'î'
		mov	[si+2B96h], al
		inc	si

loc_B9A5:
		cmp	si, 0B2h ; '²'
		jl	short loc_B99A
		call	sub_ABC
		pop	si
		pop	bp
		retn
sub_B967	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_B9B3	proc far

var_B		= byte ptr -0Bh
var_A		= dword	ptr -0Ah
var_6		= dword	ptr -6
var_2		= word ptr -2
arg_0		= word ptr  6
arg_2		= dword	ptr  8
arg_6		= word ptr  0Ch

		enter	0Ch, 0
		push	si
		mov	[bp+var_6], 989680h
		mov	[bp+var_B], 0
		mov	si, 1Ah
		jmp	short loc_BA1B
; ---------------------------------------------------------------------------

loc_B9C9:
		mov	eax, [bp+arg_2]
		cdq
		idiv	[bp+var_6]
		mov	ebx, 0Ah
		cdq
		idiv	ebx
		mov	[bp+var_A], edx
		mov	eax, [bp+var_6]
		cdq
		idiv	ebx
		mov	[bp+var_6], eax
		mov	ax, word ptr [bp+var_A]
		add	ax, 0A0h ; ' '
		mov	[bp+var_2], ax
		cmp	[bp+var_A], 0
		jz	short loc_BA03
		mov	[bp+var_B], 1

loc_BA03:
		cmp	[bp+var_B], 0
		jz	short loc_BA18
		push	si
		push	[bp+arg_6]
		push	[bp+var_2]
		push	[bp+arg_0]
		call	sub_1078

loc_BA18:
		add	si, 2

loc_BA1B:
		cmp	si, 2Ah	; '*'
		jl	short loc_B9C9
		pop	si
		leave
		retf	8
sub_B9B3	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_BA25	proc near
					; sub_BC9E+157p

var_2		= word ptr -2
arg_0		= word ptr  4

		enter	2, 0
		push	si
		push	di
		mov	di, 0E1h ; 'á'
		push	large 140002h
		push	ds
		push	offset aMO	; "±²Ï¼¬¸»®"
		push	81h ; ''
		call	sub_10BC
		push	large 0C0004h
		push	ds
		push	offset aKO	; "¶ª·®"
		push	81h ; ''
		call	sub_10BC
		push	large 1C0004h
		push	ds
		push	offset asc_D773	; "¹¸²¶½"
		push	81h ; ''
		call	sub_10BC
		push	large 2A0004h
		push	ds
		push	offset asc_D779	; "¼½"
		push	81h ; ''
		call	sub_10BC
		cmp	[bp+arg_0], 0FFFFh
		jz	short loc_BACE
		xor	si, si
		jmp	short loc_BAB5
; ---------------------------------------------------------------------------

loc_BA80:
		mov	[bp+var_2], 0
		jmp	short loc_BAAE
; ---------------------------------------------------------------------------

loc_BA87:
		mov	ax, [bp+var_2]
		add	ax, ax
		add	ax, 0Ah
		push	ax
		lea	ax, [si+12h]
		push	ax
		mov	bx, si
		imul	bx, 11h
		add	bx, [bp+var_2]
		mov	al, [bx+7BBh]
		mov	ah, 0
		push	ax
		push	0E1h ; 'á'
		call	sub_1078
		inc	[bp+var_2]

loc_BAAE:
		cmp	[bp+var_2], 11h
		jl	short loc_BA87
		inc	si

loc_BAB5:
		cmp	si, 3
		jl	short loc_BA80
		push	large 0A0012h
		mov	al, byte_D73B
		mov	ah, 0
		push	ax
		push	85h ; '…'
		call	sub_1078

loc_BACE:
		xor	si, si
		jmp	short loc_BB31
; ---------------------------------------------------------------------------

loc_BAD2:
		cmp	si, [bp+arg_0]
		jnz	short loc_BADC
		mov	di, 81h	; ''
		jmp	short loc_BADF
; ---------------------------------------------------------------------------

loc_BADC:
		mov	di, 0E1h ; 'á'

loc_BADF:
		push	0Ah
		lea	ax, [si+6]
		push	ax
		mov	ax, si
		imul	ax, 7
		add	ax, 2BC4h
		push	ds
		push	ax
		push	di
		call	sub_10BC
		lea	ax, [si+6]
		push	ax
		mov	bx, si
		shl	bx, 2
		push	large dword ptr	[bx+2B98h]
		push	di
		push	cs
		call	near ptr sub_B9B3
		cmp	byte ptr [si+2C0Bh], 7Fh ; ''
		jz	short loc_BB21
		push	2Ch ; ','
		lea	ax, [si+6]
		push	ax
		mov	al, [si+2C0Bh]
		mov	ah, 0
		add	ax, 0A0h ; ' '
		push	ax
		jmp	short loc_BB2A
; ---------------------------------------------------------------------------

loc_BB21:
		push	2Ch ; ','
		lea	ax, [si+6]
		push	ax
		push	0F0h ; 'ð'

loc_BB2A:
		push	di
		call	sub_1078
		inc	si

loc_BB31:
		cmp	si, 0Ah
		jl	short loc_BAD2
		xor	si, si
		jmp	short loc_BB78
; ---------------------------------------------------------------------------

loc_BB3A:
		cmp	si, [bp+arg_0]
		jnz	short loc_BB44
		mov	di, 81h	; ''
		jmp	short loc_BB47
; ---------------------------------------------------------------------------

loc_BB44:
		mov	di, 0E1h ; 'á'

loc_BB47:
		cmp	si, 9
		jz	short loc_BB59
		push	6
		lea	ax, [si+6]
		push	ax
		lea	ax, [si+0A1h]
		push	ax
		jmp	short loc_BB71
; ---------------------------------------------------------------------------

loc_BB59:
		push	large 4000Fh
		push	0A1h ; '¡'
		push	di
		call	sub_1078
		push	large 6000Fh
		push	0A0h ; ' '

loc_BB71:
		push	di
		call	sub_1078
		inc	si

loc_BB78:
		cmp	si, 0Ah
		jl	short loc_BB3A
		pop	di
		pop	si
		leave
		retn	2
sub_BA25	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_BB83	proc near
					; sub_BC9E+1A3p ...

arg_0		= word ptr  4
arg_2		= word ptr  6
arg_4		= word ptr  8

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	si, [bp+arg_4]
		mov	di, [bp+arg_2]
		mov	ax, si
		add	ax, ax
		add	ax, 0Ah
		push	ax
		lea	ax, [di+12h]
		push	ax
		mov	bx, di
		imul	bx, 11h
		mov	al, [bx+si+7BBh]
		mov	ah, 0
		push	ax
		push	[bp+arg_0]
		call	sub_1078
		pop	di
		pop	si
		pop	bp
		retn	6
sub_BB83	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_BBB4	proc near
					; sub_BC9E+2D7p

arg_0		= word ptr  4
arg_2		= word ptr  6

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	si, [bp+arg_2]
		mov	di, [bp+arg_0]
		push	0Ah
		lea	ax, [si+6]
		push	ax
		mov	ax, si
		imul	ax, 7
		add	ax, 2BC4h
		push	ds
		push	ax
		push	81h ; ''
		call	sub_10BC
		mov	ax, di
		add	ax, ax
		add	ax, 0Ah
		push	ax
		lea	ax, [si+6]
		push	ax
		mov	bx, si
		imul	bx, 7
		mov	al, [bx+di+2BC4h]
		mov	ah, 0
		push	ax
		push	85h ; '…'
		call	sub_1078
		pop	di
		pop	si
		pop	bp
		retn	4
sub_BBB4	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_BBFD	proc far
		push	bp
		mov	bp, sp
		push	si
		mov	dword_FB40, 0
		mov	byte_FB8A, 0
		mov	byte_FB95, 0
		mov	dword_FBC8, 0
		xor	si, si
		jmp	short loc_BC46
; ---------------------------------------------------------------------------

loc_BC21:
		mov	bx, si
		shl	bx, 2
		mov	eax, [bx+2B98h]
		add	dword_FB40, eax
		mov	bx, si
		imul	bx, 7
		mov	al, [bx+2BC4h]
		add	byte_FB8A, al
		mov	al, [si+2C0Bh]
		add	byte_FB95, al
		inc	si

loc_BC46:
		cmp	si, 0Ah
		jl	short loc_BC21
		xor	si, si
		jmp	short loc_BC65
; ---------------------------------------------------------------------------

loc_BC4F:
		movzx	eax, byte ptr [si+2B96h]
		add	dword_FBC8, eax
		mov	al, [si+2B96h]
		add	al, 12h
		mov	[si+2B96h], al
		inc	si

loc_BC65:
		cmp	si, 0B2h ; '²'
		jl	short loc_BC4F
		push	large [off_D72E]
		call	sub_9FC
		mov	al, byte_D722
		cbw
		imul	ax, 0B6h
		movzx	eax, ax
		push	eax
		push	0
		call	sub_BD8
		push	ds
		push	offset word_FB16
		push	0B6h ; '¶'
		call	sub_C28
		call	sub_ABC
		pop	si
		pop	bp
		retf
sub_BBFD	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_BC9E	proc far

var_B		= byte ptr -0Bh
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2

		enter	0Ch, 0
		push	si
		push	di
		xor	si, si
		push	large [off_D72E]
		call	sub_ACC
		or	ax, ax
		jnz	short loc_BCBA
		push	cs
		call	near ptr sub_B8ED
		jmp	short loc_BCBD
; ---------------------------------------------------------------------------

loc_BCBA:
		call	sub_B967

loc_BCBD:
		mov	eax, dword_FB3C
		cmp	eax, dword_FB0C
		jle	short loc_BCD5
		push	0FFFFh
		call	sub_BA25
		call	sub_B4B7
		jmp	loc_BFB3
; ---------------------------------------------------------------------------

loc_BCD5:
		mov	[bp+var_2], 9
		jmp	short loc_BCF1
; ---------------------------------------------------------------------------

loc_BCDC:
		mov	bx, [bp+var_2]
		shl	bx, 2
		mov	eax, [bx+2B94h]
		cmp	eax, dword_FB0C
		jg	short loc_BCF7
		dec	[bp+var_2]

loc_BCF1:
		cmp	[bp+var_2], 0
		jg	short loc_BCDC

loc_BCF7:
		mov	[bp+var_4], 9
		jmp	loc_BD91
; ---------------------------------------------------------------------------

loc_BCFF:
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	eax, [bx+2B94h]
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	[bx+2B98h], eax
		mov	[bp+var_6], 0
		jmp	short loc_BD39
; ---------------------------------------------------------------------------

loc_BD1C:
		mov	bx, [bp+var_4]
		imul	bx, 7
		add	bx, [bp+var_6]
		mov	al, [bx+2BBDh]
		mov	bx, [bp+var_4]
		imul	bx, 7
		add	bx, [bp+var_6]
		mov	[bx+2BC4h], al
		inc	[bp+var_6]

loc_BD39:
		cmp	[bp+var_6], 6
		jl	short loc_BD1C
		mov	bx, [bp+var_4]
		mov	al, [bx+2C0Ah]
		mov	[bx+2C0Bh], al
		shl	bx, 2
		mov	ax, [bx+2C12h]
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	[bx+2C16h], ax
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	al, [bx+2C15h]
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	[bx+2C19h], al
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	al, [bx+2C14h]
		mov	bx, [bp+var_4]
		shl	bx, 2
		mov	[bx+2C18h], al
		mov	bx, [bp+var_4]
		mov	al, [bx+2C3Dh]
		mov	[bx+2C3Eh], al
		dec	[bp+var_4]

loc_BD91:
		mov	ax, [bp+var_4]
		cmp	ax, [bp+var_2]
		jg	loc_BCFF
		mov	bx, [bp+var_2]
		shl	bx, 2
		mov	eax, dword_FB0C
		mov	[bx+2B98h], eax
		mov	bx, [bp+var_2]
		mov	byte ptr [bx+2C0Bh], 7Fh ; ''
		mov	ax, [bp+var_2]
		shl	ax, 2
		add	ax, 2C16h
		push	ds
		push	ax		; datep
		call	_getdate
		add	sp, 4
		les	bx, dword_FB02
		mov	al, es:[bx+26h]
		mov	bx, [bp+var_2]
		mov	[bx+2C3Eh], al
		mov	[bp+var_6], 0
		jmp	short loc_BDEC
; ---------------------------------------------------------------------------

loc_BDDB:
		mov	bx, [bp+var_4]
		imul	bx, 7
		add	bx, [bp+var_6]
		mov	byte ptr [bx+2BC4h], 0DAh ; 'Ú'
		inc	[bp+var_6]

loc_BDEC:
		cmp	[bp+var_6], 6
		jl	short loc_BDDB
		push	[bp+var_2]
		call	sub_BA25
		xor	di, di
		mov	[bp+var_8], 0
		mov	word_FAEE, 0
		mov	[bp+var_A], 1

loc_BE0A:
		mov	[bp+var_B], 0

loc_BE0E:
					; sub_BC9E+305j ...
		call	sub_B536
		cmp	[bp+var_A], 0
		jnz	loc_BF7F
		test	byte ptr word_FAEE, 1
		jz	short loc_BE44
		push	di
		push	[bp+var_8]
		push	0E1h ; 'á'
		call	sub_BB83
		dec	[bp+var_8]
		cmp	[bp+var_8], 0
		jge	short loc_BE3A
		mov	[bp+var_8], 2

loc_BE3A:
		push	di
		push	[bp+var_8]
		push	85h ; '…'
		call	sub_BB83

loc_BE44:
		test	byte ptr word_FAEE, 2
		jz	short loc_BE6D
		push	di
		push	[bp+var_8]
		push	0E1h ; 'á'
		call	sub_BB83
		inc	[bp+var_8]
		cmp	[bp+var_8], 2
		jle	short loc_BE63
		mov	[bp+var_8], 0

loc_BE63:
		push	di
		push	[bp+var_8]
		push	85h ; '…'
		call	sub_BB83

loc_BE6D:
		test	byte ptr word_FAEE, 4
		jz	short loc_BE90
		push	di
		push	[bp+var_8]
		push	0E1h ; 'á'
		call	sub_BB83
		dec	di
		or	di, di
		jge	short loc_BE86
		mov	di, 10h

loc_BE86:
		push	di
		push	[bp+var_8]
		push	85h ; '…'
		call	sub_BB83

loc_BE90:
		test	byte ptr word_FAEE, 8
		jz	short loc_BEB3
		push	di
		push	[bp+var_8]
		push	0E1h ; 'á'
		call	sub_BB83
		inc	di
		cmp	di, 10h
		jle	short loc_BEA9
		xor	di, di

loc_BEA9:
		push	di
		push	[bp+var_8]
		push	85h ; '…'
		call	sub_BB83

loc_BEB3:
		test	byte ptr word_FAEE, 10h
		jnz	short loc_BEC3
		test	byte ptr word_FAEE, 80h
		jz	loc_BF58

loc_BEC3:
		cmp	[bp+var_8], 2
		jnz	short loc_BECE
		cmp	di, 0Dh
		jge	short loc_BF0B

loc_BECE:
		mov	bx, [bp+var_8]
		imul	bx, 11h
		mov	al, [bx+di+7BBh]
		mov	bx, [bp+var_2]
		imul	bx, 7
		mov	[bx+si+2BC4h], al
		cmp	si, 5
		jnz	short loc_BF03
		push	di
		push	[bp+var_8]
		push	0E1h ; 'á'
		call	sub_BB83
		mov	di, 10h
		mov	[bp+var_8], 2
		push	di
		push	[bp+var_8]
		push	85h ; '…'
		call	sub_BB83

loc_BF03:
		inc	si
		cmp	si, 5
		jle	short loc_BF51
		jmp	short loc_BF47
; ---------------------------------------------------------------------------

loc_BF0B:
		cmp	di, 0Dh
		jnz	short loc_BF23
		mov	bx, [bp+var_2]
		imul	bx, 7
		mov	byte ptr [bx+si+2BC4h],	0CFh ; 'Ï'
		inc	si
		cmp	si, 5
		jle	short loc_BF51
		jmp	short loc_BF47
; ---------------------------------------------------------------------------

loc_BF23:
		cmp	di, 0Eh
		jnz	short loc_BF3C
		dec	si
		or	si, si
		jge	short loc_BF2F
		xor	si, si

loc_BF2F:
		mov	bx, [bp+var_2]
		imul	bx, 7
		mov	byte ptr [bx+si+2BC4h],	0CFh ; 'Ï'
		jmp	short loc_BF51
; ---------------------------------------------------------------------------

loc_BF3C:
		cmp	di, 0Fh
		jnz	short loc_BF4C
		inc	si
		cmp	si, 5
		jle	short loc_BF51

loc_BF47:
					; sub_BC9E+283j
		mov	si, 5
		jmp	short loc_BF51
; ---------------------------------------------------------------------------

loc_BF4C:
		cmp	di, 10h
		jz	short loc_BFAF

loc_BF51:
					; sub_BC9E+281j ...
		push	[bp+var_2]
		push	si
		call	sub_BBB4

loc_BF58:
		test	byte ptr word_FAEE, 20h
		jz	short loc_BF78
		mov	bx, [bp+var_2]
		imul	bx, 7
		mov	byte ptr [bx+si+2BC4h],	0CFh ; 'Ï'
		dec	si
		or	si, si
		jge	short loc_BF71
		xor	si, si

loc_BF71:
		push	[bp+var_2]
		push	si
		call	sub_BBB4

loc_BF78:
		test	byte ptr word_FAEE, 40h
		jnz	short loc_BFAF

loc_BF7F:
		push	1
		call	sub_B520
		mov	ax, word_FAEE
		mov	[bp+var_A], ax
		cmp	[bp+var_A], 0
		jz	loc_BE0A
		inc	[bp+var_B]
		cmp	[bp+var_B], 1Eh
		jbe	loc_BE0E
		test	[bp+var_B], 1
		jnz	loc_BE0E
		mov	[bp+var_A], 0
		jmp	loc_BE0E
; ---------------------------------------------------------------------------

loc_BFAF:
					; sub_BC9E+2DFj
		push	cs
		call	near ptr sub_BBFD

loc_BFB3:
		pop	di
		pop	si
		leave
		retf
sub_BC9E	endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp
		push	large [off_D72E]
		call	sub_ACC
		or	ax, ax
		jnz	short loc_BFCE
		push	cs
		call	near ptr sub_B8ED
		jmp	short loc_BFD1
; ---------------------------------------------------------------------------

loc_BFCE:
		call	sub_B967

loc_BFD1:
		mov	eax, dword_FB18
		cmp	eax, dword_FB0C
		jl	short loc_BFDE
		jmp	short loc_BFE2
; ---------------------------------------------------------------------------

loc_BFDE:
		mov	eax, dword_FB0C

loc_BFE2:
		mov	dword_FB12, eax
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_BFE8	proc far

var_7		= byte ptr -7
var_6		= byte ptr -6

		enter	8, 0
		lea	ax, [bp+var_6]
		push	ss
		push	ax
		push	ds
		push	offset unk_D77C
		mov	cx, 6
		call	SCOPY@
		mov	al, byte_D722
		mov	[bp+var_7], al
		mov	byte_D722, 0
		jmp	short loc_C031
; ---------------------------------------------------------------------------

loc_C00A:
		call	sub_B967
		mov	al, byte_D722
		cbw
		add	ax, ax
		lea	dx, [bp+var_6]
		add	ax, dx
		mov	bx, ax
		mov	ax, ss:[bx]
		cmp	ax, word_FB16
		jz	short loc_C02D
		mov	al, [bp+var_7]
		mov	byte_D722, al
		xor	ax, ax
		leave
		retf
; ---------------------------------------------------------------------------

loc_C02D:
		inc	byte_D722

loc_C031:
		mov	al, byte_D722
		cbw
		cmp	ax, 3
		jl	short loc_C00A
		mov	al, [bp+var_7]
		mov	byte_D722, al
		mov	ax, 1
		leave
		retf
sub_BFE8	endp

seg004		ends

; ===========================================================================

; Segment type:	Pure code
seg005		segment	byte public 'CODE' use16
		assume cs:seg005
		;org 5
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_C045	proc near

var_10		= word ptr -10h
var_E		= word ptr -0Eh
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_6		= word ptr -6
var_4		= word ptr -4
var_2		= word ptr -2
arg_0		= byte ptr  4
arg_2		= word ptr  6

		enter	10h, 0
		push	si
		push	di
		mov	di, [bp+arg_2]
		xor	si, si
		jmp	short loc_C0BC
; ---------------------------------------------------------------------------

loc_C052:
		movsx	eax, di
		mov	dl, [bp+arg_0]
		mov	dh, 0
		add	dx, dx
		mov	bx, dx
		movsx	edx, word ptr [bx+4EEh]
		imul	eax, edx
		sar	eax, 8
		add	ax, 0C0h ; 'À'
		mov	bx, si
		add	bx, bx
		lea	dx, [bp+var_8]
		add	bx, dx
		mov	ss:[bx], ax
		movsx	eax, di
		mov	dl, [bp+arg_0]
		mov	dh, 0
		add	dx, dx
		mov	bx, dx
		movsx	edx, word ptr [bx+46Eh]
		imul	eax, edx
		sar	eax, 8
		add	ax, 0C8h ; 'È'
		mov	bx, si
		add	bx, bx
		lea	dx, [bp+var_10]
		add	bx, dx
		mov	ss:[bx], ax
		test	si, 1
		jz	short loc_C0B3
		mov	al, [bp+arg_0]
		add	al, 51h	; 'Q'
		jmp	short loc_C0B8
; ---------------------------------------------------------------------------

loc_C0B3:
		mov	al, [bp+arg_0]
		add	al, 2Fh	; '/'

loc_C0B8:
		mov	[bp+arg_0], al
		inc	si

loc_C0BC:
		cmp	si, 4
		jl	short loc_C052
		push	[bp+var_8]
		push	[bp+var_10]
		push	[bp+var_6]
		push	[bp+var_E]
		call	sub_DD4
		push	[bp+var_6]
		push	[bp+var_E]
		push	[bp+var_4]
		push	[bp+var_C]
		call	sub_DD4
		push	[bp+var_4]
		push	[bp+var_C]
		push	[bp+var_2]
		push	[bp+var_A]
		call	sub_DD4
		push	[bp+var_2]
		push	[bp+var_A]
		push	[bp+var_8]
		push	[bp+var_10]
		call	sub_DD4
		pop	di
		pop	si
		leave
		retn	4
sub_C045	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_C10B	proc far
		push	bp
		mov	bp, sp
		call	egc_on
		mov	ax, 0FFF0h
		mov	dx, 4A0h
		out	dx, ax
		mov	ax, 0FFh
		mov	dx, 4A2h
		out	dx, ax
		mov	ax, 3100h
		mov	dx, 4A4h
		out	dx, ax
		mov	ax, 0FFFFh
		mov	dx, 4A8h
		out	dx, ax
		mov	ax, 0
		mov	dx, 4ACh
		out	dx, ax
		mov	ax, 0Fh
		mov	dx, 4AEh
		out	dx, ax
		pop	bp
		retf
sub_C10B	endp

; ---------------------------------------------------------------------------
		enter	0Ah, 0
		push	si
		push	di
		mov	si, [bp+6]
		mov	di, si
		add	si, [bp+0Ah]
		and	di, 0FFF0h
		mov	ax, di
		sar	ax, 3
		mov	dx, [bp+8]
		shl	dx, 6
		add	ax, dx
		mov	dx, [bp+8]
		shl	dx, 4
		add	ax, dx
		mov	[bp-6],	ax
		push	cs
		call	near ptr sub_C10B
		mov	word ptr [bp-2], 0
		jmp	short loc_C1B5
; ---------------------------------------------------------------------------

loc_C173:
		mov	[bp-4],	di
		mov	ax, [bp-6]
		mov	[bp-0Ah], ax
		jmp	short loc_C1A9
; ---------------------------------------------------------------------------

loc_C17E:
		mov	dx, 0A6h ; '¦'
		mov	al, 1
		out	dx, al		; Interrupt Controller #2, 8259A
		les	bx, dword_F892
		add	bx, [bp-0Ah]
		mov	ax, es:[bx]
		mov	[bp-8],	ax
		mov	al, 0
		out	dx, al		; Interrupt Controller #2, 8259A
		mov	bx, word ptr dword_F892
		add	bx, [bp-0Ah]
		mov	ax, [bp-8]
		mov	es:[bx], ax
		add	word ptr [bp-0Ah], 2
		add	word ptr [bp-4], 10h

loc_C1A9:
		cmp	[bp-4],	si
		jl	short loc_C17E
		add	word ptr [bp-6], 50h ; 'P'
		inc	word ptr [bp-2]

loc_C1B5:
		mov	ax, [bp-2]
		cmp	ax, [bp+0Ch]
		jl	short loc_C173
		call	egc_off
		pop	di
		pop	si
		leave
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: bp-based frame

sub_C1C6	proc far

var_10		= word ptr -10h
var_C		= word ptr -0Ch
var_A		= word ptr -0Ah
var_8		= word ptr -8
var_2		= word ptr -2
arg_0		= byte ptr  6
arg_2		= byte ptr  8

		enter	10h, 0
		push	si
		push	di
		lea	ax, [bp+var_A]
		push	ss
		push	ax
		push	ds
		push	offset unk_D78C
		mov	cx, 0Ah
		call	SCOPY@
		lea	ax, [bp+var_10]
		push	ss
		push	ax
		push	ds
		push	offset asc_D796	; ")))))"
		mov	cx, 5
		call	SCOPY@
		xor	si, si
		jmp	short loc_C1F9
; ---------------------------------------------------------------------------

loc_C1F2:
		mov	al, [bp+arg_0]
		mov	byte ptr [bp+si+var_10], al
		inc	si

loc_C1F9:
		cmp	si, 5
		jl	short loc_C1F2
		push	large 0C00000h
		call	sub_F72
		push	large 0
		push	large 180018Fh
		call	sub_D04
		xor	si, si
		jmp	loc_C2AE
; ---------------------------------------------------------------------------

loc_C21C:
		push	large 0C00000h
		call	sub_F72
		push	[bp+var_A]
		push	[bp+var_10]
		call	sub_C045
		mov	al, byte ptr [bp+var_10+1]
		mov	byte ptr [bp+var_10], al
		mov	ax, [bp+var_8]
		mov	[bp+var_A], ax
		push	large 0C00004h
		call	sub_F72
		mov	di, 1
		jmp	short loc_C27E
; ---------------------------------------------------------------------------

loc_C24C:
		mov	bx, di
		add	bx, bx
		lea	ax, [bp+var_A]
		add	bx, ax
		push	word ptr ss:[bx]
		mov	al, byte ptr [bp+di+var_10]
		push	ax
		call	sub_C045
		mov	al, byte ptr [bp+di+var_10+1]
		mov	byte ptr [bp+di+var_10], al
		mov	bx, di
		add	bx, bx
		lea	ax, [bp+var_8]
		add	bx, ax
		mov	ax, ss:[bx]
		mov	bx, di
		add	bx, bx
		lea	dx, [bp+var_A]
		add	bx, dx
		mov	ss:[bx], ax
		inc	di

loc_C27E:
		cmp	di, 4
		jl	short loc_C24C
		push	large 0C0000Fh
		call	sub_F72
		cmp	si, 10h
		jge	short loc_C29D
		sub	[bp+var_2], 4
		mov	al, [bp+arg_2]
		add	byte ptr [bp+var_C], al

loc_C29D:
		push	[bp+var_2]
		push	[bp+var_C]
		call	sub_C045
		push	1
		call	sub_B520
		inc	si

loc_C2AE:
		cmp	si, 14h
		jl	loc_C21C
		push	large 0C00000h
		call	sub_F72
		push	large 0
		push	large 180018Fh
		call	sub_D04
		push	large 0C0000Fh
		call	sub_F72
		push	large 1640060h
		push	large 1640130h
		call	sub_DD4
		push	large 1640130h
		push	large 1C0130h
		call	sub_DD4
		push	large 1C0130h
		push	large 1C0060h
		call	sub_DD4
		push	large 1C0060h
		push	large 1640060h
		call	sub_DD4
		call	sub_F9C
		mov	word_D3B0, 0C8h	; 'È'
		call	far ptr	loc_1C2C
		pop	di
		pop	si
		leave
		retf	4
sub_C1C6	endp

seg005		ends

; ===========================================================================

; Segment type:	Pure code
seg006		segment	byte public 'CODE' use16
		assume cs:seg006
		;org 3
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; string::string(string	const &)
@string@$bctr$qmx6string proc far
					; xmsg::xmsg(xmsg &)+56P ...

var_1E		= word ptr -1Eh
arg_0		= dword	ptr  6
arg_4		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 1Eh
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 8E8Fh
		call	___InitExceptBlocks
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_C362
		mov	ax, 4
		push	ax
		call	@$bnew$qui	; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jz	short loc_C37C

loc_C362:
		les	bx, [bp+arg_4]
		mov	dx, es:[bx+2]
		mov	ax, es:[bx]
		les	bx, [bp+arg_0]
		mov	es:[bx+2], dx
		mov	es:[bx], ax
		les	bx, es:[bx]
		inc	word ptr es:[bx]

loc_C37C:
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		push	[bp+var_1E]
		call	___ExitExceptBlocks
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@string@$bctr$qmx6string endp

; ---------------------------------------------------------------------------
byte_C3A2	db 6, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 2Eh, 0, 3Ah
		db 0Dh dup(0), 2, 0, 2,	0, 95h,	8Eh
		dw seg seg000
		db 5, 0, 3Eh, 0, 78h, 61h, 2 dup(6Ch), 6Fh, 63h, 2 dup(0)
		db 0B4h, 0
		dw seg seg006
		db 2 dup(0), 3,	0Dh dup(0), 4, 0, 3, 0,	26h, 0,	2 dup(0FFh)
		db 3, 0, 2Ch, 0, 30h, 0Dh dup(0), 1, 0,	1, 0, 9Ch, 55h
		dw seg seg000
		db 5, 0, 34h, 0, 78h, 6Dh, 73h,	67h, 0Eh dup(0)

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far string__string(__int32, char *s)
@string@$bctr$qnxc proc	far
					; string::assert_element(uint)+5Ap ...

var_22		= word ptr -22h
var_16		= word ptr -16h
var_4		= dword	ptr -4
arg_0		= dword	ptr  6
src		= dword	ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 22h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 8F01h
		call	___InitExceptBlocks
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_C44B
		mov	ax, 4
		push	ax
		call	@$bnew$qui	; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jz	short loc_C4BF

loc_C44B:
		mov	ax, 0Ch
		push	ax
		call	@$bnew$qui	; operator new(uint)
		pop	cx
		mov	word ptr [bp+var_4+2], dx
		mov	word ptr [bp+var_4], ax
		or	ax, dx
		jz	short loc_C4AF
		mov	[bp+var_16], 0Eh
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ax		; int
		mov	ax, word ptr [bp+src]
		or	ax, word ptr [bp+src+2]
		jz	short loc_C481
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; s
		call	_strlen
		pop	cx
		pop	cx
		jmp	short loc_C483
; ---------------------------------------------------------------------------

loc_C481:
		xor	ax, ax

loc_C483:
		push	ax		; n
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		push	word ptr [bp+var_4+2]
		push	word ptr [bp+var_4] ; __int32
		nop
		push	cs
		call	near ptr @TStringRef@$bctr$qnxcuit1uiui	; TStringRef::TStringRef(char *,uint,char *,uint,uint)
		add	sp, 12h
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	[bp+var_16], 6

loc_C4AF:
		mov	dx, word ptr [bp+var_4+2]
		mov	ax, word ptr [bp+var_4]
		les	bx, [bp+arg_0]
		mov	es:[bx+2], dx
		mov	es:[bx], ax

loc_C4BF:
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		push	[bp+var_22]
		call	___ExitExceptBlocks
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@string@$bctr$qnxc endp

; ---------------------------------------------------------------------------
		db 4, 0, 90h, 20h, 0Ah,	0, 94h,	2
		dw seg seg006
aTstringref	db 'TStringRef *',0
byte_C4FC	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 3Ah, 0, 46h
		db 0Dh dup(0), 2, 0, 2,	0, 17h,	8Fh
		dw seg seg000
		db 5, 0, 4Ah, 0
aStringLengther	db 'string::lengtherror',0
		dd byte_C58C
		dw 0
		db 3, 0Dh dup(0)
byte_C54A	db 6, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 2Eh, 0, 3Ah
		db 0Dh dup(0), 2, 0, 2,	0, 64h,	8Fh
		dw seg seg000
		db 5, 0, 3Eh, 0, 78h, 61h, 2 dup(6Ch), 6Fh, 63h, 2 dup(0)
		db 5Ch,	2
		dw seg seg006
		db 2 dup(0), 3,	0Dh dup(0)
byte_C58C	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Ch, 0, 30h
		db 0Dh dup(0), 1, 0, 1,	0, 9Ch,	55h
		dw seg seg000
		db 5, 0, 34h, 0, 78h, 6Dh, 73h,	67h, 0Eh dup(0), 0Ch, 0
		db 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 32h, 0, 3Eh, 0Dh dup(0)
		db 1, 0, 1, 0, 0ABh, 6
		dw seg seg006
		db 5, 0, 42h, 0, 54h, 53h, 74h,	72h, 69h, 6Eh, 67h, 52h
		db 65h,	66h, 2 dup(0), 0DAh, 2
		dw seg seg006
		dw 0
		db 3, 0Dh dup(0), 2, 0,	3, 0, 1Ah, 0, 2	dup(0FFh), 1, 0
		db 26h,	0, 2Ah,	0Dh dup(0), 54h, 52h, 65h, 66h,	65h, 72h
		db 65h,	6Eh, 63h, 65h, 0Ah dup(0)

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far string___string(void (*driver)(void), char)
@string@$bdtr$qv proc far
					; xmsg::~xmsg(void)+3FP ...

var_1E		= word ptr -1Eh
driver		= dword	ptr  6
arg_4		= byte ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 1Eh
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 8FBAh
		call	___InitExceptBlocks
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	ax, word ptr [bp+driver]
		or	ax, word ptr [bp+driver+2]
		jz	short loc_C6B0
		les	bx, [bp+driver]
		les	bx, es:[bx]
		dec	word ptr es:[bx]
		mov	ax, es:[bx]
		or	ax, ax
		jnz	short loc_C69D
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	ax, 3
		push	ax		; char
		les	bx, [bp+driver]
		push	word ptr es:[bx+2]
		push	word ptr es:[bx] ; driver
		nop
		push	cs
		call	near ptr sub_C9DB
		add	sp, 6

loc_C69D:
		test	[bp+arg_4], 1
		jz	short loc_C6B0
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; driver
		call	_registerbgidriver
		pop	cx
		pop	cx

loc_C6B0:
					; string::~string(void)+69j
		push	[bp+var_1E]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@string@$bdtr$qv endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; string::assert_element(unsigned int)const
@string@assert_element$xqui proc far

var_28		= word ptr -28h
var_26		= word ptr -26h
var_1A		= word ptr -1Ah
src		= byte ptr -8
driver		= byte ptr -4
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 28h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 8FEEh
		call	___InitExceptBlocks
		mov	ax, [bp+arg_4]
		mov	[bp+var_28], ax
		les	bx, [bp+arg_0]
		les	bx, es:[bx]
		mov	ax, es:[bx+6]
		cmp	ax, [bp+var_28]
		jbe	short loc_C6EB
		mov	ax, 1
		jmp	short loc_C6ED
; ---------------------------------------------------------------------------

loc_C6EB:
		xor	ax, ax

loc_C6ED:
		or	ax, ax
		jnz	short loc_C76E
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ax		; int
		mov	ax, 5
		push	ax		; int
		mov	ax, seg	seg000
		push	ax		; int
		mov	ax, 90E0h
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		mov	[bp+var_1A], 6
		push	ds
		mov	ax, 0D0Ah
		push	ax		; s
		push	ss
		lea	ax, [bp+driver]
		push	ax		; __int32
		nop
		push	cs
		call	near ptr @string@$bctr$qnxc ; string::string(char *)
		add	sp, 8
		lea	ax, [bp+driver]
		push	ss
		push	ax
		push	ss
		lea	ax, [bp+src]
		push	ax
		call	@xmsg@$bctr$qmx6string ; xmsg::xmsg(string &)
		add	sp, 8
		mov	[bp+var_1A], 0Eh
		mov	ax, 2
		push	ax		; char
		push	ss
		lea	ax, [bp+driver]
		push	ax		; driver
		push	cs
		call	near ptr @string@$bdtr$qv ; string::~string(void)
		add	sp, 6
		mov	[bp+var_1A], 6
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		lea	ax, [bp+src]
		push	ss
		push	ax		; src
		push	cs		; int
		mov	ax, 0BFDh
		push	ax		; int
		call	@_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void	*,uint,uint,uint,uchar *)
		add	sp, 1Ah

loc_C76E:
		push	[bp+var_26]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@string@assert_element$xqui endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; string::assert_index(unsigned	int)const
@string@assert_index$xqui proc far

var_28		= word ptr -28h
var_26		= word ptr -26h
var_1A		= word ptr -1Ah
src		= byte ptr -8
driver		= byte ptr -4
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 28h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 9032h
		call	___InitExceptBlocks
		mov	ax, [bp+arg_4]
		mov	[bp+var_28], ax
		les	bx, [bp+arg_0]
		les	bx, es:[bx]
		mov	ax, es:[bx+6]
		cmp	ax, [bp+var_28]
		jb	short loc_C7A9
		mov	ax, 1
		jmp	short loc_C7AB
; ---------------------------------------------------------------------------

loc_C7A9:
		xor	ax, ax

loc_C7AB:
		or	ax, ax
		jnz	short loc_C82C
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ax		; int
		mov	ax, 5
		push	ax		; int
		mov	ax, seg	seg000
		push	ax		; int
		mov	ax, 90E0h
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		mov	[bp+var_1A], 6
		push	ds
		mov	ax, 0D28h
		push	ax		; s
		push	ss
		lea	ax, [bp+driver]
		push	ax		; __int32
		nop
		push	cs
		call	near ptr @string@$bctr$qnxc ; string::string(char *)
		add	sp, 8
		lea	ax, [bp+driver]
		push	ss
		push	ax
		push	ss
		lea	ax, [bp+src]
		push	ax
		call	@xmsg@$bctr$qmx6string ; xmsg::xmsg(string &)
		add	sp, 8
		mov	[bp+var_1A], 0Eh
		mov	ax, 2
		push	ax		; char
		push	ss
		lea	ax, [bp+driver]
		push	ax		; driver
		push	cs
		call	near ptr @string@$bdtr$qv ; string::~string(void)
		add	sp, 6
		mov	[bp+var_1A], 6
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		lea	ax, [bp+src]
		push	ss
		push	ax		; src
		push	cs		; int
		mov	ax, 0BFDh
		push	ax		; int
		call	@_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void	*,uint,uint,uint,uchar *)
		add	sp, 1Ah

loc_C82C:
		push	[bp+var_26]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@string@assert_index$xqui endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; TSubString::assert_element(unsigned int)const
@TSubString@assert_element$xqui	proc far

var_28		= word ptr -28h
var_26		= word ptr -26h
var_1A		= word ptr -1Ah
src		= byte ptr -8
driver		= byte ptr -4
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp
		sub	sp, 28h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 9076h
		call	___InitExceptBlocks
		mov	ax, [bp+arg_4]
		mov	[bp+var_28], ax
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+6]
		cmp	ax, [bp+var_28]
		jbe	short loc_C864
		mov	ax, 1
		jmp	short loc_C866
; ---------------------------------------------------------------------------

loc_C864:
		xor	ax, ax

loc_C866:
		or	ax, ax
		jnz	short loc_C8E7
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		push	ax		; int
		push	ax		; int
		mov	ax, 5
		push	ax		; int
		mov	ax, seg	seg000
		push	ax		; int
		mov	ax, 90E0h
		push	ax		; int
		xor	ax, ax
		push	ax		; int
		push	ax		; int
		mov	[bp+var_1A], 6
		push	ds
		mov	ax, 0D46h
		push	ax		; s
		push	ss
		lea	ax, [bp+driver]
		push	ax		; __int32
		nop
		push	cs
		call	near ptr @string@$bctr$qnxc ; string::string(char *)
		add	sp, 8
		lea	ax, [bp+driver]
		push	ss
		push	ax
		push	ss
		lea	ax, [bp+src]
		push	ax
		call	@xmsg@$bctr$qmx6string ; xmsg::xmsg(string &)
		add	sp, 8
		mov	[bp+var_1A], 0Eh
		mov	ax, 2
		push	ax		; char
		push	ss
		lea	ax, [bp+driver]
		push	ax		; driver
		push	cs
		call	near ptr @string@$bdtr$qv ; string::~string(void)
		add	sp, 6
		mov	[bp+var_1A], 6
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		lea	ax, [bp+src]
		push	ss
		push	ax		; src
		push	cs		; int
		mov	ax, 0BFDh
		push	ax		; int
		call	@_ThrowException$qnvt1t1t1uiuiuinuc ; _ThrowException(void *,void *,void *,void	*,uint,uint,uint,uchar *)
		add	sp, 1Ah

loc_C8E7:
		push	[bp+var_26]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
@TSubString@assert_element$xqui	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far TStringRef__TStringRef(__int32, void *src, size_t n, int, int, int,	int)
@TStringRef@$bctr$qnxcuit1uiui proc far

arg_0		= dword	ptr  6
src		= dword	ptr  0Ah
n		= word ptr  0Eh
arg_A		= word ptr  10h
arg_C		= word ptr  12h
arg_E		= word ptr  14h
arg_10		= word ptr  16h

		push	bp
		mov	bp, sp
		push	si
		push	di
		mov	ax, word ptr [bp+arg_0]
		or	ax, word ptr [bp+arg_0+2]
		jnz	short loc_C919
		mov	ax, 0Ch
		push	ax
		call	@$bnew$qui	; operator new(uint)
		pop	cx
		mov	word ptr [bp+arg_0+2], dx
		mov	word ptr [bp+arg_0], ax
		or	ax, dx
		jnz	short loc_C919
		jmp	loc_C9BF
; ---------------------------------------------------------------------------

loc_C919:
					; TStringRef::TStringRef(char *,uint,char *,uint,uint)+1Fj
		les	bx, [bp+arg_0]
		mov	word ptr es:[bx], 1
		mov	word ptr es:[bx+0Ah], 0
		mov	ax, [bp+n]
		add	ax, [bp+arg_E]
		mov	es:[bx+6], ax
		mov	ax, es:[bx+6]
		add	ax, [bp+arg_10]
		push	ax
		nop
		push	cs
		call	near ptr sub_CB73
		pop	cx
		les	bx, [bp+arg_0]
		mov	es:[bx+8], ax
		mov	ax, es:[bx+8]
		inc	ax
		push	ax
		call	_malloc
		pop	cx
		les	bx, [bp+arg_0]
		mov	es:[bx+4], dx
		mov	es:[bx+2], ax
		mov	ax, es:[bx+2]
		or	ax, es:[bx+4]
		jnz	short loc_C973
		push	ds
		mov	ax, 0A60h
		push	ax
		call	@xalloc@raise$qv ; xalloc::raise(void)
		pop	cx
		pop	cx

loc_C973:
		push	[bp+n]		; n
		push	word ptr [bp+src+2]
		push	word ptr [bp+src] ; src
		les	bx, [bp+arg_0]
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2] ; dest
		call	_memcpy
		push	[bp+arg_E]	; n
		push	[bp+arg_C]
		push	[bp+arg_A]	; src
		les	bx, [bp+arg_0]
		mov	ax, es:[bx+2]
		add	ax, [bp+n]
		push	word ptr es:[bx+4]
		push	ax		; dest
		call	_memcpy
		add	sp, 14h
		les	bx, [bp+arg_0]
		les	bx, es:[bx+2]
		mov	ax, [bp+n]
		add	ax, [bp+arg_E]
		add	bx, ax
		mov	byte ptr es:[bx], 0

loc_C9BF:
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		add	word ptr es:[bx], 1
		adc	word ptr es:[bx+2], 0
		mov	dx, word ptr [bp+arg_0+2]
		mov	ax, word ptr [bp+arg_0]
		pop	di
		pop	si
		pop	bp
		retf
@TStringRef@$bctr$qnxcuit1uiui endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

; int __cdecl __far sub_C9DB(void (*driver)(void), char)
sub_C9DB	proc far

var_1E		= word ptr -1Eh
driver		= dword	ptr  6
arg_4		= byte ptr  0Ah

		push	bp
		mov	bp, sp

; TStringRef::~TStringRef(void)
@TStringRef@$bdtr$qv:
		sub	sp, 1Eh
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 9090h
		call	___InitExceptBlocks
		call	@__RefDestructorCount$qv ; __RefDestructorCount(void)
		mov	bx, ax
		mov	es, dx
		sub	word ptr es:[bx], 1
		sbb	word ptr es:[bx+2], 0
		mov	ax, word ptr [bp+driver]
		or	ax, word ptr [bp+driver+2]
		jz	short loc_CA2D
		les	bx, [bp+driver]
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2]
		call	_farfree
		pop	cx
		pop	cx
		test	[bp+arg_4], 1
		jz	short loc_CA2D
		push	word ptr [bp+driver+2]
		push	word ptr [bp+driver] ; driver
		call	_registerbgidriver
		pop	cx
		pop	cx

loc_CA2D:
		push	[bp+var_1E]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_C9DB	endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; TStringRef::reserve(unsigned int)
@TStringRef@reserve$qui:
		sub	sp, 20h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 90A2h
		call	___InitExceptBlocks
		les	bx, [bp+6]
		or	word ptr es:[bx+0Ah], 1
		mov	ax, [bp+0Ah]
		inc	ax
		push	ax
		nop
		push	cs
		call	near ptr sub_CB73
		pop	cx
		mov	[bp-20h], ax
		les	bx, [bp+6]
		mov	ax, es:[bx+8]
		sub	ax, [bp-20h]
		cmp	ax, word_DC88
		jbe	short loc_CA9B
		mov	ax, [bp-20h]
		inc	ax
		push	ax
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2]
		call	_realloc
		add	sp, 6
		les	bx, [bp+6]
		mov	es:[bx+4], dx
		mov	es:[bx+2], ax
		mov	ax, [bp-20h]
		mov	es:[bx+8], ax

loc_CA9B:
		push	word ptr [bp-1Eh]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; TStringRef::check_freeboard(void)
@TStringRef@check_freeboard$qv:
		sub	sp, 20h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 90ACh
		call	___InitExceptBlocks
		les	bx, [bp+6]
		push	word ptr es:[bx+6]
		nop
		push	cs
		call	near ptr sub_CB73
		pop	cx
		mov	[bp-20h], ax
		les	bx, [bp+6]
		mov	ax, es:[bx+8]
		sub	ax, [bp-20h]
		cmp	ax, word_DC88
		jbe	short loc_CB03
		mov	ax, [bp-20h]
		inc	ax
		push	ax
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2]
		call	_realloc
		add	sp, 6
		les	bx, [bp+6]
		mov	es:[bx+4], dx
		mov	es:[bx+2], ax
		mov	ax, [bp-20h]
		mov	es:[bx+8], ax

loc_CB03:
		push	word ptr [bp-1Eh]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf

; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_CB11	proc far

var_1E		= word ptr -1Eh
arg_0		= dword	ptr  6
arg_4		= word ptr  0Ah

		push	bp
		mov	bp, sp

; TStringRef::grow_to(unsigned int)
@TStringRef@grow_to$qui:
		sub	sp, 1Eh
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 90BEh
		call	___InitExceptBlocks
		les	bx, [bp+arg_0]
		mov	ax, [bp+arg_4]
		mov	es:[bx+8], ax
		mov	ax, es:[bx+8]
		inc	ax
		push	ax
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2]
		call	_realloc
		add	sp, 6
		les	bx, [bp+arg_0]
		mov	es:[bx+4], dx
		mov	es:[bx+2], ax
		mov	ax, es:[bx+2]
		or	ax, es:[bx+4]
		jnz	short loc_CB65
		push	ds
		mov	ax, 0A60h
		push	ax
		call	@xalloc@raise$qv ; xalloc::raise(void)
		pop	cx
		pop	cx

loc_CB65:
		push	[bp+var_1E]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_CB11	endp


; =============== S U B	R O U T	I N E =======================================

; Attributes: library function bp-based	frame

sub_CB73	proc far
					; seg006:072Dp	...

var_20		= word ptr -20h
var_1E		= word ptr -1Eh
arg_0		= word ptr  6

		push	bp
		mov	bp, sp

; TStringRef::round_capacity(unsigned int)
@TStringRef@round_capacity$qui:
		sub	sp, 20h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 90C8h
		call	___InitExceptBlocks
		mov	ax, word_DC84
		mov	[bp+var_20], ax
		mov	cx, word_DC86
		mov	ax, [bp+arg_0]
		sub	ax, [bp+var_20]
		add	ax, cx
		dec	ax
		xor	dx, dx
		div	cx
		imul	cx
		add	ax, [bp+var_20]
		push	ax
		push	[bp+var_1E]
		call	___ExitExceptBlocks
		pop	ax
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
sub_CB73	endp

; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; TStringRef::splice(unsigned int, unsigned int, char const *, unsigned	int)
@TStringRef@splice$quiuinxcui:
		sub	sp, 26h
		push	si
		push	di
		mov	ax, seg	seg000
		mov	bx, 90DAh
		call	___InitExceptBlocks
		les	bx, [bp+6]
		mov	ax, es:[bx+6]
		add	ax, [bp+12h]
		sub	ax, [bp+0Ch]
		mov	[bp-24h], ax
		push	ax
		push	cs
		call	near ptr sub_CB73
		pop	cx
		mov	[bp-26h], ax
		les	bx, [bp+6]
		mov	ax, es:[bx+8]
		cmp	ax, [bp-26h]
		jnb	short loc_CBFA
		push	word ptr [bp-26h]
		push	word ptr [bp+8]
		push	bx
		push	cs
		call	near ptr sub_CB11
		add	sp, 6
		jmp	short loc_CC69
; ---------------------------------------------------------------------------

loc_CBFA:
		les	bx, [bp+6]
		mov	ax, es:[bx+8]
		sub	ax, [bp-26h]
		cmp	ax, word_DC88
		jbe	short loc_CC69
		test	byte ptr es:[bx+0Ah], 1
		jnz	short loc_CC69
		mov	ax, [bp-26h]
		inc	ax
		push	ax
		call	_malloc
		pop	cx
		mov	[bp-20h], dx
		mov	[bp-22h], ax
		les	bx, [bp+6]
		mov	ax, es:[bx+2]
		or	ax, es:[bx+4]
		jnz	short loc_CC3B
		push	ds
		mov	ax, 0A60h
		push	ax
		call	@xalloc@raise$qv ; xalloc::raise(void)
		pop	cx
		pop	cx

loc_CC3B:
		cmp	word ptr [bp+0Ah], 0
		jz	short loc_CC5D
		push	word ptr [bp+0Ah]
		les	bx, [bp+6]
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2]
		push	word ptr [bp-20h]
		push	word ptr [bp-22h]
		call	_memcpy
		add	sp, 0Ah

loc_CC5D:
		les	bx, [bp+6]
		mov	ax, [bp-26h]
		mov	es:[bx+8], ax
		jmp	short loc_CC7A
; ---------------------------------------------------------------------------

loc_CC69:
		les	bx, [bp+6]
		mov	dx, es:[bx+4]
		mov	ax, es:[bx+2]
		mov	[bp-20h], dx
		mov	[bp-22h], ax

loc_CC7A:
		les	bx, [bp+6]
		mov	dx, es:[bx+4]
		mov	ax, es:[bx+2]
		cmp	dx, [bp-20h]
		jnz	short loc_CC97
		cmp	ax, [bp-22h]
		jnz	short loc_CC97
		mov	ax, [bp+12h]
		cmp	ax, [bp+0Ch]
		jz	short loc_CCC9

loc_CC97:
		les	bx, [bp+6]
		mov	ax, es:[bx+6]
		sub	ax, [bp+0Ah]
		sub	ax, [bp+0Ch]
		push	ax
		mov	ax, es:[bx+2]
		add	ax, [bp+0Ah]
		add	ax, [bp+0Ch]
		push	word ptr es:[bx+4]
		push	ax
		mov	ax, [bp-22h]
		add	ax, [bp+0Ah]
		add	ax, [bp+12h]
		push	word ptr [bp-20h]
		push	ax
		call	_memmove
		add	sp, 0Ah

loc_CCC9:
		cmp	word ptr [bp+12h], 0
		jz	short loc_CD0D
		mov	ax, [bp+0Eh]
		or	ax, [bp+10h]
		jz	short loc_CCF4
		push	word ptr [bp+12h]
		push	word ptr [bp+10h]
		push	word ptr [bp+0Eh]
		mov	ax, [bp-22h]
		add	ax, [bp+0Ah]
		push	word ptr [bp-20h]
		push	ax
		call	_memmove
		add	sp, 0Ah
		jmp	short loc_CD0D
; ---------------------------------------------------------------------------

loc_CCF4:
		push	word ptr [bp+12h]
		mov	ax, 20h	; ' '
		push	ax
		mov	ax, [bp-22h]
		add	ax, [bp+0Ah]
		push	word ptr [bp-20h]
		push	ax
		call	_memset
		add	sp, 8

loc_CD0D:
		les	bx, [bp+6]
		mov	ax, [bp-24h]
		mov	es:[bx+6], ax
		push	es
		les	ax, [bp-22h]
		mov	dx, es
		pop	es
		add	ax, es:[bx+6]
		mov	bx, ax
		mov	es, dx
		mov	byte ptr es:[bx], 0
		les	bx, [bp+6]
		mov	dx, es:[bx+4]
		mov	ax, es:[bx+2]
		cmp	dx, [bp-20h]
		jnz	short loc_CD3F
		cmp	ax, [bp-22h]
		jz	short loc_CD62

loc_CD3F:
		les	bx, [bp+6]
		push	word ptr es:[bx+4]
		push	word ptr es:[bx+2]
		call	_farfree
		pop	cx
		pop	cx
		les	bx, [bp+6]
		mov	dx, [bp-20h]
		mov	ax, [bp-22h]
		mov	es:[bx+4], dx
		mov	es:[bx+2], ax

loc_CD62:
		push	word ptr [bp-1Eh]
		call	___ExitExceptBlocks
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; string::set_case_sensitive(int)
@string@set_case_sensitive$qi:
		sub	sp, 2
		push	si
		push	di
		mov	ax, word_DC7E
		mov	[bp-2],	ax
		mov	ax, [bp+6]
		mov	word_DC7E, ax
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; string::set_paranoid_check(int)
@string@set_paranoid_check$qi:
		sub	sp, 2
		push	si
		push	di
		mov	ax, word_DC80
		mov	[bp-2],	ax
		mov	ax, [bp+6]
		mov	word_DC80, ax
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; string::skip_whitespace(int)
@string@skip_whitespace$qi:
		sub	sp, 2
		push	si
		push	di
		mov	ax, word_DC82
		mov	[bp-2],	ax
		mov	ax, [bp+6]
		mov	word_DC82, ax
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; string::initial_capacity(unsigned int)
@string@initial_capacity$qui:
		sub	sp, 2
		push	si
		push	di
		mov	ax, word_DC84
		mov	[bp-2],	ax
		mov	ax, [bp+6]
		mov	word_DC84, ax
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; string::resize_increment(unsigned int)
@string@resize_increment$qui:
		sub	sp, 2
		push	si
		push	di
		mov	ax, word_DC86
		mov	[bp-2],	ax
		mov	ax, [bp+6]
		mov	word_DC86, ax
		cmp	word_DC86, 0
		jnz	short loc_CE05
		mov	word_DC86, 1

loc_CE05:
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
		push	bp
		mov	bp, sp

; string::max_waste(unsigned int)
@string@max_waste$qui:
		sub	sp, 2
		push	si
		push	di
		mov	ax, word_DC88
		mov	[bp-2],	ax
		mov	ax, [bp+6]
		mov	word_DC88, ax
		mov	ax, [bp-2]
		pop	di
		pop	si
		mov	sp, bp
		pop	bp
		retf
; ---------------------------------------------------------------------------
byte_CE2B	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 3Ah, 0, 46h
		db 0Dh dup(0), 2, 0, 2,	0, 15h,	91h
		dw seg seg000
		db 5, 0, 4Ah, 0
aStringLength_0	db 'string::lengtherror',0
		dd byte_CEBB
		db 2 dup(0), 3,	0Dh dup(0), 6, 0, 3, 0,	26h, 0,	2 dup(0FFh)
		db 7, 0, 2Eh, 0, 3Ah, 0Dh dup(0), 2, 0,	2, 0, 62h, 91h
		dw seg seg000
		db 5, 0, 3Eh, 0, 78h, 61h, 2 dup(6Ch), 6Fh, 63h, 2 dup(0)
		db 8Bh,	0Bh
		dw seg seg006
		db 2 dup(0), 3,	0Dh dup(0)
byte_CEBB	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Ch, 0, 30h
		db 0Dh dup(0), 1, 0, 1,	0, 9Ch,	55h
		dw seg seg000
		db 5, 0, 34h, 0, 78h, 6Dh, 73h,	67h, 0Eh dup(0)
byte_CEF3	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 3, 0, 2Eh, 0, 32h
		db 0Dh dup(0), 1, 0, 1,	0, 8, 3
		dw seg seg006
		db 5, 0, 36h, 0, 73h, 74h, 72h,	69h, 6Eh, 67h, 0Eh dup(0)
byte_CF2D	db 4, 0, 3, 0, 26h, 0, 2 dup(0FFh), 7, 0, 3Ah, 0, 46h
		db 0Dh dup(0), 2, 0, 2,	0, 0AFh, 91h
		dw seg seg000
		db 5, 0, 4Ah, 0
aStringOutofran	db 'string::outofrange',0
		db 0, 8Bh, 0Bh
		dw seg seg006
		db 2 dup(0), 3,	12h dup(0)
seg006		ends

; ===========================================================================

; Segment type:	Pure data
dseg		segment	para public 'DATA' use16
		assume cs:dseg

include libs/BorlandC/c0[data].asm

aOk		db 'ÏÏ®ª¼ÂÏ',0
aK		db '϶¸»·ªµ',0
aKN		db 'Ïϱª»­Ï',0
aKM		db 'µ¾¶ª½²¬',0
unk_D030	db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
aKkuukkuukkuukk	db 'ªªUUªªUUªªUUªªUUªªUUªªUUªªUUªªUU3333ÌÌÌÌ3333ÌÌÌÌ3333ÌÌÌÌ3333ÌÌÌÌÌ'
		db 'ÌÌÌ3333ÌÌÌÌ3333ÌÌÌÌ3333ÌÌÌÌ3333end3.txt',0
aEnding_m	db 'ending.m',0
aEnd1_txt	db 'end1.txt',0
aEnd1_m		db 'end1.m',0
aEd01_pi	db 'ed01.pi',0
aEd02_pi	db 'ed02.pi',0
aEnd2_txt	db 'end2.txt',0
aEd03_pi	db 'ed03.pi',0
aEd03a_rgb	db 'ed03a.rgb',0
aEd04_pi	db 'ed04.pi',0
aEd05_pi	db 'ed05.pi',0
					; sub_A09D+596o ...
aVer1_00	db 'ver 1.00',0
aXxcvsB@b@vrvsv	db '••–‚˜^@@‚r‚s‚`‚e‚e',0
aEd06_pi	db 'ed06.pi',0
aGvgngogigab@b@	db 'ƒvƒƒOƒ‰ƒ€@@@‚y‚t‚m',0
aEd06b_rgb	db 'ed06b.rgb',0
aEd06c_rgb	db 'ed06c.rgb',0
aEd07_pi	db 'ed07.pi',0
aGogigtgbgbgnb@	db 'ƒOƒ‰ƒtƒBƒbƒN@‚y‚t‚m',0
aB@b@b@b@b@b@b@	db '@@@@@@@‚•“úŒü',0
aB@b@b@b@bigibG	db '@@@@iƒI[ƒ‹ƒNƒŠƒA‰æj',0
aEd07a_rgb	db 'ed07a.rgb',0
aEd07b_rgb	db 'ed07b.rgb',0
					; sub_A8FA+262o
aVlvtvrvhvbb@b@	db '‚l‚t‚r‚h‚b@@‚y‚t‚m',0
aEd08_pi	db 'ed08.pi',0
aEd08a_rgb	db 'ed08a.rgb',0
aVsvdvrvsb@vovk	db '‚s‚d‚r‚s@‚o‚k‚`‚x‚d‚q',0
aB@b@b@b@vivivs	db '@@@@‚©‚¨‚é',0
aB@b@b@b@vbbVv	db '@@@@‚b|‚v',0
aB@b@Orucb@mbiS	db '@@ ŽR“c@Œbˆê˜Y',0
aVVSSxrivVVVV	db ' ‚»‚Ì‘¼‘吨‚Ì‚Ý‚È‚³‚ñ',0
aEd08b_rgb	db 'ed08b.rgb',0
aEd08c_rgb	db 'ed08c.rgb',0
aEd09_pi	db 'ED09.pi',0
aVsvivbvovlb@vs	db '‚s‚ˆ‚‚Ž‚‹@‚™‚‚•@‚†‚‚’@‚‚Œ‚‚™‚‰‚Ž‚‡',0
aB@nPiuU_	db '@ÅI“¾“_',0
aGrgugegbgjgeb	db 'ƒRƒ“ƒeƒBƒjƒ…[',0
aB@Gigugn	db '@ ƒ‰ƒ“ƒN',0
aGvgmgcgdbPik	db 'ƒvƒŒƒCƒ„[‰Šú',0
aCMvpik		db ' —쌂‰Šú”',0
aVavVVSrso	db '‚ ‚È‚½‚̘r‘O',0
aVpvxvxvvb@vyvt	db '‚P‚X‚X‚V@‚y‚t‚m  (Amusement Makers)',0
aAll_pi		db 'all.pi',0
aBut_pi		db 'but.pi',0
aExtra_pi	db 'extra.pi',0
aMikoft_bft	db 'MIKOFT.bft',0
aEndft_bft	db 'endft.bft',0
; char path[]
path		db 'op',0
aBfnt		db 'BFNT'
		db  1Ah
		db    0
word_D362	dw 0
					; sub_6AE:loc_70Er ...
word_D364	dw 27Fh
word_D366	dw 27Fh
					; sub_6AE:loc_718r ...
word_D368	dw 0
					; sub_DD4+Fr ...
word_D36A	dw 18Fh
word_D36C	dw 18Fh
word_D36E	dw 0A800h
					; sub_DD4:loc_E48r ...
word_D370	dw 7CB0h
		dw 0
		db  80h	; €
		db    0
		db 0C0h	; À
		db    0
		db 0E0h	; à
		db    0
		db 0F0h	; ð
		db    0
		db 0F8h	; ø
		db    0
		db 0FCh	; ü
		db    0
		db 0FEh	; þ
		db    0
		db 0FFh
		db    0
		db 0FFh
		db  80h	; €
		db 0FFh
		db 0C0h	; À
		db 0FFh
		db 0E0h	; à
		db 0FFh
		db 0F0h	; ð
		db 0FFh
		db 0F8h	; ø
		db 0FFh
		db 0FCh	; ü
		db 0FFh
		db 0FEh	; þ
		db 0FFh
		db 0FFh
word_D394	dw 0
word_D396	dw 0FFFFh
include libs/master.lib/dos_ropen[data].asm
word_D39A	dw 0
		db  10h
		db    0
		db  10h
		db    0
		db    0
		db    0
		db 0FFh
		db    0
word_D3A4	dw 0A800h
word_D3A6	dw 3E80h
word_D3A8	dw 190h
		db  50h	; P
		db    0
word_D3AC	dw 0
		db  55h	; U
		db    0
word_D3B0	dw 64h
					; sub_536:loc_55Dw ...
		db    0
		db    0
		db    0
		db    0
		db    0
		db 0FFh
		db 0FFh
		db    0
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db    0
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db    0
		db 0FFh
		db 0FFh
		db 0FFh
		db  77h	; w
		db  77h	; w
		db  77h	; w
		db    0
		db    0
		db 0AAh	; ª
		db 0AAh	; ª
		db    0
		db    0
		db 0AAh	; ª
		db    0
		db 0AAh	; ª
		db    0
		db 0AAh	; ª
		db    0
		db    0
		db 0AAh	; ª
		db 0AAh	; ª
		db 0AAh	; ª
		db 0AAh	; ª
		db    0
		db 0AAh	; ª
		db 0AAh	; ª
		db 0AAh	; ª
word_D3E2	dw 0
		dw 0
		dw 0
word_D3E8	dw 200h
word_D3EA	dw 0
					; sub_5B8+48w ...
byte_D3EC	db 0
		db 0
		db    0
		db    0
		db    6
		db    0
		db  0Dh
		db    0
		db  13h
		db    0
		db  19h
		db    0
		db  1Fh
		db    0
		db  26h	; &
		db    0
		db  2Ch	; ,
		db    0
		db  32h	; 2
		db    0
		db  38h	; 8
		db    0
		db  3Eh	; >
		db    0
		db  44h	; D
		db    0
		db  4Ah	; J
		db    0
		db  50h	; P
		db    0
		db  56h	; V
		db    0
		db  5Ch	; \
		db    0
		db  62h	; b
		db    0
		db  68h	; h
		db    0
		db  6Dh	; m
		db    0
		db  73h	; s
		db    0
		db  79h	; y
		db    0
		db  7Eh	; ~
		db    0
		db  84h	; „
		db    0
		db  89h	; ‰
		db    0
		db  8Eh	; Ž
		db    0
		db  93h	; “
		db    0
		db  98h	; ˜
		db    0
		db  9Dh	; 
		db    0
		db 0A2h	; ¢
		db    0
		db 0A7h	; §
		db    0
		db 0ACh	; ¬
		db    0
		db 0B1h	; ±
		db    0
		db 0B5h	; µ
		db    0
		db 0B9h	; ¹
		db    0
		db 0BEh	; ¾
		db    0
		db 0C2h	; Â
		db    0
		db 0C6h	; Æ
		db    0
		db 0CAh	; Ê
		db    0
		db 0CEh	; Î
		db    0
		db 0D1h	; Ñ
		db    0
		db 0D5h	; Õ
		db    0
		db 0D8h	; Ø
		db    0
		db 0DCh	; Ü
		db    0
		db 0DFh	; ß
		db    0
		db 0E2h	; â
		db    0
		db 0E5h	; å
		db    0
		db 0E7h	; ç
		db    0
		db 0EAh	; ê
		db    0
		db 0EDh	; í
		db    0
		db 0EFh	; ï
		db    0
		db 0F1h	; ñ
		db    0
		db 0F3h	; ó
		db    0
		db 0F5h	; õ
		db    0
		db 0F7h	; ÷
		db    0
		db 0F8h	; ø
		db    0
		db 0FAh	; ú
		db    0
		db 0FBh	; û
		db    0
		db 0FCh	; ü
		db    0
		db 0FDh	; ý
		db    0
		db 0FEh	; þ
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db    0
		db    1
		db    0
		db    1
		db    0
		db    1
		db    0
		db    1
		db    0
		db    1
		db 0FFh
		db    0
		db 0FFh
		db    0
		db 0FEh	; þ
		db    0
		db 0FDh	; ý
		db    0
		db 0FCh	; ü
		db    0
		db 0FBh	; û
		db    0
		db 0FAh	; ú
		db    0
		db 0F8h	; ø
		db    0
		db 0F7h	; ÷
		db    0
		db 0F5h	; õ
		db    0
		db 0F3h	; ó
		db    0
		db 0F1h	; ñ
		db    0
		db 0EFh	; ï
		db    0
		db 0EDh	; í
		db    0
		db 0EAh	; ê
		db    0
		db 0E7h	; ç
		db    0
		db 0E5h	; å
		db    0
		db 0E2h	; â
		db    0
		db 0DFh	; ß
		db    0
		db 0DCh	; Ü
		db    0
		db 0D8h	; Ø
		db    0
		db 0D5h	; Õ
		db    0
		db 0D1h	; Ñ
		db    0
		db 0CEh	; Î
		db    0
		db 0CAh	; Ê
		db    0
		db 0C6h	; Æ
		db    0
		db 0C2h	; Â
		db    0
		db 0BEh	; ¾
		db    0
		db 0B9h	; ¹
		db    0
		db 0B5h	; µ
		db    0
		db 0B1h	; ±
		db    0
		db 0ACh	; ¬
		db    0
		db 0A7h	; §
		db    0
		db 0A2h	; ¢
		db    0
		db  9Dh	; 
		db    0
		db  98h	; ˜
		db    0
		db  93h	; “
		db    0
		db  8Eh	; Ž
		db    0
		db  89h	; ‰
		db    0
		db  84h	; „
		db    0
		db  7Eh	; ~
		db    0
		db  79h	; y
		db    0
		db  73h	; s
		db    0
		db  6Dh	; m
		db    0
		db  68h	; h
		db    0
		db  62h	; b
		db    0
		db  5Ch	; \
		db    0
		db  56h	; V
		db    0
		db  50h	; P
		db    0
		db  4Ah	; J
		db    0
		db  44h	; D
		db    0
		db  3Eh	; >
		db    0
		db  38h	; 8
		db    0
		db  32h	; 2
		db    0
		db  2Ch	; ,
		db    0
		db  26h	; &
		db    0
		db  1Fh
		db    0
		db  19h
		db    0
		db  13h
		db    0
		db  0Dh
		db    0
		db    6
		db    0
		db    0
		db    0
		db 0FAh	; ú
		db 0FFh
		db 0F3h	; ó
		db 0FFh
		db 0EDh	; í
		db 0FFh
		db 0E7h	; ç
		db 0FFh
		db 0E1h	; á
		db 0FFh
		db 0DAh	; Ú
		db 0FFh
		db 0D4h	; Ô
		db 0FFh
		db 0CEh	; Î
		db 0FFh
		db 0C8h	; È
		db 0FFh
		db 0C2h	; Â
		db 0FFh
		db 0BCh	; ¼
		db 0FFh
		db 0B6h	; ¶
		db 0FFh
		db 0B0h	; °
		db 0FFh
		db 0AAh	; ª
		db 0FFh
		db 0A4h	; ¤
		db 0FFh
		db  9Eh	; ž
		db 0FFh
		db  98h	; ˜
		db 0FFh
		db  93h	; “
		db 0FFh
		db  8Dh	; 
		db 0FFh
		db  87h	; ‡
		db 0FFh
		db  82h	; ‚
		db 0FFh
		db  7Ch	; |
		db 0FFh
		db  77h	; w
		db 0FFh
		db  72h	; r
		db 0FFh
		db  6Dh	; m
		db 0FFh
		db  68h	; h
		db 0FFh
		db  63h	; c
		db 0FFh
		db  5Eh	; ^
		db 0FFh
		db  59h	; Y
		db 0FFh
		db  54h	; T
		db 0FFh
		db  4Fh	; O
		db 0FFh
		db  4Bh	; K
		db 0FFh
		db  47h	; G
		db 0FFh
		db  42h	; B
		db 0FFh
		db  3Eh	; >
		db 0FFh
		db  3Ah	; :
		db 0FFh
		db  36h	; 6
		db 0FFh
		db  32h	; 2
		db 0FFh
		db  2Fh	; /
		db 0FFh
		db  2Bh	; +
		db 0FFh
		db  28h	; (
		db 0FFh
		db  24h	; $
		db 0FFh
		db  21h	; !
		db 0FFh
		db  1Eh
		db 0FFh
		db  1Bh
		db 0FFh
		db  19h
		db 0FFh
		db  16h
		db 0FFh
		db  13h
		db 0FFh
		db  11h
		db 0FFh
		db  0Fh
		db 0FFh
		db  0Dh
		db 0FFh
		db  0Bh
		db 0FFh
		db    9
		db 0FFh
		db    8
		db 0FFh
		db    6
		db 0FFh
		db    5
		db 0FFh
		db    4
		db 0FFh
		db    3
		db 0FFh
		db    2
		db 0FFh
		db    1
		db 0FFh
		db    1
		db 0FFh
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    1
		db 0FFh
		db    1
		db 0FFh
		db    2
		db 0FFh
		db    3
		db 0FFh
		db    4
		db 0FFh
		db    5
		db 0FFh
		db    6
		db 0FFh
		db    8
		db 0FFh
		db    9
		db 0FFh
		db  0Bh
		db 0FFh
		db  0Dh
		db 0FFh
		db  0Fh
		db 0FFh
		db  11h
		db 0FFh
		db  13h
		db 0FFh
		db  16h
		db 0FFh
		db  19h
		db 0FFh
		db  1Bh
		db 0FFh
		db  1Eh
		db 0FFh
		db  21h	; !
		db 0FFh
		db  24h	; $
		db 0FFh
		db  28h	; (
		db 0FFh
		db  2Bh	; +
		db 0FFh
		db  2Fh	; /
		db 0FFh
		db  32h	; 2
		db 0FFh
		db  36h	; 6
		db 0FFh
		db  3Ah	; :
		db 0FFh
		db  3Eh	; >
		db 0FFh
		db  42h	; B
		db 0FFh
		db  47h	; G
		db 0FFh
		db  4Bh	; K
		db 0FFh
		db  4Fh	; O
		db 0FFh
		db  54h	; T
		db 0FFh
		db  59h	; Y
		db 0FFh
		db  5Eh	; ^
		db 0FFh
		db  63h	; c
		db 0FFh
		db  68h	; h
		db 0FFh
		db  6Dh	; m
		db 0FFh
		db  72h	; r
		db 0FFh
		db  77h	; w
		db 0FFh
		db  7Ch	; |
		db 0FFh
		db  82h	; ‚
		db 0FFh
		db  87h	; ‡
		db 0FFh
		db  8Dh	; 
		db 0FFh
		db  93h	; “
		db 0FFh
		db  98h	; ˜
		db 0FFh
		db  9Eh	; ž
		db 0FFh
		db 0A4h	; ¤
		db 0FFh
		db 0AAh	; ª
		db 0FFh
		db 0B0h	; °
		db 0FFh
		db 0B6h	; ¶
		db 0FFh
		db 0BCh	; ¼
		db 0FFh
		db 0C2h	; Â
		db 0FFh
		db 0C8h	; È
		db 0FFh
		db 0CEh	; Î
		db 0FFh
		db 0D4h	; Ô
		db 0FFh
		db 0DAh	; Ú
		db 0FFh
		db 0E1h	; á
		db 0FFh
		db 0E7h	; ç
		db 0FFh
		db 0EDh	; í
		db 0FFh
		db 0F3h	; ó
		db 0FFh
		db 0FAh	; ú
		db 0FFh
		db    0
		db    0
		db    6
		db    0
		db  0Dh
		db    0
		db  13h
		db    0
		db  19h
		db    0
		db  1Fh
		db    0
		db  26h	; &
		db    0
		db  2Ch	; ,
		db    0
		db  32h	; 2
		db    0
		db  38h	; 8
		db    0
		db  3Eh	; >
		db    0
		db  44h	; D
		db    0
		db  4Ah	; J
		db    0
		db  50h	; P
		db    0
		db  56h	; V
		db    0
		db  5Ch	; \
		db    0
		db  62h	; b
		db    0
		db  68h	; h
		db    0
		db  6Dh	; m
		db    0
		db  73h	; s
		db    0
		db  79h	; y
		db    0
		db  7Eh	; ~
		db    0
		db  84h	; „
		db    0
		db  89h	; ‰
		db    0
		db  8Eh	; Ž
		db    0
		db  93h	; “
		db    0
		db  98h	; ˜
		db    0
		db  9Dh	; 
		db    0
		db 0A2h	; ¢
		db    0
		db 0A7h	; §
		db    0
		db 0ACh	; ¬
		db    0
		db 0B1h	; ±
		db    0
		db 0B5h	; µ
		db    0
		db 0B9h	; ¹
		db    0
		db 0BEh	; ¾
		db    0
		db 0C2h	; Â
		db    0
		db 0C6h	; Æ
		db    0
		db 0CAh	; Ê
		db    0
		db 0CEh	; Î
		db    0
		db 0D1h	; Ñ
		db    0
		db 0D5h	; Õ
		db    0
		db 0D8h	; Ø
		db    0
		db 0DCh	; Ü
		db    0
		db 0DFh	; ß
		db    0
		db 0E2h	; â
		db    0
		db 0E5h	; å
		db    0
		db 0E7h	; ç
		db    0
		db 0EAh	; ê
		db    0
		db 0EDh	; í
		db    0
		db 0EFh	; ï
		db    0
		db 0F1h	; ñ
		db    0
		db 0F3h	; ó
		db    0
		db 0F5h	; õ
		db    0
		db 0F7h	; ÷
		db    0
		db 0F8h	; ø
		db    0
		db 0FAh	; ú
		db    0
		db 0FBh	; û
		db    0
		db 0FCh	; ü
		db    0
		db 0FDh	; ý
		db    0
		db 0FEh	; þ
		db    0
		db 0FFh
		db    0
		db 0FFh
		db    0
		db    0
		db    1
		db    0
		db    1
include libs/master.lib/tx[data].asm
aMasterl_libVer	db 'MASTERL.LIB Version 0.23 Copyright (c)1995 A.Koizuka,Kazumi,steel'
		db 'man,iR,All rights reserved.',0
		db 0
unk_D6D4	db    0
		db    0
word_D6D6	dw 0
word_D6D8	dw 0
byte_D6DA	db 0
		db  90h	; 
include libs/master.lib/mem[data].asm
		db    0
		db    0
		db    0
		db    0
		db    0
byte_D6E9	db 0
					; sub_2882:loc_28C8r
		dw 0
		dw 0
		dw 0
word_D6F0	dw 0
word_D6F2	dw 0
		dd 0
		dd 0
		dd 0
word_D700	dw 0
		dw 0
word_D704	dw 0
word_D706	dw 0
		db    0
		db    0
byte_D70A	db 5
byte_D70B	db 3
byte_D70C	db 0
		db 0
a_exe		db '.exe',0
byte_D713	db 0
byte_D714	db 0
					; sub_B839+3r ...
		db 0
aUmx		db '“Œ•û••–‚.˜^',0
byte_D722	db 1
					; sub_B888+54w	...
		db 0
aHuuma_cfg	db 'huuma.cfg',0
off_D72E	dd aHuuhi_dat
					; "huuhi.dat"
aMO		db '±²Ï¼¬¸»®',0
byte_D73B	db 0AAh
		db 0ABh	; «
		db 0ACh	; ¬
		db 0ADh	; ­
		db 0AEh	; ®
		db 0AFh	; ¯
		db 0B0h	; °
		db 0B1h	; ±
		db 0B2h	; ²
		db 0B3h	; ³
		db 0B4h	; ´
		db 0B5h	; µ
		db 0B7h	; ·
		db 0B6h	; ¶
		db 0B8h	; ¸
		db 0B9h	; ¹
		db 0BAh	; º
		db 0BBh	; »
		db 0BCh	; ¼
		db 0BDh	; ½
		db 0BEh	; ¾
		db 0BFh	; ¿
		db 0C0h	; À
		db 0C1h	; Á
		db 0C2h	; Â
		db 0C3h	; Ã
		db 0DAh	; Ú
		db 0DBh	; Û
		db 0DCh	; Ü
		db 0DDh	; Ý
		db 0DEh	; Þ
		db 0E0h	; à
		db    2
		db    3
		db 0A0h	;  
		db 0A1h	; ¡
		db 0A2h	; ¢
		db 0A3h	; £
		db 0A4h	; ¤
		db 0A5h	; ¥
		db 0A6h	; ¦
		db 0A7h	; §
		db 0A8h	; ¨
		db 0A9h	; ©
		db 0E1h	; á
		db 0E2h	; â
		db 0E3h	; ã
		db 0E4h	; ä
		db 0E5h	; å
		db 0E6h	; æ
		db 0E7h	; ç
aKO		db '¶ª·®',0
asc_D773	db '¹¸²¶½',0
asc_D779	db '¼½',0
unk_D77C	db  3Eh	; >
		db    1
		db  76h	; v
		db    0
		db 0DAh	; Ú
		db    0
aHuuhi_dat	db 'huuhi.dat',0
unk_D78C	db    0
		db    1
		db    0
		db    1
		db    0
		db    1
		db    0
		db    1
		db    0
		db    1
asc_D796	db ')))))',0
aAbnormalProgra	db 'Abnormal program termination',0Dh,0Ah,0
		db 0
include libs/BorlandC/atexit[data].asm
include libs/BorlandC/exit[data].asm
include libs/BorlandC/files[data].asm
include libs/BorlandC/__IOERROR[data].asm
		db    0
		db    0
		db    0
		db    0
		db    0
word_D9E4	dw 0
word_D9E6	dw 326Fh
					; set_new_handler(void (*)(void))+1Fw ...
seg_D9E8	dw seg seg000
					; set_new_handler(void (*)(void))+1Bw ...
aOutOfMemory	db 'Out of memory',0
__stklen	dw 1000h
		public __ctype
; unsigned __int8 _ctype[257]
__ctype		db    0, 20h, 20h, 20h,	20h, 20h, 20h, 20h
		db  20h, 20h, 21h, 21h,	21h, 21h, 21h, 20h
		db  20h, 20h, 20h, 20h,	20h, 20h, 20h, 20h
		db  20h, 20h, 20h, 20h,	20h, 20h, 20h, 20h
		db  20h, 81h, 40h, 40h,	40h, 40h, 40h, 40h
		db  40h, 40h, 40h, 40h,	40h, 40h, 40h, 40h
		db  40h, 12h, 12h, 12h,	12h, 12h, 12h, 12h
		db  12h, 12h, 12h, 40h,	40h, 40h, 40h, 40h
		db  40h, 40h, 14h, 14h,	14h, 14h, 14h, 14h
		db    4,   4,	4,   4,	  4,   4,   4,	 4
		db    4,   4,	4,   4,	  4,   4,   4,	 4
		db    4,   4,	4,   4,	40h, 40h, 40h, 40h
		db  40h, 40h, 18h, 18h,	18h, 18h, 18h, 18h
		db    8,   8,	8,   8,	  8,   8,   8,	 8
		db    8,   8,	8,   8,	  8,   8,   8,	 8
		db    8,   8,	8,   8,	40h, 40h, 40h, 40h
		db  20h,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0,   0,	0,   0,	  0,   0,   0,	 0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		dd @terminate$qv	; terminate(void)
		dd @unexpected$qv	; unexpected(void)
word_DB0E	dw 0
word_DB10	dw 0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
word_DC24	dw 0
include libs/BorlandC/fbrk[data].asm
include libs/BorlandC/signal[data].asm
dword_DC4E	dd 0
		dd 0
		dd 0
		dd 0
		dw 0
		db  5Ch	; \
		db    0
word_DC62	dw 0
					; _setvbuf+4Bw
word_DC64	dw 0
					; _setvbuf+35w
include libs/BorlandC/sysnerr[data].asm
aNotype		db '<notype>',0
aBccxh1		db '**BCCxh1',0
include libs/BorlandC/setenvp[data].asm
word_DC7E	dw 1
word_DC80	dw 0
word_DC82	dw 1
word_DC84	dw 3Fh
word_DC86	dw 40h
word_DC88	dw 3Fh
aStringReferenc	db 'String reference out of range',0
aStringRefere_0	db 'String reference out of range',0
aStringRefere_1	db 'String reference out of range',0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    0
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    8
		db    0
		db    8
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db    8
		db  0Ah
		db  0Ah
		db  0Ah
		db  0Ah
		db  0Ah
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db    9
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db  0Ch
		db    0
		db    0
		db    0
		db    0
aPath		db 'PATH',0
		db '/\',0
		db    0
a_bat		db '.BAT',0
a_com		db '.COM',0
a_exe_0		db '.EXE',0
a_bat_0		db '.BAT',0
aComspec	db 'COMSPEC',0
aC		db '/c',0

InitStart	label byte
		db    1
		db  20h
		dd @string@contains$xqnxc ; string::contains(char *)
include libs/BorlandC/setupio[initdata].asm
		db    0
		db  10h
		db  69h	; i
		db  39h	; 9
		db    0
		db    0
		db    0
		db  0Fh
		db 0BCh	; ¼
		db  42h	; B
		db    0
		db    0
include libs/BorlandC/setenvp[initdata].asm
InitEnd	label byte

ExitStart	label byte
		db    1
		db  20h
		dd loc_341D
ExitEnd	label byte

bdata@	label byte
unk_DE32	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_DF46	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_DFFE	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E02C	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E05A	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E088	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E112	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E140	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_E1F8	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E226	db    ?	;
					; sub_A09D+28Co
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E254	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E282	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E2B0	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E2DE	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E30C	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E33A	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E368	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_E3C4	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E3F2	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E420	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E44E	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E47C	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E4AA	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E534	db    ?	;
					; sub_A09D+3C7o
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E562	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E590	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E5BE	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E5EC	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_E6A4	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E6D2	db    ?	;
					; sub_A09D+465o
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E700	db    ?	;
					; sub_A09D+476o
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E72E	db    ?	;
					; sub_A09D+48Co
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E75C	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E78A	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E7B8	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E7E6	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E814	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E842	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_E870	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_EA98	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EAC6	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EAF4	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EB22	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EB50	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EB7E	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EBAC	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EBDA	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EC08	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EC36	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EC64	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EC92	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_ECC0	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_ECEE	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_ED1C	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EEBA	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
unk_EEE8	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
byte_F02A	db ?
byte_F02B	db ?
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
dword_F040	dd ?
word_F044	dw ?
word_F046	dw ?
word_F048	dw ?
word_F04A	dw ?
word_F04C	dw ?
					; sub_AE8:loc_B8Bw ...
word_F04E	dw ?
					; sub_A50:loc_A81w ...
unk_F050	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
word_F080	dw ?
word_F082	dw ?
word_F084	dw ?
word_F086	dw ?
word_F088	dw ?
include libs/master.lib/mem[bss].asm
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
dword_F892	dd ?
dword_F896	dd ?
dword_F89A	dd ?
dword_F89E	dd ?
dword_F8A2	dd ?
					; sub_9B64+2A6r ...
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
unk_F8BA	db    ?	;
					; sub_9B64+2A3o ...
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
unk_FA6A	db    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
		db    ?	;
word_FAEA	dw ?
word_FAEC	dw ?
word_FAEE	dw ?
byte_FAF0	db ?
byte_FAF1	db ?
byte_FAF2	db ?
byte_FAF3	db ?
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
dword_FB02	dd ?
					; sub_9B64:loc_9E2Ar ...
		db    ?	;
byte_FB07	db ?
byte_FB08	db ?
		db ?
		db    ?	;
		db    ?	;
dword_FB0C	dd ?
					; sub_B888+5Cw	...
		db    ?	;
		db    ?	;
dword_FB12	dd ?
word_FB16	dw ?
dword_FB18	dd ?
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
dword_FB3C	dd ?
dword_FB40	dd ?
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
byte_FB8A	db ?
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
byte_FB95	db ?
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		dd    ?	;
		db    ?	;
		db    ?	;
dword_FBC8	dd ?
include libs/BorlandC/atexit[bss].asm
include libs/BorlandC/sigdata[bss].asm
		dd    ?	;
include libs/BorlandC/signal[bss].asm
dword_FC58	dd ?
dword_FC5C	dd ?
		dw    ?
edata@	label byte

		dd    ?	;
		dd    ?	;
		dd    ?	;
		dw    ?	;
dseg		ends

; ===========================================================================

; Segment type:	Uninitialized
seg008		segment	byte stack 'STACK' use16
		assume cs:seg008
		assume es:nothing, ss:nothing, ds:dseg,	fs:nothing, gs:nothing
		db 80h dup(?)
seg008		ends


		end startx