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

  1.  
  2. Module: TSUNTH.PAS
  3. Group: 'DGROUP' _DATA,_BSS
  4.  
  5. Segment: TSUNTH_TEXT  PARA   00000c0a bytes  
  6.  0000                    GRTABLFN:
  7.  0000  55                TSUNTH_001      push    bp
  8.  0001  89 e5                             mov     bp,sp
  9.  0003  b8 08 00                          mov     ax,0008H
  10.  0006  9a 00 00 00 00                    call    far SYSTEM_034
  11.  000b  83 ec 08                          sub     sp,0008H
  12.  000e  31 c0                             xor     ax,ax
  13.  0010  50                                push    ax
  14.  0011  bf 7c 00                          mov     di,007cH
  15.  0014  07                                pop     es
  16.  0015  26 8b 05                          mov     ax,es:[di]
  17.  0018  89 46 fb                          mov     -5H[bp],ax
  18.  001b  31 c0                             xor     ax,ax
  19.  001d  50                                push    ax
  20.  001e  bf 7e 00                          mov     di,007eH
  21.  0021  07                                pop     es
  22.  0022  26 8b 05                          mov     ax,es:[di]
  23.  0025  89 46 fd                          mov     -3H[bp],ax
  24.  0028  c6 46 ff 01                       mov     byte ptr -1H[bp],01H
  25.  002c  c7 46 f8 1f 00                    mov     word ptr -8H[bp],001fH
  26.  0031  c6 46 fa 01                       mov     byte ptr -6H[bp],01H
  27.  0035  eb 03                             jmp     L2
  28.  0037  fe 46 fa          L1              inc     byte ptr -6H[bp]
  29.  003a  8b 46 fd          L2              mov     ax,-3H[bp]
  30.  003d  50                                push    ax
  31.  003e  8b 46 f8                          mov     ax,-8H[bp]
  32.  0041  99                                cwd     
  33.  0042  8b c8                             mov     cx,ax
  34.  0044  8b da                             mov     bx,dx
  35.  0046  8b 46 fb                          mov     ax,-5H[bp]
  36.  0049  31 d2                             xor     dx,dx
  37.  004b  03 c1                             add     ax,cx
  38.  004d  13 d3                             adc     dx,bx
  39.  004f  8b c8                             mov     cx,ax
  40.  0051  8b da                             mov     bx,dx
  41.  0053  8a 46 fa                          mov     al,-6H[bp]
  42.  0056  30 e4                             xor     ah,ah
  43.  0058  31 d2                             xor     dx,dx
  44.  005a  03 c1                             add     ax,cx
  45.  005c  13 d3                             adc     dx,bx
  46.  005e  8b f8                             mov     di,ax
  47.  0060  07                                pop     es
  48.  0061  26 8a 15                          mov     dl,es:[di]
  49.  0064  8a 46 fa                          mov     al,-6H[bp]
  50.  0067  30 e4                             xor     ah,ah
  51.  0069  8b f8                             mov     di,ax
  52.  006b  8a 85 00 00                       mov     al,TSUNTH_DATA-1H[di]
  53.  006f  3a c2                             cmp     al,dl
  54.  0071  74 06                             je      L3
  55.  0073  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  56.  0077  eb 06                             jmp     L4
  57.  0079  80 7e fa 08       L3              cmp     byte ptr -6H[bp],08H
  58.  007d  75 b8                             jne     L1
  59.  007f  8a 46 ff          L4              mov     al,-1H[bp]
  60.  0082  89 ec                             mov     sp,bp
  61.  0084  5d                                pop     bp
  62.  0085  cb                                retf    
  63.  0086                    MATHCOFN:
  64.  0086  55                TSUNTH_005      push    bp
  65.  0087  89 e5                             mov     bp,sp
  66.  0089  b8 17 00                          mov     ax,0017H
  67.  008c  9a 00 00 00 00                    call    far SYSTEM_034
  68.  0091  83 ec 17                          sub     sp,0017H
  69.  0094  8d 7e eb                          lea     di,-15H[bp]
  70.  0097  16                                push    ss
  71.  0098  57                                push    di
  72.  0099  b8 14 00                          mov     ax,0014H
  73.  009c  50                                push    ax
  74.  009d  b0 00                             mov     al,00H
  75.  009f  50                                push    ax
  76.  00a0  9a 00 00 00 00                    call    far SYSTEM_05C
  77.  00a5  b0 11                             mov     al,11H
  78.  00a7  50                                push    ax
  79.  00a8  8d 7e eb                          lea     di,-15H[bp]
  80.  00ab  16                                push    ss
  81.  00ac  57                                push    di
  82.  00ad  9a 00 00 00 00                    call    far DOS_001
  83.  00b2  8b 46 eb                          mov     ax,-15H[bp]
  84.  00b5  89 46 e9                          mov     -17H[bp],ax
  85.  00b8  8b 46 e9                          mov     ax,-17H[bp]
  86.  00bb  d1 e8                             shr     ax,1
  87.  00bd  25 01 00                          and     ax,0001H
  88.  00c0  3d 01 00                          cmp     ax,0001H
  89.  00c3  74 04                             je      L5
  90.  00c5  b0 00                             mov     al,00H
  91.  00c7  eb 02                             jmp     L6
  92.  00c9  b0 01             L5              mov     al,01H
  93.  00cb  88 46 ff          L6              mov     -1H[bp],al
  94.  00ce  8a 46 ff                          mov     al,-1H[bp]
  95.  00d1  89 ec                             mov     sp,bp
  96.  00d3  5d                                pop     bp
  97.  00d4  cb                                retf    
  98.  00d5                    RS232FN:
  99.  00d5  55                TSUNTH_006      push    bp
  100.  00d6  89 e5                             mov     bp,sp
  101.  00d8  b8 17 00                          mov     ax,0017H
  102.  00db  9a 00 00 00 00                    call    far SYSTEM_034
  103.  00e0  83 ec 17                          sub     sp,0017H
  104.  00e3  8d 7e eb                          lea     di,-15H[bp]
  105.  00e6  16                                push    ss
  106.  00e7  57                                push    di
  107.  00e8  b8 14 00                          mov     ax,0014H
  108.  00eb  50                                push    ax
  109.  00ec  b0 00                             mov     al,00H
  110.  00ee  50                                push    ax
  111.  00ef  9a 00 00 00 00                    call    far SYSTEM_05C
  112.  00f4  b0 11                             mov     al,11H
  113.  00f6  50                                push    ax
  114.  00f7  8d 7e eb                          lea     di,-15H[bp]
  115.  00fa  16                                push    ss
  116.  00fb  57                                push    di
  117.  00fc  9a 00 00 00 00                    call    far DOS_001
  118.  0101  8b 46 eb                          mov     ax,-15H[bp]
  119.  0104  89 46 e9                          mov     -17H[bp],ax
  120.  0107  8b 46 e9                          mov     ax,-17H[bp]
  121.  010a  b9 09 00                          mov     cx,0009H
  122.  010d  d3 e8                             shr     ax,cl
  123.  010f  25 07 00                          and     ax,0007H
  124.  0112  88 46 ff                          mov     -1H[bp],al
  125.  0115  8a 46 ff                          mov     al,-1H[bp]
  126.  0118  89 ec                             mov     sp,bp
  127.  011a  5d                                pop     bp
  128.  011b  cb                                retf    
  129.  011c                    PARPORFN:
  130.  011c  55                TSUNTH_007      push    bp
  131.  011d  89 e5                             mov     bp,sp
  132.  011f  b8 17 00                          mov     ax,0017H
  133.  0122  9a 00 00 00 00                    call    far SYSTEM_034
  134.  0127  83 ec 17                          sub     sp,0017H
  135.  012a  8d 7e eb                          lea     di,-15H[bp]
  136.  012d  16                                push    ss
  137.  012e  57                                push    di
  138.  012f  b8 14 00                          mov     ax,0014H
  139.  0132  50                                push    ax
  140.  0133  b0 00                             mov     al,00H
  141.  0135  50                                push    ax
  142.  0136  9a 00 00 00 00                    call    far SYSTEM_05C
  143.  013b  b0 11                             mov     al,11H
  144.  013d  50                                push    ax
  145.  013e  8d 7e eb                          lea     di,-15H[bp]
  146.  0141  16                                push    ss
  147.  0142  57                                push    di
  148.  0143  9a 00 00 00 00                    call    far DOS_001
  149.  0148  8b 46 eb                          mov     ax,-15H[bp]
  150.  014b  89 46 e9                          mov     -17H[bp],ax
  151.  014e  8b 46 e9                          mov     ax,-17H[bp]
  152.  0151  b9 0e 00                          mov     cx,000eH
  153.  0154  d3 e8                             shr     ax,cl
  154.  0156  25 03 00                          and     ax,0003H
  155.  0159  88 46 ff                          mov     -1H[bp],al
  156.  015c  8a 46 ff                          mov     al,-1H[bp]
  157.  015f  89 ec                             mov     sp,bp
  158.  0161  5d                                pop     bp
  159.  0162  cb                                retf    
  160.  0163                    COUNTRFN:
  161.  0163  55                TSUNTH_002      push    bp
  162.  0164  89 e5                             mov     bp,sp
  163.  0166  b8 16 00                          mov     ax,0016H
  164.  0169  9a 00 00 00 00                    call    far SYSTEM_034
  165.  016e  83 ec 16                          sub     sp,0016H
  166.  0171  31 c0                             xor     ax,ax
  167.  0173  89 46 fe                          mov     -2H[bp],ax
  168.  0176  8d 7e ea                          lea     di,-16H[bp]
  169.  0179  16                                push    ss
  170.  017a  57                                push    di
  171.  017b  b8 14 00                          mov     ax,0014H
  172.  017e  50                                push    ax
  173.  017f  b0 00                             mov     al,00H
  174.  0181  50                                push    ax
  175.  0182  9a 00 00 00 00                    call    far SYSTEM_05C
  176.  0187  c7 46 ea 00 38                    mov     word ptr -16H[bp],3800H
  177.  018c  b0 21                             mov     al,21H
  178.  018e  50                                push    ax
  179.  018f  8d 7e ea                          lea     di,-16H[bp]
  180.  0192  16                                push    ss
  181.  0193  57                                push    di
  182.  0194  9a 00 00 00 00                    call    far DOS_001
  183.  0199  8b 46 fc                          mov     ax,-4H[bp]
  184.  019c  25 01 00                          and     ax,0001H
  185.  019f  09 c0                             or      ax,ax
  186.  01a1  76 02                             jbe     L7
  187.  01a3  eb 11                             jmp     L9
  188.  01a5  9a 00 00 00 00    L7              call    far TSUNT45_001
  189.  01aa  3c 03                             cmp     al,03H
  190.  01ac  73 02                             jae     L8
  191.  01ae  eb 06                             jmp     L9
  192.  01b0  8b 46 ec          L8              mov     ax,-14H[bp]
  193.  01b3  89 46 fe                          mov     -2H[bp],ax
  194.  01b6  8b 46 fe          L9              mov     ax,-2H[bp]
  195.  01b9  89 ec                             mov     sp,bp
  196.  01bb  5d                                pop     bp
  197.  01bc  cb                                retf    
  198.  01bd                    ISMOUSFN:
  199.  01bd  55                TSUNTH_008      push    bp
  200.  01be  89 e5                             mov     bp,sp
  201.  01c0  b8 19 00                          mov     ax,0019H
  202.  01c3  9a 00 00 00 00                    call    far SYSTEM_034
  203.  01c8  83 ec 19                          sub     sp,0019H
  204.  01cb  b0 33                             mov     al,33H
  205.  01cd  50                                push    ax
  206.  01ce  8d 7e e7                          lea     di,-19H[bp]
  207.  01d1  16                                push    ss
  208.  01d2  57                                push    di
  209.  01d3  9a 00 00 00 00                    call    far DOS_011
  210.  01d8  8b 46 e7                          mov     ax,-19H[bp]
  211.  01db  0b 46 e9                          or      ax,-17H[bp]
  212.  01de  75 06                             jne     L10
  213.  01e0  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  214.  01e4  eb 2e                             jmp     L12
  215.  01e6  8d 7e eb          L10             lea     di,-15H[bp]
  216.  01e9  16                                push    ss
  217.  01ea  57                                push    di
  218.  01eb  b8 14 00                          mov     ax,0014H
  219.  01ee  50                                push    ax
  220.  01ef  b0 00                             mov     al,00H
  221.  01f1  50                                push    ax
  222.  01f2  9a 00 00 00 00                    call    far SYSTEM_05C
  223.  01f7  b0 33                             mov     al,33H
  224.  01f9  50                                push    ax
  225.  01fa  8d 7e eb                          lea     di,-15H[bp]
  226.  01fd  16                                push    ss
  227.  01fe  57                                push    di
  228.  01ff  9a 00 00 00 00                    call    far DOS_001
  229.  0204  83 7e eb 00                       cmp     word ptr -15H[bp],0000H
  230.  0208  75 06                             jne     L11
  231.  020a  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  232.  020e  eb 04                             jmp     L12
  233.  0210  c6 46 ff 01       L11             mov     byte ptr -1H[bp],01H
  234.  0214  8a 46 ff          L12             mov     al,-1H[bp]
  235.  0217  89 ec                             mov     sp,bp
  236.  0219  5d                                pop     bp
  237.  021a  cb                                retf    
  238.  021b                    MOUSTAFN:
  239.  021b  55                TSUNTH_009      push    bp
  240.  021c  89 e5                             mov     bp,sp
  241.  021e  b8 19 00                          mov     ax,0019H
  242.  0221  9a 00 00 00 00                    call    far SYSTEM_034
  243.  0226  83 ec 19                          sub     sp,0019H
  244.  0229  b0 33                             mov     al,33H
  245.  022b  50                                push    ax
  246.  022c  8d 7e e7                          lea     di,-19H[bp]
  247.  022f  16                                push    ss
  248.  0230  57                                push    di
  249.  0231  9a 00 00 00 00                    call    far DOS_011
  250.  0236  8b 46 e7                          mov     ax,-19H[bp]
  251.  0239  0b 46 e9                          or      ax,-17H[bp]
  252.  023c  75 06                             jne     L13
  253.  023e  c6 46 ff 04                       mov     byte ptr -1H[bp],04H
  254.  0242  eb 52                             jmp     L19
  255.  0244  8d 7e eb          L13             lea     di,-15H[bp]
  256.  0247  16                                push    ss
  257.  0248  57                                push    di
  258.  0249  b8 14 00                          mov     ax,0014H
  259.  024c  50                                push    ax
  260.  024d  b0 00                             mov     al,00H
  261.  024f  50                                push    ax
  262.  0250  9a 00 00 00 00                    call    far SYSTEM_05C
  263.  0255  b0 33                             mov     al,33H
  264.  0257  50                                push    ax
  265.  0258  8d 7e eb                          lea     di,-15H[bp]
  266.  025b  16                                push    ss
  267.  025c  57                                push    di
  268.  025d  9a 00 00 00 00                    call    far DOS_001
  269.  0262  83 7e eb ff                       cmp     word ptr -15H[bp],0ffffH
  270.  0266  75 2a                             jne     L18
  271.  0268  83 7e ed 00                       cmp     word ptr -13H[bp],0000H
  272.  026c  75 06                             jne     L14
  273.  026e  c6 46 ff 01                       mov     byte ptr -1H[bp],01H
  274.  0272  eb 1c                             jmp     L17
  275.  0274  83 7e ed 02       L14             cmp     word ptr -13H[bp],0002H
  276.  0278  75 06                             jne     L15
  277.  027a  c6 46 ff 02                       mov     byte ptr -1H[bp],02H
  278.  027e  eb 10                             jmp     L17
  279.  0280  83 7e ed 03       L15             cmp     word ptr -13H[bp],0003H
  280.  0284  75 06                             jne     L16
  281.  0286  c6 46 ff 03                       mov     byte ptr -1H[bp],03H
  282.  028a  eb 04                             jmp     L17
  283.  028c  c6 46 ff 04       L16             mov     byte ptr -1H[bp],04H
  284.  0290  eb 04             L17             jmp     L19
  285.  0292  c6 46 ff 00       L18             mov     byte ptr -1H[bp],00H
  286.  0296  8a 46 ff          L19             mov     al,-1H[bp]
  287.  0299  89 ec                             mov     sp,bp
  288.  029b  5d                                pop     bp
  289.  029c  cb                                retf    
  290.  029d  55                TSUNTH_012      push    bp
  291.  029e  89 e5                             mov     bp,sp
  292.  02a0  b8 01 00                          mov     ax,0001H
  293.  02a3  9a 00 00 00 00                    call    far SYSTEM_034
  294.  02a8  83 ec 01                          sub     sp,0001H
  295.  02ab  9c                                pushf   
  296.  02ac  51                                push    cx
  297.  02ad  52                                push    dx
  298.  02ae  57                                push    di
  299.  02af  56                                push    si
  300.  02b0  06                                push    es
  301.  02b1  33 c0                             xor     ax,ax
  302.  02b3  50                                push    ax
  303.  02b4  9d                                popf    
  304.  02b5  9c                                pushf   
  305.  02b6  58                                pop     ax
  306.  02b7  25 00 f0                          and     ax,0f000H
  307.  02ba  3d 00 f0                          cmp     ax,0f000H
  308.  02bd  74 13                             je      L20
  309.  02bf  b2 06                             mov     dl,06H
  310.  02c1  b8 00 70                          mov     ax,7000H
  311.  02c4  50                                push    ax
  312.  02c5  9d                                popf    
  313.  02c6  9c                                pushf   
  314.  02c7  58                                pop     ax
  315.  02c8  25 00 70                          and     ax,7000H
  316.  02cb  74 36                             je      L23
  317.  02cd  fe c2                             inc     dl
  318.  02cf  eb 32                             jmp     L23
  319.  02d1  90                                nop     
  320.  02d2  b2 04             L20             mov     dl,04H
  321.  02d4  b0 ff                             mov     al,0ffH
  322.  02d6  b1 21                             mov     cl,21H
  323.  02d8  d2 e8                             shr     al,cl
  324.  02da  75 12                             jne     L21
  325.  02dc  b2 02                             mov     dl,02H
  326.  02de  fb                                sti     
  327.  02df  be 00 00                          mov     si,0000H
  328.  02e2  b9 ff ff                          mov     cx,0ffffH
  329.  02e5  f3 26 ac                          repe    lods     byte ptr es:[si]
  330.  02e8  0b c9                             or      cx,cx
  331.  02ea  74 02                             je      L21
  332.  02ec  b2 00                             mov     dl,00H
  333.  02ee  0e                L21             push    cs
  334.  02ef  07                                pop     es
  335.  02f0  fd                                std     
  336.  02f1  b0 fb                             mov     al,0fbH
  337.  02f3  b9 03 00                          mov     cx,0003H
  338.  02f6  e8 16 00                          call    L24
  339.  02f9  fa                L22             cli     
  340.  02fa  f3 aa                             repe    stosb    
  341.  02fc  fc                                cld     
  342.  02fd  90                                nop     
  343.  02fe  90                                nop     
  344.  02ff  90                                nop     
  345.  0300  42                                inc     dx
  346.  0301  90                                nop     
  347.  0302  fb                                sti     
  348.  0303  88 56 ff          L23             mov     -1H[bp],dl
  349.  0306  07                                pop     es
  350.  0307  5e                                pop     si
  351.  0308  5f                                pop     di
  352.  0309  5a                                pop     dx
  353.  030a  59                                pop     cx
  354.  030b  9d                                popf    
  355.  030c  eb 07                             jmp     L25
  356.  030e  90                                nop     
  357.  030f  5f                L24             pop     di
  358.  0310  83 c7 09                          add     di,0009H
  359.  0313  eb e4                             jmp     L22
  360.  0315  8a 46 ff          L25             mov     al,-1H[bp]
  361.  0318  89 ec                             mov     sp,bp
  362.  031a  5d                                pop     bp
  363.  031b  c2 02 00                          ret     0002H
  364.  031e  04 38             L26             add     al,38H
  365.  0320  30 38                             xor     [bx+si],bh
  366.  0322  38 04                             cmp     [si],al
  367.  0324  38 30                             cmp     [bx+si],dh
  368.  0326  38 36 03 56                       cmp     [00005603H],dh
  369.  032a  32 30                             xor     dh,[bx+si]
  370.  032c  03 56 33          L29             add     dx,+33H[bp]
  371.  032f  30 05                             xor     [di],al
  372.  0331  38 30                             cmp     [bx+si],dh
  373.  0333  31 38                             xor     [bx+si],di
  374.  0335  38 05                             cmp     [di],al
  375.  0337  38 30                             cmp     [bx+si],dh
  376.  0339  31 38                             xor     [bx+si],di
  377.  033b  36 05 38 30                       add     ax,3038H
  378.  033f  32 38                             xor     bh,[bx+si]
  379.  0341  36 0e                             push    cs
  380.  0343  38 30                             cmp     [bx+si],dh
  381.  0345  33 38                             xor     di,[bx+si]
  382.  0347  36 20 6f 72                       and     ss:+72H[bx],ch
  383.  034b  20 38                             and     [bx+si],bh
  384.  034d  30 34                             xor     [si],dh
  385.  034f  38 36 05 65                       cmp     [00006505H],dh
  386.  0353  72 72                             jb      L39
  387.  0355  6f                                outsw   
  388.  0356  72 55                             jb      L37
  389.  0358  89 e5                             mov     bp,sp
  390.  035a  31 c0                             xor     ax,ax
  391.  035c  9a 00 00 00 00                    call    far SYSTEM_034
  392.  0361  55                                push    bp
  393.  0362  e8 00 00                          call    TSUNTH_012
  394.  0365  30 e4                             xor     ah,ah
  395.  0367  3d 00 00                          cmp     ax,0000H
  396.  036a  75 16                             jne     L35
  397.  036c  bf 00 00                          mov     di,offset L26
  398.  036f  0e                                push    cs
  399.  0370  57                                push    di
  400.  0371  c4 7e 06                          les     di,dword ptr +6H[bp]
  401.  0374  06                                push    es
  402.  0375  57                                push    di
  403.  0376  b8 ff 00                          mov     ax,00ffH
  404.  0379  50                                push    ax
  405.  037a  9a 00 00 00 00                    call    far SYSTEM_00C
  406.  037f  e9 cb 00                          jmp     L45
  407.  0382  3d 01 00          L35             cmp     ax,0001H
  408.  0385  75 16                             jne     L36
  409.  0387  bf 00 00                          mov     di,offset L27
  410.  038a  0e                                push    cs
  411.  038b  57                                push    di
  412.  038c  c4 7e 06                          les     di,dword ptr +6H[bp]
  413.  038f  06                                push    es
  414.  0390  57                                push    di
  415.  0391  b8 ff 00                          mov     ax,00ffH
  416.  0394  50                                push    ax
  417.  0395  9a 00 00 00 00                    call    far SYSTEM_00C
  418.  039a  e9 b0 00                          jmp     L45
  419.  039d  3d 02 00          L36             cmp     ax,0002H
  420.  03a0  75 16                             jne     L38
  421.  03a2  bf 00 00                          mov     di,offset L28
  422.  03a5  0e                                push    cs
  423.  03a6  57                                push    di
  424.  03a7  c4 7e 06                          les     di,dword ptr +6H[bp]
  425.  03aa  06                                push    es
  426.  03ab  57                                push    di
  427.  03ac  b8 ff 00                          mov     ax,00ffH
  428.  03af  50                                push    ax
  429.  03b0  9a 00 00 00 00                    call    far SYSTEM_00C
  430.  03b5  e9 95 00                          jmp     L45
  431.  03b8  3d 03 00          L38             cmp     ax,0003H
  432.  03bb  75 15                             jne     L40
  433.  03bd  bf 00 00                          mov     di,offset L29
  434.  03c0  0e                                push    cs
  435.  03c1  57                                push    di
  436.  03c2  c4 7e 06                          les     di,dword ptr +6H[bp]
  437.  03c5  06                                push    es
  438.  03c6  57                                push    di
  439.  03c7  b8 ff 00          L39             mov     ax,00ffH
  440.  03ca  50                                push    ax
  441.  03cb  9a 00 00 00 00                    call    far SYSTEM_00C
  442.  03d0  eb 7b                             jmp     L45
  443.  03d2  3d 04 00          L40             cmp     ax,0004H
  444.  03d5  75 15                             jne     L41
  445.  03d7  bf 00 00                          mov     di,offset L30
  446.  03da  0e                                push    cs
  447.  03db  57                                push    di
  448.  03dc  c4 7e 06                          les     di,dword ptr +6H[bp]
  449.  03df  06                                push    es
  450.  03e0  57                                push    di
  451.  03e1  b8 ff 00                          mov     ax,00ffH
  452.  03e4  50                                push    ax
  453.  03e5  9a 00 00 00 00                    call    far SYSTEM_00C
  454.  03ea  eb 61                             jmp     L45
  455.  03ec  3d 05 00          L41             cmp     ax,0005H
  456.  03ef  75 15                             jne     L42
  457.  03f1  bf 00 00                          mov     di,offset L31
  458.  03f4  0e                                push    cs
  459.  03f5  57                                push    di
  460.  03f6  c4 7e 06                          les     di,dword ptr +6H[bp]
  461.  03f9  06                                push    es
  462.  03fa  57                                push    di
  463.  03fb  b8 ff 00                          mov     ax,00ffH
  464.  03fe  50                                push    ax
  465.  03ff  9a 00 00 00 00                    call    far SYSTEM_00C
  466.  0404  eb 47                             jmp     L45
  467.  0406  3d 06 00          L42             cmp     ax,0006H
  468.  0409  75 15                             jne     L43
  469.  040b  bf 00 00                          mov     di,offset L32
  470.  040e  0e                                push    cs
  471.  040f  57                                push    di
  472.  0410  c4 7e 06                          les     di,dword ptr +6H[bp]
  473.  0413  06                                push    es
  474.  0414  57                                push    di
  475.  0415  b8 ff 00                          mov     ax,00ffH
  476.  0418  50                                push    ax
  477.  0419  9a 00 00 00 00                    call    far SYSTEM_00C
  478.  041e  eb 2d                             jmp     L45
  479.  0420  3d 07 00          L43             cmp     ax,0007H
  480.  0423  75 15                             jne     L44
  481.  0425  bf 00 00                          mov     di,offset L33
  482.  0428  0e                                push    cs
  483.  0429  57                                push    di
  484.  042a  c4 7e 06                          les     di,dword ptr +6H[bp]
  485.  042d  06                                push    es
  486.  042e  57                                push    di
  487.  042f  b8 ff 00                          mov     ax,00ffH
  488.  0432  50                                push    ax
  489.  0433  9a 00 00 00 00                    call    far SYSTEM_00C
  490.  0438  eb 13                             jmp     L45
  491.  043a  bf 00 00          L44             mov     di,offset L34
  492.  043d  0e                                push    cs
  493.  043e  57                                push    di
  494.  043f  c4 7e 06                          les     di,dword ptr +6H[bp]
  495.  0442  06                                push    es
  496.  0443  57                                push    di
  497.  0444  b8 ff 00                          mov     ax,00ffH
  498.  0447  50                                push    ax
  499.  0448  9a 00 00 00 00                    call    far SYSTEM_00C
  500.  044d  89 ec             L45             mov     sp,bp
  501.  044f  5d                                pop     bp
  502.  0450  cb                                retf    
  503.  0451  08 4e 6f          L46             or      +6fH[bp],cl
  504.  0454  74 4b                             je      L49
  505.  0456  6e                                outsb   
  506.  0457  6f                                outsw   
  507.  0458  77 6e                             ja      L51
  508.  045a                    ROMDTEFN:
  509.  045a  55                TSUNTH_00B      push    bp
  510.  045b  89 e5                             mov     bp,sp
  511.  045d  b8 22 01                          mov     ax,0122H
  512.  0460  9a 00 00 00 00                    call    far SYSTEM_034
  513.  0465  81 ec 22 01                       sub     sp,0122H
  514.  0469  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  515.  046d  c6 46 fe 00                       mov     byte ptr -2H[bp],00H
  516.  0471  eb 03                             jmp     L48
  517.  0473  fe 46 fe          L47             inc     byte ptr -2H[bp]
  518.  0476  b8 00 f0          L48             mov     ax,0f000H
  519.  0479  50                                push    ax
  520.  047a  8a 46 fe                          mov     al,-2H[bp]
  521.  047d  30 e4                             xor     ah,ah
  522.  047f  05 f5 ff                          add     ax,0fff5H
  523.  0482  8b f8                             mov     di,ax
  524.  0484  07                                pop     es
  525.  0485  26 8a 15                          mov     dl,es:[di]
  526.  0488  8a 46 fe                          mov     al,-2H[bp]
  527.  048b  30 e4                             xor     ah,ah
  528.  048d  40                                inc     ax
  529.  048e  8b f8                             mov     di,ax
  530.  0490  88 93 fe fe                       mov     -102H[bp+di],dl
  531.  0494  8a 46 fe                          mov     al,-2H[bp]
  532.  0497  30 e4                             xor     ah,ah
  533.  0499  40                                inc     ax
  534.  049a  8b f8                             mov     di,ax
  535.  049c  8a 83 fe fe                       mov     al,-102H[bp+di]
  536.  04a0  50                                push    ax
  537.  04a1  8d be de fe       L49             lea     di,-122H[bp]
  538.  04a5  16                                push    ss
  539.  04a6  57                                push    di
  540.  04a7  9a 00 00 00 00                    call    far SYSTEM_028
  541.  04ac  b0 30                             mov     al,30H
  542.  04ae  50                                push    ax
  543.  04af  b0 39                             mov     al,39H
  544.  04b1  50                                push    ax
  545.  04b2  9a 00 00 00 00                    call    far SYSTEM_02A
  546.  04b7  9a 00 00 00 00                    call    far SYSTEM_018
  547.  04bc  74 09                             je      L50
  548.  04be  8a 46 ff                          mov     al,-1H[bp]
  549.  04c1  30 e4                             xor     ah,ah
  550.  04c3  40                                inc     ax
  551.  04c4  88 46 ff                          mov     -1H[bp],al
  552.  04c7  80 7e fe 07       L50             cmp     byte ptr -2H[bp],07H
  553.  04cb  75 a6                             jne     L47
  554.  04cd  80 7e ff 06                       cmp     byte ptr -1H[bp],06H
  555.  04d1  75 07                             jne     L52
  556.  04d3  c6 86 fe fe 08                    mov     byte ptr -102H[bp],08H
  557.  04d8  eb 14                             jmp     L53
  558.  04da  bf 00 00          L52             mov     di,offset L46
  559.  04dd  0e                                push    cs
  560.  04de  57                                push    di
  561.  04df  8d be fe fe                       lea     di,-102H[bp]
  562.  04e3  16                                push    ss
  563.  04e4  57                                push    di
  564.  04e5  b8 ff 00                          mov     ax,00ffH
  565.  04e8  50                                push    ax
  566.  04e9  9a 00 00 00 00                    call    far SYSTEM_00C
  567.  04ee  8d be fe fe       L53             lea     di,-102H[bp]
  568.  04f2  16                                push    ss
  569.  04f3  57                                push    di
  570.  04f4  c4 7e 06                          les     di,dword ptr +6H[bp]
  571.  04f7  06                                push    es
  572.  04f8  57                                push    di
  573.  04f9  b8 ff 00                          mov     ax,00ffH
  574.  04fc  50                                push    ax
  575.  04fd  9a 00 00 00 00                    call    far SYSTEM_00C
  576.  0502  89 ec                             mov     sp,bp
  577.  0504  5d                                pop     bp
  578.  0505  cb                                retf    
  579.  0506                    ISENHAFN:
  580.  0506  55                TSUNTH_00C      push    bp
  581.  0507  89 e5                             mov     bp,sp
  582.  0509  b8 01 00                          mov     ax,0001H
  583.  050c  9a 00 00 00 00                    call    far SYSTEM_034
  584.  0511  83 ec 01                          sub     sp,0001H
  585.  0514  be 40 00                          mov     si,0040H
  586.  0517  8e c6                             mov     es,si
  587.  0519  26 a0 96 00                       mov     al,es:[00000096H]
  588.  051d  30 e4                             xor     ah,ah
  589.  051f  b9 04 00                          mov     cx,0004H
  590.  0522  d3 e8                             shr     ax,cl
  591.  0524  25 01 00                          and     ax,0001H
  592.  0527  3d 01 00                          cmp     ax,0001H
  593.  052a  74 04                             je      L54
  594.  052c  b0 00                             mov     al,00H
  595.  052e  eb 02                             jmp     L55
  596.  0530  b0 01             L54             mov     al,01H
  597.  0532  88 46 ff          L55             mov     -1H[bp],al
  598.  0535  8a 46 ff                          mov     al,-1H[bp]
  599.  0538  89 ec                             mov     sp,bp
  600.  053a  5d                                pop     bp
  601.  053b  cb                                retf    
  602.  053c                    LASTDRFN:
  603.  053c  55                TSUNTH_00D      push    bp
  604.  053d  89 e5                             mov     bp,sp
  605.  053f  b8 1b 00                          mov     ax,001bH
  606.  0542  9a 00 00 00 00                    call    far SYSTEM_034
  607.  0547  83 ec 1b                          sub     sp,001bH
  608.  054a  8d 7e eb                          lea     di,-15H[bp]
  609.  054d  16                                push    ss
  610.  054e  57                                push    di
  611.  054f  b8 14 00                          mov     ax,0014H
  612.  0552  50                                push    ax
  613.  0553  b0 00                             mov     al,00H
  614.  0555  50                                push    ax
  615.  0556  9a 00 00 00 00                    call    far SYSTEM_05C
  616.  055b  c6 46 ec 52                       mov     byte ptr -14H[bp],52H
  617.  055f  8d 7e eb                          lea     di,-15H[bp]
  618.  0562  16                                push    ss
  619.  0563  57                                push    di
  620.  0564  9a 00 00 00 00                    call    far DOS_002
  621.  0569  8b 46 ed                          mov     ax,-13H[bp]
  622.  056c  8b 56 fb                          mov     dx,-5H[bp]
  623.  056f  89 c7                             mov     di,ax
  624.  0571  8e c2                             mov     es,dx
  625.  0573  26 c4 05                          les     ax,dword ptr es:[di]
  626.  0576  8c c2                             mov     dx,es
  627.  0578  89 46 e7                          mov     -19H[bp],ax
  628.  057b  89 56 e9                          mov     -17H[bp],dx
  629.  057e  c6 46 e5 00                       mov     byte ptr -1bH[bp],00H
  630.  0582  c6 46 ff 41                       mov     byte ptr -1H[bp],41H
  631.  0586  c4 7e e7          L56             les     di,dword ptr -19H[bp]
  632.  0589  26 8a 05                          mov     al,es:[di]
  633.  058c  30 e4                             xor     ah,ah
  634.  058e  05 41 00                          add     ax,0041H
  635.  0591  88 46 ff                          mov     -1H[bp],al
  636.  0594  fe 46 e5                          inc     byte ptr -1bH[bp]
  637.  0597  c4 7e e7                          les     di,dword ptr -19H[bp]
  638.  059a  26 c4 45 18                       les     ax,dword ptr es:+18H[di]
  639.  059e  8c c2                             mov     dx,es
  640.  05a0  89 46 e7                          mov     -19H[bp],ax
  641.  05a3  89 56 e9                          mov     -17H[bp],dx
  642.  05a6  8a 46 e5                          mov     al,-1bH[bp]
  643.  05a9  3a 46 e6                          cmp     al,-1aH[bp]
  644.  05ac  77 0a                             ja      L57
  645.  05ae  c4 7e e7                          les     di,dword ptr -19H[bp]
  646.  05b1  89 f8                             mov     ax,di
  647.  05b3  3d ff ff                          cmp     ax,0ffffH
  648.  05b6  75 ce                             jne     L56
  649.  05b8  8a 46 ff          L57             mov     al,-1H[bp]
  650.  05bb  89 ec                             mov     sp,bp
  651.  05bd  5d                                pop     bp
  652.  05be  cb                                retf    
  653.  05bf                    INTERLFN:
  654.  05bf  55                TSUNTH_00E      push    bp
  655.  05c0  89 e5                             mov     bp,sp
  656.  05c2  b8 1b 00                          mov     ax,001bH
  657.  05c5  9a 00 00 00 00                    call    far SYSTEM_034
  658.  05ca  83 ec 1b                          sub     sp,001bH
  659.  05cd  8d 7e eb                          lea     di,-15H[bp]
  660.  05d0  16                                push    ss
  661.  05d1  57                                push    di
  662.  05d2  b8 14 00                          mov     ax,0014H
  663.  05d5  50                                push    ax
  664.  05d6  b0 00                             mov     al,00H
  665.  05d8  50                                push    ax
  666.  05d9  9a 00 00 00 00                    call    far SYSTEM_05C
  667.  05de  c6 46 ec 52                       mov     byte ptr -14H[bp],52H
  668.  05e2  8d 7e eb                          lea     di,-15H[bp]
  669.  05e5  16                                push    ss
  670.  05e6  57                                push    di
  671.  05e7  9a 00 00 00 00                    call    far DOS_002
  672.  05ec  8b 46 ed                          mov     ax,-13H[bp]
  673.  05ef  8b 56 fb                          mov     dx,-5H[bp]
  674.  05f2  89 c7                             mov     di,ax
  675.  05f4  8e c2                             mov     es,dx
  676.  05f6  26 c4 05                          les     ax,dword ptr es:[di]
  677.  05f9  8c c2                             mov     dx,es
  678.  05fb  89 46 e7                          mov     -19H[bp],ax
  679.  05fe  89 56 e9                          mov     -17H[bp],dx
  680.  0601  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  681.  0605  8a 46 06                          mov     al,+6H[bp]
  682.  0608  50                                push    ax
  683.  0609  9a 00 00 00 00                    call    far SYSTEM_05A
  684.  060e  88 46 06                          mov     +6H[bp],al
  685.  0611  80 7e 06 41                       cmp     byte ptr +6H[bp],41H
  686.  0615  72 06                             jb      L58
  687.  0617  80 7e 06 5a                       cmp     byte ptr +6H[bp],5aH
  688.  061b  76 02                             jbe     L59
  689.  061d  eb 3d             L58             jmp     L61
  690.  061f  8a 46 06          L59             mov     al,+6H[bp]
  691.  0622  30 e4                             xor     ah,ah
  692.  0624  2d 41 00                          sub     ax,0041H
  693.  0627  88 46 e6                          mov     -1aH[bp],al
  694.  062a  c6 46 e5 00                       mov     byte ptr -1bH[bp],00H
  695.  062e  c4 7e e7          L60             les     di,dword ptr -19H[bp]
  696.  0631  26 8a 45 04                       mov     al,es:+4H[di]
  697.  0635  88 46 ff                          mov     -1H[bp],al
  698.  0638  fe 46 e5                          inc     byte ptr -1bH[bp]
  699.  063b  c4 7e e7                          les     di,dword ptr -19H[bp]
  700.  063e  26 c4 45 18                       les     ax,dword ptr es:+18H[di]
  701.  0642  8c c2                             mov     dx,es
  702.  0644  89 46 e7                          mov     -19H[bp],ax
  703.  0647  89 56 e9                          mov     -17H[bp],dx
  704.  064a  8a 46 e5                          mov     al,-1bH[bp]
  705.  064d  3a 46 e6                          cmp     al,-1aH[bp]
  706.  0650  77 0a                             ja      L61
  707.  0652  c4 7e e7                          les     di,dword ptr -19H[bp]
  708.  0655  89 f8                             mov     ax,di
  709.  0657  3d ff ff                          cmp     ax,0ffffH
  710.  065a  75 d2                             jne     L60
  711.  065c  8a 46 ff          L61             mov     al,-1H[bp]
  712.  065f  89 ec                             mov     sp,bp
  713.  0661  5d                                pop     bp
  714.  0662  ca 02 00                          retf    0002H
  715.  0665                    FATSFN:
  716.  0665  55                TSUNTH_00F      push    bp
  717.  0666  89 e5                             mov     bp,sp
  718.  0668  b8 1b 00                          mov     ax,001bH
  719.  066b  9a 00 00 00 00                    call    far SYSTEM_034
  720.  0670  83 ec 1b                          sub     sp,001bH
  721.  0673  8d 7e eb                          lea     di,-15H[bp]
  722.  0676  16                                push    ss
  723.  0677  57                                push    di
  724.  0678  b8 14 00                          mov     ax,0014H
  725.  067b  50                                push    ax
  726.  067c  b0 00                             mov     al,00H
  727.  067e  50                                push    ax
  728.  067f  9a 00 00 00 00                    call    far SYSTEM_05C
  729.  0684  c6 46 ec 52                       mov     byte ptr -14H[bp],52H
  730.  0688  8d 7e eb                          lea     di,-15H[bp]
  731.  068b  16                                push    ss
  732.  068c  57                                push    di
  733.  068d  9a 00 00 00 00                    call    far DOS_002
  734.  0692  8b 46 ed                          mov     ax,-13H[bp]
  735.  0695  8b 56 fb                          mov     dx,-5H[bp]
  736.  0698  89 c7                             mov     di,ax
  737.  069a  8e c2                             mov     es,dx
  738.  069c  26 c4 05                          les     ax,dword ptr es:[di]
  739.  069f  8c c2                             mov     dx,es
  740.  06a1  89 46 e7                          mov     -19H[bp],ax
  741.  06a4  89 56 e9                          mov     -17H[bp],dx
  742.  06a7  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  743.  06ab  8a 46 06                          mov     al,+6H[bp]
  744.  06ae  50                                push    ax
  745.  06af  9a 00 00 00 00                    call    far SYSTEM_05A
  746.  06b4  88 46 06                          mov     +6H[bp],al
  747.  06b7  80 7e 06 41                       cmp     byte ptr +6H[bp],41H
  748.  06bb  72 06                             jb      L62
  749.  06bd  80 7e 06 5a                       cmp     byte ptr +6H[bp],5aH
  750.  06c1  76 02                             jbe     L63
  751.  06c3  eb 3d             L62             jmp     L65
  752.  06c5  8a 46 06          L63             mov     al,+6H[bp]
  753.  06c8  30 e4                             xor     ah,ah
  754.  06ca  2d 41 00                          sub     ax,0041H
  755.  06cd  88 46 e6                          mov     -1aH[bp],al
  756.  06d0  c6 46 e5 00                       mov     byte ptr -1bH[bp],00H
  757.  06d4  c4 7e e7          L64             les     di,dword ptr -19H[bp]
  758.  06d7  26 8a 45 08                       mov     al,es:+8H[di]
  759.  06db  88 46 ff                          mov     -1H[bp],al
  760.  06de  fe 46 e5                          inc     byte ptr -1bH[bp]
  761.  06e1  c4 7e e7                          les     di,dword ptr -19H[bp]
  762.  06e4  26 c4 45 18                       les     ax,dword ptr es:+18H[di]
  763.  06e8  8c c2                             mov     dx,es
  764.  06ea  89 46 e7                          mov     -19H[bp],ax
  765.  06ed  89 56 e9                          mov     -17H[bp],dx
  766.  06f0  8a 46 e5                          mov     al,-1bH[bp]
  767.  06f3  3a 46 e6                          cmp     al,-1aH[bp]
  768.  06f6  77 0a                             ja      L65
  769.  06f8  c4 7e e7                          les     di,dword ptr -19H[bp]
  770.  06fb  89 f8                             mov     ax,di
  771.  06fd  3d ff ff                          cmp     ax,0ffffH
  772.  0700  75 d2                             jne     L64
  773.  0702  8a 46 ff          L65             mov     al,-1H[bp]
  774.  0705  89 ec                             mov     sp,bp
  775.  0707  5d                                pop     bp
  776.  0708  ca 02 00                          retf    0002H
  777.  070b                    Z2ASCFN:
  778.  070b  55                TSUNTH_011      push    bp
  779.  070c  89 e5                             mov     bp,sp
  780.  070e  b8 02 04                          mov     ax,0402H
  781.  0711  9a 00 00 00 00                    call    far SYSTEM_034
  782.  0716  81 ec 02 04                       sub     sp,0402H
  783.  071a  c4 7e 06                          les     di,dword ptr +6H[bp]
  784.  071d  06                                push    es
  785.  071e  57                                push    di
  786.  071f  8d be 00 ff                       lea     di,-100H[bp]
  787.  0723  16                                push    ss
  788.  0724  57                                push    di
  789.  0725  b8 ff 00                          mov     ax,00ffH
  790.  0728  50                                push    ax
  791.  0729  9a 00 00 00 00                    call    far SYSTEM_00C
  792.  072e  c6 86 ff fd 00                    mov     byte ptr -201H[bp],00H
  793.  0733  8a 86 00 ff                       mov     al,-100H[bp]
  794.  0737  88 86 fe fd                       mov     -202H[bp],al
  795.  073b  b0 01                             mov     al,01H
  796.  073d  3a 86 fe fd                       cmp     al,-202H[bp]
  797.  0741  77 78                             ja      L70
  798.  0743  88 86 ff fe                       mov     -101H[bp],al
  799.  0747  eb 04                             jmp     L67
  800.  0749  fe 86 ff fe       L66             inc     byte ptr -101H[bp]
  801.  074d  8a 86 ff fe       L67             mov     al,-101H[bp]
  802.  0751  30 e4                             xor     ah,ah
  803.  0753  8b f8                             mov     di,ax
  804.  0755  80 bb 00 ff 00                    cmp     byte ptr -100H[bp+di],00H
  805.  075a  76 3f                             jbe     L68
  806.  075c  8d be fe fb                       lea     di,-402H[bp]
  807.  0760  16                                push    ss
  808.  0761  57                                push    di
  809.  0762  8d be ff fd                       lea     di,-201H[bp]
  810.  0766  16                                push    ss
  811.  0767  57                                push    di
  812.  0768  9a 00 00 00 00                    call    far SYSTEM_00B
  813.  076d  8d be fe fc                       lea     di,-302H[bp]
  814.  0771  16                                push    ss
  815.  0772  57                                push    di
  816.  0773  8a 86 ff fe                       mov     al,-101H[bp]
  817.  0777  30 e4                             xor     ah,ah
  818.  0779  8b f8                             mov     di,ax
  819.  077b  8a 83 00 ff                       mov     al,-100H[bp+di]
  820.  077f  50                                push    ax
  821.  0780  9a 00 00 00 00                    call    far SYSTEM_012
  822.  0785  9a 00 00 00 00                    call    far SYSTEM_00F
  823.  078a  8d be ff fd                       lea     di,-201H[bp]
  824.  078e  16                                push    ss
  825.  078f  57                                push    di
  826.  0790  b8 ff 00                          mov     ax,00ffH
  827.  0793  50                                push    ax
  828.  0794  9a 00 00 00 00                    call    far SYSTEM_00C
  829.  0799  eb 16                             jmp     L69
  830.  079b  8d be ff fd       L68             lea     di,-201H[bp]
  831.  079f  16                                push    ss
  832.  07a0  57                                push    di
  833.  07a1  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  834.  07a4  06                                push    es
  835.  07a5  57                                push    di
  836.  07a6  b8 ff 00                          mov     ax,00ffH
  837.  07a9  50                                push    ax
  838.  07aa  9a 00 00 00 00                    call    far SYSTEM_00C
  839.  07af  eb 1e                             jmp     L71
  840.  07b1  8a 86 ff fe       L69             mov     al,-101H[bp]
  841.  07b5  3a 86 fe fd                       cmp     al,-202H[bp]
  842.  07b9  75 8e                             jne     L66
  843.  07bb  8d be ff fd       L70             lea     di,-201H[bp]
  844.  07bf  16                                push    ss
  845.  07c0  57                                push    di
  846.  07c1  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  847.  07c4  06                                push    es
  848.  07c5  57                                push    di
  849.  07c6  b8 ff 00                          mov     ax,00ffH
  850.  07c9  50                                push    ax
  851.  07ca  9a 00 00 00 00                    call    far SYSTEM_00C
  852.  07cf  89 ec             L71             mov     sp,bp
  853.  07d1  5d                                pop     bp
  854.  07d2  ca 04 00                          retf    0004H
  855.  07d5  08 58 58          L72             or      +58H[bx+si],bl
  856.  07d8  2a 58 58                          sub     bl,+58H[bx+si]
  857.  07db  2a 58 58                          sub     bl,+58H[bx+si]
  858.  07de  02 4d 4d          L73             add     cl,+4dH[di]
  859.  07e1  02 44 44          L74             add     al,+44H[si]
  860.  07e4  02 59 59          L75             add     bl,+59H[bx+di]
  861.  07e7                    DATEFMFN:
  862.  07e7  55                TSUNTH_003      push    bp
  863.  07e8  89 e5                             mov     bp,sp
  864.  07ea  b8 37 03                          mov     ax,0337H
  865.  07ed  9a 00 00 00 00                    call    far SYSTEM_034
  866.  07f2  81 ec 37 03                       sub     sp,0337H
  867.  07f6  bf 00 00                          mov     di,offset L72
  868.  07f9  0e                                push    cs
  869.  07fa  57                                push    di
  870.  07fb  c4 7e 06                          les     di,dword ptr +6H[bp]
  871.  07fe  06                                push    es
  872.  07ff  57                                push    di
  873.  0800  b8 ff 00                          mov     ax,00ffH
  874.  0803  50                                push    ax
  875.  0804  9a 00 00 00 00                    call    far SYSTEM_00C
  876.  0809  9a 00 00 00 00                    call    far TSUNT45_001
  877.  080e  86 c4                             xchg    al,ah
  878.  0810  3d 00 03                          cmp     ax,0300H
  879.  0813  73 03                             jae     L76
  880.  0815  e9 9b 01                          jmp     L82
  881.  0818  8d 7e ec          L76             lea     di,-14H[bp]
  882.  081b  16                                push    ss
  883.  081c  57                                push    di
  884.  081d  b8 14 00                          mov     ax,0014H
  885.  0820  50                                push    ax
  886.  0821  b0 00                             mov     al,00H
  887.  0823  50                                push    ax
  888.  0824  9a 00 00 00 00                    call    far SYSTEM_05C
  889.  0829  c7 46 ec 00 38                    mov     word ptr -14H[bp],3800H
  890.  082e  8c d0                             mov     ax,ss
  891.  0830  89 46 fa                          mov     -6H[bp],ax
  892.  0833  8d 46 ca                          lea     ax,-36H[bp]
  893.  0836  89 46 f2                          mov     -0eH[bp],ax
  894.  0839  8d 7e ec                          lea     di,-14H[bp]
  895.  083c  16                                push    ss
  896.  083d  57                                push    di
  897.  083e  9a 00 00 00 00                    call    far DOS_002
  898.  0843  8b 46 fe                          mov     ax,-2H[bp]
  899.  0846  25 01 00                          and     ax,0001H
  900.  0849  09 c0                             or      ax,ax
  901.  084b  76 03                             jbe     L77
  902.  084d  e9 63 01                          jmp     L82
  903.  0850  c6 86 ca fe 00    L77             mov     byte ptr -136H[bp],00H
  904.  0855  c6 86 c9 fe 0b                    mov     byte ptr -137H[bp],0bH
  905.  085a  eb 04                             jmp     L79
  906.  085c  fe 86 c9 fe       L78             inc     byte ptr -137H[bp]
  907.  0860  8d be c9 fc       L79             lea     di,-337H[bp]
  908.  0864  16                                push    ss
  909.  0865  57                                push    di
  910.  0866  8d be ca fe                       lea     di,-136H[bp]
  911.  086a  16                                push    ss
  912.  086b  57                                push    di
  913.  086c  9a 00 00 00 00                    call    far SYSTEM_00B
  914.  0871  8d be c9 fd                       lea     di,-237H[bp]
  915.  0875  16                                push    ss
  916.  0876  57                                push    di
  917.  0877  8a 86 c9 fe                       mov     al,-137H[bp]
  918.  087b  30 e4                             xor     ah,ah
  919.  087d  8b f8                             mov     di,ax
  920.  087f  8a 43 ca                          mov     al,-36H[bp+di]
  921.  0882  50                                push    ax
  922.  0883  9a 00 00 00 00                    call    far SYSTEM_012
  923.  0888  9a 00 00 00 00                    call    far SYSTEM_00F
  924.  088d  8d be ca fe                       lea     di,-136H[bp]
  925.  0891  16                                push    ss
  926.  0892  57                                push    di
  927.  0893  b8 ff 00                          mov     ax,00ffH
  928.  0896  50                                push    ax
  929.  0897  9a 00 00 00 00                    call    far SYSTEM_00C
  930.  089c  80 be c9 fe 0c                    cmp     byte ptr -137H[bp],0cH
  931.  08a1  75 b9                             jne     L78
  932.  08a3  8d be c9 fd                       lea     di,-237H[bp]
  933.  08a7  16                                push    ss
  934.  08a8  57                                push    di
  935.  08a9  8d be ca fe                       lea     di,-136H[bp]
  936.  08ad  16                                push    ss
  937.  08ae  57                                push    di
  938.  08af  0e                                push    cs
  939.  08b0  e8 00 00                          call    TSUNTH_011
  940.  08b3  8d be ca fe                       lea     di,-136H[bp]
  941.  08b7  16                                push    ss
  942.  08b8  57                                push    di
  943.  08b9  b8 ff 00                          mov     ax,00ffH
  944.  08bc  50                                push    ax
  945.  08bd  9a 00 00 00 00                    call    far SYSTEM_00C
  946.  08c2  8a 46 ca                          mov     al,-36H[bp]
  947.  08c5  30 e4                             xor     ah,ah
  948.  08c7  3d 00 00                          cmp     ax,0000H
  949.  08ca  75 4b                             jne     L80
  950.  08cc  8d be c9 fd                       lea     di,-237H[bp]
  951.  08d0  16                                push    ss
  952.  08d1  57                                push    di
  953.  08d2  bf 00 00                          mov     di,offset L73
  954.  08d5  0e                                push    cs
  955.  08d6  57                                push    di
  956.  08d7  9a 00 00 00 00                    call    far SYSTEM_00B
  957.  08dc  8d be ca fe                       lea     di,-136H[bp]
  958.  08e0  16                                push    ss
  959.  08e1  57                                push    di
  960.  08e2  9a 00 00 00 00                    call    far SYSTEM_00F
  961.  08e7  bf 00 00                          mov     di,offset L74
  962.  08ea  0e                                push    cs
  963.  08eb  57                                push    di
  964.  08ec  9a 00 00 00 00                    call    far SYSTEM_00F
  965.  08f1  8d be ca fe                       lea     di,-136H[bp]
  966.  08f5  16                                push    ss
  967.  08f6  57                                push    di
  968.  08f7  9a 00 00 00 00                    call    far SYSTEM_00F
  969.  08fc  bf 00 00                          mov     di,offset L75
  970.  08ff  0e                                push    cs
  971.  0900  57                                push    di
  972.  0901  9a 00 00 00 00                    call    far SYSTEM_00F
  973.  0906  c4 7e 06                          les     di,dword ptr +6H[bp]
  974.  0909  06                                push    es
  975.  090a  57                                push    di
  976.  090b  b8 ff 00                          mov     ax,00ffH
  977.  090e  50                                push    ax
  978.  090f  9a 00 00 00 00                    call    far SYSTEM_00C
  979.  0914  e9 9c 00                          jmp     L82
  980.  0917  3d 01 00          L80             cmp     ax,0001H
  981.  091a  75 4a                             jne     L81
  982.  091c  8d be c9 fd                       lea     di,-237H[bp]
  983.  0920  16                                push    ss
  984.  0921  57                                push    di
  985.  0922  bf 00 00                          mov     di,offset L74
  986.  0925  0e                                push    cs
  987.  0926  57                                push    di
  988.  0927  9a 00 00 00 00                    call    far SYSTEM_00B
  989.  092c  8d be ca fe                       lea     di,-136H[bp]
  990.  0930  16                                push    ss
  991.  0931  57                                push    di
  992.  0932  9a 00 00 00 00                    call    far SYSTEM_00F
  993.  0937  bf 00 00                          mov     di,offset L73
  994.  093a  0e                                push    cs
  995.  093b  57                                push    di
  996.  093c  9a 00 00 00 00                    call    far SYSTEM_00F
  997.  0941  8d be ca fe                       lea     di,-136H[bp]
  998.  0945  16                                push    ss
  999.  0946  57                                push    di
  1000.  0947  9a 00 00 00 00                    call    far SYSTEM_00F
  1001.  094c  bf 00 00                          mov     di,offset L75
  1002.  094f  0e                                push    cs
  1003.  0950  57                                push    di
  1004.  0951  9a 00 00 00 00                    call    far SYSTEM_00F
  1005.  0956  c4 7e 06                          les     di,dword ptr +6H[bp]
  1006.  0959  06                                push    es
  1007.  095a  57                                push    di
  1008.  095b  b8 ff 00                          mov     ax,00ffH
  1009.  095e  50                                push    ax
  1010.  095f  9a 00 00 00 00                    call    far SYSTEM_00C
  1011.  0964  eb 4d                             jmp     L82
  1012.  0966  3d 02 00          L81             cmp     ax,0002H
  1013.  0969  75 48                             jne     L82
  1014.  096b  8d be c9 fd                       lea     di,-237H[bp]
  1015.  096f  16                                push    ss
  1016.  0970  57                                push    di
  1017.  0971  bf 00 00                          mov     di,offset L75
  1018.  0974  0e                                push    cs
  1019.  0975  57                                push    di
  1020.  0976  9a 00 00 00 00                    call    far SYSTEM_00B
  1021.  097b  8d be ca fe                       lea     di,-136H[bp]
  1022.  097f  16                                push    ss
  1023.  0980  57                                push    di
  1024.  0981  9a 00 00 00 00                    call    far SYSTEM_00F
  1025.  0986  bf 00 00                          mov     di,offset L73
  1026.  0989  0e                                push    cs
  1027.  098a  57                                push    di
  1028.  098b  9a 00 00 00 00                    call    far SYSTEM_00F
  1029.  0990  8d be ca fe                       lea     di,-136H[bp]
  1030.  0994  16                                push    ss
  1031.  0995  57                                push    di
  1032.  0996  9a 00 00 00 00                    call    far SYSTEM_00F
  1033.  099b  bf 00 00                          mov     di,offset L74
  1034.  099e  0e                                push    cs
  1035.  099f  57                                push    di
  1036.  09a0  9a 00 00 00 00                    call    far SYSTEM_00F
  1037.  09a5  c4 7e 06                          les     di,dword ptr +6H[bp]
  1038.  09a8  06                                push    es
  1039.  09a9  57                                push    di
  1040.  09aa  b8 ff 00                          mov     ax,00ffH
  1041.  09ad  50                                push    ax
  1042.  09ae  9a 00 00 00 00                    call    far SYSTEM_00C
  1043.  09b3  89 ec             L82             mov     sp,bp
  1044.  09b5  5d                                pop     bp
  1045.  09b6  cb                                retf    
  1046.  09b7  03 30             L83             add     si,[bx+si]
  1047.  09b9  30 68 07                          xor     +7H[bx+si],ch
  1048.  09bc  32 34                             xor     dh,[si]
  1049.  09be  2d 68 6f                          sub     ax,6f68H
  1050.  09c1  75 72                             jne     L90
  1051.  09c3  07                L85             pop     es
  1052.  09c4  31 32                             xor     [bp+si],si
  1053.  09c6  2d 68 6f                          sub     ax,6f68H
  1054.  09c9  75 72                             jne     L91
  1055.  09cb  03 20             L86             add     sp,[bx+si]
  1056.  09cd  48                                dec     ax
  1057.  09ce  48                                dec     ax
  1058.  09cf  02 4d 4d          L87             add     cl,+4dH[di]
  1059.  09d2  02 53 53          L88             add     dl,+53H[bp+di]
  1060.  09d5                    TIMEFMFN:
  1061.  09d5  55                TSUNTH_004      push    bp
  1062.  09d6  89 e5                             mov     bp,sp
  1063.  09d8  b8 37 04                          mov     ax,0437H
  1064.  09db  9a 00 00 00 00                    call    far SYSTEM_034
  1065.  09e0  81 ec 37 04                       sub     sp,0437H
  1066.  09e4  bf 00 00                          mov     di,offset L83
  1067.  09e7  0e                                push    cs
  1068.  09e8  57                                push    di
  1069.  09e9  c4 7e 06                          les     di,dword ptr +6H[bp]
  1070.  09ec  06                                push    es
  1071.  09ed  57                                push    di
  1072.  09ee  b8 ff 00                          mov     ax,00ffH
  1073.  09f1  50                                push    ax
  1074.  09f2  9a 00 00 00 00                    call    far SYSTEM_00C
  1075.  09f7  9a 00 00 00 00                    call    far TSUNT45_001
  1076.  09fc  86 c4                             xchg    al,ah
  1077.  09fe  3d 00 03                          cmp     ax,0300H
  1078.  0a01  73 03                             jae     L89
  1079.  0a03  e9 45 01                          jmp     L97
  1080.  0a06  8d 7e ec          L89             lea     di,-14H[bp]
  1081.  0a09  16                                push    ss
  1082.  0a0a  57                                push    di
  1083.  0a0b  b8 14 00                          mov     ax,0014H
  1084.  0a0e  50                                push    ax
  1085.  0a0f  b0 00                             mov     al,00H
  1086.  0a11  50                                push    ax
  1087.  0a12  9a 00 00 00 00                    call    far SYSTEM_05C
  1088.  0a17  c7 46 ec 00 38                    mov     word ptr -14H[bp],3800H
  1089.  0a1c  8c d0                             mov     ax,ss
  1090.  0a1e  89 46 fa                          mov     -6H[bp],ax
  1091.  0a21  8d 46 ca                          lea     ax,-36H[bp]
  1092.  0a24  89 46 f2                          mov     -0eH[bp],ax
  1093.  0a27  8d 7e ec                          lea     di,-14H[bp]
  1094.  0a2a  16                                push    ss
  1095.  0a2b  57                                push    di
  1096.  0a2c  9a 00 00 00 00                    call    far DOS_002
  1097.  0a31  8b 46 fe                          mov     ax,-2H[bp]
  1098.  0a34  25 01 00                          and     ax,0001H
  1099.  0a37  09 c0                             or      ax,ax
  1100.  0a39  76 03                             jbe     L92
  1101.  0a3b  e9 0d 01                          jmp     L97
  1102.  0a3e  8a 46 db          L92             mov     al,-25H[bp]
  1103.  0a41  24 01                             and     al,01H
  1104.  0a43  3c 01                             cmp     al,01H
  1105.  0a45  75 16                             jne     L93
  1106.  0a47  bf 00 00                          mov     di,offset L84
  1107.  0a4a  0e                                push    cs
  1108.  0a4b  57                                push    di
  1109.  0a4c  8d be ca fd                       lea     di,-236H[bp]
  1110.  0a50  16                                push    ss
  1111.  0a51  57                                push    di
  1112.  0a52  b8 ff 00                          mov     ax,00ffH
  1113.  0a55  50                                push    ax
  1114.  0a56  9a 00 00 00 00                    call    far SYSTEM_00C
  1115.  0a5b  eb 14                             jmp     L94
  1116.  0a5d  bf 00 00          L93             mov     di,offset L85
  1117.  0a60  0e                                push    cs
  1118.  0a61  57                                push    di
  1119.  0a62  8d be ca fd                       lea     di,-236H[bp]
  1120.  0a66  16                                push    ss
  1121.  0a67  57                                push    di
  1122.  0a68  b8 ff 00                          mov     ax,00ffH
  1123.  0a6b  50                                push    ax
  1124.  0a6c  9a 00 00 00 00                    call    far SYSTEM_00C
  1125.  0a71  c6 86 ca fe 00    L94             mov     byte ptr -136H[bp],00H
  1126.  0a76  c6 86 c9 fd 0d                    mov     byte ptr -237H[bp],0dH
  1127.  0a7b  eb 04                             jmp     L96
  1128.  0a7d  fe 86 c9 fd       L95             inc     byte ptr -237H[bp]
  1129.  0a81  8d be c9 fb       L96             lea     di,-437H[bp]
  1130.  0a85  16                                push    ss
  1131.  0a86  57                                push    di
  1132.  0a87  8d be ca fe                       lea     di,-136H[bp]
  1133.  0a8b  16                                push    ss
  1134.  0a8c  57                                push    di
  1135.  0a8d  9a 00 00 00 00                    call    far SYSTEM_00B
  1136.  0a92  8d be c9 fc                       lea     di,-337H[bp]
  1137.  0a96  16                                push    ss
  1138.  0a97  57                                push    di
  1139.  0a98  8a 86 c9 fd                       mov     al,-237H[bp]
  1140.  0a9c  30 e4                             xor     ah,ah
  1141.  0a9e  8b f8                             mov     di,ax
  1142.  0aa0  8a 43 ca                          mov     al,-36H[bp+di]
  1143.  0aa3  50                                push    ax
  1144.  0aa4  9a 00 00 00 00                    call    far SYSTEM_012
  1145.  0aa9  9a 00 00 00 00                    call    far SYSTEM_00F
  1146.  0aae  8d be ca fe                       lea     di,-136H[bp]
  1147.  0ab2  16                                push    ss
  1148.  0ab3  57                                push    di
  1149.  0ab4  b8 ff 00                          mov     ax,00ffH
  1150.  0ab7  50                                push    ax
  1151.  0ab8  9a 00 00 00 00                    call    far SYSTEM_00C
  1152.  0abd  80 be c9 fd 0e                    cmp     byte ptr -237H[bp],0eH
  1153.  0ac2  75 b9                             jne     L95
  1154.  0ac4  8d be c9 fc                       lea     di,-337H[bp]
  1155.  0ac8  16                                push    ss
  1156.  0ac9  57                                push    di
  1157.  0aca  8d be ca fe                       lea     di,-136H[bp]
  1158.  0ace  16                                push    ss
  1159.  0acf  57                                push    di
  1160.  0ad0  0e                                push    cs
  1161.  0ad1  e8 00 00                          call    TSUNTH_011
  1162.  0ad4  8d be ca fe                       lea     di,-136H[bp]
  1163.  0ad8  16                                push    ss
  1164.  0ad9  57                                push    di
  1165.  0ada  b8 ff 00                          mov     ax,00ffH
  1166.  0add  50                                push    ax
  1167.  0ade  9a 00 00 00 00                    call    far SYSTEM_00C
  1168.  0ae3  8d be c9 fc                       lea     di,-337H[bp]
  1169.  0ae7  16                                push    ss
  1170.  0ae8  57                                push    di
  1171.  0ae9  8d be ca fd                       lea     di,-236H[bp]
  1172.  0aed  16                                push    ss
  1173.  0aee  57                                push    di
  1174.  0aef  9a 00 00 00 00                    call    far SYSTEM_00B
  1175.  0af4  bf 00 00                          mov     di,offset L86
  1176.  0af7  0e                                push    cs
  1177.  0af8  57                                push    di
  1178.  0af9  9a 00 00 00 00                    call    far SYSTEM_00F
  1179.  0afe  8d be ca fe                       lea     di,-136H[bp]
  1180.  0b02  16                                push    ss
  1181.  0b03  57                                push    di
  1182.  0b04  9a 00 00 00 00                    call    far SYSTEM_00F
  1183.  0b09  bf 00 00                          mov     di,offset L87
  1184.  0b0c  0e                                push    cs
  1185.  0b0d  57                                push    di
  1186.  0b0e  9a 00 00 00 00                    call    far SYSTEM_00F
  1187.  0b13  8d be ca fe                       lea     di,-136H[bp]
  1188.  0b17  16                                push    ss
  1189.  0b18  57                                push    di
  1190.  0b19  9a 00 00 00 00                    call    far SYSTEM_00F
  1191.  0b1e  bf 00 00                          mov     di,offset L88
  1192.  0b21  0e                                push    cs
  1193.  0b22  57                                push    di
  1194.  0b23  9a 00 00 00 00                    call    far SYSTEM_00F
  1195.  0b28  8d be ca fd                       lea     di,-236H[bp]
  1196.  0b2c  16                                push    ss
  1197.  0b2d  57                                push    di
  1198.  0b2e  b8 ff 00                          mov     ax,00ffH
  1199.  0b31  50                                push    ax
  1200.  0b32  9a 00 00 00 00                    call    far SYSTEM_00C
  1201.  0b37  8d be ca fd                       lea     di,-236H[bp]
  1202.  0b3b  16                                push    ss
  1203.  0b3c  57                                push    di
  1204.  0b3d  c4 7e 06                          les     di,dword ptr +6H[bp]
  1205.  0b40  06                                push    es
  1206.  0b41  57                                push    di
  1207.  0b42  b8 ff 00                          mov     ax,00ffH
  1208.  0b45  50                                push    ax
  1209.  0b46  9a 00 00 00 00                    call    far SYSTEM_00C
  1210.  0b4b  89 ec             L97             mov     sp,bp
  1211.  0b4d  5d                                pop     bp
  1212.  0b4e  cb                                retf    
  1213.  0b4f                    NRCYLFN:
  1214.  0b4f  55                TSUNTH_010      push    bp
  1215.  0b50  89 e5                             mov     bp,sp
  1216.  0b52  b8 3b 00                          mov     ax,003bH
  1217.  0b55  9a 00 00 00 00                    call    far SYSTEM_034
  1218.  0b5a  83 ec 3b                          sub     sp,003bH
  1219.  0b5d  c6 46 ff 00                       mov     byte ptr -1H[bp],00H
  1220.  0b61  9a 00 00 00 00                    call    far TSUNT45_001
  1221.  0b66  86 c4                             xchg    al,ah
  1222.  0b68  3d 14 03                          cmp     ax,0314H
  1223.  0b6b  73 03                             jae     L98
  1224.  0b6d  e9 91 00                          jmp     L102
  1225.  0b70  9a 00 00 00 00    L98             call    far TSUNT45_001
  1226.  0b75  86 c4                             xchg    al,ah
  1227.  0b77  3d 00 04                          cmp     ax,0400H
  1228.  0b7a  72 03                             jb      L99
  1229.  0b7c  e9 82 00                          jmp     L102
  1230.  0b7f  8d 7e eb          L99             lea     di,-15H[bp]
  1231.  0b82  16                                push    ss
  1232.  0b83  57                                push    di
  1233.  0b84  b8 14 00                          mov     ax,0014H
  1234.  0b87  50                                push    ax
  1235.  0b88  b0 00                             mov     al,00H
  1236.  0b8a  50                                push    ax
  1237.  0b8b  9a 00 00 00 00                    call    far SYSTEM_05C
  1238.  0b90  c6 46 ec 44                       mov     byte ptr -14H[bp],44H
  1239.  0b94  c6 46 eb 0d                       mov     byte ptr -15H[bp],0dH
  1240.  0b98  8a 46 06                          mov     al,+6H[bp]
  1241.  0b9b  50                                push    ax
  1242.  0b9c  9a 00 00 00 00                    call    far SYSTEM_05A
  1243.  0ba1  88 46 06                          mov     +6H[bp],al
  1244.  0ba4  8a 46 06                          mov     al,+6H[bp]
  1245.  0ba7  50                                push    ax
  1246.  0ba8  8d 7e c5                          lea     di,-3bH[bp]
  1247.  0bab  16                                push    ss
  1248.  0bac  57                                push    di
  1249.  0bad  9a 00 00 00 00                    call    far SYSTEM_028
  1250.  0bb2  b0 41                             mov     al,41H
  1251.  0bb4  50                                push    ax
  1252.  0bb5  b0 5a                             mov     al,5aH
  1253.  0bb7  50                                push    ax
  1254.  0bb8  9a 00 00 00 00                    call    far SYSTEM_02A
  1255.  0bbd  9a 00 00 00 00                    call    far SYSTEM_018
  1256.  0bc2  75 02                             jne     L100
  1257.  0bc4  eb 3b                             jmp     L102
  1258.  0bc6  8a 46 06          L100            mov     al,+6H[bp]
  1259.  0bc9  30 e4                             xor     ah,ah
  1260.  0bcb  2d 41 00                          sub     ax,0041H
  1261.  0bce  40                                inc     ax
  1262.  0bcf  88 46 ed                          mov     -13H[bp],al
  1263.  0bd2  c6 46 f0 08                       mov     byte ptr -10H[bp],08H
  1264.  0bd6  c6 46 ef 60                       mov     byte ptr -11H[bp],60H
  1265.  0bda  8c d0                             mov     ax,ss
  1266.  0bdc  89 46 f9                          mov     -7H[bp],ax
  1267.  0bdf  8d 46 e5                          lea     ax,-1bH[bp]
  1268.  0be2  89 46 f1                          mov     -0fH[bp],ax
  1269.  0be5  8d 7e eb                          lea     di,-15H[bp]
  1270.  0be8  16                                push    ss
  1271.  0be9  57                                push    di
  1272.  0bea  9a 00 00 00 00                    call    far DOS_002
  1273.  0bef  8b 46 fd                          mov     ax,-3H[bp]
  1274.  0bf2  25 01 00                          and     ax,0001H
  1275.  0bf5  09 c0                             or      ax,ax
  1276.  0bf7  76 02                             jbe     L101
  1277.  0bf9  eb 06                             jmp     L102
  1278.  0bfb  8a 46 e9          L101            mov     al,-17H[bp]
  1279.  0bfe  88 46 ff                          mov     -1H[bp],al
  1280.  0c01  8a 46 ff          L102            mov     al,-1H[bp]
  1281.  0c04  89 ec                             mov     sp,bp
  1282.  0c06  5d                                pop     bp
  1283.  0c07  ca 02 00                          retf    0002H
  1284.  
  1285. No disassembly errors
  1286.  
  1287. ------------------------------------------------------------
  1288.  
  1289. Segment: _DATA  WORD   00000008 bytes  
  1290.  0000  66 00 3c 06 3e 66 3f 00 TSUNTH_DATA     - f.<.>f?.
  1291.  
  1292. No disassembly errors
  1293.  
  1294. ------------------------------------------------------------
  1295.