Hope don't disturb if I continue here with "code" for RC10 remote...If necessary please move in separate topic. Thanks.
It's my (pseudo)code...Any advice it's wellcome !
Code:' First variant for RC 10 Blaupunkt remote ; PIC12F675: +--U--+ ; +5V [ ] GND ; key 5 |---/--- >[ ]< ---/---| key 1 ; key 4 |---/--- >[ ]< ---/---| key 2 ; pull-up! key 3 |---/--- >[ ]>--[4K7]-- NPN Transistor, IR LED @ DEVICE PIC12F675, intrc_osc_noclkout, wdt_off, pwrt_on, mclr_off, bod_off DEFINE OSC 4 CMCON=7 OPTION_REG = %00000111 TRISIO = %00111110 WPU=%00110111 ANSEL=0 but1 var gpio.1 but2 var gpio.2 but3 var gpio.3 but4 var gpio.4 but5 var gpio.5 LED var gpio.0 GIE var intcon.7 ' global interrupt enable 1=on ; 0=off gpie var intcon.3 'port change interrupt enable 1=0n ; 0=off gpif var intcon.0 'port change interrupt flag bit GIE=0 GPIE=1 IOC.1=1 ' int-on-change for GPIO.1 enabled IOC.2=1 ' int-on-change for GPIO.2 enabled IOC.3=1 ' int-on-change for GPIO.3 enabled IOC.4=1 ' int-on-change for GPIO.4 enabled IOC.5=1 ' int-on-change for GPIO.5 enabled LED=1 delay var word i var byte main: @ sleep pause 100 if but1=1 then vol_up if but2=1 then vol_down if but3=1 then btn_up if but4=1 then btn_down if but5=1 then mute vol_up: delay = 2600 gosub ir_out vol_down: delay = 3200 gosub ir_out btn_up: delay = 3800 gosub ir_out btn_down: delay = 4400 gosub ir_out mute: delay = 5000 gosub ir_out GPIF=0 'Clear port change interrupt flag Goto Main ir_out: for i = 1 to 10 'sends out command 10 times led=0 pauseus delay led=1 pauseus delay led=0 pauseus 660 led=1 pause 10 'wait 10ms before repeating next i return END ' of program




Bookmarks