xTilt var word
yTilt var word
xPin con 0 'pin number for init pin
yPin con 2 'pin number for echo pin

SEROUT s_out, I4800, ["start", 10,13]
'debug["start"]

pause 500 'start program with half second display

main:

	pulsIn XPin,1, xTilt
	pulsIn YPin,1, yTilt
	
	if(xTilt <> 0) then
		SEROUT s_out, I4800, ["xTilt = ", DEC xTilt, 10, 13]
	endif
	
	if(yTilt <> 0) then
		SEROUT s_out, I4800, ["yTilt = ", DEC yTilt, 10, 13]
	endif
	
	pause 1000
	
	
	'debug["xTilt = ", DEC xTilt, " yTilt = ", DEC yTilt]

goto main