微机原理与接口技术课程设计-打字练习程序

微机原理与接口技术课程设计-打字练习程序内容摘要：

ov ah,09h lea dx,addrr int 21h pop dx pop ax ENDM。 data segment addrr db 400 dup(39。 $39。 ) addrr1 db 39。 abcdefghijklmnopqrstuvwxyz0123456789$39。 addrr2 db 400 dup(39。 $39。 ) Anumber dw 0。 总字符个数 Rnumber dw 0。 正确字符个数 LineMax dw 0。 满行的字符数 LineAct dw 0。 当前行字符数 FullFlag db 0。 满行标志 FullFlag=1满行， FullFlag=0未满 gbattr db 2 dup(0)。 存放字符所在行列 Stime db 3 dup(0) temp db 5 dup(0) ts1 db 39。 Stime:$39。 ts2 db 39。 Rrate:$39。 ts3 db 39。 Total UseTime:$39。 ts4 db 39。 Total Characters:$39。 ts5 db 39。 CorrectReta:$39。 ts6 db 39。 Press any key to end!$39。 ts7 db 39。 An ESC Jian KeYi SuiShi TuiChu!$39。 ts8 db 39。 ***DaZi LianXi***$39。 data ends code segment assume ds:data,cs:code start: mov ax,data mov ds,ax。 mov di,0。 随机产生字符 mov bx,65 zifu: mov ah,2ch int 21h mov al,dl cbw mov si,ax cmp si,35 ja zifu mov al,addrr1[si] mov addrr[di],al inc di dec bx push di push si mov di,400h Aa1: mov si,0ffffh Aa2: dec si jnz Aa2 dec di jnz Aa1 pop si pop di cmp bx,0 jnz zifu。 CLEAR 0,57h,0,10,23,69 CLEAR 0,17H,3,12,22,66 CLEAR 0,70h,4,14,22,64 CLEAR 0,25H,12,14,14,64 CLEAR 0,70h,13,18,13,35 CLEAR 0,70H,13,43,13,60。 SETGB 0,0,30。 输出上面提示语句 CLEAR 0,25h,0,28,0,49 CLEAR 0,25h,2,23,2,54 CLEAR 0,57h,1,14,1,64 mov ah,09h lea dx,ts8 int 21h SETGB 0,2,24 mov ah,09h lea dx,ts7 int 21h。 SETGB 0,4,14 mov di,0 mov cx,0ffffh AD: mov dl,addrr[di]。 装载字符 cmp dl,39。 $39。 jz A2 push dx mov bp,di CALL isFullLine pop dx mov ah,02h int 21h inc di loop AD A2: mov ah,2ch。 取系统时间 int 21h mov Stime[0],ch mov Stime[1],cl mov Stime[2],dh SETGB 0,15,14 CALL TONGJI mov cx,0ffffh mov di,0h AS: cmp addrr[di],39。 $39。 jnz ASnt00 jmp AEND ASnt00: mov bp,di CALL isFullLine mov bp,di CALL clew_char。 改变字符颜色。 ========================================== reinput:。 输入字符开 始打字 READGB 0 mov ah,01 int 21h cmp al,27。 是否退出 jnz al27nt jmp exit。 al27nt: cmp al。