[汇编] 汇编语言实现简易文本编辑器(光标移动、上卷和退格删除)

汇编实现的一个简易的文本编辑器，代码中有详细的注释。

思路和细节：

(1) 在屏幕中央初始化一片面积，并且定位光标，利用16号中断0号功能分别在ah，al中存储扫描码和ascii码，由此进行功能键的判断。

(2) 实现对光标的操作，通过对dh，dl的变化和10号中断的2号功能进行光标的设置，上下左右分别改变dh，dl的值即可。

(3)退格键的操作实现是 光标左移，然后利用21号中断输出空格即可实现删除操作。

(4)下界超过某一个设定的值后就进行上卷一行的操作，此时当前光标位置随之上移。

(5)注意边界的处理，左移到行首就贴边上移，右移到行末贴边下移，上下移动注意边界，退格要一行行向上依次删除，输出字符的过程中

超过宽度自动换行，这些都是要处理的细节问题。

(6)注意保护dx和ax的值（压入栈中）

; by Tach

data segment
    Esc_key equ 1bh ;退出
    win_ulc equ 30 ;左列
    win_ulr equ 8   ;上行
    win_lrc equ 50   ;右列
    win_lrr equ 16   ;下行
    win_width equ 20  ;宽度
    board_shift equ 48h  ;光标上移
    board_down equ 50h   ;光标下移
    board_left equ 4Bh   ;光标左移
    board_right equ 4Dh  ;光标右移
    board_back equ 08h   ;退格键
    string db "Tach's notepad!$"

ends

stack segment
    dw   128  dup(0)
ends

code segment
start:
; set segment registers:
    mov ax, data
    mov ds, ax
    mov es, ax

 ;----------输出标题------------------
    mov ah,2
    mov dh,win_ulr-1
    mov dl,win_ulc+2
    mov bh,0
    int 10h
    lea dx, string
    mov ah, 9
    int 21h        ; output string at ds:dx
  ;-------------------------------------
 locate:
 ;-----设置光标初始位置-----------
    mov ah,2
    mov dh,win_ulr
    mov dl,win_ulc
    push dx
    mov bh,0
    int 10h
  ;--------------------------------  

  ;----初始化屏幕------------------
    mov ah,6
    mov ch,win_ulr
    mov cl,win_ulc
    mov dh,win_lrr
    mov dl,win_lrc 

    mov bh,0F4h ;白底红字
    int 10h
    pop dx
   ;----------------------------

 get_char:
    mov ah,0   ;16h 0号功能，ah中放扫描码，al中放ascii码
    int 16h
    cmp al,0   ;if 功能键 then al=0
    je  K
  ;-----利用ascii码判断-----------------------
    cmp al,Esc_key
    je exit
    cmp al,0dh
    je  enter
    cmp al,board_back
    je back

  ;---读取当前光标位置---------------
    mov ah,3
    mov bh,0
    int 10h
  ;---------------------
    push dx   ;保护变量
    cmp dl,win_lrc   ;输入字符时是否越过右列值
    jge NK
    jmp N
NK:
    inc dh
    mov dl,win_ulc
    push dx
  ;--------------------
    mov bh,0 ;重新设置光标位置
    mov ah,2
    int 10h
  ;-------------------
  N:
    cmp  dh,win_lrr
    jge  roll    ;是否越过下界，上卷
 Next:
    mov dl,al   ;输出输入的字符
    mov ah,2
    int 21h
    pop dx 

    jmp get_char
  ;-------对功能键（扫描码）的处理---------------
 K:
    cmp ah,board_shift
    jz shift
    cmp ah,board_down
    je down
    cmp ah,board_left
    je left
    cmp ah,board_right
    je right
    jmp  get_char
;-------------上卷一行---------------------
 roll:
    mov ah,6
    push ax
    mov al,1
    mov ch,win_ulr
    mov cl,win_ulc
    mov dh,win_lrr
    mov dl,win_lrc
    mov bh,0F4h
    int 10h
    pop ax
    pop dx

    cmp dh,win_lrr
    jbe KK 

    dec dh  

 KK:
    dec dh   ;上卷之后，dh随之自减
    mov bh,0
    mov ah,2
    int 10h
    push dx
    jmp Next
 ;---------------------------------
 ;---------处理换行--------------------
 enter:
    mov ah,3
    mov bh,0
    int 10h
    inc dh
    mov dl,win_ulc
    mov bh,0
    mov ah,2
    int 10h
    jmp get_char
 ;--------------------------------
 ;---------光标上移-----------------------
 shift:
    mov ah,3
    mov bh,0
    int 10h
    dec dh
    cmp dh,win_ulr
    jge S
    inc dh
 S:
    mov bh,0
    mov ah,2
    int 10h
    jmp get_char
 ;------------光标下移------------------------
 down:
    mov ah,3
    mov bh,0
    int 10h
    inc dh
    cmp dh,win_lrr
    jbe D
    dec dh
 D:
    mov bh,0
    mov ah,2
    int 10h
    jmp get_char
 ;------------------------------------
 ;-------------光标左移--------------------
 left:
    mov ah,3
    mov bh,0
    int 10h
    dec dl
    cmp dl,win_ulc
    jge L
    inc dl
    dec dh
    cmp dh,win_ulr
    jge L
    inc dh
 L:
    mov bh,0
    mov ah,2
    int 10h
    jmp get_char
;-----------------------------
;------------光标右移-----------------
 right:
    mov ah,3
    mov bh,0
    int 10h
    inc dl
    cmp dl,win_lrc
    jbe R
    dec dl
    inc dh
    cmp dh,win_lrr
    jbe R
    dec dh
 R:
    mov bh,0
    mov ah,2
    int 10h
    jmp get_char
 ;-------------------------
 ;---------退格键---------------
 back:
    mov ah,3
    mov bh,0
    int 10h 

    dec dl
    cmp dl,win_ulc
    jge B
    mov dl,win_lrc
    dec dh
    cmp dh,win_ulr
    jge B
    inc dh
  B:
    mov bh,0
    mov ah,2
    int 10h 

    push dx
    mov dl,20h
    mov ah,2
    int 21h
    pop dx

    mov bh,0
    mov ah,2
    int 10h

    jmp get_char
 ;-----------退出程序------------------------
 exit:
    mov ax, 4c00h ; exit to operating system.
    int 21h
ends

end start ; set entry point and stop the assembler.