loop1:
	readadc 2,b2	'this determines which range is selected	
	if b2 <25 then	
		b3 = 1
	elseif b2 < 76 then
		b3 = 2
	elseif b2 < 127 then
		b3 = 3
	elseif b2 < 178 then
		b3 = 4
	elseif b2 < 229 then
		b3 = 5
	else b3 = 6
	endif
	
	
	readadc10 4,w0	'read in value of RF signal
	
	w3 = 8*w0 + b3	'encode switch position and signal strength
	
	sertxd (#w3)	'send to COM1 port on computer	
	
	pause 2000		'leave data unchanged on screen for a time
	
	goto loop1		'get latest data