'reading a Memsic 2125 Dual-axis Accelerometer (available from Parallax)

xIn CON 8
yIn CON 9
hiPulse CON 1
xRaw VAR WORD
yRaw VAR WORD
xAngle VAR WORD
yAngle VAR WORD

readforces:
	PULSIN xIn,hiPulse,xRaw
	xAngle = (xRaw/18)-354
	PULSIN yIn,hiPulse,yRaw
	yAngle = (yRaw/18)-351
	DEBUG "xRaw: ",DEC xRaw," yRaw: ",DEC yRaw,
	"    xAngle: ",SDEC xAngle," yAngle: ",SDEC yAngle,CR
	PAUSE 20
GOTO readforces

'  CIRCUIT:
'        ___________
'        |  MEMSIC |
'       1|   2125  |6---+5V
'        |         |
' PIN9--2|Yout Xout|5---PIN8
'        |         |
' GND---3|_________|4---GND