原创力文档- 1、本文档共21页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
汇编大作业文本编辑器实验报告
文本编辑器
【程序清单】
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 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 far
文档评论（0）