中国矿业大学计算机学院信息安全10-4班硬件课程设计——电子琴

OUT DX, AL CALL DELAY JMP GG

LED DB 07H,66H,06H,3FH DB 00H,00H,00H,00H DB 7FH,6DH,5BH,71H

DB 00H,00H,00H,00H DB 00H,00H,00H,00H DB 00H,00H,00H,00H DB 00H,00H,00H,00H

DB 00H,00H,00H,00H DB 6FH,7DH,4FH,79H DB 00H,00H,00H,00H DB 77H,7CH,39H,5EH

DB 00H,00H,00H,00H DB 00H,00H,00H,00H DB 00H,00H,00H,00H DB 00H,00H,00H,00H DB 00H,00H,00H,00H

DELAY PROC NEAR MOV DX, 200H MOV AL, 80H OUT DX, AL PUSH CX MOV CX, 60000D LOOP $ MOV DX, 200H MOV AL, 00H OUT DX, AL POP CX RET

DELAY ENDP

CODE ENDS END START

预置音乐程序：

- 33 -

中国矿业大学计算机学院信息安全10-4班硬件课程设计——电子琴

Z8279 EQU 212H D8279 EQU 210H

LEDMOD EQU 00H ;左边输入,八位显示外部译码八位显示 LEDFEQ EQU 38H

CODE SEGMENT ASSUME CS: CODE START:MOV DX, Z8279 MOV AL, 00H OUT DX, AL MOV AL, 38H OUT DX, AL

MOV DX, 20BH MOV AL, 00110111B OUT DX, AL

PD: MOV DX, 200H MOV AL, 00H OUT DX, AL MOV AL, 00H MOV DX, Z8279 MOV AL, 0C2H OUT DX, AL

WAIIT: NOP IN AL, DX MOV BL, AL AND AL, 80H CMP AL, 80H JE WAIIT 跳转等待 MOV AL, BL AND AL, 0FH CMP AL, 00H JE WAIIT MOV AL, 00H

MOV DX, D8279 CMP AL, 28H JE GAO

CMP AL, 28H JE ZHONG CMP AL, 28H JE DIY

;扫描频率 ;8279初始化 ;8253初始化 ;置空FIFO寄存器 ;FIFO正在清除期间则 ;无键按下则等待 ;判断是哪个键 - 34 -

中国矿业大学计算机学院信息安全10-4班硬件课程设计——电子琴

GAO:CALL GAOYIN JMP PD

ZHONG:CALL ZHONGYIN JMP PD

DIY:CALL DIYIN JMP PD

ZHONGYIN PROC NEAR MOV CX,02H

WW1:MOV DX, 208H ;1 MOV AL, 24H OUT DX, AL MOV AL, 38H OUT DX, AL

CALL DELAY2 MOV DX, 208H ;2 MOV AL, 07H OUT DX, AL MOV AL, 34H OUT DX, AL

CALL DELAY2 MOV DX, 208H ;3 MOV AL, 34H OUT DX, AL MOV AL, 30H OUT DX, AL

CALL DELAY2 ;1 MOV DX, 208H MOV AL, 24H OUT DX, AL MOV AL, 38H OUT DX, AL CALL DELAY2 LOOP WW1

MOV CX,02H WW3:

MOV DX, 208H MOV AL, 34H OUT DX, AL MOV AL, 30H OUT DX, AL

CALL DELAY2 MOV DX, 208H

- 35 -

中国矿业大学计算机学院信息安全10-4班硬件课程设计——电子琴

MOV AL, 65H OUT DX, AL MOV AL, 28H OUT DX, AL

CALL DELAY2 MOV DX, 208H MOV AL, 51H OUT DX, AL MOV AL, 25H OUT DX, AL CALL DELAY2

MOV DX, 208H MOV AL, 51H OUT DX, AL MOV AL, 25H OUT DX, AL

CALL DELAY2 LOOP WW3 MOV CX,02H WW5:

MOV DX, 208H MOV AL, 51H OUT DX, AL MOV AL, 25H OUT DX, AL

CALL DELAY MOV DX, 208H MOV AL, 72H OUT DX, AL MOV AL, 22H OUT DX, AL

CALL DELAY ; MOV DX, 208H MOV AL, 51H OUT DX, AL MOV AL, 25H OUT DX, AL CALL DELAY MOV DX, 208H MOV AL, 65H OUT DX, AL MOV AL, 28H OUT DX, AL CALL DELAY

- 36 -