关闭

基于汇编语言的电子琴设计(3)

标签: 汇编语言btdelaydivaudio
3151人阅读 评论(0) 收藏 举报
分类:

;代码段

CODE SEGMENT

     ASSUME DS:DATA,CS:CODE

MAIN PROC FAR

;主程序

START: 

       CALL INIT                                       ;调用初始化程序

NEW_SCAN:      

       CALL SCAN_KEY                            ;扫描所按下的键

       CMP SONG,100                                 ;判断是否按下了自动播放的歌曲键

       JE  HAND_PLAY                            ;若不是,继续判断

       CALL PLAY_SONG                          ;若是,演奏音乐

       JMP NEW_SCAN                              ;演奏结束,重新扫描有无键按下

HAND_PLAY:

    CMP KEYNUM,100                           ;判断是否手动演奏

    JZ  NEW_SCAN                              ;若不是,重新扫描有无键按下

                                                               ;若是,进行按键处理

       PUSH BX                    

       MOV BX,KEYNUM     

       CALL KEY_DOWN                          ;在屏幕上显示按下状态

       POP BX

       CALL LOAD_AUDIO ;判断高低音、C/D调,并装入对应频率段地址到BX中

       PUSH SI

       MOV SI,KEYNUM

       MOV DI,[BX+SI]

       CALL GEN_HAND                            ;发声

       POP SI

       PUSH BX

       MOV BX,KEYNUM                           ;在屏幕上显示弹起状态

       CALL KEY_UP

       POP BX

 

       JMP NEW_SCAN                              ;重新扫描有无键按下,直到按下ESC键

MAIN ENDP

 

GEN_HAND PROC NEAR

;手动演奏发声程序

IN:DI

       PUSH AX

       PUSH BX

       PUSH CX

       PUSH DX

       PUSH DI

 

       MOV AL,0B6H                                 ;定时器初始化

       OUT 43H,AL

       MOV DX,12H

       MOV AX,348CH

       DIV DI

       OUT 42H,AL                                    ;定时器送处值

       IN AL,61H                                        ;开扬声器

       MOV AL,AH

       OUT 42H,AL

       IN AL,61H

       MOV AH,AL

       OR AL,3

       OUT 61H,AL

WAIT1: 

       CALL WAITF                                   ;调用延时程序

    IN AL,60H                                

    TEST AL,80H                               ;查询键是否放开

    JZ WAIT1                                         ;未放开继续查询

       MOV AL,AH                                    ;放开则关扬声器

       OUT 61H,AL

 

       POP DI

       POP DX

       POP CX

       POP BX

       POP AX

   RET

GEN_HAND ENDP

 

GEN_AUTO PROC NEAR

;自动播放发声程序

       PUSH AX

       PUSH BX

       PUSH CX

       PUSH DX

       PUSH DI

 

       MOV AL,0B6H

       OUT 43H,AL

       MOV DX,12H

       MOV AX,348CH

       DIV DI

       OUT 42H,AL

       IN AL,61H

       MOV AL,AH

       OUT 42H,AL

       IN AL,61H

       MOV AH,AL

       OR AL,3

       OUT 61H,AL

WAIT2: 

       CALL WAITF

       DEC BX

       JNZ WAIT2                                      ;判断是否播放完毕

       MOV AL,AH                                    ;完毕则关闭扬声器

       OUT 61H,AL

      

POP DI

       POP DX

       POP CX

       POP BX

       POP AX

      RET

GEN_AUTO ENDP

 

WAITF PROC NEAR

;延时程序

       PUSH AX

MOV CX,DELAY_TIME

WAITF1:

       IN AL,61H                         

       AND AL,10H                                    ;检查PB4口

       CMP AL,AH                                     ;判断AL变化否

       JE WAITF1                                       ;等待AL变化

       MOV AH,AL                                    ;保存PB4的新状态(AL中)

       LOOP WAITF1

       POP AX

       RET

WAITF ENDP

 

PIANO_DRAW  PROC NEAR

;绘制琴键

 LEA SI,ST_LX                                ;载入白色起始点地址

     LEA DI,ED_LX                               ;载入白色结束点地址

     MOV CX,21                                    ;白键数目

NEXT_DRAW:

     DRAW [SI],ST_Y,[DI],ED_Y,0FH    ;调用宏定义画白键

     DRAW [SI],90,[DI],93,07H                    ;阴影

     ADD SI,2                                        ;下一个键

     ADD DI,2

     LOOP NEXT_DRAW

 

        LEA SI,BT_X                      ;载入黑色起始点地址

        LEA DI,BD_X                            ;载入黑色结束点地址

        MOV CX,15                              ;黑键数目

NEXT_BLOCK:

        DRAW [SI],BT_Y,[DI],BD_Y,00H

        ADD SI,2

        ADD DI,2

        LOOP NEXT_BLOCK

        RET

PIANO_DRAW ENDP

 

