汇编文本编辑器大作业

《汇编语言程序设计》综合程序设计实验报告题目：文本编辑器一、项目简介我们设计的为一个简易的文本编辑器，其具体实现的功能如下：1、编辑器的初始密码默认为 0，输入其他内容会提示出错2、进入编辑界面之前，用户可以选择自己喜欢的界面颜色有四种颜色可以供用户选择。

3、进入主界面后可以看到菜单栏的五个可以下拉的菜单分别为File、Edit 、Form、Check 、Help，并分别可以通过快捷键F1，F2，F3，F4，F10来展开每一下拉菜单。

4、可以对文本进行新建、打开、保存、退出，并可以显示帮助信息。

5、可以在界面上任意输入内容，并可通过键盘上下左右移动光标。

可以通过键盘上的backspace和enter分别对文本进行删除和换行操作。

二、小组成员具体分工1、黄珊负责：编辑器的密码设置；初始时背景颜色的选择；F1菜单下的对文件的新建，打开，保存以及退出系统的功能；按一下BackSpace键可以删除当前光标以前的字符，enter键可以换行；演讲时的PPT制作；2、刘瑞玲负责：设计一个友好、易于操作的界面；按F1键后各个功能之间的调动；键盘读入字符；按上、下、左、右以及回车键对文本进行的编辑，使光标在文本上任意移动；完成实验报告；三、需求分析与设计结构框图：1、实验中用到的宏的定义：red_chr macro 字符的读取string macro 输入字符光标win macro 新建窗口pos_curse 定义光标位置pos_get 获取光标位置2、数据段主要定义：path db 40 dup(0),'$' 保存文件路径buffer db 1840 dup(0) ,'$' 保存文本内容，作为一个缓存区 line db ? 保存列号row db ? 保存行号bak db 3850 dup(0) 保存缓冲区的内容3、主要使用的子程序：Wind 创建窗口的子程序edit 进行文本文本编辑fuc_key 键盘功能键定义**_sh 菜单栏的显示信息New 新建文本Open 输出文本内容Save 保存文本内容Exit 退出程序四、代码及分析red_chr macro ;读取字符宏定义mov ah,0int 16hendmstring macro p1 ;输入字符光标mov ah,9lea dx,p1int 21hendmwin macro opr1,opr2,opr3,opr4,opr5,opr6 ;建立窗口mov ah,06hmov al,opr1mov bh,opr2mov ch,opr3mov cl,opr4mov dh,opr5mov dl,opr6int 10hendmpos_curse macro op1,op2,op3 ;定义光标位置mov ah,2mov bh,op1 ;页码mov dh,op2 ;行mov dl,op3 ;列int 10hendmpos_get macro ;显示光标位置mov ah,03hmov bh,0 ;bh页码 ch起始行 cl终止行 dh行 dl列int 10hendmdata segment;定义数据段mm1 db'please input password:','$'mm2 db'password error! ',13,10,'$'mm3 db '******************************************************************** ************',13,10,'$'mm4 db 13,10,'$'color db'choose one color for the notepad(1 is green,2 is gray,3 is pink,and else is black )$',13,10menu db'File(F1) Edit(F2) Form(F3) check(F4) Help(F10) $'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 ',13,10,'$'manu_6 db' PageSetup ',13,10,'$'manu_7 db' print ','$'edit_1 db' cancel ',13,10,'$'edit_2 db' cut ',13,10,'$'edit_3 db' past ',13,10,'$'edit_4 db' undo ',13,10,'$'edit_5 db' redo ',13,10,'$'form_1 db' word wrap',13,10,'$'form_2 db' font',13,10,'$'check_1 db' statement ',13,10,'$'check_2 db' find ',13,10,'$'edit_6 db' date ','$'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' Text editor $';帮助内容help_mas2 db' edition 1.0 $'help_mas3 db' Hello,this is our test version produced by 11//2013$'help_mas4 db'********************************************************$'help_mas5 db' Copyright Reserved by Huangshan & Liu Ruiling $'help_mas6 db' Thanks to the help of teather Sun ! $'help_mas7 db' --Shijiazhuang Tiedao University$'data endscode segmentassume cs:code,ds:dataStart：push dssub ax,axpush axmov ax,datamov ds,axlea dx,mm1mov ah,9int 21hmov ah,01int 21hcmp al,30hjz zzjnz extretext:lea dx,mm2mov ah,9int 21hmov ah,4chint 21hzz: lea dx,mm4mov ah,9int 21hlea dx,mm3mov ah,9int 21hlea dx,colormov ah,9int 21hmov ah,1int 21h ;从键盘读字符 ah=扫描码 al=字符码cmp al,31hjz A1cmp al,32hjz A2cmp al,33hjz A3call windcall editretA1: win 0,3eh,1,0,24,79call windcall editretA2: win 0,7eh,1,0,24,79call windcall editretA3: win 0,5eh,1,0,24,79call windcall editretwind proc near ;创建窗口子程序win 1,1fh,0,0,0,79win 0,1fh,24,0,24,79 ;定义窗口背景show: ;显示菜单位置及内容pos_curse 0,0,1mov ah,9lea dx,menuint 21hshow_2: ;显示状态栏位置及内容pos_curse 0,24,1mov ah,9pos_curse 0,1,0mov row,dhmov line,dlwind endpedit proc nearchar_get: ;读字符call comcom proc near ;定义功能鍵pos_getmov row,dhmov line,dlfirst: pos_curse 0,row,linej00: mov ah,0int 16h ;从键盘读字符 ah=扫描码 al=字符码push axlea dx,buffermov buffer[bx],alinc bxcmp ah,48h ;上jz up_1cmp ah,50h ;下jz down_1cmp ah,4bh ;左jz leftcmp ah,4dh ;右jz rightcmp ah,1ch ;回车jz enter_1call fuc_keymov ah,2mov dl,alint 21hpop axcall menu_showjmp j6down_1:jmp downenter_1:jmp enter_2up_1: jmp upleft: ;光标左移pos_getmov row,dhmov dl,linecmp line,0jnz directmov line,79dec rowcmp row,0je stop2 jmp firststop2:mov row,1jmp firstdirect:dec linejmp firstright: ;光标右移pos_getmov row,dhmov dl,linecmp line,79jnz direct2mov line,0inc rowcmp row,24je returns1jmp firstdirect2:inc linejmp firstenter_2:jmp enterup: ;上移光标 pos_getmov row,dhmov dl,linedec rowcmp row,0je stop1jmp firststop1:mov row,1jmp firstdown: ;下移光标 pos_getmov row,dhmov dl,lineinc rowcmp row,24je stop3jmp firststop3:mov row,23jmp firstreturns1:jmp returnsenter: ;回车换行 pos_getmov row,dhmov line,dlinc rowcmp row,24je returnsmov line,0jmp firstreturns:mov row,24mov line,0jmp firstj6: ret ;空操作com endpfuc_key proc near ;功能键子程序(通过比较扫描码来判定) next:cmp ah,0eh ;backspacejz bak_spcmp ah,44h ;F10jz help_0cmp ah,3ch ;F2jz edit_0cmp ah,3dh ;F3jz form_0cmp ah,3eh ;F4jz check_0rethelp_0: call helpedit_0: call edit_shform_0:call form_shcheck_0:call check_shbak_sp: ;退格键的功能pos_getmov row,dhmov line,dlcmp line,0je stopdec linejmp abstop:mov line,0ab:pos_get 0,row,linemov ah,2mov dl,00int 21hjmp firstcm:cmp line,00jz pos_cmpos_cm:pos_curse 0,0,0jmp first;;;;;;;;;;;;;;;;;;;;;;;显示编辑菜单edit_sh procpos_getpush dxwin 0,65h,1,9,9,18pos_curse 0,1,5string edit_1string edit_2string edit_3string edit_4string edit_5string edit_6pop dxdec dlmov ah,0hint 16hcmp ah,3chje pppp:win 0,1eh,9,10,13,70call backdisplayjmp char_getedit_sh endp ;;;;;;;;;;;;;;;;;;;;;;;;;;显示格式菜单form_sh proc pos_getpush dxwin 0,65h,1,21,4,30pos_curse 0,1,5string form_1string form_2pop dxdec dlmov ah,0hint 16hcmp ah,3chje qqqq:win 0,1eh,9,10,13,70call backdisplayjmp char_getform_sh endp ;;;;;;;;;;;;;;;;;;;;;;;;显示查看菜单check_sh proc pos_getpush dxwin 0,65h,1,31,4,40pos_curse 0,1,5string check_1string check_2dec dlmov ah,0hint 16hcmp ah,3chje rrrr:win 0,1eh,9,10,13,70call backdisplayjmp char_getcheck_sh endp ;;;;;;;;;;;;;;;;;;;;;;;;;;显示帮助信息help proc nearcall savedisplay ;显示帮助信息每行的位置 pos_getpush dxwin 0,57h,4,5,21,70pos_curse 0,6,25string help_mas1pos_curse 0,8,11string help_mas2pos_curse 0,10,11string help_mas3pos_curse 0,12,11string help_mas4pos_curse 0,14,11string help_mas5pos_curse 0,16,11string help_mas6pos_curse 0,18,11string help_mas7pop dxpos_curse 0,dh,dlmov ah,0int 16hcmp ah,36h ;F10jnz clscall helpcls:win 0,1eh,9,10,13,70 ;清屏call backdisplayhelp endpfuc_key endpmenu_show proc near ;显示菜单call savedisplaycmp ah,3bh ;F1功能jz menu_shjmp char_getmenu_sh: ;定义菜单的背景字体颜色 pos_getpush dxwin 0,06h,2,1,9,11win 0,65h,1,0,8,11pos_curse 0,1,0string manu_1string manu_2string manu_3string manu_4string manu_5string manu_6string manu_7pop dxdec dlpos_curse 0,dh,dlcopmar:red_chrcmp ah,50hjz manu_njmp manu_hidmanu_hid: ;菜单隐藏win 0,1eh,1,1,7,11call backdisplayjmp char_get ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;开始定义各个菜单项manu_n:win 0,65h,5,1,5,8pos_curse 0,5,0string manu_5win 0,15h,1,1,1,8pos_curse 0,1,0string manu_1red_chrcmp ah,48hje manu_ncmp al,0dhjz new_1cmp ah,50hje manu_ojmp manu_hid manu_n0:jmp manu_nmanu_o:win 0,65h,1,1,1,8 pos_curse 0,1,0 string manu_1win 0,15h,2,1,2,8 pos_curse 0,2,0 string manu_2red_chrcmp ah,48hje manu_ocmp al,0dhjz open_1cmp ah,50hje manu_sjmp manu_hidnew_1: jmp new_2manu_s:win 0,65h,2,1,2,8 pos_curse 0,2,0 string manu_2win 0,15h,3,1,3,8 pos_curse 0,3,0 string manu_3red_chrcmp al,0dhjz save_1cmp ah,48hje manu_scmp ah,50hje manu_ajmp manu_hid open_1: jmp open_2manu_n1:jmp manu_nmanu_a:win 0,65h,3,1,3,8 pos_curse 0,3,0 string manu_3win 0,15h,4,1,4,8 pos_curse 0,4,0 string manu_4red_chrcmp ah,48hje manu_acmp ah,50hje manu_ejmp manu_hidmanu_n2:jmp manu_n1new_2: jmp newsave_1: call savemanu_e:win 0,65h,4,1,4,8pos_curse 0,4,0string manu_4win 0,15h,5,1,5,8pos_curse 0,5,0string manu_5red_chrcmp ah,50hje manu_n2cmp ah,48hje manu_ecmp ah,1chje exitjmp manu_hidexit:call backdisplaywin 0,07h,15,10,17,61win 0,24h,14,9,16,60mov dh,15mov dl,9mov bh,0mov ah,2int 10hlea dx,message4mov ah,9int 21hmov ah,1int 21hcmp al,79h jnz qcall quittq: cmp al,6ehjz quitquit: win 0,07h,0,0,24,79pos_curse 0,0,0mov ah,4chint 21hretmenu_show endp ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;新建文件new proc near pos_getpush dxcall backdisplaywin 0,07h,15,10,17,61win 0,24h,14,9,16,60,mov dh,15mov dl,9mov bh,0mov ah,2int 10hlea dx,message1cmp al,0dhmov ah,9int 21hmov bx,0all:mov ah,1int 21hcmp al,0dhje alllmov path[bx],alinc bxjmp allalll:win 0,3eh,15,9,17,61pop dxpos_curse 0,dh,dllea dx,pathmov ah,3chmov cx,00int 21hmov handle,axmov bx,axmov ah,3ehint 21hwin 0,3eh,1,0,23,79mov dh,1mov bh,0mov ah,2int 10hjmp char_getnew endpopen_2: jmp open ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;打开文件open proc near call backdisplaywin 0,07h,15,10,17,61win 0,24h,14,9,16,60mov dh,15mov dl,9mov bh,0mov ah,2int 10hlea dx,message3mov ah,9int 21hmov bx,0cll:mov ah,1int 21hcmp al,13je clllmov path[bx],alinc bxjmp cllclll:win 0,3eh,1,0,23,79lea dx,pathmov ah,3dhmov al,0int 21hmov handle,axlea dx,buffermov bx,handlemov cx,2000mov ah,3fhint 21hwin 0,3eh,1,23,1,79mov dh,1mov dl,0mov ah,2int 10hmov cx,1000sub bx,bxreplay:mov dl,buffer[bx]inc bxmov ah,2int 21hloop replaymov bx,handlemov ah,3ehint 21hmov dh,1mov dl,0mov bh,0mov ah,2int 10hmov cx,10mov bx,0cleapath_3:mov bl,0mov path[bx],blloop cleapath_3jmp char_getopen endp ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;保存文件save proc near pos_getpush dxwin 0,3eh,1,0,6,10call backdisplaymov ah,pathcmp ah,21hjl j_3jmp j_4j_3:win 0,07h,15,10,17,61win 0,24h,14,9,16,60,mov dh,15mov dl,9mov bh,0mov ah,2lea dx,message2mov ah,9int 21hmov bx,0dll:mov ah,1int 21hcmp al,0dhje dlllmov path[bx],alinc bxjmp dlldlll:win 0,3eh,1,0,23,79pop dxpos_curse 0,dh,dl j_4: lea dx,pathmov ah,3chmov cx,00int 21hmov handle,axlea dx,buffermov bx,handlemov cx,2000mov ah,40hint 21hmov bx,handlemov ah,3ehint 21hcall backdisplayjmp char_getsave endpsavedisplay proc nearpush axpush bxpush cxpush dxpush dsmov ax,0002hint 33hmov bx,0dmov cx,3840dloop1:mov ax,0b800hmov ds,axmov dl,ds:[bx]mov ax,datamov ds,axmov bak[bx],dlinc bxloop loop1mov ax,0001hint 33hpop dspop dxpop cxpop bxpop axsavedisplay endpbackdisplay proc nearpush axpush bxpush cxpush dxpush dsmov bx,0dmov cx,3840dloop11:mov ax,datamov ds,axmov dl,bak[bx]mov ax,0b800hmov ds,axmov ds:[bx],dlinc bxloop loop11pop dspop dxpop cxpop bxpop axretbackdisplay endp ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;退出quitt proc near call backdisplaywin 0,07h,15,10,17,61win 0,24h,14,9,16,60,mov dh,15mov dl,9mov bh,0mov ah,2int 10hlea dx,message2mov ah,9int 21hmov bx,0qll:mov ah,1int 21hcmp al,0dhje qlllmov path[bx],alinc bxjmp qllqlll:win 0,07h,15,10,17,61win 0,3eh,14,9,16,60call backdisplaylea dx,pathmov ah,3chmov cx,00int 21hmov handle,axlea dx,buffermov bx,handlemov cx,2000mov ah,40hint 21hmov bx,handlemov ah,3ehint 21hcall backdisplaywin 0,07h,0,0,24,79mov ah,4chint 21hretquitt endpedit endp code endsend start五、总结1、通过本次汇编课程设计，我们加深了对汇编理论知识的理解，更重要的是可以用汇编的理论知识来设计出了一个直观的小系统，在这个过程中我们也很有成就感。