mov si,0
                   mov bx,offset l0149h
                   mov dx,offset l8020h
l0109h:            mov cx,0
                   mov cl,b[bx+si]
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   rcr cx,1
                   call l013Fh
                   inc si
                   cmp si,offset l7400h
                   jne l0109h
                   int 20h
l013Fh:            jb l0145h
                   mov al,80h
                   out dx,al
                   ret

l0145h:            mov al,0
                   out dx,al
                   ret

l0149h:            pop bx
                   inc cx
                   arpl w[bp+di+65h],sp
                   insb
                   repc jb l01B3h
                   je l01BDh
                   outsw
                   outsb
                   push ax
                   jb l01C8h
                   db 66h
                   imul bp,w[si+65h],l5D33h
                   push ss
                   pop bx
                   inc cx
                   arpl w[bp+di+65h],sp
                   insb
                   repc jb l01CAh
                   je l01D4h
                   outsw
                   outsb
                   push ax
                   jb l01DFh
                   db 66h
                   imul bp,w[si+65h],l5D34h
                   or al,5Bh   ;'['
                   inc sp
                   dec di
                   push bx,ax
                   outsw
                   imul bp,w[bp+74h],l7265h
                   pop bp
                   adc b[bp+di+57h],bl
                   imul bp,w[bp+64h],l776Fh
                   jae l01DDh
                   outsw
                   imul bp,w[bp+74h],l7265h
                   pop bp
                   or dx,w[bx+si+68h]
                   outsw
                   repc outsb
                   imul di,w[bx+si+42h],l4F49h
                   push bx
                   add b[bp+di],al
                   inc dx
                   jne l0218h
                   push es,bx
                   repc jb l0213h
                   popa
                   insb
                   push es
                   dec cx
                   outsb
                   jo l0220h
                   jb l0227h
l01B3h:            add dx,w[bx+si+53h]
                   xor al,b[bp+di]
                   dec bp
                   push bx
                   pop ax
                   add b[l6F4Ch],al
l01BDh             equ $-2
                   ja l020Eh
                   repc insw
                   add ax,offset l6948h   ;'iH'
                   dec bp
                   repc insw
l01C8h             equ $-1
                   add ax,w[di+4Dh]
l01CAh             equ $-2
                   dec bp
                   add b[di],al
                   inc si
                   popa
                   insb
                   jae l0239h
l01D4h:            add al,54h   ;'T'
                   jb l024Dh
                   repc add cx,w[bx+66h]
                   db 66h
l01DDh:            add cl,b[bx+6Eh]
l01DFh             equ $-1
                   add cl,b[bp+6Fh]
                   add bx,w[bx+di+65h]
                   jae l01E8h
l01E8h:            add ax,offset l614Ch   ;'aL'
                   bound sp,d[di+6Ch]
                   or b[di+6Fh],cl
                   jbe l0258h
                   insw
                   repc outsb
                   je l01FEh
                   inc si
                   popa
                   arpl w[si+6Fh],si
                   jb l01FFh
l01FEh             equ $-1
l01FFh:            or dx,w[bx+si+6Fh]
                   imul bp,w[bp+74h],l7265h
                   push bx
                   imul di,w[bp+si+65h],l500Ch
                   outsw
l020Eh:            imul bp,w[bp+74h],l7265h
l0213h:            inc bx
                   outsw
                   insb
                   outsw
                   jb l021Fh
l0218h             equ $-1
                   inc di
                   jb l028Bh
                   ja l0292h
                   push offset l5409h
l021Fh             equ $-2
l0220h             equ $-1
                   push offset l6572h   ;'er'
                   jae l028Eh
                   outsw
l0227h:            insb
                   repnc add ax,offset l6544h   ;'eD'
                   insb
                   popa
                   jns l0230h
l0230h:            add ax,offset l6D53h   ;'mS'
                   popa
                   insb
                   insb
                   push es
                   dec bp
                   repc repnc imul si,w[di+6Dh],l4C05h
l0239h             equ $-6
                   popa
                   jb l02A9h
                   repc add b[l6F4Eh],al
                   add w[bx+si],0
                   add b[bx+si],al
                   add b[bx+si],al
l024Dh             equ $-1
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
l0258h:            add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al
                   add b[bx+si],al

l028Bh             equ $+13h
l028Eh             equ $+16h
l0292h             equ $+1Ah
l02A9h             equ $+31h
l4C05h             equ $+498Dh
l4F49h             equ $+4CD1h
l500Ch             equ $+4D94h
l5409h             equ $+5191h
l5D33h             equ $+5ABBh
l5D34h             equ $+5ABCh
l614Ch             equ $+5ED4h
l6544h             equ $+62CCh
l6572h             equ $+62FAh
l6948h             equ $+66D0h
l6D53h             equ $+6ADBh
l6F4Ch             equ $+6CD4h
l6F4Eh             equ $+6CD6h
l7265h             equ $+6FEDh
l7400h             equ $+7188h
l776Fh             equ $+74F7h
l8020h             equ $+7DA8h