汇编实验-9.docx

山东大学实验报告 2016 年 月 日姓名 刘方铮 ，学号 201411130001 系年级 计算机科学与技术系2014级 科目 汇编语言 题目 字符图形程序，屏幕窗口程序和画栅栏程序实验源程序清单字符图形程序：data segmentarray1 db 0,1,2,3,4,5,6,7,8,9row db 0col db 0color db 0fharray2 db please pay attention:press ESC to exit press del to clear screen,$array3 db CHARACTER:,$array4 db COLOR:,$data endsprognam segmentassume cs:prognam,ds:datamain proc farstart:push dsmov ax,0push axmov ax,datamov ds,axlea dx,array2mov ah,9int 21hmov row,1mov col,24mov bx,26l0:call resetmov al,7ch mov bh,0mov cx,1mov ah,0ahint 10h inc rowdec bxjnz l0mov row,2mov col,0mov di,0call resetlea dx,array3mov ah,9int 21hmov row,3mov col,0l1:call resetmov ax,diadd al,30hmov bh,0mov cx,1mov ah,0ahint 10hinc colcall resetmov bh,0mov cx,1mov ah,0ahmov al,array1[di] int 10hinc dicmp di,9ja l2add col,6 cmp col,22 jb l1add row,2mov col,0JMP l1l2 :add row,4mov col,0call resetlea dx,array4mov ah,9int 21hinc rowmov col,0mov di,1l3: call resetmov bx,diadd bl,60h mov bh,0mov cx,1mov ah,0ahmov al,blint 10hinc colcall resetsub bl,60hmov bh,0mov cx,1mov ah,9mov al,0dbhint 10hinc dicmp di,9ja l4add col,6cmp col,22jb l3add row,2mov col,0JMP l3l4:mov row,1mov col,26call resetdraw:mov ah,0int 16h cmp ah,48h je up cmp ah,50hje downcmp ah,4dhje rightcmp ah,4bhje leftcmp ah,53hje l5cmp ah,01h jnz numretl5: call clearmov row,1mov col,26call resetjmp drawnum:cmp al,30hjnb l6jmp drawl6:cmp al,39hja l7and ax,00ffhsub ax,30hmov di,axmov al,array1[di]mov bh,0mov cx,1mov bl,colormov ah,09hint 10hjmp drawl7:cmp al,61hjb l8cmp al,69hja l8sub al,60hmov color,all8:jmp drawup: dec row jz up1jmp l9 up1:inc rowjmp l9down:inc rowcmp row,25ja down1jmp l9down1:dec rowjmp l9left:dec colcmp col,26jb left1jmp l9left1:inc coljmp l9right:inc colcmp col,78ja right1jmp l9right1:dec coll9: call resetjmp drawmain endpreset proc near mov ah,2 mov bh,0 mov dh,row mov dl,col int 10h retreset endpclear p