]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/exmm/MEMORY.ASM
ems test wwww
[16.git] / src / lib / exmm / MEMORY.ASM
index 802d01cdbea0ae7efdd631cb74eaf3649a196312..50b665c35a1ede7b59440265408bb2a35e86d287 100644 (file)
@@ -20,26 +20,26 @@ _OpenEMM:
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    call        far ptr L$59 \r
+    call        far ptr L$65 \r
     or          ax,ax \r
     je          L$1 \r
-    call        far ptr L$65 \r
+    call        far ptr L$72 \r
     or          ax,ax \r
-    jne         L$2 \r
+    jne         L$3 \r
 L$1:\r
     xor         ax,ax \r
-    jmp         L$4 \r
 L$2:\r
-    call        far ptr L$68 \r
-    mov         word ptr L$89,ax \r
-    or          ax,ax \r
-    jne         L$3 \r
-    xor         ax,ax \r
-    jmp         L$4 \r
+    jmp         L$5 \r
 L$3:\r
-    mov         ax,1 \r
-    jmp         L$4 \r
+    call        far ptr L$76 \r
+    mov         word ptr L$99,ax \r
+    or          ax,ax \r
+    jne         L$4 \r
+    jmp         L$1 \r
 L$4:\r
+    mov         ax,1 \r
+    jmp         L$2 \r
+L$5:\r
     pop         ds \r
     pop         bp \r
     retf        \r
@@ -50,33 +50,32 @@ _CloseEMM:
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    cmp         word ptr L$89,0 \r
-    jne         L$5 \r
-    jmp         L$9 \r
-L$5:\r
-    xor         si,si \r
-    jmp         L$8 \r
+    cmp         word ptr L$99,0 \r
+    jne         L$6 \r
+    jmp         L$10 \r
 L$6:\r
+    xor         si,si \r
+    jmp         L$9 \r
+L$7:\r
     mov         bx,si \r
     shl         bx,1 \r
-    cmp         word ptr L$88[bx],0 \r
-    je          L$7 \r
+    cmp         word ptr L$100[bx],0 \r
+    je          L$8 \r
     mov         bx,si \r
     shl         bx,1 \r
-    push        word ptr L$88[bx] \r
-    call        far ptr L$77 \r
-    inc         sp \r
-    inc         sp \r
+    push        word ptr L$100[bx] \r
+    call        far ptr L$87 \r
+    pop         cx \r
     mov         bx,si \r
     shl         bx,1 \r
-    mov         word ptr L$88[bx],0 \r
-L$7:\r
-    inc         si \r
+    mov         word ptr L$100[bx],0 \r
 L$8:\r
-    cmp         si,40H \r
-    jl          L$6 \r
-    mov         word ptr L$89,0 \r
+    inc         si \r
 L$9:\r
+    cmp         si,40H \r
+    jl          L$7 \r
+    mov         word ptr L$99,0 \r
+L$10:\r
     pop         ds \r
     pop         si \r
     pop         bp \r
@@ -87,15 +86,15 @@ _EMMInstalled:
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    cmp         word ptr L$89,0 \r
-    je          L$10 \r
+    cmp         word ptr L$99,0 \r
+    je          L$11 \r
     mov         ax,1 \r
-    jmp         L$11 \r
-L$10:\r
-    xor         ax,ax \r
-L$11:\r
     jmp         L$12 \r
+L$11:\r
+    xor         ax,ax \r
 L$12:\r
+    jmp         L$13 \r
+L$13:\r
     pop         ds \r
     pop         bp \r
     retf        \r
@@ -111,7 +110,7 @@ _EMMCoreLeft:
     mov         ah,42H \r
     int         67H \r
     or          ah,ah \r
-    js          L$13 \r
+    js          L$14 \r
     mov         word ptr -2[bp],bx \r
     mov         ax,word ptr -2[bp] \r
     xor         dx,dx \r
@@ -119,11 +118,11 @@ _EMMCoreLeft:
     call        far ptr `F_LXLSH@` \r
     mov         word ptr -4[bp],dx \r
     mov         word ptr -6[bp],ax \r
-L$13:\r
+L$14:\r
     mov         dx,word ptr -4[bp] \r
     mov         ax,word ptr -6[bp] \r
-    jmp         L$14 \r
-L$14:\r
+    jmp         L$15 \r
+L$15:\r
     pop         ds \r
     mov         sp,bp \r
     pop         bp \r
