-- 17.02.17/AH Problem A2A Cessna C172 Alternator on CH Throttle Quadrant not working
-- 				Found LUA Script in https://a2asimulations.com/forum/viewtopic.php?f=108&t=37894
--				but it doesn't work as toggle so I modified it
--				nicht bei A2A: 0x3102 / 0x3101 : FSUIPC internal memory for Alternator and Battery
--				A2A C172: If Battery goes off, Switch Alternator off too to avoid spikes
--				Achtung ! Wenn Generator ein, erst Gen. ausschalten, dann Battery, sonst kommt AccuSim durcheinander !
-- 11.05.18/AH	Anpassung an TT Statische Switche: ipcPARAM=1/2 -> Ein/Aus, Toggle-Teil wird nicht mehr benötigt
--
--	This script can be mapped to Battery Toggle Switch for A2A C172 Cessna
--
if ipcPARAM == 1 then
   ipc.writeLvar("L:Battery1Switch", 1)
   return
elseif ipcPARAM == 2 then
-- Battery off: first Alternator off to avoid spikes
   GEN1 = ipc.readLvar("L:Eng1_GeneratorSwitch")
  if (GEN1 ~= 0) then
    ipc.writeLvar("L:Eng1_GeneratorSwitch", 0)
    ipc.sleep(100)   
  end	 
  ipc.writeLvar("L:Battery1Switch", 0)
  return
else
--
-- Der folgende Teil ist für Toggle-Schalter
--
  BATTERY = ipc.readLvar("L:Battery1Switch")
  if (BATTERY == 0 or ipcPARAM == 1) then
     ipc.writeLvar("L:Battery1Switch", 1)
  else
-- Battery off: first Alternator off to avoid spikes
     GEN1 = ipc.readLvar("L:Eng1_GeneratorSwitch")
    if (GEN1 ~= 0) then
      ipc.writeLvar("L:Eng1_GeneratorSwitch", 0)
      ipc.sleep(100)   
    end	 
    ipc.writeLvar("L:Battery1Switch", 0)
  end	
end
-- Just for debugging
-- BATTERY = ipc.readLvar("L:Battery1Switch")
-- GEN1= ipc.readLvar("L:Eng1_GeneratorSwitch")
-- ipc.lineDisplay("BAT State on Exit:" .. BATTERY,3)
-- ipc.lineDisplay("GEN State on Exit:" .. GEN1,4)
-- ipc.sleep(5000)
-- End of debugging