
' ╔════════════════════════════════════════════╗
' ║ ENABLE / DISABLE PUMP                      ║
' ╚════════════════════════════════════════════╝
Variable Numeric Slot_Pump   = 5


Label StartPump
	' the following identifiers are not case corrected
	stopPump
	stopPump
	ManagePump
Return

Label StopPump
	Slot(Slot_Pump) = 0
Return


Label ManagePump
	If Slot(Slot_Pump) = 0
		Gosub StartPump
	Else
		Gosub StopPump
	EndIf
Return


'WATCH ttsvoices