@@ -140,67 +139,64 @@ _EMMalloc:
     mov         di,word ptr 0aH[bp] \r
     mov         word ptr -2[bp],0 \r
     mov         word ptr -4[bp],0 \r
-    cmp         word ptr L$89,0 \r
-    jne         L$15 \r
+    cmp         word ptr L$99,0 \r
+    jne         L$18 \r
     les         bx,dword ptr 6[bp] \r
     mov         word ptr es:[bx],0 \r
+L$16:\r
     xor         dx,dx \r
     xor         ax,ax \r
-    jmp         L$23 \r
-L$15:\r
+L$17:\r
+    jmp         L$26 \r
+L$18:\r
     cmp         di,1 \r
-    jl          L$16 \r
+    jl          L$19 \r
     cmp         di,3fcH \r
-    jle         L$17 \r
-L$16:\r
+    jle         L$20 \r
+L$19:\r
     les         bx,dword ptr 6[bp] \r
     mov         word ptr es:[bx],0f440H \r
-    xor         dx,dx \r
-    xor         ax,ax \r
-    jmp         L$23 \r
-L$17:\r
+    jmp         L$16 \r
+L$20:\r
     xor         si,si \r
-    jmp         L$19 \r
-L$18:\r
+    jmp         L$22 \r
+L$21:\r
     inc         si \r
-L$19:\r
+L$22:\r
     cmp         si,40H \r
-    jge         L$20 \r
+    jge         L$23 \r
     mov         bx,si \r
     shl         bx,1 \r
-    cmp         word ptr L$88[bx],0 \r
-    jne         L$18 \r
-L$20:\r
-    cmp         si,40H \r
+    cmp         word ptr L$100[bx],0 \r
     jne         L$21 \r
+L$23:\r
+    cmp         si,40H \r
+    jne         L$24 \r
     les         bx,dword ptr 6[bp] \r
     mov         word ptr es:[bx],0f443H \r
-    xor         dx,dx \r
-    xor         ax,ax \r
-    jmp         L$23 \r
-L$21:\r
+    jmp         L$16 \r
+L$24:\r
     push        di \r
-    call        far ptr L$71 \r
-    inc         sp \r
-    inc         sp \r
+    call        far ptr L$80 \r
+    pop         cx \r
     mov         bx,si \r
     shl         bx,1 \r
-    mov         word ptr L$88[bx],ax \r
+    mov         word ptr L$100[bx],ax \r
     or          ax,ax \r
-    jle         L$22 \r
-    mov         ax,word ptr L$8\r
+    jle         L$25 \r
+    mov         ax,word ptr L$9\r
     mov         word ptr -2[bp],ax \r
     mov         word ptr -4[bp],0 \r
-L$22:\r
+L$25:\r
     mov         bx,si \r
     shl         bx,1 \r
-    mov         ax,word ptr L$88[bx] \r
+    mov         ax,word ptr L$100[bx] \r
     les         bx,dword ptr 6[bp] \r
     mov         word ptr es:[bx],ax \r
     mov         dx,word ptr -2[bp] \r
     mov         ax,word ptr -4[bp] \r
-    jmp         L$23 \r
-L$23:\r
+    jmp         L$17 \r
+L$26:\r
     pop         ds \r
     pop         di \r
     pop         si \r
@@ -210,93 +206,88 @@ L$23:
 _EMMRealloc:\r
     push        bp \r
     mov         bp,sp \r
-    push        si \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    xor         si,si \r
-    cmp         word ptr L$89,0 \r
-    je          L$24 \r
+    xor         cx,cx \r
+    cmp         word ptr L$99,0 \r
+    je          L$27 \r
     cmp         word ptr 8[bp],0 \r
-    jl          L$24 \r
+    jl          L$27 \r
     cmp         word ptr 8[bp],3fcH \r
-    jle         L$25 \r
-L$24:\r
+    jle         L$29 \r
+L$27:\r
     xor         ax,ax \r
-    jmp         L$27 \r
-L$25:\r
+L$28:\r
+    jmp         L$31 \r
+L$29:\r
     mov         ah,51H \r
     mov         bx,word ptr 8[bp] \r
     mov         dx,word ptr 6[bp] \r
     int         67H \r
     or          ah,ah \r
-    js          L$26 \r
-    mov         si,1 \r
-L$26:\r
-    mov         ax,si \r
-    jmp         L$27 \r
-L$27:\r
+    js          L$30 \r
+    mov         cx,1 \r
+L$30:\r
+    mov         ax,cx \r
+    jmp         L$28 \r
+L$31:\r
     pop         ds \r
