Amps Trigger

' This script is provided "as-is", without warranty of any kind,
' expressed or implied, including but not limited to the warranties of
' merchatability, fitness for a particular purpose and
' noninfringemement. In no event shall Roboteq be liable for any claim,
' damages or other liability, arising from the use of the software"

' Reads the controllers motor current and then sets the level of a boolean variable based on the level


option explicit 'Force variable declaration

'Variable declarations
dim AmpsLimit as integer
dim Motor1_Amps as integer
dim AmpsTrigger as boolean

AmpsLimit = 500 'Sets the amps trigger level to 50A, change as needed (Amps * 10)



'main loop
Top:

Motor1_Amps = getvalue(_A, 1) 'Query the current seen on motor channel 1 (pg 230 of manual)

if Motor1_Amps >= AmpsLimit then  'See IF functions described on pg 193 of manual
	
	AmpsTrigger = True
	
else
	
	AmpsTrigger = False
	
end if

wait(10) 'loop every 10 milliseconds, 100Hz)

goto Top 'go to top of loop