西南科技大学微机原理课程设计电风扇

1、DATA SEGMENT WORD1 DB '*PLEASE TYPE IN SPEED*$' WORD2 DB 'A SPEED1, B SPEED2, C SPEED3, D STOP, E SETTIME$' WORD3 DB '*$' WORD4 DB 'SPEED1$' WORD5 DB 'SPEED2$' WORD6 DB 'SPEED3$' WORD7 DB 'STOP$' WORD8 DB 'PLEASE TYPE IN TIME$' BUF1 DB

2、? BUF2 DB ? TIME DB 0 DATA ENDS STACK SEGMENT STACK ENDS CODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACK START: MOV AX,DATA MOV DS,AX M: LEA DX,WORD1 MOV AH,09H INT 21H ;输出WORD1中的内容 CALL HH ;使用换行子程序 LEA DX,WORD2 MOV AH,09H INT 21H CALL HH LEA DX,WORD3 MOV AH,09H INT 21H CALL HH SEARCH: MOV AH,01H INT 1

3、6H ;读键盘状态 JZ SEARCH CMP AL,'A' JZ SPEED1 CMP AL,'B' JZ SPEED2 CMP AL,'C' JZ SPEED3 CMP AL,'D' JZ STOP CMP AL,'E' JZ SETTIME MOV AH,10H INT 16H ;优先级D>A>B>C JMP SEARCH SETTIME:LEA DX,WORD8 MOV AH,09H INT 21H CALL HH MOV AH,01H INT 16H JZ SEARCH CALL TIM

4、ES JMP SEARCH STOP: LEA DX,WORD7 MOV AH,09H INT 21H ;输出信息 CALL HH MOV AH,10H INT 16H PUSH AX PUSH BX PUSH CX PUSH DX MOV DL,'/' MOV AH,02H INT 21H CALL FW ;保证每次都是在同一位置输出，需要将光标位置复位 CMP TIME,00H ;查询定时器是否启动 JZ WENT MOV AL,00H MOV TIME,AL ;将定时器复位 WENT: POP DX POP CX POP BX POP AX JMP SEARCH SPEE

5、D1: LEA DX,WORD4 MOV AH,09H INT 21H CALL HH MOV AH,10H INT 16H CALL RUN1 ;调用一档 JMP SEARCH SPEED2: LEA DX,WORD5 MOV AH,09H INT 21H CALL HH MOV AH,10H INT 16H CALL RUN2 JMP SEARCH SPEED3: LEA DX,WORD6 MOV AH,09H INT 21H CALL HH MOV AH,10H INT 16H CALL RUN3 JMP SEARCH MOV AH,4CH INT 21H RUN1 PROC ;一档子程

6、序 PUSH AX PUSH BX PUSH CX PUSH DX BEGIN1: MOV AH,01H INT 16H JNZ TYPED1 ;查询键盘是否有输入 TURNING1:CMP TIME,00H ;查询定时器是否启动 JZ GO1 ;没启动直接运行 MOV AH,2CH INT 21H MOV AL,BUF1 CMP AL,CL JNZ GO1 CMP BUF2,DH JZ STOP ;若启动查询停止时间与当前时间对比是否相等，相等就停止 GO1: MOV DL,'/' MOV AH,02H INT 21H CALL FW CALL DELAY ;延时 MOV D

7、L,'-' MOV AH,02H INT 21H CALL FW CALL DELAY ;延时 MOV DL,'' MOV AH,02H INT 21H CALL FW CALL DELAY ;延时 MOV DL,'|' MOV AH,02H INT 21H CALL FW CALL DELAY ;延时 JMP BEGIN1 TYPED1: CMP AL,'A' JZ SPEED1 CMP AL,'B' JZ SPEED2 CMP AL,'C' JZ SPEED3 CMP AL,'D'

8、; JZ STOP CMP AL,'E' JZ SETTIME JMP TURNING1 POP DX POP CX POP BX POP AX RET RUN1 ENDP RUN2 PROC PUSH AX PUSH BX PUSH CX PUSH DX BEGIN2: MOV AH,01H INT 16H JNZ TYPED2 TURNING2:CMP TIME,00H JZ GO2 MOV AH,2CH INT 21H CMP BUF1,CL JNZ GO2 CMP BUF2,DH JZ STOP GO2: MOV DL,'/' MOV AH,02H IN

9、T 21H CALL FW CALL DELAY1 MOV DL,'-' MOV AH,02H INT 21H CALL FW CALL DELAY1 MOV DL,'' MOV AH,02H INT 21H CALL FW CALL DELAY1 MOV DL,'|' MOV AH,02H INT 21H CALL FW CALL DELAY1 JMP BEGIN2 TYPED2: CMP AL,'A' JZ SPEED1 CMP AL,'B' JZ SPEED2 CMP AL,'C' JZ SP

10、EED3 CMP AL,'D' JZ STOP CMP AL,'E' JZ SETTIME JMP TURNING2 POP DX POP CX POP BX POP AX RET RUN2 ENDP RUN3 PROC PUSH AX PUSH BX PUSH CX PUSH DX BEGIN3: MOV AH,01H INT 16H JNZ TYPED3 TURNING3:CMP TIME,00H JZ GO3 MOV AH,2CH INT 21H CMP BUF1,CL JNZ GO3 CMP BUF2,DH JZ STOP GO3: MOV DL,

11、9;/' MOV AH,02H INT 21H CALL FW CALL DELAY2 MOV DL,'-' MOV AH,02H INT 21H CALL FW CALL DELAY2 MOV DL,'' MOV AH,02H INT 21H CALL FW CALL DELAY2 MOV DL,'|' MOV AH,02H INT 21H CALL FW CALL DELAY2 JMP BEGIN3 TYPED3: CMP AL,'A' JZ SPEED1 CMP AL,'B' JZ SPEED2 CM

12、P AL,'C' JZ SPEED3 CMP AL,'D' JZ STOP CMP AL,'E' JZ SETTIME JMP TURNING3 POP DX POP CX POP BX POP AX RUN3 ENDP DELAY PROC ;延时子程序 PUSH CX PUSH DX MOV DX,10000 ;外循环次数 A1: MOV CX,6000 ;内循环次数 A2: LOOP A2 DEC DX JNZ A1 POP DX POP CX RET DELAY ENDP DELAY1 PROC PUSH CX PUSH DX MOV D

13、X,30000 B1: MOV CX,6000 B2: LOOP B2 DEC DX JNZ B1 POP DX POP CX RET DELAY1 ENDP DELAY2 PROC PUSH CX PUSH DX MOV DX,60000 C1: MOV CX,6000 C2: LOOP C2 DEC DX JNZ C1 POP DX POP CX RET DELAY2 ENDP HH PROC ;换行子程序 MOV AH,03H INT 10H ;取光标位置 INC DH ;行加1 MOV DL,0 ;列置零 MOV AH,02H INT 10H RET HH ENDP FW PROC ;复位子程序 MOV AH,03H INT 10H ;取光标位置 MOV DL,0 ;行不变，列置零 MOV AH,02H INT 10H RET FW ENDP TIMES PROC ;定时子程序 MOV AH,10H INT 16H MOV AH,01H INT 21H ;从键盘得到一个数字到AL CALL