-    pop         si \r
     pop         bp \r
     retf        \r
 _EMMFree:\r
     push        bp \r
     mov         bp,sp \r
-    dec         sp \r
-    dec         sp \r
     push        si \r
     push        di \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    mov         di,word ptr 6[bp] \r
-    cmp         word ptr L$89,0 \r
-    jne         L$28 \r
-    jmp         L$36 \r
-L$28:\r
+    cmp         word ptr L$99,0 \r
+    jne         L$32 \r
+    jmp         L$40 \r
+L$32:\r
     xor         si,si \r
-    jmp         L$30 \r
-L$29:\r
+    jmp         L$34 \r
+L$33:\r
     inc         si \r
-L$30:\r
+L$34:\r
     cmp         si,40H \r
-    jge         L$31 \r
+    jge         L$35 \r
     mov         bx,si \r
     shl         bx,1 \r
-    cmp         word ptr L$88[bx],di \r
-    jne         L$29 \r
-L$31:\r
+    mov         ax,word ptr L$100[bx] \r
+    cmp         ax,word ptr 6[bp] \r
+    jne         L$33 \r
+L$35:\r
     cmp         si,40H \r
-    jl          L$32 \r
-    jmp         L$36 \r
-L$32:\r
-    mov         word ptr -2[bp],10H \r
-    jmp         L$34 \r
-L$33:\r
+    jl          L$36 \r
+    jmp         L$40 \r
+L$36:\r
+    mov         di,10H \r
+    jmp         L$38 \r
+L$37:\r
     mov         bx,si \r
     shl         bx,1 \r
-    push        word ptr L$88[bx] \r
-    call        far ptr L$77 \r
-    inc         sp \r
-    inc         sp \r
+    push        word ptr L$100[bx] \r
+    call        far ptr L$87 \r
+    pop         cx \r
     or          ax,ax \r
-    je          L$34 \r
-    jmp         L$35 \r
-L$34:\r
-    mov         ax,word ptr -2[bp] \r
-    dec         word ptr -2[bp] \r
+    je          L$38 \r
+    jmp         L$39 \r
+L$38:\r
+    mov         ax,di \r
+    dec         di \r
     or          ax,ax \r
-    jne         L$33 \r
-L$35:\r
+    jne         L$37 \r
+L$39:\r
     mov         bx,si \r
     shl         bx,1 \r
-    mov         word ptr L$88[bx],0 \r
-L$36:\r
+    mov         word ptr L$100[bx],0 \r
+L$40:\r
     pop         ds \r
     pop         di \r
     pop         si \r
-    mov         sp,bp \r
     pop         bp \r
     retf        \r
 _MapEMM:\r
@@ -307,67 +298,67 @@ _MapEMM:
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    mov         di,word ptr 6[bp] \r
-    cmp         word ptr L$89,0 \r
-    jne         L$37 \r
+    mov         di,word ptr 0aH[bp] \r
+    cmp         word ptr L$99,0 \r
+    jne         L$43 \r
+L$41:\r
     xor         ax,ax \r
-    jmp         L$47 \r
-L$37:\r
+L$42:\r
+    jmp         L$53 \r
+L$43:\r
     xor         si,si \r
-    jmp         L$39 \r
-L$38:\r
+    jmp         L$45 \r
+L$44:\r
     inc         si \r
-L$39:\r
+L$45:\r
     cmp         si,40H \r
-    jge         L$40 \r
+    jge         L$46 \r
     mov         bx,si \r
     shl         bx,1 \r
-    cmp         word ptr L$88[bx],di \r
-    jne         L$38 \r
-L$40:\r
+    mov         ax,word ptr L$100[bx] \r
+    cmp         ax,word ptr 6[bp] \r
+    jne         L$44 \r
+L$46:\r
     cmp         si,40H \r
-    jne         L$41 \r
-    xor         ax,ax \r
-    jmp         L$47 \r
-L$41:\r
-    push        di \r
-    call        far ptr L$80 \r
-    inc         sp \r
-    inc         sp \r
-    cmp         ax,word ptr 0aH[bp] \r
-    jl          L$42 \r
-    cmp         word ptr 0aH[bp],1 \r
-    jl          L$42 \r
-    cmp         word ptr 0aH[bp],4 \r
-    jle         L$43 \r
-L$42:\r
+    jne         L$47 \r
+    jmp         L$41 \r
+L$47:\r
+    push        word ptr 6[bp] \r
+    call        far ptr L$91 \r
+    pop         cx \r
+    cmp         ax,di \r
+    jl          L$48 \r
+    cmp         di,1 \r
+    jl          L$48 \r
+    cmp         di,4 \r
+    jle         L$49 \r
+L$48:\r
     mov         ax,0f440H \r
