汇编语言如何实现发出各种声音

技术汇编语言如何实现发出各种声音这篇文章主要介绍“汇编语言如何实现发出各种声音”,在日常操作中,相信很多人在汇编语言如何实现发出各种声音问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”汇编语

本文主要介绍“如何用汇编语言发出各种声音”。在日常操作中,相信很多人对于如何用汇编语言发出各种声音都有疑问。边肖查阅了各种资料,整理出简单易用的操作方法,希望能帮你解答“如何用汇编语言发出各种声音”的疑惑!接下来,请和边肖一起学习!

9.戒指设计

9.1设计要求:

掌握如何使用铃铛。设计程序从键盘接收输入字符。如果数字是n,它会响n次。如果输入的不是数字,就不会响。

9.2设计思路:

判断输入值在0和9之间,n的值给BP,振铃延迟次数CX设置为输出n次振铃。

汇编语言如何实现发出各种声音

9.3程序清单:

数据分类

pkeyDB0AH,0DH,'请输入: ',' $ '

ERRDB0AH,0DH,' eero!',0AH,0DH,'请重新输入: ',' $ '

数据结束

CODESEGMENT

ASSUMECS:CODE,DS:DATA

状态:最大值,数据

MOVDS,AX

移动,斧头

pkey

MOVAH,09H

INT21HDOS函数调用,输出字符串

INPUT:MOVAH,01H

INT21H

CMPAL,“9”

JAeero

CMPAL,“0”

JBeero

SUBAL,30H输入0~9,那么AL就是环数。

啊,啊

MOVBP,AX;BP是环数n

xiang:nbs

p;  MOV CX,4                ;CX为响铃延时时间
        MOV AH,02H              
        MOV DL,07H
        INT 21H                 ;DOS功能调用,响铃 
LP:     LOOP LP                 ;响铃延时
        DEC BP  
        JNZ xiang               ;响铃N次
        JMP STATE                
                
eero:    LEA DX,ERR
        MOV AH,9
        INT 21H                 ;输出错误字符串
        JMP INPUT
CODE   ENDS
END  STATE

9.4程序运行结果及分析:

设置CX次数为延时次数,BP次数为响铃次数,调用响铃功能通过延时实现响铃,起初会把延时次数和响铃次数混淆导致错误。

汇编语言如何实现发出各种声音

图9 响铃设计结果

10.需要外接扬声器的发声程序

10.1机枪声音

PROGRAM SEGMENT  
    
MAIN PROC FAR
        ASSUME CS:PROGRAM
        
        ORG 100H
STRAT:MOV CX,20D
NEW_SHOT:PUSH CX
         CALL SHOOT
         MOV CX,4000H 
         
SILENT:LOOP SILENT
       POP CX
       LOOP NEW_SHOT
       INT 20H 
       
MAIN ENDP    
SHOOT PROC NEAR  
    
      MOV DX,140H
      MOV BX,20H
      IN  AL,61H
      AND AL,11111100B 
      
SOUND:XOR AL,2
      OUT 61H,AL
      ADD DX,9248H
      MOV CL,3
      ROR DX,CL
      MOV CX,DX
      AND CX,1FFH
      OR CX,10    
      
WAIT: LOOP WAIT 
       DEC BX
       JNZ SOUND
       AND AL,11111100B
       OUT 61H,AL
       RET      
       
SHOOT ENDP   
PROGRAM ENDS 
END STRAT

10.2音乐播放

;定义数据段
data segment
     infor1 db 0Dh, 0AH, "welocom you to come here listeng! $"
     mus_freg  dw 330,294,262,294,3 dup (330)     ;频率表
               dw 3 dup (294),330,392,392
               dw 330,294,262,294,4 dup (330)
               dw 294,294,330,294,262,-1
     mus_time  dw 6 dup (25),50                   ;节拍表
               dw 2 dup (25,25,50)
               dw 12 dup (25),100
data ends
;栈段定义
stack segment stack
      db 200 dup(?)
stack ends
;--------字符串输出宏----------
SHOWBM MACRO b
     LEA DX,b
     MOV AH,9
     INT 21H
 ENDM