KEY_DOWN PROC NEAR

;键按下时,在屏幕上显示

PUSH SI

       PUSH DI

       CALL LOAD                                    ;载入所按下键在屏幕上的位置

       DRAW [SI+BX],90,[DI+BX],92,0FH

    DRAW [SI+BX],92,[DI+BX],94,07H

       POP DI

       POP SI

       RET

KEY_DOWN ENDP

 

KEY_UP PROC NEAR

;键弹起时,恢复正常状态

       PUSH SI

       PUSH DI

       CALL LOAD                                    ;载入所弹起键在屏幕上的位置

    DRAW [SI+BX],90,[DI+BX],93,07H  ;恢复阴影

       DRAW [SI+BX],93,[DI+BX],94,05H  ;恢复背景色

       POP DI

       POP SI

      RET

KEY_UP ENDP

 

 

〈未完〉

0
0
查看评论

51单片机 汇编语言电子琴

以前写过一个 C 语言的:http://hi.baidu.com/do_sermon/item/c5e55bc1fc2dc30ec710b2f9应网友要求,再写个汇编的。另外,还增加了显示按键号码的功能。题目链接:http://zhidao.baidu.com/question/1818901024...
  • baidu_33836580
  • baidu_33836580
  • 2016-01-25 12:12
  • 830

51单片机实训-4×4矩阵键盘电子琴

51单片机实训-4×4矩阵键盘电子琴
  • myifeng1
  • myifeng1
  • 2016-12-17 15:29
  • 295

基于VHDL的具有自动乐曲演奏功能的电子琴设计

具有自动乐曲演奏功能的电子琴设计 先给出设计结果视频链接:    具有自动乐曲演奏功能的电子琴-视频实录 优酷:具有自动乐曲演奏功能的电子琴-视频实录        本文为本人于2012年下学期做的ED...
  • u011335616
  • u011335616
  • 2013-09-12 16:35
  • 5713

基于汇编语言的电子琴设计(1)

[调试环境:TASM 5.0+ winxp] 一、基本要求:    利用PC键盘和CRT显示器设计一个电子琴,首先在CRT显示器上模拟出琴键的画面,然后要求在不同的情况下按下键盘上“1~7”中任意数字键,可弹奏出与之相应的音调,且在模拟键盘上标示出对应的那个键...
  • mythma
  • mythma
  • 2004-03-29 10:13
  • 3994

基于汇编语言的电子琴设计(4)

LOAD PROC NEAR;载入键在屏幕上的位置CMP KEYFLAG,00H                  &#...
  • mythma
  • mythma
  • 2004-03-29 10:13
  • 1890

【电子DIY】基于NE555制作的简易电子琴

自多次利用51单片机+无源蜂鸣器制作电子琴多次以后,突然领悟蜂鸣器产生声波的原理,无非是产生一定频率占空比50%的PWM而已。然后,联想到之前用NE555制作过几个小电路,靠的是555产生一定频率的波,于是在想是否可以不通过单片机控制直接制作按键电子琴。原理上看,只要每个按键对应R2的电阻不同,即可...
  • u011619535
  • u011619535
  • 2017-07-30 22:49
  • 1392

基于汇编语言的电子琴设计(5)

LOAD_AUDIO PROC NEAR;C/D调及对应的低、中、高频率分别载入;OUT:BX;IN:TUNE,AUDIOTUNE_D:             ...
  • mythma
  • mythma
  • 2004-03-29 10:13
  • 2257

独创Arduino电子琴

一.目标: 实现一个简单电子琴的功能 二.原理:       用按键作为钢琴的键盘,结合蜂鸣器实验,用蜂鸣器的一个pwm引脚作为输出。          不同的按键 被按...
  • V__KING__
  • V__KING__
  • 2014-01-25 11:43
  • 2105

基于汇编语言的电子琴设计(2)

六、程序清单:主要程序代码如下:;宏定义DRAW MACRO START_X,START_Y,END_X,END_Y,COLOR        LOCAL DRAW_NEXT;local :避免宏重复调用时,标号的重复;功能:画填...
  • mythma
  • mythma
  • 2004-03-29 10:13
  • 3956

基于fpga的niosii PS2电子琴

1 概述 1.1 作品简介 本设计是基于NIOSII软核的PS2键盘电子琴,通过ps2键盘上的21个按键来控制蜂鸣器发出高音,中音与低音的(DO,RE,MI,FA,SO,LA,SI)音调,并通过三个数码管来显示相应的音调值,通过两个拨码开关控制节拍(即一个音持续的时间)。 1.2 作品目的与意...
  • baidu_37472307
  • baidu_37472307
  • 2017-03-31 15:53
  • 457
    个人资料
    • 访问:536790次
    • 积分:7136
    • 等级:
    • 排名:第3784名
    • 原创:173篇
    • 转载:4篇
    • 译文:2篇
    • 评论:187条
    最新评论