M50462遥控器解码源程序.doc

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;-.4 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: call time(2); do while p33=0; end; th0=0; tl0=0; tr0=1; call time(2); do while p33=1; end; tr0=0; ah=th0; al=tl0; if ah=4 then cy=1; /* 11.0592Mhz */ else cy=0; data1=scl(data1,1); k=k-1; if k=8 then data2=data1; if k0 then goto loop1; if data2=0e2h then do; IF DATA1=54H THEN do;KEY=01;dat=0;end; /* YTNUMBER DEC KEY */ IF DATA1=44H THEN do;KEY=02;dat=0;end; /* YTNUMBER ADD KEY */ IF DATA1=00H THEN DAT=1; IF DATA1=10H THEN DAT=2; IF DATA1=08H THEN DAT=3; IF DATA1=18H THEN DAT=4; IF DATA1=04H THEN DAT=5; IF DATA1=14H THEN DAT=6; IF DATA1=0CH THEN DAT=7; IF DATA1=1CH THEN DAT=8; IF DATA1=80H THEN DAT=9; IF DATA1=90H THEN DAT=10; IF DATA1=88H THEN DAT=11; IF DATA1=98H THEN DAT=12; IF DATA1=50H THEN DAT=13; IF DATA1=48H THEN DAT=14; IF DATA1=40H THEN DAT=15; IF DATA1=4CH THEN DAT=16; IF DATA1=5CH THEN DAT=17; IF DATA1=0D8H THEN DAT=18; IF DATA1=0D0H THEN DAT=19; IF DATA1=0E8H THEN DAT=20; IF DATA1=0F8H THEN DAT=21; IF DATA1=0E4H THEN DAT=22; IF DATA1=0F4H THEN DAT=23; IF DATA1=0ECH THEN DAT=24;/* P34=0;CALL TIME(250);P34=1; */ end;int0end: ip=0; DO K=0 TO 3; /* important value */ CALL TIME(250); END; enable; end rem;main$program:data1=0;data2=0;dat=0;p32=0; /* set recieve mode */clk=1;Ale=1;p33=1;NUMBER=1;KEY=0;scon=50h;pcon=00h;tmod=21h;tl1=0fdh; /* 9600 baud rate for 11.0592Mhz */th1=0fdh;th0=0;tl0=0;tr1=1;es=1;ex1