;----------音乐地址宏-----------
ADDRESS MACRO A,B
     LEA SI,A
     LEA BP,DS:B
ENDM
;代码段定义
code segment
     assume ds:data, ss:stack, cs:code
start:
     mov ax, data
     mov ds, ax
     mov ax, stack
     mov ss, ax
     mov sp, 200   
     address mus_freg, mus_time
     call music
exit:     
     mov ah, 4cH
     int 21h
;------------发声-------------
gensound proc near
     push ax
     push bx
     push cx
     push dx
     push di
     mov al, 0b6H
     out 43h, al
     mov dx, 12
     mov ax, 348ch
     div di
     out 42h, al
     mov al, ah
     out 42h, al 
     in al, 61h
     mov ah, al
     or al, 3
     out 61h, al
wait1:
     mov cx, 3314
     call waitf
delay1:
     dec bx
     jnz wait1
     mov al, ah
     out 61h, al
     pop di
     pop dx
     pop cx
     pop bx
     pop ax
     ret 
gensound endp
;--------------------------
waitf proc near
      push ax
waitf1:
      in al,61h
      and al,10h
      cmp al,ah
      je waitf1
      mov ah,al
      loop waitf1
      pop ax
      ret
waitf endp
;--------------发声调用函数----------------
music proc near
      xor ax, ax
freg:
      mov di, [si]
      cmp di, 0FFFFH
      je end_mus
      mov bx, ds:[bp]
      call gensound
      add si, 2
      add bp, 2
      jmp freg
end_mus:
      ret
music endp
code ends
     end start

到此,关于“汇编语言如何实现发出各种声音”的学习就结束了,希望能够解决大家的疑惑。理论与实践的搭配能更好的帮助大家学习,快去试试吧!若想继续学习更多相关知识,请继续关注网站,小编会继续努力为大家带来更多实用的文章!

内容来源网络,如有侵权,联系删除,本文地址:https://www.230890.com/zhan/123885.html

(0)

相关推荐

  • 2021-2022-1-diocs-TCP/IP和网络编程

    技术2021-2022-1-diocs-TCP/IP和网络编程 2021-2022-1-diocs-TCP/IP和网络编程一、任务详情
    自学教材第13章,提交学习笔记(10分)
    知识点归纳以及自己最有收

    礼包 2021年11月23日
  • Java坑爹的功能有哪些

    技术Java坑爹的功能有哪些本篇内容介绍了“Java坑爹的功能有哪些”的有关知识,在实际案例的操作过程中,不少人都会遇到这样的困境,接下来就让小编带领大家学习一下如何处理这些情况吧!希望大家仔细阅读,能够学有所成!1、s

    攻略 2021年11月2日
  • abab的词语,abab的形容词语有哪些

    技术abab的词语,abab的形容词语有哪些ABAB没有成语,词语有不少,列举如下abab的词语: 努力努力 享受享受 了解了解 打探打探 打听打听 分析分析 娱乐娱乐 紧张紧张 暖和暖和 凉快凉快 学习学习 精神精神

    生活 2021年10月25日
  • php如何去掉一维数组的键值

    技术php如何去掉一维数组的键值这篇文章主要介绍“php如何去掉一维数组的键值”,在日常操作中,相信很多人在php如何去掉一维数组的键值问题上存在疑惑,小编查阅了各式资料,整理出简单好用的操作方法,希望对大家解答”php

    攻略 2021年11月27日
  • 免费香港云服务器怎么样

    技术免费香港云服务器怎么样一些在线搜索可能会显示免费香港云,在某些情况下,选择免费的网站部署方案可能是有意义的——例如,如果您只是为了好玩而开始一个网站,并且不太关心将其构建成持久或有利可图的东西。但是对于正常运营网站的

    礼包 2021年10月19日
  • oracle常用hint是怎样的

    技术oracle常用hint是怎样的oracle常用hint是怎样的,很多新手对此不是很清楚,为了帮助大家解决这个难题,下面小编将为大家详细讲解,有这方面需求的人可以来学习下,希望你能有所收获。

    攻略 2021年11月12日