-    jmp         L$47 \r
-L$43:\r
+    jmp         L$42 \r
+L$49:\r
     mov         si,word ptr 8[bp] \r
-    jmp         L$46 \r
-L$44:\r
+    jmp         L$52 \r
+L$50:\r
     mov         ax,si \r
     sub         ax,word ptr 8[bp] \r
     push        ax \r
     push        si \r
-    push        di \r
-    call        far ptr L$7\r
+    push        word ptr 6[bp] \r
+    call        far ptr L$8\r
     add         sp,6 \r
     or          ax,ax \r
-    jne         L$45 \r
-    xor         ax,ax \r
-    jmp         L$47 \r
-L$45:\r
+    jne         L$51 \r
+    jmp         L$41 \r
+L$51:\r
     inc         si \r
-L$46:\r
+L$52:\r
     mov         ax,word ptr 8[bp] \r
-    add         ax,word ptr 0aH[bp] \r
+    add         ax,di \r
     cmp         ax,si \r
-    jg          L$44 \r
+    jg          L$50 \r
     mov         ax,1 \r
-    jmp         L$47 \r
-L$47:\r
+    jmp         L$42 \r
+L$53:\r
     pop         ds \r
     pop         di \r
     pop         si \r
@@ -376,58 +367,57 @@ L$47:
 _UnmapEMM:\r
     push        bp \r
     mov         bp,sp \r
-    dec         sp \r
-    dec         sp \r
+    sub         sp,2 \r
     push        si \r
     push        di \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
     mov         di,word ptr 6[bp] \r
-    cmp         word ptr L$89,0 \r
-    jne         L$48 \r
-    jmp         L$57 \r
-L$48:\r
+    cmp         word ptr L$99,0 \r
+    jne         L$54 \r
+    jmp         L$63 \r
+L$54:\r
     xor         si,si \r
-    jmp         L$50 \r
-L$49:\r
+    jmp         L$56 \r
+L$55:\r
     inc         si \r
-L$50:\r
+L$56:\r
     cmp         si,40H \r
-    jge         L$51 \r
+    jge         L$57 \r
     mov         bx,si \r
     shl         bx,1 \r
-    cmp         word ptr L$88[bx],di \r
-    jne         L$49 \r
-L$51:\r
+    cmp         word ptr L$100[bx],di \r
+    jne         L$55 \r
+L$57:\r
     cmp         si,40H \r
-    jne         L$52 \r
-    jmp         L$57 \r
-L$52:\r
+    jne         L$58 \r
+    jmp         L$63 \r
+L$58:\r
     mov         ax,word ptr 8[bp] \r
     add         ax,word ptr 0aH[bp] \r
     mov         word ptr -2[bp],ax \r
     cmp         word ptr 0aH[bp],1 \r
-    jl          L$53 \r
+    jl          L$59 \r
     cmp         word ptr -2[bp],4 \r
-    jle         L$54 \r
-L$53:\r
-    jmp         L$57 \r
-L$54:\r
+    jle         L$60 \r
+L$59:\r
+    jmp         L$63 \r
+L$60:\r
     mov         si,word ptr 8[bp] \r
-    jmp         L$56 \r
-L$55:\r
+    jmp         L$62 \r
+L$61:\r
     push        si \r
     mov         ax,0ffffH \r
     push        ax \r
     push        di \r
-    call        far ptr L$7\r
+    call        far ptr L$8\r
     add         sp,6 \r
     inc         si \r
-L$56:\r
+L$62:\r
     cmp         si,word ptr -2[bp] \r
-    jl          L$55 \r
-L$57:\r
+    jl          L$61 \r
+L$63:\r
     pop         ds \r
     pop         di \r
     pop         si \r
@@ -443,17 +433,16 @@ _UseEMM:
     mov         ds,ax \r
     mov         si,word ptr 6[bp] \r
     push        si \r
