MASM-打字练习程序

bsp;       call RightRata_out
        TISHI 14,30,ts6
        mov ah,08
        int 21h

        ;CALL reset_interrupt
        mov ah,4ch
        int 21h
;---------------------------------------------------
LoadFile proc near
        mov si,0
LFROTA: mov ah,01h
        int 21h
        cmp al,0dh
        jz  LoadNext
        cmp al,08h
        jz  LFBK
        mov path[si],al
        inc si
        jmp LFROTA
        jmp LoadNext

LFBK:   cmp si,0
        jnz lfnz
        READGB 0
        inc gbattr
        SETGB 0,gbattr[0],gbattr
        jmp LFROTA
lfnz:   mov path[si],0
        dec si
        mov ah,02h
        mov dl,'''' ''''
        int 21h
        mov ah,02h
        mov dl,08h
        int 21h
        jmp LFROTA

LoadNext:
        mov ah,3dh
        mov dx,seg path
        mov ds,dx
        mov dx,offset path
       
        mov al,00
        int 21h
        jc  LoadERROR

                  ;bx use to save file code
        mov bx,ax  
        mov si,0
        mov dx,seg addr
        mov ds,dx
        mov dx,offset addr
        mov cx,1
      
LROT:   mov ah,3fh