home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / help / helper / dosshell.dis < prev    next >
Encoding:
Text File  |  1994-06-19  |  29.7 KB  |  536 lines

  1.  
  2. Module: DOSSHELL.PAS
  3. Group: 'DGROUP' _DATA,_BSS
  4.  
  5. Segment: DOSSHELL_TEXT  PARA   000004bf bytes  
  6.  0000  0a 44 6f          L1              or      al,+6fH[si]
  7.  0003  73 20                             jae     L4
  8.  0005  65 72 72                          jb      L6
  9.  0008  6f                                outsw   
  10.  0009  72 20                             jb      L5
  11.  000b  03 2e 20 20       L2              add     bp,[00002020H]
  12.  000f                    CHECK_DOSERROR:
  13.  000f  55                DOSSHELL_001    push    bp
  14.  0010  89 e5                             mov     bp,sp
  15.  0012  31 c0                             xor     ax,ax
  16.  0014  9a 00 00 00 00                    call    far SYSTEM_034
  17.  0019  80 7e 06 00                       cmp     byte ptr +6H[bp],00H
  18.  001d  75 03                             jne     L3
  19.  001f  e9 c8 00                          jmp     L10
  20.  0022  bf 00 00          L3              mov     di,offset SYSTEM_BSS+100H
  21.  0025  1e                L4              push    ds
  22.  0026  57                                push    di
  23.  0027  bf 00 00                          mov     di,offset L1
  24.  002a  0e                                push    cs
  25.  002b  57                L5              push    di
  26.  002c  31 c0                             xor     ax,ax
  27.  002e  50                                push    ax
  28.  002f  9a 00 00 00 00                    call    far SYSTEM_036
  29.  0034  8a 46 06                          mov     al,+6H[bp]
  30.  0037  30 e4                             xor     ah,ah
  31.  0039  31 d2                             xor     dx,dx
  32.  003b  52                                push    dx
  33.  003c  50                                push    ax
  34.  003d  31 c0                             xor     ax,ax
  35.  003f  50                                push    ax
  36.  0040  9a 00 00 00 00                    call    far SYSTEM_037
  37.  0045  bf 00 00                          mov     di,offset L2
  38.  0048  0e                                push    cs
  39.  0049  57                                push    di
  40.  004a  31 c0                             xor     ax,ax
  41.  004c  50                                push    ax
  42.  004d  9a 00 00 00 00                    call    far SYSTEM_036
  43.  0052  9a 00 00 00 00                    call    far SYSTEM_03B
  44.  0057  9a 00 00 00 00                    call    far SYSTEM_032
  45.  005c  80 7e 06 02                       cmp     byte ptr +6H[bp],02H
  46.  0060  75 1e                             jne     L7
  47.  0062  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  48.  0065  1e                                push    ds
  49.  0066  57                                push    di
  50.  0067  bf 00 00                          mov     di,offset DOSSHELL_DATA
  51.  006a  1e                                push    ds
  52.  006b  57                                push    di
  53.  006c  31 c0                             xor     ax,ax
  54.  006e  50                                push    ax
  55.  006f  9a 00 00 00 00                    call    far SYSTEM_036
  56.  0074  9a 00 00 00 00                    call    far SYSTEM_03B
  57.  0079  9a 00 00 00 00                    call    far SYSTEM_032
  58.  007e  eb 6a                             jmp     L10
  59.  0080  80 7e 06 08       L7              cmp     byte ptr +6H[bp],08H
  60.  0084  75 1e                             jne     L8
  61.  0086  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  62.  0089  1e                                push    ds
  63.  008a  57                                push    di
  64.  008b  bf 00 00                          mov     di,offset L42
  65.  008e  1e                                push    ds
  66.  008f  57                                push    di
  67.  0090  31 c0                             xor     ax,ax
  68.  0092  50                                push    ax
  69.  0093  9a 00 00 00 00                    call    far SYSTEM_036
  70.  0098  9a 00 00 00 00                    call    far SYSTEM_03B
  71.  009d  9a 00 00 00 00                    call    far SYSTEM_032
  72.  00a2  eb 46                             jmp     L10
  73.  00a4  80 7e 06 0a       L8              cmp     byte ptr +6H[bp],0aH
  74.  00a8  75 1e                             jne     L9
  75.  00aa  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  76.  00ad  1e                                push    ds
  77.  00ae  57                                push    di
  78.  00af  bf 00 00                          mov     di,offset L43
  79.  00b2  1e                                push    ds
  80.  00b3  57                                push    di
  81.  00b4  31 c0                             xor     ax,ax
  82.  00b6  50                                push    ax
  83.  00b7  9a 00 00 00 00                    call    far SYSTEM_036
  84.  00bc  9a 00 00 00 00                    call    far SYSTEM_03B
  85.  00c1  9a 00 00 00 00                    call    far SYSTEM_032
  86.  00c6  eb 22                             jmp     L10
  87.  00c8  80 7e 06 0b       L9              cmp     byte ptr +6H[bp],0bH
  88.  00cc  75 1c                             jne     L10
  89.  00ce  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  90.  00d1  1e                                push    ds
  91.  00d2  57                                push    di
  92.  00d3  bf 00 00                          mov     di,offset L44
  93.  00d6  1e                                push    ds
  94.  00d7  57                                push    di
  95.  00d8  31 c0                             xor     ax,ax
  96.  00da  50                                push    ax
  97.  00db  9a 00 00 00 00                    call    far SYSTEM_036
  98.  00e0  9a 00 00 00 00                    call    far SYSTEM_03B
  99.  00e5  9a 00 00 00 00                    call    far SYSTEM_032
  100.  00ea  89 ec             L10             mov     sp,bp
  101.  00ec  5d                                pop     bp
  102.  00ed  ca 02 00                          retf    0002H
  103.  00f0  00 0c             L11             add     [si],cl
  104.  00f2  5c                                pop     sp
  105.  00f3  63 6f 6d                          arpl    bp,+6dH[bx]
  106.  00f6  6d                                insw    
  107.  00f7  61                                popa    
  108.  00f8  6e                                outsb   
  109.  00f9  64 2e 63 6f 6d                    arpl    bp,cs:+6dH[bx]
  110.  00fe  03 2f             L13             add     bp,[bx]
  111.  0100  43                                inc     bx
  112.  0101  20 02                             and     [bp+si],al
  113.  0103  63 3a                             arpl    di,[bp+si]
  114.  0105  02 64 3a          L15             add     ah,+3aH[si]
  115.  0108  0b 20             L16             or      sp,[bx+si]
  116.  010a  6e                                outsb   
  117.  010b  6f                                outsw   
  118.  010c  74 20                             je      L17
  119.  010e  66 6f                             outsd   
  120.  0110  75 6e                             jne     L19
  121.  0112  64 2e 55                          push    bp
  122.  0115  89 e5                             mov     bp,sp
  123.  0117  b8 00 05                          mov     ax,0500H
  124.  011a  9a 00 00 00 00                    call    far SYSTEM_034
  125.  011f  81 ec 00 05                       sub     sp,0500H
  126.  0123  c4 7e 08                          les     di,dword ptr +8H[bp]
  127.  0126  06                                push    es
  128.  0127  57                                push    di
  129.  0128  8d be 00 ff                       lea     di,-100H[bp]
  130.  012c  16                                push    ss
  131.  012d  57                                push    di
  132.  012e  b8 ff 00          L17             mov     ax,00ffH
  133.  0131  50                                push    ax
  134.  0132  9a 00 00 00 00                    call    far SYSTEM_00C
  135.  0137  c4 7e 04                          les     di,dword ptr +4H[bp]
  136.  013a  26 c6 05 01                       mov     byte ptr es:[di],01H
  137.  013e  8d be 00 ff                       lea     di,-100H[bp]
  138.  0142  16                                push    ss
  139.  0143  57                                push    di
  140.  0144  bf 00 00                          mov     di,offset L11
  141.  0147  0e                                push    cs
  142.  0148  57                                push    di
  143.  0149  9a 00 00 00 00                    call    far SYSTEM_011
  144.  014e  75 03                             jne     L18
  145.  0150  e9 57 01                          jmp     L24
  146.  0153  bf 00 00          L18             mov     di,offset L12
  147.  0156  0e                                push    cs
  148.  0157  57                                push    di
  149.  0158  9a 00 00 00 00                    call    far LIBRARY1_006
  150.  015d  08 c0                             or      al,al
  151.  015f  74 28                             je      L20
  152.  0161  bf 00 00                          mov     di,offset L12
  153.  0164  0e                                push    cs
  154.  0165  57                                push    di
  155.  0166  8d be 00 fe                       lea     di,-200H[bp]
  156.  016a  16                                push    ss
  157.  016b  57                                push    di
  158.  016c  bf 00 00                          mov     di,offset L13
  159.  016f  0e                                push    cs
  160.  0170  57                                push    di
  161.  0171  9a 00 00 00 00                    call    far SYSTEM_00B
  162.  0176  8d be 00 ff                       lea     di,-100H[bp]
  163.  017a  16                                push    ss
  164.  017b  57                                push    di
  165.  017c  9a 00 00 00 00                    call    far SYSTEM_00F
  166.  0181  9a 00 00 00 00                    call    far DOS_014
  167.  0186  e9 ea 00                          jmp     L23
  168.  0189  8d be 00 fe       L20             lea     di,-200H[bp]
  169.  018d  16                                push    ss
  170.  018e  57                                push    di
  171.  018f  bf 00 00                          mov     di,offset L14
  172.  0192  0e                                push    cs
  173.  0193  57                                push    di
  174.  0194  9a 00 00 00 00                    call    far SYSTEM_00B
  175.  0199  bf 00 00                          mov     di,offset L12
  176.  019c  0e                                push    cs
  177.  019d  57                                push    di
  178.  019e  9a 00 00 00 00                    call    far SYSTEM_00F
  179.  01a3  9a 00 00 00 00                    call    far LIBRARY1_006
  180.  01a8  08 c0                             or      al,al
  181.  01aa  74 3d                             je      L21
  182.  01ac  8d be 00 fd                       lea     di,-300H[bp]
  183.  01b0  16                                push    ss
  184.  01b1  57                                push    di
  185.  01b2  bf 00 00                          mov     di,offset L14
  186.  01b5  0e                                push    cs
  187.  01b6  57                                push    di
  188.  01b7  9a 00 00 00 00                    call    far SYSTEM_00B
  189.  01bc  bf 00 00                          mov     di,offset L12
  190.  01bf  0e                                push    cs
  191.  01c0  57                                push    di
  192.  01c1  9a 00 00 00 00                    call    far SYSTEM_00F
  193.  01c6  8d be 00 fc                       lea     di,-400H[bp]
  194.  01ca  16                                push    ss
  195.  01cb  57                                push    di
  196.  01cc  bf 00 00                          mov     di,offset L13
  197.  01cf  0e                                push    cs
  198.  01d0  57                                push    di
  199.  01d1  9a 00 00 00 00                    call    far SYSTEM_00B
  200.  01d6  8d be 00 ff                       lea     di,-100H[bp]
  201.  01da  16                                push    ss
  202.  01db  57                                push    di
  203.  01dc  9a 00 00 00 00                    call    far SYSTEM_00F
  204.  01e1  9a 00 00 00 00                    call    far DOS_014
  205.  01e6  e9 8a 00                          jmp     L23
  206.  01e9  8d be 00 fd       L21             lea     di,-300H[bp]
  207.  01ed  16                                push    ss
  208.  01ee  57                                push    di
  209.  01ef  bf 00 00                          mov     di,offset L15
  210.  01f2  0e                                push    cs
  211.  01f3  57                                push    di
  212.  01f4  9a 00 00 00 00                    call    far SYSTEM_00B
  213.  01f9  bf 00 00                          mov     di,offset L12
  214.  01fc  0e                                push    cs
  215.  01fd  57                                push    di
  216.  01fe  9a 00 00 00 00                    call    far SYSTEM_00F
  217.  0203  9a 00 00 00 00                    call    far LIBRARY1_006
  218.  0208  08 c0                             or      al,al
  219.  020a  74 3c                             je      L22
  220.  020c  8d be 00 fc                       lea     di,-400H[bp]
  221.  0210  16                                push    ss
  222.  0211  57                                push    di
  223.  0212  bf 00 00                          mov     di,offset L15
  224.  0215  0e                                push    cs
  225.  0216  57                                push    di
  226.  0217  9a 00 00 00 00                    call    far SYSTEM_00B
  227.  021c  bf 00 00                          mov     di,offset L12
  228.  021f  0e                                push    cs
  229.  0220  57                                push    di
  230.  0221  9a 00 00 00 00                    call    far SYSTEM_00F
  231.  0226  8d be 00 fb                       lea     di,-500H[bp]
  232.  022a  16                                push    ss
  233.  022b  57                                push    di
  234.  022c  bf 00 00                          mov     di,offset L13
  235.  022f  0e                                push    cs
  236.  0230  57                                push    di
  237.  0231  9a 00 00 00 00                    call    far SYSTEM_00B
  238.  0236  8d be 00 ff                       lea     di,-100H[bp]
  239.  023a  16                                push    ss
  240.  023b  57                                push    di
  241.  023c  9a 00 00 00 00                    call    far SYSTEM_00F
  242.  0241  9a 00 00 00 00                    call    far DOS_014
  243.  0246  eb 2b                             jmp     L23
  244.  0248  bf 00 00          L22             mov     di,offset SYSTEM_BSS+100H
  245.  024b  1e                                push    ds
  246.  024c  57                                push    di
  247.  024d  bf 00 00                          mov     di,offset L12
  248.  0250  0e                                push    cs
  249.  0251  57                                push    di
  250.  0252  31 c0                             xor     ax,ax
  251.  0254  50                                push    ax
  252.  0255  9a 00 00 00 00                    call    far SYSTEM_036
  253.  025a  bf 00 00                          mov     di,offset L16
  254.  025d  0e                                push    cs
  255.  025e  57                                push    di
  256.  025f  31 c0                             xor     ax,ax
  257.  0261  50                                push    ax
  258.  0262  9a 00 00 00 00                    call    far SYSTEM_036
  259.  0267  9a 00 00 00 00                    call    far SYSTEM_03B
  260.  026c  9a 00 00 00 00                    call    far SYSTEM_032
  261.  0271  eb 37                             jmp     L24
  262.  0273  a0 00 00          L23             mov     al,DOS_BSS
  263.  0276  c4 7e 04                          les     di,dword ptr +4H[bp]
  264.  0279  26 88 05                          mov     es:[di],al
  265.  027c  c4 7e 04                          les     di,dword ptr +4H[bp]
  266.  027f  26 8a 05                          mov     al,es:[di]
  267.  0282  50                                push    ax
  268.  0283  0e                                push    cs
  269.  0284  e8 00 00                          call    CHECK_DOSERROR
  270.  0287  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  271.  028a  1e                                push    ds
  272.  028b  57                                push    di
  273.  028c  9a 00 00 00 00                    call    far SYSTEM_03A
  274.  0291  9a 00 00 00 00                    call    far SYSTEM_032
  275.  0296  c4 7e 04                          les     di,dword ptr +4H[bp]
  276.  0299  26 80 3d 00                       cmp     byte ptr es:[di],00H
  277.  029d  75 0b                             jne     L24
  278.  029f  9a 00 00 00 00                    call    far DOS_015
  279.  02a4  c4 7e 04                          les     di,dword ptr +4H[bp]
  280.  02a7  26 88 05                          mov     es:[di],al
  281.  02aa  89 ec             L24             mov     sp,bp
  282.  02ac  5d                                pop     bp
  283.  02ad  c2 08 00                          ret     0008H
  284.  02b0  02 20             L25             add     ah,[bx+si]
  285.  02b2  3e 55                             push    bp
  286.  02b4  89 e5                             mov     bp,sp
  287.  02b6  b8 00 02                          mov     ax,0200H
  288.  02b9  9a 00 00 00 00                    call    far SYSTEM_034
  289.  02be  81 ec 00 02                       sub     sp,0200H
  290.  02c2  c4 7e 0a                          les     di,dword ptr +0aH[bp]
  291.  02c5  06                                push    es
  292.  02c6  57                                push    di
  293.  02c7  8d be 00 ff                       lea     di,-100H[bp]
  294.  02cb  16                                push    ss
  295.  02cc  57                                push    di
  296.  02cd  b8 ff 00                          mov     ax,00ffH
  297.  02d0  50                                push    ax
  298.  02d1  9a 00 00 00 00                    call    far SYSTEM_00C
  299.  02d6  a0 00 00                          mov     al,DOSCOLOR
  300.  02d9  50                                push    ax
  301.  02da  9a 00 00 00 00                    call    far LIBRARY1_00D
  302.  02df  b0 00                             mov     al,00H
  303.  02e1  50                                push    ax
  304.  02e2  8d be 00 fe                       lea     di,-200H[bp]
  305.  02e6  16                                push    ss
  306.  02e7  57                                push    di
  307.  02e8  b8 ff 00                          mov     ax,00ffH
  308.  02eb  50                                push    ax
  309.  02ec  9a 00 00 00 00                    call    far SYSTEM_065
  310.  02f1  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  311.  02f4  1e                                push    ds
  312.  02f5  57                                push    di
  313.  02f6  8d be 00 fe                       lea     di,-200H[bp]
  314.  02fa  16                                push    ss
  315.  02fb  57                                push    di
  316.  02fc  31 c0                             xor     ax,ax
  317.  02fe  50                                push    ax
  318.  02ff  9a 00 00 00 00                    call    far SYSTEM_036
  319.  0304  bf 00 00                          mov     di,offset L25
  320.  0307  0e                                push    cs
  321.  0308  57                                push    di
  322.  0309  31 c0                             xor     ax,ax
  323.  030b  50                                push    ax
  324.  030c  9a 00 00 00 00                    call    far SYSTEM_036
  325.  0311  8d be 00 ff                       lea     di,-100H[bp]
  326.  0315  16                                push    ss
  327.  0316  57                                push    di
  328.  0317  31 c0                             xor     ax,ax
  329.  0319  50                                push    ax
  330.  031a  9a 00 00 00 00                    call    far SYSTEM_036
  331.  031f  9a 00 00 00 00                    call    far SYSTEM_03A
  332.  0324  9a 00 00 00 00                    call    far SYSTEM_032
  333.  0329  8d be 00 ff                       lea     di,-100H[bp]
  334.  032d  16                                push    ss
  335.  032e  57                                push    di
  336.  032f  c4 7e 06                          les     di,dword ptr +6H[bp]
  337.  0332  06                                push    es
  338.  0333  57                                push    di
  339.  0334  e8 00 00                          call    DOSSHELL_004
  340.  0337  89 ec                             mov     sp,bp
  341.  0339  5d                                pop     bp
  342.  033a  ca 08 00                          retf    0008H
  343.  033d  00 1f             L26             add     [bx],bl
  344.  033f  44                                inc     sp
  345.  0340  4f                                dec     di
  346.  0341  53                                push    bx
  347.  0342  20 73 68                          and     +68H[bp+di],dh
  348.  0345  65 6c                             insb    
  349.  0347  6c                                insb    
  350.  0348  20 2d                             and     [di],ch
  351.  034a  20 74 79                          and     +79H[si],dh
  352.  034d  70 65                             jo      L32
  353.  034f  20 45 58                          and     +58H[di],al
  354.  0352  49                                dec     cx
  355.  0353  54                                push    sp
  356.  0354  20 74 6f                          and     +6fH[si],dh
  357.  0357  20 72 65                          and     +65H[bp+si],dh
  358.  035a  74 75                             je      L35
  359.  035c  72 6e                             jb      L33
  360.  035e  03 76 65          L28             add     si,+65H[bp]
  361.  0361  72 02                             jb      L30
  362.  0363  20 3e 04 45                       and     [00004504H],bh
  363.  0367  58                                pop     ax
  364.  0368  49                                dec     cx
  365.  0369  54                                push    sp
  366.  036a                    DOS_SHELL:
  367.  036a  55                DOSSHELL_002    push    bp
  368.  036b  89 e5                             mov     bp,sp
  369.  036d  b8 03 03                          mov     ax,0303H
  370.  0370  9a 00 00 00 00                    call    far SYSTEM_034
  371.  0375  81 ec 03 03                       sub     sp,0303H
  372.  0379  c6 86 fd fd 00                    mov     byte ptr -203H[bp],00H
  373.  037e  9a 00 00 00 00                    call    far CRT_007
  374.  0383  30 e4                             xor     ah,ah
  375.  0385  8b c8                             mov     cx,ax
  376.  0387  a0 00 00                          mov     al,CRT_BSS+7H
  377.  038a  30 e4                             xor     ah,ah
  378.  038c  8b d0                             mov     dx,ax
  379.  038e  a0 00 00                          mov     al,CRT_BSS+9H
  380.  0391  30 e4                             xor     ah,ah
  381.  0393  2b c2                             sub     ax,dx
  382.  0395  2b c1                             sub     ax,cx
  383.  0397  48                                dec     ax
  384.  0398  88 46 fe                          mov     -2H[bp],al
  385.  039b  8d be fd fd                       lea     di,-203H[bp]
  386.  039f  16                                push    ss
  387.  03a0  57                                push    di
  388.  03a1  8a 46 fe                          mov     al,-2H[bp]
  389.  03a4  50                                push    ax
  390.  03a5  9a 00 00 00 00                    call    far LIBRARY1_00B
  391.  03aa  08 c0                             or      al,al
  392.  03ac  75 03                             jne     L31
  393.  03ae  e9 ff 00                          jmp     L41
  394.  03b1  a0 00 00          L31             mov     al,DOSCOLOR
  395.  03b4  50                L32             push    ax
  396.  03b5  9a 00 00 00 00                    call    far LIBRARY1_00D
  397.  03ba  8d be fd fd                       lea     di,-203H[bp]
  398.  03be  16                                push    ss
  399.  03bf  57                                push    di
  400.  03c0  bf 00 00                          mov     di,offset L26
  401.  03c3  0e                                push    cs
  402.  03c4  57                                push    di
  403.  03c5  9a 00 00 00 00                    call    far SYSTEM_011
  404.  03ca  74 03                             je      L34
  405.  03cc  e9 cd 00          L33             jmp     L40
  406.  03cf  bf 00 00          L34             mov     di,offset SYSTEM_BSS+100H
  407.  03d2  1e                                push    ds
  408.  03d3  57                                push    di
  409.  03d4  bf 00 00                          mov     di,offset L27
  410.  03d7  0e                                push    cs
  411.  03d8  57                                push    di
  412.  03d9  31 c0                             xor     ax,ax
  413.  03db  50                                push    ax
  414.  03dc  9a 00 00 00 00                    call    far SYSTEM_036
  415.  03e1  9a 00 00 00 00                    call    far SYSTEM_03A
  416.  03e6  9a 00 00 00 00                    call    far SYSTEM_032
  417.  03eb  bf 00 00                          mov     di,offset L28
  418.  03ee  0e                                push    cs
  419.  03ef  57                                push    di
  420.  03f0  8d 7e ff                          lea     di,-1H[bp]
  421.  03f3  16                                push    ss
  422.  03f4  57                                push    di
  423.  03f5  e8 00 00                          call    DOSSHELL_004
  424.  03f8  b0 00             L36             mov     al,00H
  425.  03fa  50                                push    ax
  426.  03fb  8d be fd fe                       lea     di,-103H[bp]
  427.  03ff  16                                push    ss
  428.  0400  57                                push    di
  429.  0401  b8 ff 00                          mov     ax,00ffH
  430.  0404  50                                push    ax
  431.  0405  9a 00 00 00 00                    call    far SYSTEM_065
  432.  040a  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  433.  040d  1e                                push    ds
  434.  040e  57                                push    di
  435.  040f  8d be fd fe                       lea     di,-103H[bp]
  436.  0413  16                                push    ss
  437.  0414  57                                push    di
  438.  0415  31 c0                             xor     ax,ax
  439.  0417  50                                push    ax
  440.  0418  9a 00 00 00 00                    call    far SYSTEM_036
  441.  041d  bf 00 00                          mov     di,offset L29
  442.  0420  0e                                push    cs
  443.  0421  57                                push    di
  444.  0422  31 c0                             xor     ax,ax
  445.  0424  50                                push    ax
  446.  0425  9a 00 00 00 00                    call    far SYSTEM_036
  447.  042a  9a 00 00 00 00                    call    far SYSTEM_03B
  448.  042f  9a 00 00 00 00                    call    far SYSTEM_032
  449.  0434  c6 86 fd fd 00                    mov     byte ptr -203H[bp],00H
  450.  0439  8d be fd fd                       lea     di,-203H[bp]
  451.  043d  16                                push    ss
  452.  043e  57                                push    di
  453.  043f  8a 46 fe                          mov     al,-2H[bp]
  454.  0442  50                                push    ax
  455.  0443  9a 00 00 00 00                    call    far LIBRARY1_00B
  456.  0448  08 c0                             or      al,al
  457.  044a  74 1f                             je      L37
  458.  044c  bf 00 00                          mov     di,offset SYSTEM_BSS+100H
  459.  044f  1e                                push    ds
  460.  0450  57                                push    di
  461.  0451  9a 00 00 00 00                    call    far SYSTEM_03A
  462.  0456  9a 00 00 00 00                    call    far SYSTEM_032
  463.  045b  8d be fd fd                       lea     di,-203H[bp]
  464.  045f  16                                push    ss
  465.  0460  57                                push    di
  466.  0461  8d 7e ff                          lea     di,-1H[bp]
  467.  0464  16                                push    ss
  468.  0465  57                                push    di
  469.  0466  e8 00 00                          call    DOSSHELL_004
  470.  0469  eb 0f                             jmp     L38
  471.  046b  bf 00 00          L37             mov     di,offset SYSTEM_BSS+100H
  472.  046e  1e                                push    ds
  473.  046f  57                                push    di
  474.  0470  9a 00 00 00 00                    call    far SYSTEM_03A
  475.  0475  9a 00 00 00 00                    call    far SYSTEM_032
  476.  047a  8d be fd fc       L38             lea     di,-303H[bp]
  477.  047e  16                                push    ss
  478.  047f  57                                push    di
  479.  0480  8d be fd fd                       lea     di,-203H[bp]
  480.  0484  16                                push    ss
  481.  0485  57                                push    di
  482.  0486  9a 00 00 00 00                    call    far LIBRARY1_002
  483.  048b  bf 00 00                          mov     di,offset L30
  484.  048e  0e                                push    cs
  485.  048f  57                                push    di
  486.  0490  9a 00 00 00 00                    call    far SYSTEM_011
  487.  0495  74 03                             je      L39
  488.  0497  e9 5e ff                          jmp     L36
  489.  049a  eb 14             L39             jmp     L41
  490.  049c  8d be fd fd       L40             lea     di,-203H[bp]
  491.  04a0  16                                push    ss
  492.  04a1  57                                push    di
  493.  04a2  8d 7e ff                          lea     di,-1H[bp]
  494.  04a5  16                                push    ss
  495.  04a6  57                                push    di
  496.  04a7  0e                                push    cs
  497.  04a8  e8 00 00                          call    DOS_COMMAND
  498.  04ab  9a 00 00 00 00                    call    far LIBRARY1_00A
  499.  04b0  89 ec             L41             mov     sp,bp
  500.  04b2  5d                                pop     bp
  501.  04b3  cb                                retf    
  502.  04b4                    DOSSHELL_000:
  503.  04b4  89 e5             DOSSHELL_INIT   mov     bp,sp
  504.  04b6  a0 00 00                          mov     al,CRT_BSS+6H
  505.  04b9  a2 00 00                          mov     DOSCOLOR,al
  506.  04bc  89 ec                             mov     sp,bp
  507.  04be  cb                                retf    
  508.  
  509. No disassembly errors
  510.  
  511. ------------------------------------------------------------
  512.  
  513. Segment: _DATA  WORD   00000050 bytes  
  514.  0000  0e 46 69 6c 65 20 6e 6f DOSSHELL_DATA   - .File no
  515.  0008  74 20 66 6f 75 6e 64 00                 - t found.
  516.  0010  00 00 00 00                             - ....
  517.  0014  11 4e 6f 74 20 65 6e 6f L42             - .Not eno
  518.  001c  75 67 68 20 6d 65 6d 6f                 - ugh memo
  519.  0024  72 79 00 00                             - ry..
  520.  0028  13 49 6e 76 61 6c 69 64 L43             - .Invalid
  521.  0030  20 65 6e 76 69 72 6f 6e                 -  environ
  522.  0038  6d 65 6e 74                             - ment
  523.  003c  0e 49 6e 76 61 6c 69 64 L44             - .Invalid
  524.  0044  20 66 6f 72 6d 61 74 00                 -  format.
  525.  004c  00 00 00 00                             - ....
  526.  
  527. No disassembly errors
  528.  
  529. ------------------------------------------------------------
  530.  
  531. Segment: _BSS  WORD   00000001 bytes  
  532.  
  533. No disassembly errors
  534.  
  535. ------------------------------------------------------------
  536.