-    call        far ptr L$83 \r
-    inc         sp \r
-    inc         sp \r
+    call        far ptr L$94 \r
+    pop         cx \r
     push        word ptr 0aH[bp] \r
     push        word ptr 8[bp] \r
     push        si \r
     push        cs \r
     call        near ptr _MapEMM \r
     add         sp,6 \r
-    jmp         L$58 \r
-L$58:\r
+    jmp         L$64 \r
+L$64:\r
     pop         ds \r
     pop         si \r
     pop         bp \r
@@ -473,26 +462,24 @@ _SaveEMM:
     call        near ptr _UnmapEMM \r
     add         sp,6 \r
     push        si \r
-    call        far ptr L$86 \r
-    inc         sp \r
-    inc         sp \r
+    call        far ptr L$97 \r
+    pop         cx \r
     pop         ds \r
     pop         si \r
     pop         bp \r
     retf        \r
-L$59:\r
+L$65:\r
     push        bp \r
     mov         bp,sp \r
     sub         sp,14H \r
-    push        si \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    push        ss \r
     lea         ax,-0cH[bp] \r
+    push        ss \r
     push        ax \r
+    mov         ax,offset L$98 \r
     push        ds \r
-    mov         ax,offset L$87 \r
     push        ax \r
     mov         cx,9 \r
     call        far ptr `F_SCOPY@` \r
@@ -508,35 +495,35 @@ L$59:
     lea         ax,-0cH[bp] \r
     mov         word ptr -0eH[bp],ss \r
     mov         word ptr -10H[bp],ax \r
-    xor         si,si \r
-    jmp         L$61 \r
-L$60:\r
-    inc         si \r
-L$61:\r
-    cmp         si,8 \r
-    jge         L$62 \r
+    xor         dx,dx \r
+    jmp         L$67 \r
+L$66:\r
+    inc         dx \r
+L$67:\r
+    cmp         dx,8 \r
+    jge         L$68 \r
     les         bx,dword ptr -10H[bp] \r
     inc         word ptr -10H[bp] \r
     mov         al,byte ptr es:[bx] \r
     les         bx,dword ptr -14H[bp] \r
     inc         word ptr -14H[bp] \r
     cmp         al,byte ptr es:[bx] \r
-    je          L$60 \r
-L$62:\r
-    cmp         si,8 \r
-    jne         L$63 \r
+    je          L$66 \r
+L$68:\r
+    cmp         dx,8 \r
+    jne         L$70 \r
     mov         ax,1 \r
-    jmp         L$64 \r
-L$63:\r
+L$69:\r
+    jmp         L$71 \r
+L$70:\r
     xor         ax,ax \r
-    jmp         L$64 \r
-L$64:\r
+    jmp         L$69 \r
+L$71:\r
     pop         ds \r
-    pop         si \r
     mov         sp,bp \r
     pop         bp \r
     retf        \r
-L$65:\r
+L$72:\r
     push        bp \r
     mov         bp,sp \r
     push        ds \r
@@ -545,44 +532,44 @@ L$65:
     mov         ah,40H \r
     int         67H \r
     or          ah,ah \r
-    jns         L$66 \r
+    jns         L$74 \r
     xor         ax,ax \r
-    jmp         L$67 \r
-L$66:\r
+L$73:\r
+    jmp         L$75 \r
+L$74:\r
     mov         ax,1 \r
-    jmp         L$67 \r
-L$67:\r
+    jmp         L$73 \r
+L$75:\r
     pop         ds \r
     pop         bp \r
     retf        \r
-L$68:\r
+L$76:\r
     push        bp \r
     mov         bp,sp \r
-    dec         sp \r
-    dec         sp \r
+    sub         sp,2 \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
     mov         ah,41H \r
     int         67H \r
     or          ah,ah \r
-    js          L$69 \r
+    js          L$78 \r
     mov         word ptr -2[bp],bx \r
     mov         ax,word ptr -2[bp] \r
-    jmp         L$70 \r
-L$69:\r
+L$77:\r
+    jmp         L$79 \r
+L$78:\r
     xor         ax,ax \r
-    jmp         L$70 \r
-L$70:\r
+    jmp         L$77 \r
+L$79:\r
     pop         ds \r
     mov         sp,bp \r
     pop         bp \r
     retf        \r
-L$71:\r
+L$80:\r
     push        bp \r
     mov         bp,sp \r
-    dec         sp \r
-    dec         sp \r
+    sub         sp,2 \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
@@ -590,43 +577,42 @@ L$71:
     mov         bx,word ptr 6[bp] \r
     int         67H \r
     or          ah,ah \r
