Case 0 'throttle as labeled on RD (throttle on bottom half)
							m =lever(1).slope(0)
							b =lever(1).intercept(0)
							m1=lever(1).islope(1)
							b1=lever(1).iintercept(1)
							invert=true 'change to true to invert
							If (invert=false) then
								If (AnalogValue(0)>=maxthrottle) Then 'full throttle
									TS_SetControllerValue(THROTTLE_ID, RailSimThrottleMax)
								Else If (AnalogValue(0)<maxthrottle And AnalogValue(0)>minthrottle) Then 'between full throttle and idle
									Dim sendval As Single=m*AnalogValue(0)+b
									TS_SetControllerValue(THROTTLE_ID, sendval)
								Else 'idle
									TS_SetControllerValue(THROTTLE_ID, RailSimThrottleMin)
								End If
							Else
								If (AnalogValue(0)<=maxbrake) Then 'full throttle now
									TS_SetControllerValue(THROTTLE_ID, RailSimThrottleMax)		
								Else If (AnalogValue(0)>maxbrake And AnalogValue(0)<minbrake) Then 'between dynamic brake setup and dynamic brake
									Dim sendval As Single=m1*AnalogValue(0)+b1
									TS_SetControllerValue(THROTTLE_ID, sendval)	
								Else 'idle
									TS_SetControllerValue(THROTTLE_ID, RailSimThrottleMin)
								End If
							End If
							lever(1).LastValue=AnalogValue(0)


-------------------------------------------------------------------------------------------------------------------------------



		If (ThrottleStyle=0) Then
			'segment full throttle to throttle idle
			'uses RailSimThrottleMin, RailSimThrottleMax, THROTTLE_ID in Case 2002
			y1=RailSimThrottleMax
			y2=RailSimThrottleMin
			x1 = ((lever(1).position(0).max - lever(1).position(0).min) / 2.0) + lever(1).position(0).min
			x2 = ((lever(1).position(1).max - lever(1).position(1).min) / 2.0) + lever(1).position(1).min
			lever(1).slope(0) = (y2 - y1) / (x2 - x1)
			lever(1).intercept(0) = y1 - (lever(1).slope(0) * x1)
			lever(1).islope(0) = (y1 - y2) / (x2 - x1)
			lever(1).iintercept(0) = y2 - (lever(1).islope(0) * x1)
			'inverted put throttle on top
			x1 = ((lever(1).position(2).max - lever(1).position(2).min) / 2.0) + lever(1).position(2).min
			x2 = ((lever(1).position(3).max - lever(1).position(3).min) / 2.0) + lever(1).position(3).min
			y1=RailSimThrottleMax
			y2=RailSimThrottleMin
			lever(1).islope(1) = (y2 - y1) / (x2 - x1)
			lever(1).iintercept(1) = y1 - (lever(1).islope(1) * x1)