微机原理第六个简易文本编辑器1.doc

微机原理第六个简易文本编辑器1 red_chr macro ;读取字符宏定义 mov ah,0 int 16h endm string macro p1 ;输入字符光标 mov ah,9 lea dx,p1 int 21h endm win macro opr1,opr2,opr3,opr4,opr5,opr6 ;建立窗口 mov ah,06h mov al,opr1 mov bh,opr2 mov ch,opr3 mov cl,opr4 mov dh,opr5 mov dl,opr6 int 10h endm pos_curse macro op1,op2,op3 ;定义光标位置 mov ah,2 mov bh,op1 mov dh,op2 mov dl,op3 int 10h endm pos_get macro ;显示光标位置 mov ah,03h mov bh,0 int 10h endm data segment ;定义数据段 menu db File Edit Help $ mass_1 db F1 Active file F10 Active help,$ manu_1 db New ,13,10,$ manu_2 db Open ,13,10,$ manu_3 db Save ,13,10,$ manu_4 db Save as ,13,10,$ manu_5 db Exit ,$ handle dw ? message1 db Please input file name:,$ message2 db Please input save file name:,$ message3 db Please input open file name:,$ message4 db ***The file is not save! Save it now? (Y/N)***: ,$ path db 50 dup(0),$ buffer db 2000 dup(?) bak db 3850 dup(0) line db ? row db ? char db ? help_mas1 db welcome use editor! $ ;帮助内容 help_mas2 db please the first active help! $ help_mas3 db good lucky!! $ help_mas4 db ==========================================================$ help_mas5 db Press F1 to active file. $ help_mas6 db You can use DOWN cursor key to choose the fuction $ help_mas7 db Press F10 to show the help massage.Press Esc To Quit$ date db today ??/??/,$ ;调用日期 hanglie db ???//???,$ ;行//列 data ends code segment main proc