-    js          L$7\r
+    js          L$8\r
     mov         word ptr -2[bp],dx \r
     mov         ax,word ptr -2[bp] \r
-    jmp         L$73 \r
-L$72:\r
+L$81:\r
+    jmp         L$83 \r
+L$82:\r
     xor         ax,ax \r
-    jmp         L$73 \r
-L$73:\r
+    jmp         L$81 \r
+L$83:\r
     pop         ds \r
     mov         sp,bp \r
     pop         bp \r
     retf        \r
-L$74:\r
+L$84:\r
     push        bp \r
     mov         bp,sp \r
-    push        si \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    xor         si,si \r
+    xor         cx,cx \r
     mov         ax,word ptr 0aH[bp] \r
     mov         ah,44H \r
     mov         bx,word ptr 8[bp] \r
     mov         dx,word ptr 6[bp] \r
     int         67H \r
     or          ah,ah \r
-    js          L$7\r
-    mov         si,1 \r
-L$75:\r
-    mov         ax,si \r
-    jmp         L$7\r
-L$76:\r
+    js          L$8\r
+    mov         cx,1 \r
+L$85:\r
+    mov         ax,cx \r
+    jmp         L$8\r
+L$86:\r
     pop         ds \r
-    pop         si \r
     pop         bp \r
     retf        \r
-L$77:\r
+L$87:\r
     push        bp \r
     mov         bp,sp \r
     push        ds \r
@@ -636,21 +622,21 @@ L$77:
     mov         dx,word ptr 6[bp] \r
     int         67H \r
     or          ah,ah \r
-    js          L$78 \r
+    js          L$89 \r
     mov         ax,1 \r
-    jmp         L$79 \r
-L$78:\r
+L$88:\r
+    jmp         L$90 \r
+L$89:\r
     xor         ax,ax \r
-    jmp         L$79 \r
-L$79:\r
+    jmp         L$88 \r
+L$90:\r
     pop         ds \r
     pop         bp \r
     retf        \r
-L$80:\r
+L$91:\r
     push        bp \r
     mov         bp,sp \r
-    dec         sp \r
-    dec         sp \r
+    sub         sp,2 \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
@@ -659,39 +645,37 @@ L$80:
     mov         dx,word ptr 6[bp] \r
     int         67H \r
     or          ah,ah \r
-    js          L$81 \r
+    js          L$92 \r
     mov         word ptr -2[bp],bx \r
-L$81:\r
+L$92:\r
     mov         ax,word ptr -2[bp] \r
-    jmp         L$82 \r
-L$82:\r
+    jmp         L$93 \r
+L$93:\r
     pop         ds \r
     mov         sp,bp \r
     pop         bp \r
     retf        \r
-L$83:\r
+L$94:\r
     push        bp \r
     mov         bp,sp \r
-    push        si \r
     push        ds \r
     mov         ax,MEMORY_DATA \r
     mov         ds,ax \r
-    mov         si,0f442H \r
+    mov         bx,0f442H \r
     mov         ah,47H \r
     mov         dx,word ptr 6[bp] \r
     int         67H \r
     or          ah,ah \r
-    js          L$84 \r
-    mov         si,1 \r
-L$84:\r
-    mov         ax,si \r
-    jmp         L$85 \r
-L$85:\r
+    js          L$95 \r
+    mov         bx,1 \r
+L$95:\r
+    mov         ax,bx \r
+    jmp         L$96 \r
+L$96:\r
     pop         ds \r
-    pop         si \r
     pop         bp \r
     retf        \r
-L$86:\r
+L$97:\r
     push        bp \r
     mov         bp,sp \r
     push        ds \r
@@ -705,14 +689,14 @@ L$86:
     retf        \r
 MEMORY_TEXT            ENDS\r
 MEMORY_DATA            SEGMENT WORD PUBLIC USE16 'FAR_DATA'\r
-L$87:\r
+L$98:\r
     DB 45H, 4dH, 4dH, 58H, 58H, 58H, 58H, 30H\r
+    DB 0\r
+L$99:\r
     DB 0, 0\r
-L$88:\r
+L$100:\r
     DB 0FH DUP(0,0,0,0,0,0,0,0)\r
     DB 0, 0, 0, 0, 0, 0, 0, 0\r
-L$89:\r
-    DB 0, 0\r
 \r
 MEMORY_DATA            ENDS\r
                END\r