Simple SONY type IR receiver.

Easily adds stepped IR volume control to any audio project.

Volume +mute receiver with remote


$179.00 (matte black) Bourns 100k
$199.00 (natural aluminum) Bourns 100k
$229.00 (matte black) ALPS 10k

Purchase on our ebay store.

New features for 2025, 3 user selectable modes of operation.

1 – ultra fine:  18 steps push and release, 100 steps push and hold. This is the default for all new devices.

2 – fine: 18 steps push and release, 70 steps push and hold.

3 – continuous: 50 steps push and release,  push and hold for continuous.

Shown above in volume / mute configuration with pre-programmed remote and dc power supply.

Uses codes: Power , Volume Up , Volume Down , Volume Mute .

All quality parts including gold jacks, silver plated FR4 board, Mircochip PIC16F18323 micro-controller, Vishay TSOP IR receiver, Texas Instruments SN754410 motor driver and Bourns 100k motorized pot.

Completely passive audio path with non shorting mute circuit.

Dry contact outputs follow power status. Ideal for triggering external devices/amps. Contacts rated .5a @ 12Vdc.

Precise 2 speed motor control step rate. Click – Hold – Release will increment / decrement volume in small steps (60 steps).  Rapidly clicking and releasing will increment / decrement volume at a high rate (11 steps).

Intelligent features include instruction received feedback via power led and return to low volume on shutdown.

Long range reliability of +30ft.

Compatible with any remote that supports Sony codes.

Also available as volume only.

Schematic and code for full version shown below.

Simple SONY IR receiver  V3.1 :

'EULA: 
'Copyright (2024) PJL Electronics LLC
'Licenced under Creative Commons  
'https://creativecommons.org/licenses/by-nc/4.0/ 
'You are free to:
    'Share — copy and redistribute the material in any medium or     'format
    'Adapt — remix, transform, and build upon the material
    'The licensor cannot revoke these freedoms as long as you follow 'the license terms.
'Under the following terms:
    'Attribution — You must give appropriate credit , provide a link 'to the license, and indicate if changes were made . You may do so in 'any reasonable manner, but not in any way that suggests the licensor 'endorses you or your use.
    'NonCommercial — You may not use the material for commercial 'purposes .
    'No additional restrictions — You may not apply legal terms or 'technological measures that legally restrict others from doing 'anything the license permits.
