home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / tspa / tp4 / tsuntb.dis < prev    next >
Encoding:
Text File  |  1994-06-19  |  83.5 KB  |  1,473 lines

  1.  
  2. Module: TSUNTB.PAS
  3. Group: 'DGROUP' _DATA,_BSS
  4.  
  5. Segment: TSUNTB_TEXT  PARA   00000ecc bytes  
  6.  0000                    TIMERFN:
  7.  0000  55                TSUNTB_001      push    bp
  8.  0001  89 e5                             mov     bp,sp
  9.  0003  b8 14 00                          mov     ax,0014H
  10.  0006  9a 00 00 00 00                    call    far SYSTEM_034
  11.  000b  83 ec 14                          sub     sp,0014H
  12.  000e  8d 7e ec                          lea     di,-14H[bp]
  13.  0011  16                                push    ss
  14.  0012  57                                push    di
  15.  0013  8d 7e ee                          lea     di,-12H[bp]
  16.  0016  16                                push    ss
  17.  0017  57                                push    di
  18.  0018  8d 7e f0                          lea     di,-10H[bp]
  19.  001b  16                                push    ss
  20.  001c  57                                push    di
  21.  001d  8d 7e f2                          lea     di,-0eH[bp]
  22.  0020  16                                push    ss
  23.  0021  57                                push    di
  24.  0022  9a 00 00 00 00                    call    far DOS_005
  25.  0027  8b 46 f2                          mov     ax,-0eH[bp]
  26.  002a  31 d2                             xor     dx,dx
  27.  002c  9a 00 00 00 00                    call    far SYSTEM_073
  28.  0031  b9 87 00                          mov     cx,0087H
  29.  0034  31 f6                             xor     si,si
  30.  0036  bf 00 48                          mov     di,4800H
  31.  0039  9a 00 00 00 00                    call    far SYSTEM_071
  32.  003e  52                                push    dx
  33.  003f  53                                push    bx
  34.  0040  50                                push    ax
  35.  0041  8b 46 f0                          mov     ax,-10H[bp]
  36.  0044  31 d2                             xor     dx,dx
  37.  0046  9a 00 00 00 00                    call    far SYSTEM_073
  38.  004b  52                                push    dx
  39.  004c  53                                push    bx
  40.  004d  50                                push    ax
  41.  004e  8b 46 ee                          mov     ax,-12H[bp]
  42.  0051  31 d2                             xor     dx,dx
  43.  0053  9a 00 00 00 00                    call    far SYSTEM_073
  44.  0058  b9 86 00                          mov     cx,0086H
  45.  005b  31 f6                             xor     si,si
  46.  005d  bf 00 70                          mov     di,7000H
  47.  0060  9a 00 00 00 00                    call    far SYSTEM_070
  48.  0065  52                                push    dx
  49.  0066  53                                push    bx
  50.  0067  50                                push    ax
  51.  0068  8b 46 ec                          mov     ax,-14H[bp]
  52.  006b  31 d2                             xor     dx,dx
  53.  006d  9a 00 00 00 00                    call    far SYSTEM_073
  54.  0072  b9 8c 00                          mov     cx,008cH
  55.  0075  31 f6                             xor     si,si
  56.  0077  bf 00 61                          mov     di,6100H
  57.  007a  9a 00 00 00 00                    call    far SYSTEM_070
  58.  007f  59                                pop     cx
  59.  0080  5e                                pop     si
  60.  0081  5f                                pop     di
  61.  0082  9a 00 00 00 00                    call    far SYSTEM_06E
  62.  0087  59                                pop     cx
  63.  0088  5e                                pop     si
  64.  0089  5f                                pop     di
  65.  008a  9a 00 00 00 00                    call    far SYSTEM_06E
  66.  008f  59                                pop     cx
  67.  0090  5e                                pop     si
  68.  0091  5f                                pop     di
  69.  0092  9a 00 00 00 00                    call    far SYSTEM_06E
  70.  0097  89 46 f4                          mov     -0cH[bp],ax
  71.  009a  89 5e f6                          mov     -0aH[bp],bx
  72.  009d  89 56 f8                          mov     -8H[bp],dx
  73.  00a0  8b 46 f4                          mov     ax,-0cH[bp]
  74.  00a3  8b 5e f6                          mov     bx,-0aH[bp]
  75.  00a6  8b 56 f8                          mov     dx,-8H[bp]
  76.  00a9  89 46 fa                          mov     -6H[bp],ax
  77.  00ac  89 5e fc                          mov     -4H[bp],bx
  78.  00af  89 56 fe                          mov     -2H[bp],dx
  79.  00b2  8b 46 fa                          mov     ax,-6H[bp]
  80.  00b5  8b 5e fc                          mov     bx,-4H[bp]
  81.  00b8  8b 56 fe                          mov     dx,-2H[bp]
  82.  00bb  89 ec                             mov     sp,bp
  83.  00bd  5d                                pop     bp
  84.  00be  cb                                retf    
  85.  00bf                    TICKSFN:
  86.  00bf  55                TSUNTB_002      push    bp
  87.  00c0  89 e5                             mov     bp,sp
  88.  00c2  b8 04 00                          mov     ax,0004H
  89.  00c5  9a 00 00 00 00                    call    far SYSTEM_034
  90.  00ca  83 ec 04                          sub     sp,0004H
  91.  00cd  b8 40 00                          mov     ax,0040H
  92.  00d0  50                                push    ax
  93.  00d1  bf 6c 00                          mov     di,006cH
  94.  00d4  07                                pop     es
  95.  00d5  26 c4 05                          les     ax,dword ptr es:[di]
  96.  00d8  8c c2                             mov     dx,es
  97.  00da  89 46 fc                          mov     -4H[bp],ax
  98.  00dd  89 56 fe                          mov     -2H[bp],dx
  99.  00e0  8b 46 fc                          mov     ax,-4H[bp]
  100.  00e3  8b 56 fe                          mov     dx,-2H[bp]
  101.  00e6  89 ec                             mov     sp,bp
  102.  00e8  5d                                pop     bp
  103.  00e9  cb                                retf    
  104.  00ea                    TWOTOFN:
  105.  00ea  55                TSUNTB_006      push    bp
  106.  00eb  89 e5                             mov     bp,sp
  107.  00ed  b8 02 00                          mov     ax,0002H
  108.  00f0  9a 00 00 00 00                    call    far SYSTEM_034
  109.  00f5  83 ec 02                          sub     sp,0002H
  110.  00f8  b8 01 00                          mov     ax,0001H
  111.  00fb  8b 4e 06                          mov     cx,+6H[bp]
  112.  00fe  d3 e0                             shl     ax,cl
  113.  0100  89 46 fe                          mov     -2H[bp],ax
  114.  0103  8b 46 fe                          mov     ax,-2H[bp]
  115.  0106  89 ec                             mov     sp,bp
  116.  0108  5d                                pop     bp
  117.  0109  ca 02 00                          retf    0002H
  118.  010c                    R16TOFN:
  119.  010c  55                TSUNTB_007      push    bp
  120.  010d  89 e5                             mov     bp,sp
  121.  010f  b8 02 00                          mov     ax,0002H
  122.  0112  9a 00 00 00 00                    call    far SYSTEM_034
  123.  0117  83 ec 02                          sub     sp,0002H
  124.  011a  8b 46 06                          mov     ax,+6H[bp]
  125.  011d  b9 02 00                          mov     cx,0002H
  126.  0120  d3 e0                             shl     ax,cl
  127.  0122  8b d0                             mov     dx,ax
  128.  0124  b8 01 00                          mov     ax,0001H
  129.  0127  8b ca                             mov     cx,dx
  130.  0129  d3 e0                             shl     ax,cl
  131.  012b  89 46 fe                          mov     -2H[bp],ax
  132.  012e  8b 46 fe                          mov     ax,-2H[bp]
  133.  0131  89 ec                             mov     sp,bp
  134.  0133  5d                                pop     bp
  135.  0134  ca 02 00                          retf    0002H
  136.  0137                    POWERFN:
  137.  0137  55                TSUNTB_003      push    bp
  138.  0138  89 e5                             mov     bp,sp
  139.  013a  b8 06 00                          mov     ax,0006H
  140.  013d  9a 00 00 00 00                    call    far SYSTEM_034
  141.  0142  83 ec 06                          sub     sp,0006H
  142.  0145  8b 46 0c                          mov     ax,+0cH[bp]
  143.  0148  8b 5e 0e                          mov     bx,+0eH[bp]
  144.  014b  8b 56 10                          mov     dx,+10H[bp]
  145.  014e  9a 00 00 00 00                    call    far SYSTEM_080
  146.  0153  8b 4e 06                          mov     cx,+6H[bp]
  147.  0156  8b 76 08                          mov     si,+8H[bp]
  148.  0159  8b 7e 0a                          mov     di,+0aH[bp]
  149.  015c  9a 00 00 00 00                    call    far SYSTEM_070
  150.  0161  9a 00 00 00 00                    call    far SYSTEM_081
  151.  0166  89 46 fa                          mov     -6H[bp],ax
  152.  0169  89 5e fc                          mov     -4H[bp],bx
  153.  016c  89 56 fe                          mov     -2H[bp],dx
  154.  016f  8b 46 fa                          mov     ax,-6H[bp]
  155.  0172  8b 5e fc                          mov     bx,-4H[bp]
  156.  0175  8b 56 fe                          mov     dx,-2H[bp]
  157.  0178  89 ec                             mov     sp,bp
  158.  017a  5d                                pop     bp
  159.  017b  ca 0c 00                          retf    000cH
  160.  017e                    POWERLFN:
  161.  017e  55                TSUNTB_005      push    bp
  162.  017f  89 e5                             mov     bp,sp
  163.  0181  b8 08 00                          mov     ax,0008H
  164.  0184  9a 00 00 00 00                    call    far SYSTEM_034
  165.  0189  83 ec 08                          sub     sp,0008H
  166.  018c  c7 46 f8 01 00                    mov     word ptr -8H[bp],0001H
  167.  0191  c7 46 fa 00 00                    mov     word ptr -6H[bp],0000H
  168.  0196  83 7e 08 00       L1              cmp     word ptr +8H[bp],0000H
  169.  019a  7f 08                             jg      L2
  170.  019c  7c 25                             jl      L3
  171.  019e  83 7e 06 00                       cmp     word ptr +6H[bp],0000H
  172.  01a2  76 1f                             jbe     L3
  173.  01a4  c4 46 f8          L2              les     ax,dword ptr -8H[bp]
  174.  01a7  8c c2                             mov     dx,es
  175.  01a9  c4 4e 0a                          les     cx,dword ptr +0aH[bp]
  176.  01ac  8c c3                             mov     bx,es
  177.  01ae  9a 00 00 00 00                    call    far SYSTEM_005
  178.  01b3  89 46 f8                          mov     -8H[bp],ax
  179.  01b6  89 56 fa                          mov     -6H[bp],dx
  180.  01b9  83 6e 06 01                       sub     word ptr +6H[bp],0001H
  181.  01bd  83 5e 08 00                       sbb     word ptr +8H[bp],0000H
  182.  01c1  eb d3                             jmp     L1
  183.  01c3  c4 46 f8          L3              les     ax,dword ptr -8H[bp]
  184.  01c6  8c c2                             mov     dx,es
  185.  01c8  89 46 fc                          mov     -4H[bp],ax
  186.  01cb  89 56 fe                          mov     -2H[bp],dx
  187.  01ce  8b 46 fc                          mov     ax,-4H[bp]
  188.  01d1  8b 56 fe                          mov     dx,-2H[bp]
  189.  01d4  89 ec                             mov     sp,bp
  190.  01d6  5d                                pop     bp
  191.  01d7  ca 08 00                          retf    0008H
  192.  01da  1f                L4              pop     ds
  193.  01db  4f                                dec     di
  194.  01dc  76 65                             jbe     L7
  195.  01de  72 66                             jb      L8
  196.  01e0  6c                                insb    
  197.  01e1  6f                                outsw   
  198.  01e2  77 20                             ja      L6
  199.  01e4  69 6e 20 50 4f                    imul    bp,+20H[bp],4f50H
  200.  01e9  57                                push    di
  201.  01ea  45                                inc     bp
  202.  01eb  52                                push    dx
  203.  01ec  47                                inc     di
  204.  01ed  46                                inc     si
  205.  01ee  4e                                dec     si
  206.  01ef  20 65 78                          and     +78H[di],ah
  207.  01f2  70 72                             jo      L11
  208.  01f4  65 73 73                          jae     L12
  209.  01f7  69 6f 6e 1b 49                    imul    bp,+6eH[bx],491bH
  210.  01fc  6e                                outsb   
  211.  01fd  76 61                             jbe     L10
  212.  01ff  6c                                insb    
  213.  0200  69 64 20 50 4f                    imul    sp,+20H[si],4f50H
  214.  0205  57                                push    di
  215.  0206  45                                inc     bp
  216.  0207  52                                push    dx
  217.  0208  47                                inc     di
  218.  0209  46                                inc     si
  219.  020a  4e                                dec     si
  220.  020b  20 65 78                          and     +78H[di],ah
  221.  020e  70 72                             jo      L14
  222.  0210  65 73 73                          jae     L15
  223.  0213  69 6f 6e 55 89                    imul    bp,+6eH[bx],8955H
  224.  0218  e5 b8                             in      ax,0b8H
  225.  021a  06                                push    es
  226.  021b  00 9a 00 00                       add     SYSTEM_034[bp+si],bl
  227.  021f  00 00                             add     [bx+si],al
  228.  0221  83 ec 06                          sub     sp,0006H
  229.  0224  8b 46 06                          mov     ax,+6H[bp]
  230.  0227  8b 5e 08                          mov     bx,+8H[bp]
  231.  022a  8b 56 0a                          mov     dx,+0aH[bp]
  232.  022d  31 c9                             xor     cx,cx
  233.  022f  31 f6                             xor     si,si
  234.  0231  31 ff                             xor     di,di
  235.  0233  9a 00 00 00 00                    call    far SYSTEM_072
  236.  0238  75 12                             jne     L9
  237.  023a  c7 46 fa 81 00                    mov     word ptr -6H[bp],0081H
  238.  023f  c7 46 fc 00 00                    mov     word ptr -4H[bp],0000H
  239.  0244  c7 46 fe 00 00                    mov     word ptr -2H[bp],0000H
  240.  0249  e9 89 01                          jmp     L25
  241.  024c  8b 46 0c          L9              mov     ax,+0cH[bp]
  242.  024f  8b 5e 0e                          mov     bx,+0eH[bp]
  243.  0252  8b 56 10                          mov     dx,+10H[bp]
  244.  0255  31 c9                             xor     cx,cx
  245.  0257  31 f6                             xor     si,si
  246.  0259  31 ff                             xor     di,di
  247.  025b  9a 00 00 00 00                    call    far SYSTEM_072
  248.  0260  75 12             L10             jne     L13
  249.  0262  c7 46 fa 00 00                    mov     word ptr -6H[bp],0000H
  250.  0267  c7 46 fc 00 00                    mov     word ptr -4H[bp],0000H
  251.  026c  c7 46 fe 00 00                    mov     word ptr -2H[bp],0000H
  252.  0271  e9 61 01                          jmp     L25
  253.  0274  8b 46 0c          L13             mov     ax,+0cH[bp]
  254.  0277  8b 5e 0e                          mov     bx,+0eH[bp]
  255.  027a  8b 56 10                          mov     dx,+10H[bp]
  256.  027d  80 e6 7f                          and     dh,7fH
  257.  0280  9a 00 00 00 00                    call    far SYSTEM_080
  258.  0285  8b 4e 06                          mov     cx,+6H[bp]
  259.  0288  8b 76 08                          mov     si,+8H[bp]
  260.  028b  8b 7e 0a                          mov     di,+0aH[bp]
  261.  028e  9a 00 00 00 00                    call    far SYSTEM_070
  262.  0293  80 e6 7f                          and     dh,7fH
  263.  0296  b9 87 22                          mov     cx,2287H
  264.  0299  be db f9                          mov     si,0f9dbH
  265.  029c  bf fe 2e                          mov     di,2efeH
  266.  029f  9a 00 00 00 00                    call    far SYSTEM_072
  267.  02a4  76 26                             jbe     L16
  268.  02a6  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  269.  02a9  1e                                push    ds
  270.  02aa  57                                push    di
  271.  02ab  bf 00 00                          mov     di,offset L4
  272.  02ae  0e                                push    cs
  273.  02af  57                                push    di
  274.  02b0  31 c0                             xor     ax,ax
  275.  02b2  50                                push    ax
  276.  02b3  9a 00 00 00 00                    call    far SYSTEM_036
  277.  02b8  9a 00 00 00 00                    call    far SYSTEM_03A
  278.  02bd  9a 00 00 00 00                    call    far SYSTEM_032
  279.  02c2  31 c0                             xor     ax,ax
  280.  02c4  9a 00 00 00 00                    call    far SYSTEM_003
  281.  02c9  e9 09 01                          jmp     L25
  282.  02cc  8b 46 0c          L16             mov     ax,+0cH[bp]
  283.  02cf  8b 5e 0e                          mov     bx,+0eH[bp]
  284.  02d2  8b 56 10                          mov     dx,+10H[bp]
  285.  02d5  31 c9                             xor     cx,cx
  286.  02d7  31 f6                             xor     si,si
  287.  02d9  31 ff                             xor     di,di
  288.  02db  9a 00 00 00 00                    call    far SYSTEM_072
  289.  02e0  76 2d                             jbe     L17
  290.  02e2  8b 46 0c                          mov     ax,+0cH[bp]
  291.  02e5  8b 5e 0e                          mov     bx,+0eH[bp]
  292.  02e8  8b 56 10                          mov     dx,+10H[bp]
  293.  02eb  9a 00 00 00 00                    call    far SYSTEM_080
  294.  02f0  8b 4e 06                          mov     cx,+6H[bp]
  295.  02f3  8b 76 08                          mov     si,+8H[bp]
  296.  02f6  8b 7e 0a                          mov     di,+0aH[bp]
  297.  02f9  9a 00 00 00 00                    call    far SYSTEM_070
  298.  02fe  9a 00 00 00 00                    call    far SYSTEM_081
  299.  0303  89 46 fa                          mov     -6H[bp],ax
  300.  0306  89 5e fc                          mov     -4H[bp],bx
  301.  0309  89 56 fe                          mov     -2H[bp],dx
  302.  030c  e9 c6 00                          jmp     L25
  303.  030f  8b 46 0c          L17             mov     ax,+0cH[bp]
  304.  0312  8b 5e 0e                          mov     bx,+0eH[bp]
  305.  0315  8b 56 10                          mov     dx,+10H[bp]
  306.  0318  31 c9                             xor     cx,cx
  307.  031a  31 f6                             xor     si,si
  308.  031c  31 ff                             xor     di,di
  309.  031e  9a 00 00 00 00                    call    far SYSTEM_072
  310.  0323  72 03                             jb      L18
  311.  0325  e9 8a 00                          jmp     L24
  312.  0328  8b 46 06          L18             mov     ax,+6H[bp]
  313.  032b  8b 5e 08                          mov     bx,+8H[bp]
  314.  032e  8b 56 0a                          mov     dx,+0aH[bp]
  315.  0331  9a 00 00 00 00                    call    far SYSTEM_07C
  316.  0336  31 c9                             xor     cx,cx
  317.  0338  31 f6                             xor     si,si
  318.  033a  31 ff                             xor     di,di
  319.  033c  9a 00 00 00 00                    call    far SYSTEM_072
  320.  0341  75 6f                             jne     L24
  321.  0343  8b 46 06                          mov     ax,+6H[bp]
  322.  0346  8b 5e 08                          mov     bx,+8H[bp]
  323.  0349  8b 56 0a                          mov     dx,+0aH[bp]
  324.  034c  9a 00 00 00 00                    call    far SYSTEM_075
  325.  0351  d0 e8                             shr     al,1
  326.  0353  73 32                             jae     L21
  327.  0355  8b 46 0c                          mov     ax,+0cH[bp]
  328.  0358  8b 5e 0e                          mov     bx,+0eH[bp]
  329.  035b  8b 56 10                          mov     dx,+10H[bp]
  330.  035e  08 c0                             or      al,al
  331.  0360  74 03                             je      L19
  332.  0362  80 f6 80                          xor     dh,80H
  333.  0365  52                L19             push    dx
  334.  0366  53                                push    bx
  335.  0367  50                                push    ax
  336.  0368  ff 76 0a                          push    +0aH[bp]
  337.  036b  ff 76 08                          push    +8H[bp]
  338.  036e  ff 76 06                          push    +6H[bp]
  339.  0371  0e                                push    cs
  340.  0372  e8 00 00                          call    POWERGFN
  341.  0375  08 c0                             or      al,al
  342.  0377  74 03                             je      L20
  343.  0379  80 f6 80                          xor     dh,80H
  344.  037c  89 46 fa          L20             mov     -6H[bp],ax
  345.  037f  89 5e fc                          mov     -4H[bp],bx
  346.  0382  89 56 fe                          mov     -2H[bp],dx
  347.  0385  eb 29                             jmp     L23
  348.  0387  8b 46 0c          L21             mov     ax,+0cH[bp]
  349.  038a  8b 5e 0e                          mov     bx,+0eH[bp]
  350.  038d  8b 56 10                          mov     dx,+10H[bp]
  351.  0390  08 c0                             or      al,al
  352.  0392  74 03                             je      L22
  353.  0394  80 f6 80                          xor     dh,80H
  354.  0397  52                L22             push    dx
  355.  0398  53                                push    bx
  356.  0399  50                                push    ax
  357.  039a  ff 76 0a                          push    +0aH[bp]
  358.  039d  ff 76 08                          push    +8H[bp]
  359.  03a0  ff 76 06                          push    +6H[bp]
  360.  03a3  0e                                push    cs
  361.  03a4  e8 00 00                          call    POWERGFN
  362.  03a7  89 46 fa                          mov     -6H[bp],ax
  363.  03aa  89 5e fc                          mov     -4H[bp],bx
  364.  03ad  89 56 fe                          mov     -2H[bp],dx
  365.  03b0  eb 23             L23             jmp     L25
  366.  03b2  bf 00 00          L24             mov     di,offset SYSTEM_BSS+100H
  367.  03b5  1e                                push    ds
  368.  03b6  57                                push    di
  369.  03b7  bf 00 00                          mov     di,offset L5
  370.  03ba  0e                                push    cs
  371.  03bb  57                                push    di
  372.  03bc  31 c0                             xor     ax,ax
  373.  03be  50                                push    ax
  374.  03bf  9a 00 00 00 00                    call    far SYSTEM_036
  375.  03c4  9a 00 00 00 00                    call    far SYSTEM_03A
  376.  03c9  9a 00 00 00 00                    call    far SYSTEM_032
  377.  03ce  31 c0                             xor     ax,ax
  378.  03d0  9a 00 00 00 00                    call    far SYSTEM_003
  379.  03d5  8b 46 fa          L25             mov     ax,-6H[bp]
  380.  03d8  8b 5e fc                          mov     bx,-4H[bp]
  381.  03db  8b 56 fe                          mov     dx,-2H[bp]
  382.  03de  89 ec                             mov     sp,bp
  383.  03e0  5d                                pop     bp
  384.  03e1  ca 0c 00                          retf    000cH
  385.  03e4                    BITONFN:
  386.  03e4  55                TSUNTB_012      push    bp
  387.  03e5  89 e5                             mov     bp,sp
  388.  03e7  b8 01 00                          mov     ax,0001H
  389.  03ea  9a 00 00 00 00                    call    far SYSTEM_034
  390.  03ef  83 ec 01                          sub     sp,0001H
  391.  03f2  8a 46 06                          mov     al,+6H[bp]
  392.  03f5  30 e4                             xor     ah,ah
  393.  03f7  8b d0                             mov     dx,ax
  394.  03f9  b8 01 00                          mov     ax,0001H
  395.  03fc  8b ca                             mov     cx,dx
  396.  03fe  d3 e0                             shl     ax,cl
  397.  0400  23 46 08                          and     ax,+8H[bp]
  398.  0403  09 c0                             or      ax,ax
  399.  0405  75 04                             jne     L26
  400.  0407  b0 00                             mov     al,00H
  401.  0409  eb 02                             jmp     L27
  402.  040b  b0 01             L26             mov     al,01H
  403.  040d  88 46 ff          L27             mov     -1H[bp],al
  404.  0410  8a 46 ff                          mov     al,-1H[bp]
  405.  0413  89 ec                             mov     sp,bp
  406.  0415  5d                                pop     bp
  407.  0416  ca 04 00                          retf    0004H
  408.  0419                    BINDECFN:
  409.  0419  55                TSUNTB_011      push    bp
  410.  041a  89 e5                             mov     bp,sp
  411.  041c  b8 08 01                          mov     ax,0108H
  412.  041f  9a 00 00 00 00                    call    far SYSTEM_034
  413.  0424  81 ec 08 01                       sub     sp,0108H
  414.  0428  c4 7e 06                          les     di,dword ptr +6H[bp]
  415.  042b  06                                push    es
  416.  042c  57                                push    di
  417.  042d  8d be fe fe                       lea     di,-102H[bp]
  418.  0431  16                                push    ss
  419.  0432  57                                push    di
  420.  0433  b8 ff 00                          mov     ax,00ffH
  421.  0436  50                                push    ax
  422.  0437  9a 00 00 00 00                    call    far SYSTEM_00C
  423.  043c  8a 86 fe fe                       mov     al,-102H[bp]
  424.  0440  88 86 fd fe                       mov     -103H[bp],al
  425.  0444  31 c0                             xor     ax,ax
  426.  0446  89 86 f8 fe                       mov     -108H[bp],ax
  427.  044a  89 86 fa fe                       mov     -106H[bp],ax
  428.  044e  8a 86 fd fe                       mov     al,-103H[bp]
  429.  0452  3c 01                             cmp     al,01H
  430.  0454  72 4a                             jb      L31
  431.  0456  88 86 fc fe                       mov     -104H[bp],al
  432.  045a  eb 04                             jmp     L29
  433.  045c  fe 8e fc fe       L28             dec     byte ptr -104H[bp]
  434.  0460  8a 86 fc fe       L29             mov     al,-104H[bp]
  435.  0464  30 e4                             xor     ah,ah
  436.  0466  8b f8                             mov     di,ax
  437.  0468  80 bb fe fe 31                    cmp     byte ptr -102H[bp+di],31H
  438.  046d  75 2a                             jne     L30
  439.  046f  8a 86 fc fe                       mov     al,-104H[bp]
  440.  0473  30 e4                             xor     ah,ah
  441.  0475  8b d0                             mov     dx,ax
  442.  0477  8a 86 fd fe                       mov     al,-103H[bp]
  443.  047b  30 e4                             xor     ah,ah
  444.  047d  2b c2                             sub     ax,dx
  445.  047f  8b d0                             mov     dx,ax
  446.  0481  b8 01 00                          mov     ax,0001H
  447.  0484  8b ca                             mov     cx,dx
  448.  0486  d3 e0                             shl     ax,cl
  449.  0488  99                                cwd     
  450.  0489  03 86 f8 fe                       add     ax,-108H[bp]
  451.  048d  13 96 fa fe                       adc     dx,-106H[bp]
  452.  0491  89 86 f8 fe                       mov     -108H[bp],ax
  453.  0495  89 96 fa fe                       mov     -106H[bp],dx
  454.  0499  80 be fc fe 01    L30             cmp     byte ptr -104H[bp],01H
  455.  049e  75 bc                             jne     L28
  456.  04a0  8b 86 f8 fe       L31             mov     ax,-108H[bp]
  457.  04a4  89 46 fe                          mov     -2H[bp],ax
  458.  04a7  8b 46 fe                          mov     ax,-2H[bp]
  459.  04aa  89 ec                             mov     sp,bp
  460.  04ac  5d                                pop     bp
  461.  04ad  ca 04 00                          retf    0004H
  462.  04b0                    BINFN:
  463.  04b0  55                TSUNTB_00C      push    bp
  464.  04b1  89 e5                             mov     bp,sp
  465.  04b3  b8 01 01                          mov     ax,0101H
  466.  04b6  9a 00 00 00 00                    call    far SYSTEM_034
  467.  04bb  81 ec 01 01                       sub     sp,0101H
  468.  04bf  8d be ff fe                       lea     di,-101H[bp]
  469.  04c3  16                                push    ss
  470.  04c4  57                                push    di
  471.  04c5  b8 00 01                          mov     ax,0100H
  472.  04c8  50                                push    ax
  473.  04c9  b0 20                             mov     al,20H
  474.  04cb  50                                push    ax
  475.  04cc  9a 00 00 00 00                    call    far SYSTEM_05C
  476.  04d1  c6 86 ff fe 10                    mov     byte ptr -101H[bp],10H
  477.  04d6  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  478.  04da  eb 03                             jmp     L33
  479.  04dc  fe 46 ff          L32             inc     byte ptr -1H[bp]
  480.  04df  8a 46 ff          L33             mov     al,-1H[bp]
  481.  04e2  30 e4                             xor     ah,ah
  482.  04e4  8b d0                             mov     dx,ax
  483.  04e6  8b 46 06                          mov     ax,+6H[bp]
  484.  04e9  8b ca                             mov     cx,dx
  485.  04eb  d3 e8                             shr     ax,cl
  486.  04ed  25 01 00                          and     ax,0001H
  487.  04f0  8b f8                             mov     di,ax
  488.  04f2  8a 8d 00 00                       mov     cl,TSUNTB_DATA[di]
  489.  04f6  8a 46 ff                          mov     al,-1H[bp]
  490.  04f9  30 e4                             xor     ah,ah
  491.  04fb  8b d0                             mov     dx,ax
  492.  04fd  b8 10 00                          mov     ax,0010H
  493.  0500  2b c2                             sub     ax,dx
  494.  0502  8b f8                             mov     di,ax
  495.  0504  88 8b ff fe                       mov     -101H[bp+di],cl
  496.  0508  80 7e ff 0f                       cmp     byte ptr -1H[bp],0fH
  497.  050c  75 ce                             jne     L32
  498.  050e  8d be ff fe                       lea     di,-101H[bp]
  499.  0512  16                                push    ss
  500.  0513  57                                push    di
  501.  0514  c4 7e 08                          les     di,dword ptr +8H[bp]
  502.  0517  06                                push    es
  503.  0518  57                                push    di
  504.  0519  b8 ff 00                          mov     ax,00ffH
  505.  051c  50                                push    ax
  506.  051d  9a 00 00 00 00                    call    far SYSTEM_00C
  507.  0522  89 ec                             mov     sp,bp
  508.  0524  5d                                pop     bp
  509.  0525  ca 02 00                          retf    0002H
  510.  0528                    LBINFN:
  511.  0528  55                TSUNTB_00D      push    bp
  512.  0529  89 e5                             mov     bp,sp
  513.  052b  b8 01 01                          mov     ax,0101H
  514.  052e  9a 00 00 00 00                    call    far SYSTEM_034
  515.  0533  81 ec 01 01                       sub     sp,0101H
  516.  0537  8d be ff fe                       lea     di,-101H[bp]
  517.  053b  16                                push    ss
  518.  053c  57                                push    di
  519.  053d  b8 00 01                          mov     ax,0100H
  520.  0540  50                                push    ax
  521.  0541  b0 20                             mov     al,20H
  522.  0543  50                                push    ax
  523.  0544  9a 00 00 00 00                    call    far SYSTEM_05C
  524.  0549  c6 86 ff fe 20                    mov     byte ptr -101H[bp],20H
  525.  054e  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  526.  0552  eb 03                             jmp     L35
  527.  0554  fe 46 ff          L34             inc     byte ptr -1H[bp]
  528.  0557  8a 46 ff          L35             mov     al,-1H[bp]
  529.  055a  30 e4                             xor     ah,ah
  530.  055c  31 d2                             xor     dx,dx
  531.  055e  8b c8                             mov     cx,ax
  532.  0560  8b da                             mov     bx,dx
  533.  0562  c4 46 06                          les     ax,dword ptr +6H[bp]
  534.  0565  8c c2                             mov     dx,es
  535.  0567  9a 00 00 00 00                    call    far SYSTEM_007
  536.  056c  25 01 00                          and     ax,0001H
  537.  056f  81 e2 00 00                       and     dx,0000H
  538.  0573  8b f8                             mov     di,ax
  539.  0575  8a 8d 00 00                       mov     cl,L97[di]
  540.  0579  8a 46 ff                          mov     al,-1H[bp]
  541.  057c  30 e4                             xor     ah,ah
  542.  057e  8b d0                             mov     dx,ax
  543.  0580  b8 20 00                          mov     ax,0020H
  544.  0583  2b c2                             sub     ax,dx
  545.  0585  8b f8                             mov     di,ax
  546.  0587  88 8b ff fe                       mov     -101H[bp+di],cl
  547.  058b  80 7e ff 1f                       cmp     byte ptr -1H[bp],1fH
  548.  058f  75 c3                             jne     L34
  549.  0591  8d be ff fe                       lea     di,-101H[bp]
  550.  0595  16                                push    ss
  551.  0596  57                                push    di
  552.  0597  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  553.  059a  06                                push    es
  554.  059b  57                                push    di
  555.  059c  b8 ff 00                          mov     ax,00ffH
  556.  059f  50                                push    ax
  557.  05a0  9a 00 00 00 00                    call    far SYSTEM_00C
  558.  05a5  89 ec                             mov     sp,bp
  559.  05a7  5d                                pop     bp
  560.  05a8  ca 04 00                          retf    0004H
  561.  05ab                    BBINFN:
  562.  05ab  55                TSUNTB_00E      push    bp
  563.  05ac  89 e5                             mov     bp,sp
  564.  05ae  b8 01 01                          mov     ax,0101H
  565.  05b1  9a 00 00 00 00                    call    far SYSTEM_034
  566.  05b6  81 ec 01 01                       sub     sp,0101H
  567.  05ba  8d be ff fe                       lea     di,-101H[bp]
  568.  05be  16                                push    ss
  569.  05bf  57                                push    di
  570.  05c0  b8 00 01                          mov     ax,0100H
  571.  05c3  50                                push    ax
  572.  05c4  b0 20                             mov     al,20H
  573.  05c6  50                                push    ax
  574.  05c7  9a 00 00 00 00                    call    far SYSTEM_05C
  575.  05cc  c6 86 ff fe 08                    mov     byte ptr -101H[bp],08H
  576.  05d1  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  577.  05d5  eb 03                             jmp     L37
  578.  05d7  fe 46 ff          L36             inc     byte ptr -1H[bp]
  579.  05da  8a 46 ff          L37             mov     al,-1H[bp]
  580.  05dd  30 e4                             xor     ah,ah
  581.  05df  8b d0                             mov     dx,ax
  582.  05e1  8a 46 06                          mov     al,+6H[bp]
  583.  05e4  30 e4                             xor     ah,ah
  584.  05e6  8b ca                             mov     cx,dx
  585.  05e8  d3 e8                             shr     ax,cl
  586.  05ea  25 01 00                          and     ax,0001H
  587.  05ed  8b f8                             mov     di,ax
  588.  05ef  8a 8d 00 00                       mov     cl,L98[di]
  589.  05f3  8a 46 ff                          mov     al,-1H[bp]
  590.  05f6  30 e4                             xor     ah,ah
  591.  05f8  8b d0                             mov     dx,ax
  592.  05fa  b8 08 00                          mov     ax,0008H
  593.  05fd  2b c2                             sub     ax,dx
  594.  05ff  8b f8                             mov     di,ax
  595.  0601  88 8b ff fe                       mov     -101H[bp+di],cl
  596.  0605  80 7e ff 07                       cmp     byte ptr -1H[bp],07H
  597.  0609  75 cc                             jne     L36
  598.  060b  8d be ff fe                       lea     di,-101H[bp]
  599.  060f  16                                push    ss
  600.  0610  57                                push    di
  601.  0611  c4 7e 08                          les     di,dword ptr +8H[bp]
  602.  0614  06                                push    es
  603.  0615  57                                push    di
  604.  0616  b8 ff 00                          mov     ax,00ffH
  605.  0619  50                                push    ax
  606.  061a  9a 00 00 00 00                    call    far SYSTEM_00C
  607.  061f  89 ec                             mov     sp,bp
  608.  0621  5d                                pop     bp
  609.  0622  ca 02 00                          retf    0002H
  610.  0625  23 42 61          L38             and     ax,+61H[bp+si]
  611.  0628  73 65                             jae     L43
  612.  062a  20 63 6f                          and     +6fH[bp+di],ah
  613.  062d  6e                                outsb   
  614.  062e  76 65                             jbe     L44
  615.  0630  72 73                             jb      L46
  616.  0632  69 6f 6e 3a 20                    imul    bp,+6eH[bx],203aH
  617.  0637  42                                inc     dx
  618.  0638  61                                popa    
  619.  0639  73 65                             jae     L45
  620.  063b  20 6f 75                          and     +75H[bx],ch
  621.  063e  74 20                             je      L40
  622.  0640  6f                                outsw   
  623.  0641  66 20 62 6f                       and     +6fH[bp+si],ah
  624.  0645  75 6e                             jne     L48
  625.  0647  64 73 24                          jae     L41
  626.  064a  31 32                             xor     [bp+si],si
  627.  064c  33 34                             xor     si,[si]
  628.  064e  35 36 37                          xor     ax,3736H
  629.  0651  38 39                             cmp     [bx+di],bh
  630.  0653  41                                inc     cx
  631.  0654  42                                inc     dx
  632.  0655  43                                inc     bx
  633.  0656  44                                inc     sp
  634.  0657  45                                inc     bp
  635.  0658  46                                inc     si
  636.  0659  47                                inc     di
  637.  065a  48                                dec     ax
  638.  065b  49                                dec     cx
  639.  065c  4a                                dec     dx
  640.  065d  4b                                dec     bx
  641.  065e  4c                                dec     sp
  642.  065f  4d                                dec     bp
  643.  0660  4e                L40             dec     si
  644.  0661  4f                                dec     di
  645.  0662  50                                push    ax
  646.  0663  51                                push    cx
  647.  0664  52                                push    dx
  648.  0665  53                                push    bx
  649.  0666  54                                push    sp
  650.  0667  55                                push    bp
  651.  0668  56                                push    si
  652.  0669  57                                push    di
  653.  066a  58                                pop     ax
  654.  066b  59                                pop     cx
  655.  066c  5a                                pop     dx
  656.  066d  5b                                pop     bx
  657.  066e  1f                L41             pop     ds
  658.  066f  42                                inc     dx
  659.  0670  61                                popa    
  660.  0671  73 65                             jae     L49
  661.  0673  20 63 6f                          and     +6fH[bp+di],ah
  662.  0676  6e                                outsb   
  663.  0677  76 65                             jbe     L50
  664.  0679  72 73                             jb      L52
  665.  067b  69 6f 6e 3a 20                    imul    bp,+6eH[bx],203aH
  666.  0680  49                                dec     cx
  667.  0681  6c                                insb    
  668.  0682  6c                                insb    
  669.  0683  65 67 61                          popa    
  670.  0686  6c                                insb    
  671.  0687  20 64 69                          and     +69H[si],ah
  672.  068a  67 69 74 20 21 42 
  673.        61                                imul    si,+21H[eax],6142H
  674.  0691  73 65                             jae     L53
  675.  0693  20 63 6f                          and     +6fH[bp+di],ah
  676.  0696  6e                                outsb   
  677.  0697  76 65                             jbe     L54
  678.  0699  72 73                             jb      L57
  679.  069b  69 6f 6e 3a 20                    imul    bp,+6eH[bx],203aH
  680.  06a0  56                L45             push    si
  681.  06a1  61                                popa    
  682.  06a2  6c                                insb    
  683.  06a3  75 65                             jne     L55
  684.  06a5  20 6f 76          L46             and     +76H[bx],ch
  685.  06a8  65 72 66                          jb      L58
  686.  06ab  6c                                insb    
  687.  06ac  6f                                outsw   
  688.  06ad  77 73                             ja      L59
  689.  06af  20 0a                             and     [bp+si],cl
  690.  06b1  20 28                             and     [bx+si],ch
  691.  06b3  64 65 63 69 6d                    arpl    bp,gs:+6dH[bx+di]
  692.  06b8  61                                popa    
  693.  06b9  6c                                insb    
  694.  06ba  29 55 89                          sub     -77H[di],dx
  695.  06bd  e5 b8                             in      ax,0b8H
  696.  06bf  1c 03                             sbb     al,03H
  697.  06c1  9a 00 00 00 00                    call    far SYSTEM_034
  698.  06c6  81 ec 1c 03                       sub     sp,031cH
  699.  06ca  c4 7e 06                          les     di,dword ptr +6H[bp]
  700.  06cd  06                                push    es
  701.  06ce  57                                push    di
  702.  06cf  8d be fc fe                       lea     di,-104H[bp]
  703.  06d3  16                                push    ss
  704.  06d4  57                                push    di
  705.  06d5  b8 ff 00                          mov     ax,00ffH
  706.  06d8  50                L49             push    ax
  707.  06d9  9a 00 00 00 00                    call    far SYSTEM_00C
  708.  06de  80 7e 04 02       L50             cmp     byte ptr +4H[bp],02H
  709.  06e2  72 06                             jb      L51
  710.  06e4  80 7e 04 24                       cmp     byte ptr +4H[bp],24H
  711.  06e8  76 23                             jbe     L56
  712.  06ea  bf 00 00          L51             mov     di,offset SYSTEM_BSS+100H
  713.  06ed  1e                                push    ds
  714.  06ee  57                L52             push    di
  715.  06ef  bf 00 00                          mov     di,offset L38
  716.  06f2  0e                                push    cs
  717.  06f3  57                                push    di
  718.  06f4  31 c0                             xor     ax,ax
  719.  06f6  50                                push    ax
  720.  06f7  9a 00 00 00 00                    call    far SYSTEM_036
  721.  06fc  9a 00 00 00 00                    call    far SYSTEM_03A
  722.  0701  9a 00 00 00 00                    call    far SYSTEM_032
  723.  0706  31 c0                             xor     ax,ax
  724.  0708  9a 00 00 00 00                    call    far SYSTEM_003
  725.  070d  c7 86 ee fe 81 00 L56             mov     word ptr -112H[bp],0081H
  726.  0713  c7 86 f0 fe 00 00                 mov     word ptr -110H[bp],0000H
  727.  0719  c7 86 f2 fe 00 00                 mov     word ptr -10eH[bp],0000H
  728.  071f  c7 86 e8 fe 00 00                 mov     word ptr -118H[bp],0000H
  729.  0725  c7 86 ea fe 00 00                 mov     word ptr -116H[bp],0000H
  730.  072b  c7 86 ec fe 00 00                 mov     word ptr -114H[bp],0000H
  731.  0731  c7 86 f8 fe 01 00                 mov     word ptr -108H[bp],0001H
  732.  0737  c7 86 fa fe 00 00                 mov     word ptr -106H[bp],0000H
  733.  073d  31 c0                             xor     ax,ax
  734.  073f  89 86 f4 fe                       mov     -10cH[bp],ax
  735.  0743  89 86 f6 fe                       mov     -10aH[bp],ax
  736.  0747  8a 86 fc fe                       mov     al,-104H[bp]
  737.  074b  30 e4                             xor     ah,ah
  738.  074d  40                                inc     ax
  739.  074e  89 86 e4 fe                       mov     -11cH[bp],ax
  740.  0752  83 be e4 fe 01    L60             cmp     word ptr -11cH[bp],0001H
  741.  0757  7f 03                             jg      L61
  742.  0759  e9 bc 01                          jmp     L65
  743.  075c  8b 86 e4 fe       L61             mov     ax,-11cH[bp]
  744.  0760  48                                dec     ax
  745.  0761  89 86 e4 fe                       mov     -11cH[bp],ax
  746.  0765  8d be e4 fc                       lea     di,-31cH[bp]
  747.  0769  16                                push    ss
  748.  076a  57                                push    di
  749.  076b  8b be e4 fe                       mov     di,-11cH[bp]
  750.  076f  8a 83 fc fe                       mov     al,-104H[bp+di]
  751.  0773  50                                push    ax
  752.  0774  9a 00 00 00 00                    call    far SYSTEM_05A
  753.  0779  50                                push    ax
  754.  077a  9a 00 00 00 00                    call    far SYSTEM_012
  755.  077f  bf 00 00                          mov     di,offset L39
  756.  0782  0e                                push    cs
  757.  0783  57                                push    di
  758.  0784  9a 00 00 00 00                    call    far SYSTEM_010
  759.  0789  89 86 e6 fe                       mov     -11aH[bp],ax
  760.  078d  8a 46 04                          mov     al,+4H[bp]
  761.  0790  30 e4                             xor     ah,ah
  762.  0792  48                                dec     ax
  763.  0793  3b 86 e6 fe                       cmp     ax,-11aH[bp]
  764.  0797  7c 12                             jl      L62
  765.  0799  83 be e6 fe 00                    cmp     word ptr -11aH[bp],0000H
  766.  079e  75 3f                             jne     L63
  767.  07a0  8b be e4 fe                       mov     di,-11cH[bp]
  768.  07a4  80 bb fc fe 30                    cmp     byte ptr -104H[bp+di],30H
  769.  07a9  74 34                             je      L63
  770.  07ab  bf 00 00          L62             mov     di,offset SYSTEM_BSS+100H
  771.  07ae  1e                                push    ds
  772.  07af  57                                push    di
  773.  07b0  bf 00 00                          mov     di,offset L41
  774.  07b3  0e                                push    cs
  775.  07b4  57                                push    di
  776.  07b5  31 c0                             xor     ax,ax
  777.  07b7  50                                push    ax
  778.  07b8  9a 00 00 00 00                    call    far SYSTEM_036
  779.  07bd  8b be e4 fe                       mov     di,-11cH[bp]
  780.  07c1  8a 83 fc fe                       mov     al,-104H[bp+di]
  781.  07c5  50                                push    ax
  782.  07c6  31 c0                             xor     ax,ax
  783.  07c8  50                                push    ax
  784.  07c9  9a 00 00 00 00                    call    far SYSTEM_039
  785.  07ce  9a 00 00 00 00                    call    far SYSTEM_03A
  786.  07d3  9a 00 00 00 00                    call    far SYSTEM_032
  787.  07d8  31 c0                             xor     ax,ax
  788.  07da  9a 00 00 00 00                    call    far SYSTEM_003
  789.  07df  8b 86 e6 fe       L63             mov     ax,-11aH[bp]
  790.  07e3  99                                cwd     
  791.  07e4  9a 00 00 00 00                    call    far SYSTEM_073
  792.  07e9  8b 8e ee fe                       mov     cx,-112H[bp]
  793.  07ed  8b b6 f0 fe                       mov     si,-110H[bp]
  794.  07f1  8b be f2 fe                       mov     di,-10eH[bp]
  795.  07f5  9a 00 00 00 00                    call    far SYSTEM_070
  796.  07fa  8b 8e e8 fe                       mov     cx,-118H[bp]
  797.  07fe  8b b6 ea fe                       mov     si,-116H[bp]
  798.  0802  8b be ec fe                       mov     di,-114H[bp]
  799.  0806  9a 00 00 00 00                    call    far SYSTEM_06E
  800.  080b  89 86 e8 fe                       mov     -118H[bp],ax
  801.  080f  89 9e ea fe                       mov     -116H[bp],bx
  802.  0813  89 96 ec fe                       mov     -114H[bp],dx
  803.  0817  8a 46 04                          mov     al,+4H[bp]
  804.  081a  30 e4                             xor     ah,ah
  805.  081c  31 d2                             xor     dx,dx
  806.  081e  9a 00 00 00 00                    call    far SYSTEM_073
  807.  0823  8b 8e ee fe                       mov     cx,-112H[bp]
  808.  0827  8b b6 f0 fe                       mov     si,-110H[bp]
  809.  082b  8b be f2 fe                       mov     di,-10eH[bp]
  810.  082f  9a 00 00 00 00                    call    far SYSTEM_070
  811.  0834  89 86 ee fe                       mov     -112H[bp],ax
  812.  0838  89 9e f0 fe                       mov     -110H[bp],bx
  813.  083c  89 96 f2 fe                       mov     -10eH[bp],dx
  814.  0840  8b 86 e8 fe                       mov     ax,-118H[bp]
  815.  0844  8b 9e ea fe                       mov     bx,-116H[bp]
  816.  0848  8b 96 ec fe                       mov     dx,-114H[bp]
  817.  084c  80 e6 7f                          and     dh,7fH
  818.  084f  8b 0e 00 00                       mov     cx,L99
  819.  0853  8b 36 00 00                       mov     si,L100
  820.  0857  8b 3e 00 00                       mov     di,L101
  821.  085b  9a 00 00 00 00                    call    far SYSTEM_072
  822.  0860  76 79                             jbe     L64
  823.  0862  ff 36 00 00                       push    L101
  824.  0866  ff 36 00 00                       push    L100
  825.  086a  ff 36 00 00                       push    L99
  826.  086e  31 c0                             xor     ax,ax
  827.  0870  50                                push    ax
  828.  0871  31 c0                             xor     ax,ax
  829.  0873  50                                push    ax
  830.  0874  8d be e4 fd                       lea     di,-21cH[bp]
  831.  0878  16                                push    ss
  832.  0879  57                                push    di
  833.  087a  b8 ff 00                          mov     ax,00ffH
  834.  087d  50                                push    ax
  835.  087e  9a 00 00 00 00                    call    far SYSTEM_079
  836.  0883  8d be e4 fc                       lea     di,-31cH[bp]
  837.  0887  16                                push    ss
  838.  0888  57                                push    di
  839.  0889  bf 00 00                          mov     di,offset L42
  840.  088c  0e                                push    cs
  841.  088d  57                                push    di
  842.  088e  9a 00 00 00 00                    call    far SYSTEM_00B
  843.  0893  8d be e4 fd                       lea     di,-21cH[bp]
  844.  0897  16                                push    ss
  845.  0898  57                                push    di
  846.  0899  9a 00 00 00 00                    call    far SYSTEM_00F
  847.  089e  bf 00 00                          mov     di,offset L47
  848.  08a1  0e                                push    cs
  849.  08a2  57                                push    di
  850.  08a3  9a 00 00 00 00                    call    far SYSTEM_00F
  851.  08a8  8d be e4 fd                       lea     di,-21cH[bp]
  852.  08ac  16                                push    ss
  853.  08ad  57                                push    di
  854.  08ae  b8 ff 00                          mov     ax,00ffH
  855.  08b1  50                                push    ax
  856.  08b2  9a 00 00 00 00                    call    far SYSTEM_00C
  857.  08b7  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  858.  08ba  1e                                push    ds
  859.  08bb  57                                push    di
  860.  08bc  8d be e4 fd                       lea     di,-21cH[bp]
  861.  08c0  16                                push    ss
  862.  08c1  57                                push    di
  863.  08c2  31 c0                             xor     ax,ax
  864.  08c4  50                                push    ax
  865.  08c5  9a 00 00 00 00                    call    far SYSTEM_036
  866.  08ca  9a 00 00 00 00                    call    far SYSTEM_03A
  867.  08cf  9a 00 00 00 00                    call    far SYSTEM_032
  868.  08d4  31 c0                             xor     ax,ax
  869.  08d6  9a 00 00 00 00                    call    far SYSTEM_003
  870.  08db  8b 86 e6 fe       L64             mov     ax,-11aH[bp]
  871.  08df  99                                cwd     
  872.  08e0  c4 8e f8 fe                       les     cx,dword ptr -108H[bp]
  873.  08e4  8c c3                             mov     bx,es
  874.  08e6  9a 00 00 00 00                    call    far SYSTEM_005
  875.  08eb  03 86 f4 fe                       add     ax,-10cH[bp]
  876.  08ef  13 96 f6 fe                       adc     dx,-10aH[bp]
  877.  08f3  89 86 f4 fe                       mov     -10cH[bp],ax
  878.  08f7  89 96 f6 fe                       mov     -10aH[bp],dx
  879.  08fb  8a 46 04                          mov     al,+4H[bp]
  880.  08fe  30 e4                             xor     ah,ah
  881.  0900  31 d2                             xor     dx,dx
  882.  0902  c4 8e f8 fe                       les     cx,dword ptr -108H[bp]
  883.  0906  8c c3                             mov     bx,es
  884.  0908  9a 00 00 00 00                    call    far SYSTEM_005
  885.  090d  89 86 f8 fe                       mov     -108H[bp],ax
  886.  0911  89 96 fa fe                       mov     -106H[bp],dx
  887.  0915  e9 3a fe                          jmp     L60
  888.  0918  c4 86 f4 fe       L65             les     ax,dword ptr -10cH[bp]
  889.  091c  8c c2                             mov     dx,es
  890.  091e  89 46 fc                          mov     -4H[bp],ax
  891.  0921  89 56 fe                          mov     -2H[bp],dx
  892.  0924  8b 46 fc                          mov     ax,-4H[bp]
  893.  0927  8b 56 fe                          mov     dx,-2H[bp]
  894.  092a  89 ec                             mov     sp,bp
  895.  092c  5d                                pop     bp
  896.  092d  c2 06 00                          ret     0006H
  897.  0930  23 42 61          L66             and     ax,+61H[bp+si]
  898.  0933  73 65                             jae     L70
  899.  0935  20 63 6f                          and     +6fH[bp+di],ah
  900.  0938  6e                                outsb   
  901.  0939  76 65                             jbe     L71
  902.  093b  72 73                             jb      L73
  903.  093d  69 6f 6e 3a 20                    imul    bp,+6eH[bx],203aH
  904.  0942  42                                inc     dx
  905.  0943  61                                popa    
  906.  0944  73 65                             jae     L72
  907.  0946  20 6f 75                          and     +75H[bx],ch
  908.  0949  74 20                             je      L68
  909.  094b  6f                                outsw   
  910.  094c  66 20 62 6f                       and     +6fH[bp+si],ah
  911.  0950  75 6e                             jne     L77
  912.  0952  64 73 20                          jae     TSUNTB_018
  913.  0955  42                                inc     dx
  914.  0956  61                                popa    
  915.  0957  73 65                             jae     L76
  916.  0959  20 63 6f                          and     +6fH[bp+di],ah
  917.  095c  6e                                outsb   
  918.  095d  76 65                             jbe     L78
  919.  095f  72 73                             jb      L80
  920.  0961  69 6f 6e 3a 20                    imul    bp,+6eH[bx],203aH
  921.  0966  56                                push    si
  922.  0967  61                                popa    
  923.  0968  6c                                insb    
  924.  0969  75 65                             jne     L79
  925.  096b  20 74 6f          L68             and     +6fH[si],dh
  926.  096e  6f                                outsw   
  927.  096f  20 6c 61                          and     +61H[si],ch
  928.  0972  72 67                             jb      L81
  929.  0974  65 55                             push    bp
  930.  0976  89 e5                             mov     bp,sp
  931.  0978  b8 02 02                          mov     ax,0202H
  932.  097b  9a 00 00 00 00                    call    far SYSTEM_034
  933.  0980  81 ec 02 02                       sub     sp,0202H
  934.  0984  80 7e 04 02                       cmp     byte ptr +4H[bp],02H
  935.  0988  72 06                             jb      L69
  936.  098a  80 7e 04 24                       cmp     byte ptr +4H[bp],24H
  937.  098e  76 23                             jbe     L74
  938.  0990  bf 00 00          L69             mov     di,offset SYSTEM_BSS+100H
  939.  0993  1e                                push    ds
  940.  0994  57                                push    di
  941.  0995  bf 00 00                          mov     di,offset L66
  942.  0998  0e                                push    cs
  943.  0999  57                                push    di
  944.  099a  31 c0             L70             xor     ax,ax
  945.  099c  50                                push    ax
  946.  099d  9a 00 00 00 00                    call    far SYSTEM_036
  947.  09a2  9a 00 00 00 00                    call    far SYSTEM_03A
  948.  09a7  9a 00 00 00 00                    call    far SYSTEM_032
  949.  09ac  31 c0                             xor     ax,ax
  950.  09ae  9a 00 00 00 00                    call    far SYSTEM_003
  951.  09b3  c6 86 00 ff 00    L74             mov     byte ptr -100H[bp],00H
  952.  09b8  8a 46 04          L75             mov     al,+4H[bp]
  953.  09bb  30 e4                             xor     ah,ah
  954.  09bd  31 d2                             xor     dx,dx
  955.  09bf  8b c8                             mov     cx,ax
  956.  09c1  8b da                             mov     bx,dx
  957.  09c3  c4 46 06                          les     ax,dword ptr +6H[bp]
  958.  09c6  8c c2                             mov     dx,es
  959.  09c8  9a 00 00 00 00                    call    far SYSTEM_006
  960.  09cd  89 c8                             mov     ax,cx
  961.  09cf  89 da                             mov     dx,bx
  962.  09d1  89 86 fe fe                       mov     -102H[bp],ax
  963.  09d5  8b 86 fe fe                       mov     ax,-102H[bp]
  964.  09d9  40                                inc     ax
  965.  09da  3d f8 00                          cmp     ax,00f8H
  966.  09dd  7e 23                             jle     L82
  967.  09df  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  968.  09e2  1e                                push    ds
  969.  09e3  57                                push    di
  970.  09e4  bf 00 00                          mov     di,offset L67
  971.  09e7  0e                                push    cs
  972.  09e8  57                                push    di
  973.  09e9  31 c0                             xor     ax,ax
  974.  09eb  50                                push    ax
  975.  09ec  9a 00 00 00 00                    call    far SYSTEM_036
  976.  09f1  9a 00 00 00 00                    call    far SYSTEM_03A
  977.  09f6  9a 00 00 00 00                    call    far SYSTEM_032
  978.  09fb  31 c0                             xor     ax,ax
  979.  09fd  9a 00 00 00 00                    call    far SYSTEM_003
  980.  0a02  8d be fe fd       L82             lea     di,-202H[bp]
  981.  0a06  16                                push    ss
  982.  0a07  57                                push    di
  983.  0a08  8b 86 fe fe                       mov     ax,-102H[bp]
  984.  0a0c  40                                inc     ax
  985.  0a0d  8b f8                             mov     di,ax
  986.  0a0f  8a 85 00 00                       mov     al,L102[di]
  987.  0a13  50                                push    ax
  988.  0a14  9a 00 00 00 00                    call    far SYSTEM_012
  989.  0a19  8d be 00 ff                       lea     di,-100H[bp]
  990.  0a1d  16                                push    ss
  991.  0a1e  57                                push    di
  992.  0a1f  9a 00 00 00 00                    call    far SYSTEM_00F
  993.  0a24  8d be 00 ff                       lea     di,-100H[bp]
  994.  0a28  16                                push    ss
  995.  0a29  57                                push    di
  996.  0a2a  b8 ff 00                          mov     ax,00ffH
  997.  0a2d  50                                push    ax
  998.  0a2e  9a 00 00 00 00                    call    far SYSTEM_00C
  999.  0a33  8a 46 04                          mov     al,+4H[bp]
  1000.  0a36  30 e4                             xor     ah,ah
  1001.  0a38  31 d2                             xor     dx,dx
  1002.  0a3a  8b c8                             mov     cx,ax
  1003.  0a3c  8b da                             mov     bx,dx
  1004.  0a3e  c4 46 06                          les     ax,dword ptr +6H[bp]
  1005.  0a41  8c c2                             mov     dx,es
  1006.  0a43  9a 00 00 00 00                    call    far SYSTEM_006
  1007.  0a48  89 46 06                          mov     +6H[bp],ax
  1008.  0a4b  89 56 08                          mov     +8H[bp],dx
  1009.  0a4e  83 7e 08 00                       cmp     word ptr +8H[bp],0000H
  1010.  0a52  7c 0e                             jl      L84
  1011.  0a54  7e 03                             jle     L83
  1012.  0a56  e9 5f ff                          jmp     L75
  1013.  0a59  83 7e 06 00       L83             cmp     word ptr +6H[bp],0000H
  1014.  0a5d  76 03                             jbe     L84
  1015.  0a5f  e9 56 ff                          jmp     L75
  1016.  0a62  8d be 00 ff       L84             lea     di,-100H[bp]
  1017.  0a66  16                                push    ss
  1018.  0a67  57                                push    di
  1019.  0a68  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  1020.  0a6b  06                                push    es
  1021.  0a6c  57                                push    di
  1022.  0a6d  b8 ff 00                          mov     ax,00ffH
  1023.  0a70  50                                push    ax
  1024.  0a71  9a 00 00 00 00                    call    far SYSTEM_00C
  1025.  0a76  89 ec                             mov     sp,bp
  1026.  0a78  5d                                pop     bp
  1027.  0a79  c2 06 00                          ret     0006H
  1028.  0a7c                    CONVBFN:
  1029.  0a7c  55                TSUNTB_008      push    bp
  1030.  0a7d  89 e5                             mov     bp,sp
  1031.  0a7f  b8 04 02                          mov     ax,0204H
  1032.  0a82  9a 00 00 00 00                    call    far SYSTEM_034
  1033.  0a87  81 ec 04 02                       sub     sp,0204H
  1034.  0a8b  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  1035.  0a8e  06                                push    es
  1036.  0a8f  57                                push    di
  1037.  0a90  8d be 00 ff                       lea     di,-100H[bp]
  1038.  0a94  16                                push    ss
  1039.  0a95  57                                push    di
  1040.  0a96  b8 ff 00                          mov     ax,00ffH
  1041.  0a99  50                                push    ax
  1042.  0a9a  9a 00 00 00 00                    call    far SYSTEM_00C
  1043.  0a9f  8d be 00 ff                       lea     di,-100H[bp]
  1044.  0aa3  16                                push    ss
  1045.  0aa4  57                                push    di
  1046.  0aa5  8a 46 08                          mov     al,+8H[bp]
  1047.  0aa8  50                                push    ax
  1048.  0aa9  e8 00 00                          call    TSUNTB_017
  1049.  0aac  89 86 fc fe                       mov     -104H[bp],ax
  1050.  0ab0  89 96 fe fe                       mov     -102H[bp],dx
  1051.  0ab4  8d be fc fd                       lea     di,-204H[bp]
  1052.  0ab8  16                                push    ss
  1053.  0ab9  57                                push    di
  1054.  0aba  ff b6 fe fe                       push    -102H[bp]
  1055.  0abe  ff b6 fc fe                       push    -104H[bp]
  1056.  0ac2  8a 46 06                          mov     al,+6H[bp]
  1057.  0ac5  50                                push    ax
  1058.  0ac6  e8 00 00                          call    TSUNTB_018
  1059.  0ac9  c4 7e 0e                          les     di,dword ptr +0eH[bp]
  1060.  0acc  06                                push    es
  1061.  0acd  57                                push    di
  1062.  0ace  b8 ff 00                          mov     ax,00ffH
  1063.  0ad1  50                                push    ax
  1064.  0ad2  9a 00 00 00 00                    call    far SYSTEM_00C
  1065.  0ad7  89 ec                             mov     sp,bp
  1066.  0ad9  5d                                pop     bp
  1067.  0ada  ca 08 00                          retf    0008H
  1068.  0add  55                TSUNTB_019      push    bp
  1069.  0ade  89 e5                             mov     bp,sp
  1070.  0ae0  b8 01 00                          mov     ax,0001H
  1071.  0ae3  9a 00 00 00 00                    call    far SYSTEM_034
  1072.  0ae8  83 ec 01                          sub     sp,0001H
  1073.  0aeb  8a 46 04                          mov     al,+4H[bp]
  1074.  0aee  50                                push    ax
  1075.  0aef  9a 00 00 00 00                    call    far SYSTEM_05A
  1076.  0af4  88 46 04                          mov     +4H[bp],al
  1077.  0af7  8a 46 04                          mov     al,+4H[bp]
  1078.  0afa  3c 30                             cmp     al,30H
  1079.  0afc  72 11                             jb      L85
  1080.  0afe  3c 39                             cmp     al,39H
  1081.  0b00  77 0d                             ja      L85
  1082.  0b02  8a 46 04                          mov     al,+4H[bp]
  1083.  0b05  30 e4                             xor     ah,ah
  1084.  0b07  2d 30 00                          sub     ax,0030H
  1085.  0b0a  88 46 ff                          mov     -1H[bp],al
  1086.  0b0d  eb 19                             jmp     L87
  1087.  0b0f  3c 41             L85             cmp     al,41H
  1088.  0b11  72 11                             jb      L86
  1089.  0b13  3c 46                             cmp     al,46H
  1090.  0b15  77 0d                             ja      L86
  1091.  0b17  8a 46 04                          mov     al,+4H[bp]
  1092.  0b1a  30 e4                             xor     ah,ah
  1093.  0b1c  2d 37 00                          sub     ax,0037H
  1094.  0b1f  88 46 ff                          mov     -1H[bp],al
  1095.  0b22  eb 04                             jmp     L87
  1096.  0b24  c6 46 ff 00       L86             mov     byte ptr -1H[bp],00H
  1097.  0b28  8a 46 ff          L87             mov     al,-1H[bp]
  1098.  0b2b  89 ec                             mov     sp,bp
  1099.  0b2d  5d                                pop     bp
  1100.  0b2e  c2 02 00                          ret     0002H
  1101.  0b31                    HEXDECFN:
  1102.  0b31  55                TSUNTB_00F      push    bp
  1103.  0b32  89 e5                             mov     bp,sp
  1104.  0b34  b8 08 01                          mov     ax,0108H
  1105.  0b37  9a 00 00 00 00                    call    far SYSTEM_034
  1106.  0b3c  81 ec 08 01                       sub     sp,0108H
  1107.  0b40  c4 7e 06                          les     di,dword ptr +6H[bp]
  1108.  0b43  06                                push    es
  1109.  0b44  57                                push    di
  1110.  0b45  8d be fe fe                       lea     di,-102H[bp]
  1111.  0b49  16                                push    ss
  1112.  0b4a  57                                push    di
  1113.  0b4b  b8 ff 00                          mov     ax,00ffH
  1114.  0b4e  50                                push    ax
  1115.  0b4f  9a 00 00 00 00                    call    far SYSTEM_00C
  1116.  0b54  8a 86 fe fe                       mov     al,-102H[bp]
  1117.  0b58  88 86 fd fe                       mov     -103H[bp],al
  1118.  0b5c  31 c0                             xor     ax,ax
  1119.  0b5e  89 86 f8 fe                       mov     -108H[bp],ax
  1120.  0b62  89 86 fa fe                       mov     -106H[bp],ax
  1121.  0b66  8a 86 fd fe                       mov     al,-103H[bp]
  1122.  0b6a  3c 01                             cmp     al,01H
  1123.  0b6c  72 56                             jb      L90
  1124.  0b6e  88 86 fc fe                       mov     -104H[bp],al
  1125.  0b72  eb 04                             jmp     L89
  1126.  0b74  fe 8e fc fe       L88             dec     byte ptr -104H[bp]
  1127.  0b78  8a 86 fc fe       L89             mov     al,-104H[bp]
  1128.  0b7c  30 e4                             xor     ah,ah
  1129.  0b7e  8b f8                             mov     di,ax
  1130.  0b80  8a 83 fe fe                       mov     al,-102H[bp+di]
  1131.  0b84  50                                push    ax
  1132.  0b85  e8 00 00                          call    TSUNTB_019
  1133.  0b88  30 e4                             xor     ah,ah
  1134.  0b8a  8b d8                             mov     bx,ax
  1135.  0b8c  8a 86 fc fe                       mov     al,-104H[bp]
  1136.  0b90  30 e4                             xor     ah,ah
  1137.  0b92  8b d0                             mov     dx,ax
  1138.  0b94  8a 86 fd fe                       mov     al,-103H[bp]
  1139.  0b98  30 e4                             xor     ah,ah
  1140.  0b9a  2b c2                             sub     ax,dx
  1141.  0b9c  b9 02 00                          mov     cx,0002H
  1142.  0b9f  d3 e0                             shl     ax,cl
  1143.  0ba1  8b d0                             mov     dx,ax
  1144.  0ba3  b8 01 00                          mov     ax,0001H
  1145.  0ba6  8b ca                             mov     cx,dx
  1146.  0ba8  d3 e0                             shl     ax,cl
  1147.  0baa  f7 eb                             imul    bx
  1148.  0bac  99                                cwd     
  1149.  0bad  03 86 f8 fe                       add     ax,-108H[bp]
  1150.  0bb1  13 96 fa fe                       adc     dx,-106H[bp]
  1151.  0bb5  89 86 f8 fe                       mov     -108H[bp],ax
  1152.  0bb9  89 96 fa fe                       mov     -106H[bp],dx
  1153.  0bbd  80 be fc fe 01                    cmp     byte ptr -104H[bp],01H
  1154.  0bc2  75 b0                             jne     L88
  1155.  0bc4  8b 86 f8 fe       L90             mov     ax,-108H[bp]
  1156.  0bc8  89 46 fe                          mov     -2H[bp],ax
  1157.  0bcb  8b 46 fe                          mov     ax,-2H[bp]
  1158.  0bce  89 ec                             mov     sp,bp
  1159.  0bd0  5d                                pop     bp
  1160.  0bd1  ca 04 00                          retf    0004H
  1161.  0bd4                    HEXLNGFN:
  1162.  0bd4  55                TSUNTB_010      push    bp
  1163.  0bd5  89 e5                             mov     bp,sp
  1164.  0bd7  b8 10 01                          mov     ax,0110H
  1165.  0bda  9a 00 00 00 00                    call    far SYSTEM_034
  1166.  0bdf  81 ec 10 01                       sub     sp,0110H
  1167.  0be3  c4 7e 06                          les     di,dword ptr +6H[bp]
  1168.  0be6  06                                push    es
  1169.  0be7  57                                push    di
  1170.  0be8  8d be fc fe                       lea     di,-104H[bp]
  1171.  0bec  16                                push    ss
  1172.  0bed  57                                push    di
  1173.  0bee  b8 ff 00                          mov     ax,00ffH
  1174.  0bf1  50                                push    ax
  1175.  0bf2  9a 00 00 00 00                    call    far SYSTEM_00C
  1176.  0bf7  8a 86 fc fe                       mov     al,-104H[bp]
  1177.  0bfb  30 e4                             xor     ah,ah
  1178.  0bfd  31 d2                             xor     dx,dx
  1179.  0bff  89 86 f8 fe                       mov     -108H[bp],ax
  1180.  0c03  89 96 fa fe                       mov     -106H[bp],dx
  1181.  0c07  31 c0                             xor     ax,ax
  1182.  0c09  89 86 f0 fe                       mov     -110H[bp],ax
  1183.  0c0d  89 86 f2 fe                       mov     -10eH[bp],ax
  1184.  0c11  c4 86 f8 fe                       les     ax,dword ptr -108H[bp]
  1185.  0c15  8c c2                             mov     dx,es
  1186.  0c17  83 fa 00                          cmp     dx,0000H
  1187.  0c1a  7c 78                             jl      L94
  1188.  0c1c  7f 05                             jg      L91
  1189.  0c1e  3d 01 00                          cmp     ax,0001H
  1190.  0c21  72 71                             jb      L94
  1191.  0c23  89 86 f4 fe       L91             mov     -10cH[bp],ax
  1192.  0c27  89 96 f6 fe                       mov     -10aH[bp],dx
  1193.  0c2b  eb 0a                             jmp     L93
  1194.  0c2d  83 ae f4 fe 01    L92             sub     word ptr -10cH[bp],0001H
  1195.  0c32  83 9e f6 fe 00                    sbb     word ptr -10aH[bp],0000H
  1196.  0c37  c4 86 f8 fe       L93             les     ax,dword ptr -108H[bp]
  1197.  0c3b  8c c2                             mov     dx,es
  1198.  0c3d  2b 86 f4 fe                       sub     ax,-10cH[bp]
  1199.  0c41  1b 96 f6 fe                       sbb     dx,-10aH[bp]
  1200.  0c45  b9 04 00                          mov     cx,0004H
  1201.  0c48  31 db                             xor     bx,bx
  1202.  0c4a  9a 00 00 00 00                    call    far SYSTEM_005
  1203.  0c4f  8b c8                             mov     cx,ax
  1204.  0c51  8b da                             mov     bx,dx
  1205.  0c53  b8 01 00                          mov     ax,0001H
  1206.  0c56  31 d2                             xor     dx,dx
  1207.  0c58  9a 00 00 00 00                    call    far SYSTEM_008
  1208.  0c5d  52                                push    dx
  1209.  0c5e  50                                push    ax
  1210.  0c5f  8b be f4 fe                       mov     di,-10cH[bp]
  1211.  0c63  8a 83 fc fe                       mov     al,-104H[bp+di]
  1212.  0c67  50                                push    ax
  1213.  0c68  e8 00 00                          call    TSUNTB_019
  1214.  0c6b  30 e4                             xor     ah,ah
  1215.  0c6d  31 d2                             xor     dx,dx
  1216.  0c6f  59                                pop     cx
  1217.  0c70  5b                                pop     bx
  1218.  0c71  9a 00 00 00 00                    call    far SYSTEM_005
  1219.  0c76  03 86 f0 fe                       add     ax,-110H[bp]
  1220.  0c7a  13 96 f2 fe                       adc     dx,-10eH[bp]
  1221.  0c7e  89 86 f0 fe                       mov     -110H[bp],ax
  1222.  0c82  89 96 f2 fe                       mov     -10eH[bp],dx
  1223.  0c86  83 be f6 fe 00                    cmp     word ptr -10aH[bp],0000H
  1224.  0c8b  75 a0                             jne     L92
  1225.  0c8d  83 be f4 fe 01                    cmp     word ptr -10cH[bp],0001H
  1226.  0c92  75 99                             jne     L92
  1227.  0c94  c4 86 f0 fe       L94             les     ax,dword ptr -110H[bp]
  1228.  0c98  8c c2                             mov     dx,es
  1229.  0c9a  9a 00 00 00 00                    call    far SYSTEM_073
  1230.  0c9f  9a 00 00 00 00                    call    far SYSTEM_074
  1231.  0ca4  89 46 fc                          mov     -4H[bp],ax
  1232.  0ca7  89 56 fe                          mov     -2H[bp],dx
  1233.  0caa  8b 46 fc                          mov     ax,-4H[bp]
  1234.  0cad  8b 56 fe                          mov     dx,-2H[bp]
  1235.  0cb0  89 ec                             mov     sp,bp
  1236.  0cb2  5d                                pop     bp
  1237.  0cb3  ca 04 00                          retf    0004H
  1238.  0cb6                    HEXFN:
  1239.  0cb6  55                TSUNTB_00A      push    bp
  1240.  0cb7  89 e5                             mov     bp,sp
  1241.  0cb9  b8 00 04                          mov     ax,0400H
  1242.  0cbc  9a 00 00 00 00                    call    far SYSTEM_034
  1243.  0cc1  81 ec 00 04                       sub     sp,0400H
  1244.  0cc5  8d be 00 ff                       lea     di,-100H[bp]
  1245.  0cc9  16                                push    ss
  1246.  0cca  57                                push    di
  1247.  0ccb  8b 46 06                          mov     ax,+6H[bp]
  1248.  0cce  b9 0c 00                          mov     cx,000cH
  1249.  0cd1  d3 e8                             shr     ax,cl
  1250.  0cd3  8b f8                             mov     di,ax
  1251.  0cd5  8a 85 00 00                       mov     al,L103[di]
  1252.  0cd9  50                                push    ax
  1253.  0cda  9a 00 00 00 00                    call    far SYSTEM_012
  1254.  0cdf  8d be 00 fe                       lea     di,-200H[bp]
  1255.  0ce3  16                                push    ss
  1256.  0ce4  57                                push    di
  1257.  0ce5  8b 46 06                          mov     ax,+6H[bp]
  1258.  0ce8  b9 08 00                          mov     cx,0008H
  1259.  0ceb  d3 e8                             shr     ax,cl
  1260.  0ced  25 0f 00                          and     ax,000fH
  1261.  0cf0  8b f8                             mov     di,ax
  1262.  0cf2  8a 85 00 00                       mov     al,L103[di]
  1263.  0cf6  50                                push    ax
  1264.  0cf7  9a 00 00 00 00                    call    far SYSTEM_012
  1265.  0cfc  9a 00 00 00 00                    call    far SYSTEM_00F
  1266.  0d01  8d be 00 fd                       lea     di,-300H[bp]
  1267.  0d05  16                                push    ss
  1268.  0d06  57                                push    di
  1269.  0d07  8b 46 06                          mov     ax,+6H[bp]
  1270.  0d0a  b9 04 00                          mov     cx,0004H
  1271.  0d0d  d3 e8                             shr     ax,cl
  1272.  0d0f  25 0f 00                          and     ax,000fH
  1273.  0d12  8b f8                             mov     di,ax
  1274.  0d14  8a 85 00 00                       mov     al,L103[di]
  1275.  0d18  50                                push    ax
  1276.  0d19  9a 00 00 00 00                    call    far SYSTEM_012
  1277.  0d1e  9a 00 00 00 00                    call    far SYSTEM_00F
  1278.  0d23  8d be 00 fc                       lea     di,-400H[bp]
  1279.  0d27  16                                push    ss
  1280.  0d28  57                                push    di
  1281.  0d29  8b 46 06                          mov     ax,+6H[bp]
  1282.  0d2c  25 0f 00                          and     ax,000fH
  1283.  0d2f  8b f8                             mov     di,ax
  1284.  0d31  8a 85 00 00                       mov     al,L103[di]
  1285.  0d35  50                                push    ax
  1286.  0d36  9a 00 00 00 00                    call    far SYSTEM_012
  1287.  0d3b  9a 00 00 00 00                    call    far SYSTEM_00F
  1288.  0d40  c4 7e 08                          les     di,dword ptr +8H[bp]
  1289.  0d43  06                                push    es
  1290.  0d44  57                                push    di
  1291.  0d45  b8 ff 00                          mov     ax,00ffH
  1292.  0d48  50                                push    ax
  1293.  0d49  9a 00 00 00 00                    call    far SYSTEM_00C
  1294.  0d4e  89 ec                             mov     sp,bp
  1295.  0d50  5d                                pop     bp
  1296.  0d51  ca 02 00                          retf    0002H
  1297.  0d54                    BHEXFN:
  1298.  0d54  55                TSUNTB_009      push    bp
  1299.  0d55  89 e5                             mov     bp,sp
  1300.  0d57  b8 00 02                          mov     ax,0200H
  1301.  0d5a  9a 00 00 00 00                    call    far SYSTEM_034
  1302.  0d5f  81 ec 00 02                       sub     sp,0200H
  1303.  0d63  8d be 00 ff                       lea     di,-100H[bp]
  1304.  0d67  16                                push    ss
  1305.  0d68  57                                push    di
  1306.  0d69  8a 46 06                          mov     al,+6H[bp]
  1307.  0d6c  30 e4                             xor     ah,ah
  1308.  0d6e  b9 04 00                          mov     cx,0004H
  1309.  0d71  d3 e8                             shr     ax,cl
  1310.  0d73  8b f8                             mov     di,ax
  1311.  0d75  8a 85 00 00                       mov     al,L104[di]
  1312.  0d79  50                                push    ax
  1313.  0d7a  9a 00 00 00 00                    call    far SYSTEM_012
  1314.  0d7f  8d be 00 fe                       lea     di,-200H[bp]
  1315.  0d83  16                                push    ss
  1316.  0d84  57                                push    di
  1317.  0d85  8a 46 06                          mov     al,+6H[bp]
  1318.  0d88  24 0f                             and     al,0fH
  1319.  0d8a  30 e4                             xor     ah,ah
  1320.  0d8c  8b f8                             mov     di,ax
  1321.  0d8e  8a 85 00 00                       mov     al,L104[di]
  1322.  0d92  50                                push    ax
  1323.  0d93  9a 00 00 00 00                    call    far SYSTEM_012
  1324.  0d98  9a 00 00 00 00                    call    far SYSTEM_00F
  1325.  0d9d  c4 7e 08                          les     di,dword ptr +8H[bp]
  1326.  0da0  06                                push    es
  1327.  0da1  57                                push    di
  1328.  0da2  b8 ff 00                          mov     ax,00ffH
  1329.  0da5  50                                push    ax
  1330.  0da6  9a 00 00 00 00                    call    far SYSTEM_00C
  1331.  0dab  89 ec                             mov     sp,bp
  1332.  0dad  5d                                pop     bp
  1333.  0dae  ca 02 00                          retf    0002H
  1334.  0db1                    LHEXFN:
  1335.  0db1  55                TSUNTB_00B      push    bp
  1336.  0db2  89 e5                             mov     bp,sp
  1337.  0db4  b8 01 01                          mov     ax,0101H
  1338.  0db7  9a 00 00 00 00                    call    far SYSTEM_034
  1339.  0dbc  81 ec 01 01                       sub     sp,0101H
  1340.  0dc0  8d be ff fe                       lea     di,-101H[bp]
  1341.  0dc4  16                                push    ss
  1342.  0dc5  57                                push    di
  1343.  0dc6  b8 00 01                          mov     ax,0100H
  1344.  0dc9  50                                push    ax
  1345.  0dca  b0 20                             mov     al,20H
  1346.  0dcc  50                                push    ax
  1347.  0dcd  9a 00 00 00 00                    call    far SYSTEM_05C
  1348.  0dd2  c6 86 ff fe 08                    mov     byte ptr -101H[bp],08H
  1349.  0dd7  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  1350.  0ddb  eb 03                             jmp     L96
  1351.  0ddd  fe 46 ff          L95             inc     byte ptr -1H[bp]
  1352.  0de0  8a 46 ff          L96             mov     al,-1H[bp]
  1353.  0de3  30 e4                             xor     ah,ah
  1354.  0de5  b9 02 00                          mov     cx,0002H
  1355.  0de8  d3 e0                             shl     ax,cl
  1356.  0dea  99                                cwd     
  1357.  0deb  8b c8                             mov     cx,ax
  1358.  0ded  8b da                             mov     bx,dx
  1359.  0def  c4 46 06                          les     ax,dword ptr +6H[bp]
  1360.  0df2  8c c2                             mov     dx,es
  1361.  0df4  9a 00 00 00 00                    call    far SYSTEM_007
  1362.  0df9  25 0f 00                          and     ax,000fH
  1363.  0dfc  81 e2 00 00                       and     dx,0000H
  1364.  0e00  8b f8                             mov     di,ax
  1365.  0e02  8a 8d 00 00                       mov     cl,L105[di]
  1366.  0e06  8a 46 ff                          mov     al,-1H[bp]
  1367.  0e09  30 e4                             xor     ah,ah
  1368.  0e0b  8b d0                             mov     dx,ax
  1369.  0e0d  b8 08 00                          mov     ax,0008H
  1370.  0e10  2b c2                             sub     ax,dx
  1371.  0e12  8b f8                             mov     di,ax
  1372.  0e14  88 8b ff fe                       mov     -101H[bp+di],cl
  1373.  0e18  80 7e ff 07                       cmp     byte ptr -1H[bp],07H
  1374.  0e1c  75 bf                             jne     L95
  1375.  0e1e  8d be ff fe                       lea     di,-101H[bp]
  1376.  0e22  16                                push    ss
  1377.  0e23  57                                push    di
  1378.  0e24  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  1379.  0e27  06                                push    es
  1380.  0e28  57                                push    di
  1381.  0e29  b8 ff 00                          mov     ax,00ffH
  1382.  0e2c  50                                push    ax
  1383.  0e2d  9a 00 00 00 00                    call    far SYSTEM_00C
  1384.  0e32  89 ec                             mov     sp,bp
  1385.  0e34  5d                                pop     bp
  1386.  0e35  ca 04 00                          retf    0004H
  1387.  0e38                    BTEWRDFN:
  1388.  0e38  55                TSUNTB_013      push    bp
  1389.  0e39  89 e5                             mov     bp,sp
  1390.  0e3b  b8 04 00                          mov     ax,0004H
  1391.  0e3e  9a 00 00 00 00                    call    far SYSTEM_034
  1392.  0e43  83 ec 04                          sub     sp,0004H
  1393.  0e46  8a 46 08                          mov     al,+8H[bp]
  1394.  0e49  88 46 fd                          mov     -3H[bp],al
  1395.  0e4c  8a 46 06                          mov     al,+6H[bp]
  1396.  0e4f  88 46 fc                          mov     -4H[bp],al
  1397.  0e52  8b 46 fc                          mov     ax,-4H[bp]
  1398.  0e55  89 46 fe                          mov     -2H[bp],ax
  1399.  0e58  8b 46 fe                          mov     ax,-2H[bp]
  1400.  0e5b  89 ec                             mov     sp,bp
  1401.  0e5d  5d                                pop     bp
  1402.  0e5e  ca 04 00                          retf    0004H
  1403.  0e61                    WRDLNGFN:
  1404.  0e61  55                TSUNTB_014      push    bp
  1405.  0e62  89 e5                             mov     bp,sp
  1406.  0e64  b8 08 00                          mov     ax,0008H
  1407.  0e67  9a 00 00 00 00                    call    far SYSTEM_034
  1408.  0e6c  83 ec 08                          sub     sp,0008H
  1409.  0e6f  8b 46 08                          mov     ax,+8H[bp]
  1410.  0e72  89 46 fa                          mov     -6H[bp],ax
  1411.  0e75  8b 46 06                          mov     ax,+6H[bp]
  1412.  0e78  89 46 f8                          mov     -8H[bp],ax
  1413.  0e7b  c4 46 f8                          les     ax,dword ptr -8H[bp]
  1414.  0e7e  8c c2                             mov     dx,es
  1415.  0e80  89 46 fc                          mov     -4H[bp],ax
  1416.  0e83  89 56 fe                          mov     -2H[bp],dx
  1417.  0e86  8b 46 fc                          mov     ax,-4H[bp]
  1418.  0e89  8b 56 fe                          mov     dx,-2H[bp]
  1419.  0e8c  89 ec                             mov     sp,bp
  1420.  0e8e  5d                                pop     bp
  1421.  0e8f  ca 04 00                          retf    0004H
  1422.  0e92                    HIWORDFN:
  1423.  0e92  55                TSUNTB_015      push    bp
  1424.  0e93  89 e5                             mov     bp,sp
  1425.  0e95  b8 02 00                          mov     ax,0002H
  1426.  0e98  9a 00 00 00 00                    call    far SYSTEM_034
  1427.  0e9d  83 ec 02                          sub     sp,0002H
  1428.  0ea0  8b 46 08                          mov     ax,+8H[bp]
  1429.  0ea3  89 46 fe                          mov     -2H[bp],ax
  1430.  0ea6  8b 46 fe                          mov     ax,-2H[bp]
  1431.  0ea9  89 ec                             mov     sp,bp
  1432.  0eab  5d                                pop     bp
  1433.  0eac  ca 04 00                          retf    0004H
  1434.  0eaf                    LOWORDFN:
  1435.  0eaf  55                TSUNTB_016      push    bp
  1436.  0eb0  89 e5                             mov     bp,sp
  1437.  0eb2  b8 02 00                          mov     ax,0002H
  1438.  0eb5  9a 00 00 00 00                    call    far SYSTEM_034
  1439.  0eba  83 ec 02                          sub     sp,0002H
  1440.  0ebd  8b 46 06                          mov     ax,+6H[bp]
  1441.  0ec0  89 46 fe                          mov     -2H[bp],ax
  1442.  0ec3  8b 46 fe                          mov     ax,-2H[bp]
  1443.  0ec6  89 ec                             mov     sp,bp
  1444.  0ec8  5d                                pop     bp
  1445.  0ec9  ca 04 00                          retf    0004H
  1446.  
  1447. No disassembly errors
  1448.  
  1449. ------------------------------------------------------------
  1450.  
  1451. Segment: _DATA  WORD   00000061 bytes  
  1452.  0000  30 31                   TSUNTB_DATA     - 01
  1453.  0002  30 31                   L97             - 01
  1454.  0004  30 31                   L98             - 01
  1455.  0006  9f 00                   L99             - ..
  1456.  0008  fe ff                   L100            - ..
  1457.  000a  ff 7f                   L101            - ..
  1458.  000c  24 30 31 32 33 34 35 36 L102            - $0123456
  1459.  0014  37 38 39 41 42 43 44 45                 - 789ABCDE
  1460.  001c  46 47 48 49 4a 4b 4c 4d                 - FGHIJKLM
  1461.  0024  4e 4f 50 51 52 53 54 55                 - NOPQRSTU
  1462.  002c  56 57 58 59 5a                          - VWXYZ
  1463.  0031  30 31 32 33 34 35 36 37 L103            - 01234567
  1464.  0039  38 39 41 42 43 44 45 46                 - 89ABCDEF
  1465.  0041  30 31 32 33 34 35 36 37 L104            - 01234567
  1466.  0049  38 39 41 42 43 44 45 46                 - 89ABCDEF
  1467.  0051  30 31 32 33 34 35 36 37 L105            - 01234567
  1468.  0059  38 39 41 42 43 44 45 46                 - 89ABCDEF
  1469.  
  1470. No disassembly errors
  1471.  
  1472. ------------------------------------------------------------
  1473.