genka

Game.chain = {}

Game.chain.ui = {}
Game.chain.ui.numWepLabel = iup.label{title = "Num of weapon groups:"}
Game.chain.ui.numWepField = iup.text{}

Game.chain.ui.delayLabel = iup.label{title = "Delay:"}
Game.chain.ui.delayField = iup.text{}

Game.chain.ui.closeButton = iup.button{title = "Close"}
Game.chain.ui.bindsButton = iup.button{title = "Make Binds"}
Game.chain.ui.helpButton = iup.button{title = "?"}

Game.chain.ui.controls = iup.hbox{Game.chain.ui.helpButton, iup.fill{}, Game.chain.ui.closeButton, Game.chain.ui.bindsButton} --one line up to previous empty line.

Game.chain.ui.delayBox = iup.hbox{iup.fill{}, Game.chain.ui.delayLabel, Game.chain.ui.delayField} --also one line

Game.chain.ui.numBox = iup.hbox{iup.fill{}, Game.chain.ui.numWepLabel, Game.chain.ui.numWepField} --one line as well

Game.chain.ui.mainBox = iup.vbox{Game.chain.ui.numBox, Game.chain.ui.delayBox, Game.chain.ui.controls} --one line, wee.

Game.chain.ui.dlg = iup.dialog{Game.chain.ui.mainBox; title = "chainfire control", topmost = "YES"}

Game.chain.helpmsgp1 = "Hello, and welcome to the exciting world of chainfire control!\n\tWhat you are looking at is a system for autamating the creating of chainfire binds for any number of weapon groups with any delay."
Game.chain.helpmsgp2 = "\n\n\tThe fist field asks for the number of weapon groups you want to chain. Each of these groups should be set-up in the station to have the desired weapons in the primary fire group. The weapon groups should also be consecutive ones, starting at 1 and moving to the right along the buttons."
Game.chain.helpmsgp3 = "\n\tThe delay field asks for how long the bind should wait before moving on to the next weapon group. Works best if the delay times the number of weapon groups is the delay of the slowest of the weapons used."
Game.chain.helpmsgp4 = "\n\n\tNow then, on to using the resulting binds! The main of these are \"+crazyChain\" and \"crazyLoopDoctor\". The first is the alias you should bind to your fire key, and the second is one you should either remember or bind to some other close-at-hand key, in case the loop breaks for some reason. Most of the time, the bind will start working again after a visit from the crazyLoopDoctor."
Game.chain.helpmsgp5 = "\n\n\tThat\'s all the help you're getting from me. Now, go out there and kill some damn miners!"

Game.chain.helpmsg = Game.chain.helpmsgp1 .. Game.chain.helpmsgp2 .. Game.chain.helpmsgp3 .. Game.chain.helpmsgp4 .. Game.chain.helpmsgp5
Game.chain.ui.omghelp = iup.multiline{value = Game.chain.helpmsg, size="HALFxHALF", readonly = "YES"}
Game.chain.ui.helpdlg = iup.dialog{Game.chain.ui.omghelp; title = "help!", size="HALFxHALF", topmost = "YES"}

function Game.chain.ui.helpButton:action()
    Game.chain.ui.helpdlg:show()
end

function Game.chain.ui.closeButton:action()
    Game.chain.ui.dlg:close_cb()
    Game.chain.ui.dlg:hide()
end

function Game.chain.ui.bindsButton:action()
    local num = tonumber(iup.GetAttribute(Game.chain.ui.numWepField, "value"))
    local delay = tonumber(iup.GetAttribute(Game.chain.ui.delayField, "value"))
    Game.chain.makeBinds(num, delay)
end

function Game.chain.ui.dlg:show_cb()
    gkinterface.GKProcessCommand("hudtoggle")
end

function Game.chain.ui.dlg:close_cb()
    gkinterface.GKProcessCommand("hudtoggle")
end

function Game.chain.display()
    Game.chain.ui.dlg:show()
end

function Game.chain.makeBinds(num, delay)
    local i = 1
    local next = 0

    gkinterface.GKProcessCommand("alias crazyWepSwitch \"crazyWepSwitch1\"")
--  gkinterface.GKProcessCommand("alias crazyChainer \"+crazyChain\"")
    gkinterface.GKProcessCommand("alias -crazyChain \"+shoot2 0; alias crazyLoop crazyLoopDoctor; alias crazyBuffer crazyBufferMeds\"")
    gkinterface.GKProcessCommand("alias crazyLoopDoctor \"alias crazyLoop crazyLoopMeds\"")
    gkinterface.GKProcessCommand("alias crazyLoop \"crazyLoopDoctor\"")
    gkinterface.GKProcessCommand("alias crazyBufferMeds \"crazyLoop; alias crazyBuffer none\"")
    gkinterface.GKProcessCommand("alias crazyBuffer \"crazyBufferMeds\"")
    gkinterface.GKProcessCommand("alias +crazyChain \"+shoot2 ; crazyBuffer\"")

    gkinterface.GKProcessCommand("alias crazyLoopMeds \"crazyWepSwitch; wait " .. delay .." crazyLoop\"")

    while (i <= num) do
        next = math.mod(i,num)+1
        gkinterface.GKProcessCommand("alias crazyWepSwitch"..i.." \"Weapon"..i.."; alias crazyWepSwitch crazyWepSwitch"..next.."\"")
        i = i+1
    end
    print("Binds made for "..num.." weapon groups with a delay of "..delay.."s.")
end