时下电动车报警器报警音已从单一声音发展到集成多种频率的声音，以下是网上找来的多种报警声音的频率。（这东西虽然简单，但是量大啊）
;产生报警音
;本实例的目的是让大家学会用单片机产生声音的方法，学会计算程序所用时间
;本实例的功能是能PIC16F84产生报警音，频率分两个0.1s**个
;0.1S频率从1.8K-3.5K匀速增加**个0.1S频率从3.5K-1.8K匀速减少,
;程序复位后,蜂鸣器开始报警
;PIC单片机学习网-----http://www.pic16.com
;烧写时应注意：配置位已经在程序中写明，加载HEX文件时会自动加载，烧写时不用再手动设置配置位。
;实验时请注意套件跳线选择；
;*****************************************************
LISTP=16F84A,R=DEC ;定义器件,默认为十进制
;-----------------------------------------------------
__CONFIGB'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;没有代码保护
;看门狗关闭
;上电廷时器开启
;振荡器模式为XT
;-----------------------------------------------------
RTCC EQU01H ;定义各寄存器
PC EQU 02H
STATUS EQU 03H
C EQU 0
RP0 EQU 5
;----------------------
PORTA EQU 05H
TRISA EQU 05H
;-----------------------
SOUNDDELAY1 EQU10H ;声音频率变化计数器，从1.8~3.55KHZ
FRE_COUNT EQU11H ;同一频率的重复次数保存地址
FRE_REPEAT EQU 12H
SOUND_TEMP EQU 13H
TEMP EQU14H ;暂存寄存器
S_LOOP EQU46 ;93-47=46
S_MAX EQU93 ;*低频率1.8K 93*3=280US*2
S_MIN EQU47 ;*高频率3.55K 47*3=140*2
S_REPEAT EQU 4 ;同一频率重复次数
;--------------------
ORG 0000H
MAIN
CLRFPORTA ;初始化IO口
BSFSTATUS,RP0 ;设置数据寄存器体1
MOVLW 0000000B
MOVWFTRISA ;设置RA端口全部为输出
BCF STATUS,RP0 ;恢复数据寄存器体0
LOOP
CALLSOUND200MS ;调用报警200MS子程序
GOTOLOOP ;反复循环报警
;-------------------------------
SOUND200MS
MOVLW S_LOOP
MOVWF FRE_COUNT ;46=93-47 *低频率的计数减去*高频率的计数等于频率变化的次数
SOUND_LH_LP
MOVLWS_REPEAT ;同一频率重复次数送FRE_REPEAT
MOVWF FRE_REPEAT
MOVFW FRE_COUNT
ADDLWS_MIN ;计数值加*小值
MOVWF TEMP
REPEAT0_LP
MOVFW TEMP
BSFPORTA,0
CALL SOUNDDELAY0 ;廷时W*3US
BCF PORTA,0
MOVFW TEMP
CALL SOUNDDELAY0
DECFSZ FRE_REPEAT,1 ;每四次减频率计数一次
GOTO REPEAT0_LP
DECFSZ FRE_COUNT,1
GOTO SOUND_LH_LP
SOUND_HL
MOVLW S_LOOP
MOVWF FRE_COUNT ;46=93-47
SOUND_HL_LP
MOVLWS_REPEAT ;同一频率重复次数送FRE_REPEAT
MOVWF FRE_REPEAT
MOVFW FRE_COUNT
SUBLWS_MAX ;*大值减计数值
MOVWF TEMP
REPEAT1_LP
MOVFW TEMP
BSF PORTA,0
CALLSOUNDDELAY0 ;廷时W*3US
BCF PORTA,0
MOVFW TEMP
CALL SOUNDDELAY0
DECFSZ FRE_REPEAT,1;四次减频率计数一次
GOTO REPEAT1_LP
DECFSZ FRE_COUNT,1
GOTO SOUND_HL_LP
SOUND_END
RETLW 0
;------------------------------
SOUNDDELAY0
MOVWF SOUNDDELAY1 ;廷时W*3US+1US
SOUNDDELAYUS_1
DECFSZ SOUNDDELAY1,1
GOTO SOUNDDELAYUS_1
RETLW 0
;------------------------
END
;产生450hz低音
;本实例的目的是让大家学会用单片机产生声音的方法，学会计算程序所用时间
;本实例的功能是能PIC16F84产生低音，
;450HZ,相当于450HZ的方波信号发生器。
;程序复位后,蜂鸣器开始发音
;PIC单片机学习网-----http://www.pic16.com
;烧写时应注意：配置位已经在程序中写明，加载HEX文件时会自动加载，烧写时不用再手动设置配置位。
;实验时请注意套件跳线选择；
;*****************************************************
LISTP=16F84A,R=DEC ;定义器件,默认为十进制
;-----------------------------------------------------
__CONFIGB'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;没有代码保护
;看门狗关闭
;上电廷时器开启
;振荡器模式为XT
;-----------------------------------------------------
RTCC EQU01H ;定义各寄存器
PC EQU 02H
STATUS EQU 03H
C EQU 0
RP0 EQU 5
;----------------------
PORTA EQU 05H
TRISA EQU 05H
;-----------------------
SOUNDDELAY1 EQU10H ;声音频率变化计数器，从1.1K~0.5KHZ
;--------------------
ORG 0000H
MAIN
CLRFPORTA ;初始化IO口
BSFSTATUS,RP0 ;设置数据寄存器体1
MOVLW 0000000B
MOVWFTRISA ;设置RA端口全部为输出
BCF STATUS,RP0 ;恢复数据寄存器体0
SOUND
MOVLW222 ;450HZ反复循环
BSF PORTA,0
CALLSOUNDDELAY0 ;廷时W*5US
BCF PORTA,0
MOVLW 222
CALL SOUNDDELAY0
GOTO SOUND
;------------------------------
SOUNDDELAY0
MOVWF SOUNDDELAY1 ;廷时W*5US+1US
SOUNDDELAYUS_1
NOP
NOP
DECFSZ SOUNDDELAY1,1
GOTO SOUNDDELAYUS_1
RETLW 0
;------------------------
END
;产生救护音
;本实例的目的是让大家学会用单片机产生声音的方法，学会计算程序所用时间
;本实例的功能是能PIC16F84产生救护音，频率分两个1S**个
;1S频率是440HZ,**个1S频率是180HZ,反复循环
;程序复位后,蜂鸣器开始报警
;PIC单片机学习网-----http://www.pic16.com
;烧写时应注意：配置位已经在程序中写明，加载HEX文件时会自动加载，烧写时不用再手动设置配置位。
;实验时请注意套件跳线选择；
;*****************************************************
LISTP=16F84A,R=DEC ;定义器件,默认为十进制
;-----------------------------------------------------
__CONFIGB'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;没有代码保护
;看门狗关闭
;上电廷时器开启
;振荡器模式为XT
;-----------------------------------------------------
RTCC EQU01H ;定义各寄存器
PC EQU 02H
STATUS EQU 03H
C EQU 0
RP0 EQU 5
;----------------------
PORTA EQU 05H
TRISA EQU 05H
;-----------------------
SOUNDDELAY1 EQU10H ;声音频率高低电平廷时计数器
FRE_REPEATH EQU11H ;同一频率的重复次数外部循环
FRE_REPEATL EQU12H ;同一频率的重复次数内部循环
TEMP EQU14H ;暂存寄存器
;--------------------
ORG 0000H
MAIN
CLRFPORTA ;初始化IO口
BSFSTATUS,RP0 ;设置数据寄存器体1
MOVLW 0000000B
MOVWFTRISA ;设置RA端口全部为输出
BCF STATUS,RP0 ;恢复数据寄存器体0
LOOP
CALLSOUND2S ;调用报警200MS子程序
GOTOLOOP ;反复循环报警
;-------------------------------
SOUND2S ;先440HZ1S
MOVLW 189
MOVWFTEMP ;440HZ频率高低电平廷时值送TEMP 1S/[(189*6)US*2]=440HZ
MOVLW2 ;同一频率重复次数外部循环送初值
MOVWF FRE_REPEATH
SOUND2S_1
MOVLW 220
MOVFW FRE_REPEATL ;同一频率重复次数内部循环送初值220*2=440次,440HZ频率重复440次即1S
REPEAT0_LP
MOVFW TEMP
BSFPORTA,0
CALL SOUNDDELAY0 ;廷时W*6US440hz正半周
BCF PORTA,0
MOVFW TEMP
CALLSOUNDDELAY0 ;廷时W*6US 440hz负半周
DECFSZ FRE_REPEATL,1
GOTO REPEAT0_LP
DECFSZFRE_REPEATH,1 ;同一频率持续1S
GOTO SOUND2S_1
SOUND2S_B ;再180HZ 1S
MOVLW 231
MOVWFTEMP ;180HZ频率高低电平廷时值送TEMP 1S/[(231*2*6)US*2]=180HZ
MOVLW 180
MOVFW FRE_REPEATL ;同一频率重复次数送初值180HZ频率重复180次即1S
REPEAT0_LP_B
MOVFW TEMP
BSFPORTA,0
CALL SOUNDDELAY0 ;廷时W*6US*2 180HZ正半周
MOVFW TEMP
CALL SOUNDDELAY0
BCF PORTA,0
MOVFW TEMP
CALL SOUNDDELAY0 ;廷时W*6US*2 180HZ负半周
MOVFW TEMP
CALL SOUNDDELAY0
DECFSZFRE_REPEATL,1 ;同一频率持续1S
GOTO REPEAT0_LP_B
SOUND_END
RETLW 0
;------------------------------
SOUNDDELAY0
MOVWF SOUNDDELAY1 ;廷时W*6US+1US
SOUNDDELAYUS_1
nop
nop
nop
DECFSZ SOUNDDELAY1,1
GOTO SOUNDDELAYUS_1
RETLW 0
;------------------------
END
;产生开道音
;本实例的目的是让大家学会用单片机产生声音的方法，学会计算程序所用时间
;本实例的功能是能PIC16F84产生开道音，每一个3S内频率
;从1.1K-0.5K匀速减少,反复循环。
;程序复位后,蜂鸣器开始报警
;PIC单片机学习网-----http://www.pic16.com
;烧写时应注意：配置位已经在程序中写明，加载HEX文件时会自动加载，烧写时不用再手动设置配置位。
;实验时请注意套件跳线选择；
;*****************************************************
LISTP=16F84A,R=DEC ;定义器件,默认为十进制
;-----------------------------------------------------
__CONFIGB'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;没有代码保护
;看门狗关闭
;上电廷时器开启
;振荡器模式为XT
;-----------------------------------------------------
RTCC EQU01H ;定义各寄存器
PC EQU 02H
STATUS EQU 03H
C EQU 0
RP0 EQU 5
;----------------------
PORTA EQU 05H
TRISA EQU 05H
;-----------------------
SOUNDDELAY1 EQU10H ;声音频率变化计数器，从1.1K~0.5KHZ
FRE_COUNT EQU11H ;同一频率的重复次数保存地址
FRE_REPEAT EQU 12H
SOUND_TEMP EQU 13H
TEMP EQU14H ;暂存寄存器
S_LOOP EQU 136 ;250-114=136
S_MAX EQU250 ;*低频率0.5K 250*4=1000 *2
S_MIN EQU114 ;*高频率1.1K 114*4=456 *2
S_REPEAT EQU 17 ;同一频率重复次数
;--------------------
ORG 0000H
MAIN
CLRFPORTA ;初始化IO口
BSFSTATUS,RP0 ;设置数据寄存器体1
MOVLW 0000000B
MOVWFTRISA ;设置RA端口全部为输出
BCF STATUS,RP0 ;恢复数据寄存器体0
LOOP
CALLSOUND3S ;调用报警3S子程序
GOTOLOOP ;反复循环报警
;-------------------------------
SOUND3S
MOVLW S_LOOP
MOVWF FRE_COUNT ;136=250-114
SOUND_HL_LP
MOVLWS_REPEAT ;同一频率重复次数送FRE_REPEAT
MOVWF FRE_REPEAT
MOVFW FRE_COUNT
SUBLWS_MAX ;*大值减计数值
MOVWF TEMP
REPEAT1_LP
MOVFW TEMP
BSF PORTA,0
CALLSOUNDDELAY0 ;廷时W*4US
BCF PORTA,0
MOVFW TEMP
CALL SOUNDDELAY0
DECFSZ FRE_REPEAT,1;17次减频率计数一次
GOTO REPEAT1_LP
DECFSZ FRE_COUNT,1
GOTO SOUND_HL_LP
SOUND_END
RETLW 0
;------------------------------
SOUNDDELAY0
MOVWF SOUNDDELAY1 ;廷时W*4US+1US
SOUNDDELAYUS_1
NOP
DECFSZ SOUNDDELAY1,1
GOTO SOUNDDELAYUS_1
RETLW 0
;------------------------
END
;产生汽笛音800HZ
;本实例的目的是让大家学会用单片机产生声音的方法，学会计算程序所用时间
;本实例的功能是能PIC16F84产生汽笛音800HZ
;相当于800HZ的方波信号发生器。
;程序复位后,蜂鸣器开始发音
;PIC单片机学习网-----http://www.pic16.com
;烧写时应注意：配置位已经在程序中写明，加载HEX文件时会自动加载，烧写时不用再手动设置配置位。
;实验时请注意套件跳线选择；
;*****************************************************
LISTP=16F84A,R=DEC ;定义器件,默认为十进制
;-----------------------------------------------------
__CONFIGB'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;没有代码保护
;看门狗关闭
;上电廷时器开启
;振荡器模式为XT
;-----------------------------------------------------
RTCC EQU01H ;定义各寄存器
PC EQU 02H
STATUS EQU 03H
C EQU 0
RP0 EQU 5
;----------------------
PORTA EQU 05H
TRISA EQU 05H
;-----------------------
SOUNDDELAY1 EQU10H ;声音频率变化计数器，从1.1K~0.5KHZ
;--------------------
ORG 0000H
MAIN
CLRFPORTA ;初始化IO口
BSFSTATUS,RP0 ;设置数据寄存器体1
MOVLW 0000000B
MOVWFTRISA ;设置RA端口全部为输出
BCF STATUS,RP0 ;恢复数据寄存器体0
SOUND
MOVLW125 ;800HZ反复循环
BSF PORTA,0
CALLSOUNDDELAY0 ;廷时W*5US
BCF PORTA,0
MOVLW 125
CALL SOUNDDELAY0
GOTO SOUND
;------------------------------
SOUNDDELAY0
MOVWF SOUNDDELAY1 ;廷时W*5US+1US
SOUNDDELAYUS_1
NOP
NOP
DECFSZ SOUNDDELAY1,1
GOTO SOUNDDELAYUS_1
RETLW 0
;------------------------
END
;产生治安音
;本实例的目的是让大家学会用单片机产生声音的方法，学会计算程序所用时间
;本实例的功能是能PIC16F84产生治安音，频率分两个0.4s**个
;0.4S频率从1.8K-2.2K匀速增加**个0.4S频率从2.2K-1.8K匀速减少,
;程序复位后,蜂鸣器开始报警
;PIC单片机学习网-----http://www.pic16.com
;烧写时应注意：配置位已经在程序中写明，加载HEX文件时会自动加载，烧写时不用再手动设置配置位。
;实验时请注意套件跳线选择；
;*****************************************************
LISTP=16F84A,R=DEC ;定义器件,默认为十进制
;-----------------------------------------------------
__CONFIGB'11111111110001';_CP_OFF&_WDT_OFF&_PWRITE_ON&_XT_OSC
;没有代码保护
;看门狗关闭
;上电廷时器开启
;振荡器模式为XT
;-----------------------------------------------------
RTCC EQU01H ;定义各寄存器
PC EQU 02H
STATUS EQU 03H
C EQU 0
RP0 EQU 5
;----------------------
PORTA EQU 05H
TRISA EQU 05H
;-----------------------
SOUNDDELAY1 EQU10H ;声音频率变化计数器，从0.8~2.2KHZ
FRE_COUNT EQU11H ;同一频率的重复次数保存地址
FRE_REPEAT EQU 12H
SOUND_TEMP EQU 13H
TEMP EQU14H ;暂存寄存器
S_LOOP EQU132 ;208-76=132
S_MAX EQU208 ;*低频率0.8K 208*3=624US *2
S_MIN EQU76 ;*高频率2.2K 76*3=228 *2
S_REPEAT EQU 5 ;同一频率重复次数 5*132个变化点*(1S/1.5KHZ)=0.4S
;--------------------
ORG 0000H
MAIN
CLRFPORTA ;初始化IO口
BSFSTATUS,RP0 ;设置数据寄存器体1
MOVLW 0000000B
MOVWFTRISA ;设置RA端口全部为输出
BCF STATUS,RP0 ;恢复数据寄存器体0
LOOP
CALLSOUND800MS ;调用报警800MS子程序
GOTOLOOP ;反复循环报警
;-------------------------------
SOUND800MS
MOVLW S_LOOP
MOVWF FRE_COUNT ;132=208-76 *低频率的计数减去*高频率的计数等于频率变化的次数
SOUND_LH_LP
MOVLWS_REPEAT ;同一频率重复次数送FRE_REPEAT
MOVWF FRE_REPEAT
MOVFW FRE_COUNT
ADDLWS_MIN ;计数值加*小值
MOVWF TEMP
REPEAT0_LP
MOVFW TEMP
BSFPORTA,0
CALL SOUNDDELAY0 ;廷时W*3US
BCF PORTA,0
MOVFW TEMP
CALL SOUNDDELAY0
DECFSZ FRE_REPEAT,1 ;每五次减频率计数一次
GOTO REPEAT0_LP
DECFSZ FRE_COUNT,1
GOTO SOUND_LH_LP
SOUND_HL
MOVLW S_LOOP
MOVWF FRE_COUNT ;132=208-76
SOUND_HL_LP
MOVLWS_REPEAT ;同一频率重复次数送FRE_REPEAT
MOVWF FRE_REPEAT
MOVFW FRE_COUNT
SUBLWS_MAX ;*大值减计数值
MOVWF TEMP
REPEAT1_LP
MOVFW TEMP
BSF PORTA,0
CALLSOUNDDELAY0 ;廷时W*3US
BCF PORTA,0
MOVFW TEMP
CALL SOUNDDELAY0
DECFSZ FRE_REPEAT,1;五次减频率计数一次
GOTO REPEAT1_LP
DECFSZ FRE_COUNT,1
GOTO SOUND_HL_LP
SOUND_END
RETLW 0
;------------------------------
SOUNDDELAY0
MOVWF SOUNDDELAY1 ;廷时W*3US+1US
SOUNDDELAYUS_1
DECFSZ SOUNDDELAY1,1
GOTO SOUNDDELAYUS_1
RETLW 0
;------------------------
END
v