I am unfortunetly unable to post it as I am only allowed to upload 10kb. But here is an excerpt:
--------------------------------------------
---- Variables
--------------------------------------------
Sweep_R1 = "L:tomcat_bomb_mode"
Sweep_R2 = "L:tomcat_bomb_switch"
Man_Sweep = "L:tomcat_sweep_mode"
Sweep_Cover = "L:tomcat_wingsweep_cover"
Over_Sweep = "L:Sweep_Oversweep_flag"
Emerg_Auto = "L:Over_to_Auto"
--------------------------------------------
---- Scripts
--------------------------------------------
-- Sweep Rocker to Auto Mode
if ipcPARAM == 1 then
ipc.writeLvar(Sweep_R1, 0)
ipc.writeLvar(Sweep_R2, 0)
end
-- Sweep Rocker to Bomb Mode
if ipcPARAM == 2 then
ipc.writeLvar(Sweep_R1, 2)
ipc.writeLvar(Sweep_R2, 2)
end
-- Sweep Rocker to Manual FWD
if ipcPARAM == 3 then
ipc.writeLvar(Man_Sweep, 1)
ipc.writeLvar(Sweep_R2, 1)
end
-- Sweep Rocker to Manual AFT
if ipcPARAM == 4 then
ipc.writeLvar(Man_Sweep, -1)
ipc.writeLvar(Sweep_R2, 1)
end
-- Sweep Rocker to Center
if ipcPARAM == 5 then
ipc.writeLvar(Man_Sweep, 0)
ipc.writeLvar(Sweep_R2, 1)
end
-- Emergency Sweep Cover Toggle
if ipcPARAM == 6 then
tog = 0
SCov = ipc.readLvar(Sweep_Cover)
if SCov == 0 then
tog = 1
end
ipc.writeLvar(Sweep_Cover, tog)
end
-- Oversweep Toggle
if ipcPARAM == 7 then
tog = 0
OSw = ipc.readLvar(Over_Sweep)
if OSw == 0 then
tog = 1
end
ipc.writeLvar(Over_Sweep, tog)
end