symbol pwminus=1
symbol pwplus=4
;symbol signal=0
symbol irpower=2
symbol ontime=50
symbol delaytime=50
output pwminus, pwplus, irpower
pause 100
;high signal
;pause 100
;low signal
b1=0
b2=0
for b0=1 to 250
	high irpower
	pause 200
	b2=0
	for b1=0 to 60
		pause 1
		if pin3=0 then
			b2=b2+1
			if b2>10 then goto main
		endif
	next b1
	low irpower
	pause 800
next b0
goto shutdown

main:
	high irpower
	infrain2
	b7=infra
	infrain2
	if infra<>b7 then goto main
	low irpower
	if infra=18 then dopwplus
	if infra=19 then dopwminus
	if infra=20 then mute
	if infra<7 then dopw
	if infra=21 then shutdown
	goto main

dopwplus:
	high pwplus
	pause 100
	low pwplus
	goto main

dopwminus:
	high pwminus
	pause 100
	low pwminus
	goto main
	
mute:
	low irpower
	pause 5000
	high irpower
	goto main
	
dopw:
	for b0=1 to 6 
		high pwminus
		pause ontime
		low pwminus
		pause ontime
	next b0
	if infra>0 then 
		for b0=1 to infra
			high pwplus
			pause ontime
			low pwplus
			pause ontime
		next b0
	endif
	goto main

shutdown:
	;for b0=1 to 5
	;	high signal
	;	pause 50
	;	low signal
	;	pause 50
	;next b0
	low irpower
	
end