M50462遥控器解码源程序.doc

下载文档

6
0
约3.73千字
约 4页
2018-01-10 发布于河南
举报
版权申诉
保障服务

M50462遥控器解码源程序.doc

1、本文档共4页，可阅读全部内容。
2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。

M50462遥控器解码源程序

M50462遥控器解码源程序来源：网上转载　　　作者：不详 /************** YTREM.PLM ********************//* 遥控器按键代码表(熊猫 M50462/CL54L2) *//* 1---00h;2---10h;3---08h;4---18h;5---04h;6---14h;7---0ch;8---1ch; *//* 9---80h;0---90h;1+---88h;2+---98h;pd+---50h;pd_---48h;ld+---0cch; *//* ld_---0dch;yl+---44h;yl_---54h;sd+---0c4h;sd_---0d4h;BZ---0D0h; *//* TV/AV---5CH;PX---D8H;--.-- ---0D0H;CLK---0E8H;*//* TIME---0F8H;ON.T---0E4H;SEL---0F4H;INC---0ECH; */start:do;$include(reg51.dcl) declare (data1,data2,key,DAT) byte at (30h); declare (ah,al,NUMBER,jihao,bjihao) byte; declare Ale literally p17,da literally p15,clk literally p16; DECLARE ACO(11) BYTE CONSTANT (0EDH,28H,0DCH,7CH,39H,75H,0F5H,2CH, 0FDH,7DH,02H); DISPLAY: PROCEDURE(NUM); DECLARE (K,NUM,N) BYTE; N=NUM; N=N MOD 10; N=ACO(N); DO K=0 TO 7; N=SCR(N,1); DA=CY; CLK=0; call time(1); CLK=1; END; N=NUM; N=N/10; N=ACO(N); DO K=0 TO 7; N=SCR(N,1); DA=CY; CLK=0; call time(1); CLK=1; END; ALE=0; call time(2); ALE=1; END DISPLAY; YTNUMBER: procedure(kk); declare (kk,relay) byte; if kk=02 then DO; NUMBER=NUMBER+1; IF NUMBER4 THEN NUMBER=1; END; if kk=01 then DO; NUMBER=NUMBER-1; IF NUMBER=0 THEN NUMBER=4; END; CALL DISPLAY(NUMBER); KEY=0; data2=0;END YTNUMBER; recieve: procedure interrupt 4 using 1; declare (k,ask) byte; disable; if data2=0e2h and dat0 then do; ri=0; jihao=sbuf; if jihao=bjihao then do; data2=0; p32=1; do k=1 to 2; if k=1 then sbuf=dat; if k=2 then sbuf=number; do while ti=0; end; ti=0; call time(1); end; p32=0; do while ri=0; end; ri=0; ask=sbuf; if ask=0ffh then do; ; end; /* data1=0ffh;dat=0; */ end; end; enable;end recieve; rem:procedure interrupt 2; declare k byte; disable; /* if data2=0e2h then goto int0end; */ k=16;loop1: ca