'Notices:
'You do not have to comply with the license for elements of the 'material in the public domain or where your use is permitted by an 'applicable exception or limitation .
'No warranties are given. The license may not give you all of the 'permissions necessary for your intended use. For example, other 'rights such as publicity, privacy, or moral rights may limit how you 'use the material.
'Simple IR receiver for the PIC16F18323: ' V3.1
' PICBASIC PRO
DEFINE OSCCON_1K 1
define OSC 32
low portc
low porta
 
 
' SETUP I/O 
TRISA = %00001001
TRISC = %00100000
 
 '''''''''''''''''''''''''''''''''''The inits
initIR:
define PULSEIN_MAX 2800
pwrswc var porta.0
pwrled var porta.1
source3   var porta.2
IR_Sense var porta.3
pwrrly    var porta.4
murly    var porta.5
source2    var portc.0
source0    var portc.1
source1   var portc.2
mtrA    var  portc.3
mtrB   var portc.4 
srcswc  var portc.5
st var word
IRWord var word
bits var byte
ID var word 
power var bit                                                                  
mute  var bit
temp var byte
temp1 var byte
source var byte
salt var byte
direction var byte
button1 var byte
button2 var byte
button3 var byte
button4 var byte
button5 var byte
button6 var byte
ircount var byte
salt =125
read 0, source
if  source > 4 then source = 1
low source0   
low source1   
low source2    
low source3 
mute = 1
gosub volmute
power = 1
gosub powerset
mute = 0
gosub volmute
toggle pwrled
''''''''''''''''''''''''''''''''''''''Main Program
direction = 10
gosub stpmtr
top: 
if pwrswc = 0 then gosub hardpwr 
if mute = 1  and power = 1 then  toggle pwrled
   gosub scanir 
   if  button1 > 1  then gosub powerset
   if power = 0 then  goto top
   if  button6 > 1 then gosub volmute
   if mute = 1 then goto top
   if  button4 > 1 then gosub volup 
   if  button5 > 1 then gosub voldown
   if  button2 > 1  then gosub sourceup
   if  button3 > 1  then gosub sourcedown
      
      if direction = 1 or direction = 2 then direction = 11
      if direction > 10 then direction = direction + 1
 
if  power = 1 and mute = 0 then high pwrled 
if srcswc = 0 then gosub hardsrc
if direction = 25 then gosub stpmtr
goto top
volup:
toggle pwrled
gosub resetbuttons
low mtrB
high mtrA
pause 50
gosub debounce
direction = 1
return
voldown:
toggle pwrled
gosub resetbuttons
low mtrA
high mtrB
pause 50
gosub debounce
direction = 2
return
            
            
hardpwr:
gosub stpmtr
gosub powerset
    debounceloop:
    pause 10
    if pwrswc = 0 then goto debounceloop
    pause 500
return    
hardsrc:
if mute = 1  and power = 1 then return
source = source + 1
if source = 5 then  source = 1
gosub setsource
    debouncesrc:
    pause 10
    if srcswc = 0 then goto debouncesrc
    pause 100
return  
powerset:
gosub resetbuttons
if power = 1 then 
    power = 0
    low pwrled
    low pwrrly
    mute = 1
    high murly          
    low source0   
    low source1   
    low source2    
    low source3 
    low mtrA
    high mtrB
    gosub longpause
    low mtrB
    mute = 0
    low murly
    write 0, source 
     else 
    gosub setsource
    power = 1
    high pwrled
    high pwrrly
    mute = 0
    low murly
endif
gosub stpmtr    
'gosub debouncelong
return
  
volmute:
gosub resetbuttons
if mute = 0 then
    toggle pwrled 
    mute = 1
    high murly
     else 
    mute = 0
    low murly
endif 
gosub stpmtr 
'gosub debouncelong
return
sourceup:
toggle pwrled
gosub stpmtr
gosub resetbuttons
source = source + 1
if source = 5 then
     source = 4
     gosub debounce
     return
ELSE     
gosub setsource
gosub debounce
return
ENDIF
return
sourcedown:
toggle pwrled
gosub stpmtr
gosub resetbuttons
source = source - 1
if source = 0 then
     source = 1 
     gosub debounce
     RETURN
ELSE     
gosub setsource
gosub debounce 
return
ENDIF
return
setsource:
'high murly
low source0   
low source1   
low source2    
low source3   
pause 50  
if source = 1 then high source0
if source = 2 then high source1
if source = 3 then high source2
if source = 4 then high source3
'pause 50
'low murly
return
longpause:
for temp = 1 to 25
    high pwrled 
    pause 250
    low pwrled
    pause 250   
next
return
stpmtr:
low mtrA
low mtrB 
direction = 0
gosub debouncelong 
return 
resetbuttons:
button1 = 0
button2 = 0
button3 = 0
button4 = 0
button5 = 0
button6 = 0 
return
scanir:
for ircount = 1 to 3
    gosub irin 
    If irword > 2000 then    
        if  irword = 2069 then button1 = button1 + 1
        if  irword = 2173 then button2 = button2 + 1
        if  irword = 2158 then button3 = button3 + 1
        if  irword = 2066 then button4 = button4 + 1
        if  irword = 2067 then button5 = button5 + 1
        if  irword = 2068 then button6 = button6 + 1
    endif
next        
return
irin:
ID = 0
irword = 0
pulsin IR_Sense, 0, st
    IF st < 1100 or st >2600 Then Return
For bits=0 to 11
    Pulsin IR_Sense,0,id ' Receive the IR bits
    ir_word.0[bits] = 0
    If id >=450+salt then irword.0[bits] = 1 
Next
return
debounce:
pulsin IR_Sense, 1, st
'LCDOUT $FE, $C0, #st
 IF  (st  >1200) or (st = 0) Then Return
goto debounce 
    
debouncelong:
ir_word = 0
pulsin IR_Sense, 1, st
'LCDOUT $FE, $C0, #st
    IF   (st = 0) Then  return
goto debouncelong