?? yinxiang.asm
字號:
voladdkey bit p1.7
volmiuskey bit p1.2
powerled bit p1.6
bypass bit p1.2
ledk bit p1.3
amute bit p1.4
sty bit p1.6
ampmute bit p1.7
SDA73 bit p3.5
SCL73 bit p3.4
;zhiled bit p1.6
;-------------------------------------------
b21val equ 21h
bErr bit b21val.0
status equ 20h
count equ 30h
losetimes equ 31h
i2cbit equ 32h
i2cdata equ 33h
module equ 34h
i2ctime equ 35h
i2csenddata equ 36h
volcount equ 37h
trblecount equ 38h
basscount equ 39h
datatemp equ 3ah
;**********************************************************
ORG 00h
aJMP resert
org 03h
; ljmp int_0
org 50h
resert:
MOV SP, #050H ; sp set cfh
; call clrram
call iniuart
setb voladdkey
setb volmiuskey
setb scl73
call dly
setb sda73
SETB IT0 ; 設(shè)定INT0的觸發(fā)方式為脈沖負(fù)邊沿觸發(fā)
SETB EX0 ; 打開INT0中斷請求
mov p2,#11100111b
; SETB EA ; 打開CPU總中斷請求
mov volcount,#18
mov i2csenddata,#11010111B
mov module,#03h
call sendata
;--------------------------------------------------------------------------
main:
; SETB IT0 ; 設(shè)定INT0的觸發(fā)方式為脈沖負(fù)邊沿觸發(fā)
; SETB EX0 ; 打開INT0中斷請求
; mov p2,#11100111b
CLR EA ; 打開CPU總中斷
JNB P3.2, int_0
jnb voladdkey,tovolad
jnb volmiuskey,tovolmius
jmp main
;======================================
tovolad:
call delay
jnb voladdkey,tovolad_1
jmp main
tovolad_1:
call delay
jnb voladdkey,tovolad_2
jmp main
tovolad_2:
jmp keyvoladd
;----------------------------
tovolmius:
call delay
jnb volmiuskey,tovolmius_1
jmp main
tovolmius_1:
call delay
jnb volmiuskey,tovolmius_2
jmp main
tovolmius_2:
jmp keyvolmius
;============================================ remote programm
exit:
; SETB EA ; 允許中斷
; pop psw
; clr rs1
; clr rs0
; RETI ;
JMP MAIN
int_0:
; push psw
; CLR EA ; 暫時(shí)關(guān)閉CPU的所有中斷請求
;clr rs1
;setb rs0
MOV R6,#10
SB:
CALL YS1; 調(diào)用882微秒延時(shí)子程序
JB P3.2,EXIT; 延時(shí)882微秒后判斷P3.2腳是否出現(xiàn)高電平如果有就退出解碼程序
DJNZ R6, SB; 重復(fù)10次，目的是檢測在8820微秒內(nèi)如果出現(xiàn)高電平就退出解碼程序
;以上完成對遙控信號的9000微秒的初始低電平信號的識別。
JNB P3.2, $ ; 等待高電平避開9毫秒低電平引導(dǎo)脈沖
MOV R6,#4
WAIT4MS:
CALL YS1 ; WAIT 4MS
JNB P3.2,EXIT
DJNZ R6,WAIT4MS
JB P3.2,$
;MOV R7,#16; 忽略前16位系統(tǒng)識別碼
;JJJJA:JNB P3.2,$; 等待地址碼第一位的高電平信號
;LCALL YS1; 高電平開始后用882微秒的時(shí)間尺去判斷信號此時(shí)的高低電平狀態(tài)
;MOV C,P3.2; 將P3.2引腳此時(shí)的電平狀態(tài)0或1存入C中
;JNC UUUA; 如果為0就跳轉(zhuǎn)到UUUA
;LCALL YS3; 檢測到高電平1的話延時(shí)1毫秒等待脈沖高電平結(jié)束
;UUUA: DJNZ R7,JJJJA
MOV R1,#23H ; 設(shè)定1AH為起始RAM區(qū)
MOV R2,#4; 接收從1AH到1BH的2個(gè)內(nèi)存,用于存放操作碼和操作反碼
PP:
MOV R3,#8; 每組數(shù)據(jù)為8位
JJJJ:
JNB P3.2,$; 等待地址碼第一位的高電平信號
LCALL YS1; 高電平開始后用882微秒的時(shí)間尺去判斷信號此時(shí)的高低電平狀態(tài)
jnb P3.2,JJJJ_1; 將P3.2引腳此時(shí)的電平狀態(tài)0或1存入C中
setb c
jmp JJJJ_2
JJJJ_1:
clr c
JJJJ_2:
JNC UUU; 如果為0就跳轉(zhuǎn)到UUU
LCALL YS3; 檢測到高電平1的話延時(shí)1毫秒等待脈沖高電平結(jié)束
UUU:
MOV A,@R1; 將R1中地址的給A
RRC A; 將C中的值0或1移入A中的最低位
MOV @R1,A; 將A中的數(shù)暫時(shí)存放在R1數(shù)值的內(nèi)存中
DJNZ R3,JJJJ; 接收滿8位換一個(gè)內(nèi)存
INC R1; 對R1中的值加1，換下一個(gè)RAM
DJNZ R2,PP ; 接收完8位數(shù)據(jù)碼和8位數(shù)據(jù)反碼，存放在1AH/1BH中
; mov a,23h
; cjne a,#80h,exit
; mov a,24h
; cjne a,#7fh,exit
MOV A,25H
CPL A; 對1AH取反后和1BH比較
CJNE A,26H,EXIT; 如果不等表示接收數(shù)據(jù)發(fā)生錯(cuò)誤,放棄
;========================================操作程序
send:
mov a,25h
cjne a,#12h,send_1
jmp powerlab
send_1:
; cjne a,#1ah,send_2
; jmp ledlab
send_2:
cjne a,#1eh,send_3
jmp mutelab
send_3:
cjne a,#01h,send_4
jmp bypbasslab
send_4:
cjne a,#02h,send_5
jmp uparrow
send_5:
cjne a,#03h,send_6
jmp menu
send_6:
cjne a,#04h,send_7
jmp PRETRACK
send_7:
; cjne a,#05h,send_8
; jmp select
send_8:
cjne a,#06h,send_9
jmp NEXTTRACK
send_9:
cjne a,#07h,send_10
jmp PLAYPAUSE
send_10:
cjne a,#08h,send_11
jmp downarrow
send_11:
cjne a,#09h,send_12
jmp shuffle
send_12:
cjne a,#0ah,send_13
jmp trebleadd
send_13:
cjne a,#0ch,send_15
jmp treblemius
send_15:
cjne a,#1bh,send_16
jmp bassadd
send_16:
cjne a,#0dh,send_17
jmp bassmius
send_17:
cjne a,#1fh,send_18
; cjne a,#1Ah,send_18
jmp voladd
send_18:
cjne a,#0eh,send_19
; cjne a,#05h,send_19
jmp volmius
send_19:
jmp exit
;***************************************************remote lose key programm
losekey:
setb status.1
mov r7,#37
losekey_1:
call D39MS
jnb p3.2,losekey_2
djnz r7,losekey_1
losekey_1_1: ;lose key
clr status.1
jmp loseexit
losekey_2:
mov losetimes,#6
losekey_2_1:
call YS1
jb p3.2,lowloseexit; if low 9ms, is high to exit
djnz losetimes,losekey_2_1
jnb p3.2,$ ; wait low 9ms
;----------------------------------- repeat high 2ms
;mov losetimes,#2
losekey3:
;call YS1
;jnb p3.2,loseexit
;djnz losetimes,losekey3
;clr status.1 ; lose key
loseexit:
ret
lowloseexit:
clr status.1
ret
;================================================ remote delay
YS1: MOV R4,#18 ; 延時(shí)子程序1，精確延時(shí)882微秒
D1: MOV R5,#21
DJNZ R5,$
DJNZ R4,D1
RET
;------------------------------------
YS2:
MOV R4,#10 ; 延時(shí)子程序2，精確延時(shí)4740微秒
D2:
MOV R5,#217
DJNZ R5,$
DJNZ R4,D2
RET
;-------------------------------------------
YS3:
MOV R4,#2; 延時(shí)程序3，精確延時(shí)1000微秒
D3:
MOV R5,#228
DJNZ R5,$
DJNZ R4,D3
RET
;--------------------------------------
D39MS:
MOV R4,#6; 延時(shí)程序3，精確延時(shí)3000微秒
D39:
MOV R5,#228
DJNZ R5,$
DJNZ R4,D39
RET
;*******************************************************remote lose key programm end
;*************************************************************** remote status
keyvoladd:
mov module,#03
mov dptr,#VOLTAB
mov a,volcount
cjne a,#0,keyvoladd_1
jmp keyvoladd_2
keyvoladd_1:
dec volcount
keyvoladd_2:
mov a,volcount
movc a,@a+dptr
anl a,#7fh
mov i2csenddata ,a
mov i2ctime,#8
call sendata
call delay80ms
jnb voladdkey,keyvoladd
jmp main
;=========================================
keyvolmius:
mov module,#03h
mov dptr,#VOLTAB
mov a,volcount
cjne a,#80,keyvolmius_1
jmp keyvolmius_2
keyvolmius_1:
inc volcount
keyvolmius_2:
mov a,volcount
movc a,@a+dptr
anl a,#7fh
mov i2csenddata,a
mov i2ctime,#8
call sendata
call delay80ms
jnb volmiuskey,keyvolmius
jmp main
;=========================================
powerlab:
cpl powerled
mov dptr,#powerontab
call simplesend
jmp exit
;==========================================
ledlab:
cpl ledk
ledlab_1:
call losekey
jb status.1,ledlab_1; no losekey go on
jmp exit
;========================================
mutelab:
cpl sty
cpl ampmute
mov dptr,#menutab
call simplesend
jmp exit
;========================================
bypbasslab:
cpl bypass
bypbasslab_1:
call losekey
jb status.1,bypbasslab_1; no losekey go on
jmp exit
;==========================================
shuffle:
mov dptr,#shffletab
call simplesend
jmp exit
;=========================================
trebleadd:
mov module,#0ch
mov dptr,#TONEtab
mov a,trblecount
cjne a,#0,trebleadd_1
jmp trebleadd_2
trebleadd_1:
dec trblecount
mov a,trblecount
movc a,@a+dptr
swap a
mov datatemp,a
mov a,basscount
movc a,@a+dptr
anl a,#0fh
orl a,datatemp
mov i2csenddata,a
call sendata
trebleadd_2:
call losekey
jb status.1,trebleadd_2; no losekey go on
jmp exit
;========================================
treblemius:
mov module,#0ch
mov dptr,#TONEtab
mov a,trblecount
cjne a,#13,treblemius_1
jmp treblemius_2
treblemius_1:
inc trblecount
mov a,trblecount
movc a,@a+dptr
swap a
mov datatemp,a
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -