=== Cut ===
;
;  뤥    ᯥࢠ  UMB, ⮬  Low. CF-墠⪠.
;  in: bx-size
; out: ax-seg
;
; ᢮ ⠭p⭮
;
Allocate:
        mov ax,5800h
        int 21h
        push ax
        mov ax,5802h
        int 21h
        push ax
        push bx
        mov bx,1
        mov ax,5803h
        int 21h
        mov ax,5801h
        mov bx,80h
        int 21h
        pop bx
        mov ah,48h
        int 21h
        pop bx
        pop cx
        pushf
        push ax
        xor bh,bh
        mov ax,5801h
        int 21h
        mov bl,cl
        mov ax,5803h
        int 21h
        pop ax
        popf
        retn
=== Cut ===
