📄 6t.lst
字号:
00D1 9000D5 MOV DPTR,#KEYFUNTAB ; 取散转功能程序（表）首址
00D4 73 JMP @A+DPTR ;散转至对应功能程序标号
00D5 02013F KEYFUNTAB: LJMP KEYFUN00 ;跳到键号0对应功能程序标号
00D8 020145 LJMP KEYFUN01 ;跳到键号1对应功能程序标号
00DB 02014B LJMP KEYFUN02 ;跳到键号2对应功能程序标号
00DE 020151 LJMP KEYFUN03 ;跳到键号3对应功能程序标号
00E1 020157 LJMP KEYFUN04 ;跳到键号4对应功能程序标号
00E4 02015D LJMP KEYFUN05 ;跳到键号5对应功能程序标号
00E7 020163 LJMP KEYFUN06 ;跳到键号6对应功能程序标号
00EA 020169 LJMP KEYFUN07 ;跳到键号7对应功能程序标号
00ED 02016F LJMP KEYFUN08 ;跳到键号8对应功能程序标号
00F0 020175 LJMP KEYFUN09 ;跳到键号9对应功能程序标号
00F3 02017B LJMP KEYFUN10 ;跳到键号10对应功能程序标号
00F6 020181 LJMP KEYFUN11 ;跳到键号11对应功能程序标号
00F9 020187 LJMP KEYFUN12 ;跳到键号12对应功能程序标号
C:\MY DOCUMENTS\2003.02.12书稿\配套光盘源程序\实例６\6T.ASM
页 5
01-29-03
01:37:35
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
00FC 02018D LJMP KEYFUN13 ;跳到键号13对应功能程序标号
00FF 020193 LJMP KEYFUN14 ;跳到键号14对应功能程序标号
0102 020199 LJMP KEYFUN15 ;跳到键号15对应功能程序标号
0105 02019F LJMP KEYFUN16 ;跳到键号16对应功能程序标号
0108 0201A0 LJMP KEYFUN17 ;跳到键号17对应功能程序标号
010B 0201A1 LJMP KEYFUN18 ;跳到键号18对应功能程序标号
010E 0201A2 LJMP KEYFUN19 ;跳到键号19对应功能程序标号
0111 0201A3 LJMP KEYFUN20 ;跳到键号20对应功能程序标号
0114 0201A4 LJMP KEYFUN21 ;跳到键号21对应功能程序标号
0117 0201A5 LJMP KEYFUN22 ;跳到键号22对应功能程序标号
011A 0201A6 LJMP KEYFUN23 ;跳到键号23对应功能程序标号
011D 0201A7 LJMP KEYFUN24 ;跳到键号24对应功能程序标号
0120 0201A8 LJMP KEYFUN25 ;跳到键号25对应功能程序标号
0123 0201A9 LJMP KEYFUN26 ;跳到键号26对应功能程序标号
0126 0201AA LJMP KEYFUN27 ;跳到键号27对应功能程序标号
0129 0201AB LJMP KEYFUN28 ;跳到键号28对应功能程序标号
012C 0201AC LJMP KEYFUN29 ;跳到键号29对应功能程序标号
012F 0201AD LJMP KEYFUN30 ;跳到键号30对应功能程序标号
0132 0201AE LJMP KEYFUN31 ;跳到键号31对应功能程序标号
0135 22 RET
;列号对应数据表
0136 FEFDFB
0139 F7EFDF
013C BF7F KEYVALTAB: DB 0FEH,0FDH,0FBH,0F7H,0EFH,0DFH,0BFH,7FH
;对应列号： 0 1 2 3 4 5 6 7
013E 22 RET
;
013F 7402 KEYFUN00: MOV A,#02H ;发2个脉冲
0141 0201AF LJMP REMOTE ;转发送程序
0144 22 RET
;
0145 7403 KEYFUN01: MOV A,#03H ;发3个脉冲
0147 0201AF LJMP REMOTE ;转发送程序
014A 22 RET
;
014B 7404 KEYFUN02: MOV A,#04H ;发4个脉冲
014D 0201AF LJMP REMOTE ;转发送程序
0150 22 RET
;
0151 7405 KEYFUN03: MOV A,#05H ;发5个脉冲
0153 0201AF LJMP REMOTE ;转发送程序
0156 22 RET
;
0157 7406 KEYFUN04: MOV A,#06H ;发6个脉冲
0159 0201AF LJMP REMOTE ;转发送程序
015C 22 RET
;
015D 7407 KEYFUN05: MOV A,#07H ;发7个脉冲
C:\MY DOCUMENTS\2003.02.12书稿\配套光盘源程序\实例６\6T.ASM
页 6
01-29-03
01:37:35
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
015F 0201AF LJMP REMOTE ;转发送程序
0162 22 RET
;
0163 7408 KEYFUN06: MOV A,#08H ;发8个脉冲
0165 0201AF LJMP REMOTE ;转发送程序
0168 22 RET
;
0169 7409 KEYFUN07: MOV A,#09H ;发9个脉冲
016B 0201AF LJMP REMOTE ;转发送程序
016E 22 RET
;
;
016F 740A KEYFUN08: MOV A,#0AH ;发10个脉冲
0171 0201AF LJMP REMOTE ;转发送程序
0174 22 RET
;
0175 740B KEYFUN09: MOV A,#0BH ;发11个脉冲
0177 0201AF LJMP REMOTE ;转发送程序
017A 22 RET
;
017B 740C KEYFUN10: MOV A,#0CH ;发12个脉冲
017D 0201AF LJMP REMOTE ;转发送程序
0180 22 RET
;
0181 740D KEYFUN11: MOV A,#0DH ;发13个脉冲
0183 0201AF LJMP REMOTE ;转发送程序
0186 22 RET
;
0187 740E KEYFUN12: MOV A,#0EH ;发14个脉冲
0189 0201AF LJMP REMOTE ;转发送程序
018C 22 RET
;
018D 740F KEYFUN13: MOV A,#0FH ;发15个脉冲
018F 0201AF LJMP REMOTE ;转发送程序
0192 22 RET
;
0193 7410 KEYFUN14: MOV A,#10H ;发16个脉冲
0195 0201AF LJMP REMOTE ;转发送程序
0198 22 RET
;
0199 7411 KEYFUN15: MOV A,#11H ;发17个脉冲
019B 0201AF LJMP REMOTE ;转发送程序
019E 22 RET
019F 22 KEYFUN16: RET ;备用功能
01A0 22 KEYFUN17: RET ;备用功能
01A1 22 KEYFUN18: RET ;备用功能
01A2 22 KEYFUN19: RET ;备用功能
01A3 22 KEYFUN20: RET ;备用功能
C:\MY DOCUMENTS\2003.02.12书稿\配套光盘源程序\实例６\6T.ASM
页 7
01-29-03
01:37:35
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
01A4 22 KEYFUN21: RET ;备用功能
01A5 22 KEYFUN22: RET
01A6 22 KEYFUN23: RET
01A7 22 KEYFUN24: RET
01A8 22 KEYFUN25: RET
01A9 22 KEYFUN26: RET
01AA 22 KEYFUN27: RET
01AB 22 KEYFUN28: RET
01AC 22 KEYFUN29: RET
01AD 22 KEYFUN30: RET
01AE 22 KEYFUN31: RET ;备用功能
;
;
;*************************************
;* *
;* 编 码 发 射 程 序 *
;* *
;*************************************
;
01AF F9 REMOTE: MOV R1,A ;装入发射脉冲个数
01B0 0201DB LJMP OUT3 ;转第一个码发射处理
01B3 7855 OUT: MOV R0,#55H ;1MS宽低电平发射控制数据
01B5 D2AB OUT1: SETB ET1 ;开T1中断
01B7 D28E SETB TR1 ;开启定时器T1
01B9 00 NOP ;延时
01BA 00 NOP
01BB 00 NOP
01BC 00 NOP
01BD 00 NOP
01BE D8F5 DJNZ R0,OUT1 ;时间不到转OUT1再循环
01C0 7832 MOV R0,#32H ;1MS高电平间隙控制数据
01C2 C28E OUT2: CLR TR1 ;关定时器T1
01C4 C2AB CLR ET1 ;关T1中断
01C6 C2B5 CLR P3.5 ;关脉冲输出
01C8 00 NOP ;空操作延时
01C9 00 NOP
01CA 00 NOP
01CB 00 NOP
01CC 00 NOP
01CD 00 NOP
01CE 00 NOP
01CF 00 NOP
01D0 00 NOP
01D1 00 NOP
01D2 00 NOP
01D3 D8ED DJNZ R0,OUT2 ;时间不到转OUT2再循环
01D5 D9DC DJNZ R1,OUT ;脉冲未发完，转OUT再循环发射
01D7 1201ED LCALL DL500MS ;
C:\MY DOCUMENTS\2003.02.12书稿\配套光盘源程序\实例６\6T.ASM
页 8
01-29-03
01:37:35
伟福汇编器 V5.00 Copyright (c) 1989, 2001 by CHY
地址 机器码 源程序
01DA 22 RET ;
01DB 78FF OUT3: MOV R0,#0FFH ;装发谢3MS宽控制数据
01DD 0201B5 LJMP OUT1 ;转OUT1
;
;*************************************
;* *
;* 延时513 us *
;* *
;*************************************
;
;513微秒延时程序
01E0 7AFF DELAY: MOV R2,#0FFH
01E2 DAFE DELAY1: DJNZ R2,DELAY1
01E4 22 RET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -