Dialogs

local dialogpacket = ""

function addItemWithCustomText(itemID, textUnderButton, buttonName)
    dialogpacket = dialogpacket .. "\nadd_button_with_icon|" .. buttonName .. "|" .. textUnderButton .. "|staticBlueFrame|" .. itemID .. "|"
end

function addSpacer(type)
    if type == "big" then
        dialogpacket = dialogpacket .. "add_spacer|big|\n"
    else
        dialogpacket = dialogpacket .. "add_spacer|small|\n"
    end
end

function addItemWithCustomText(itemID, textUnderButton, buttonName)
    dialogpacket = dialogpacket .. "\nadd_button_with_icon|" .. buttonName .. "|" .. textUnderButton .. "|staticBlueFrame|" .. itemID .. "|"
end

function addNewLineAfterFrame()
    dialogpacket = dialogpacket .. "\nadd_button_with_icon||END_LIST|noflags|0|0|"
end

function addPicker(pickername, pickertext, headText)
    dialogpacket = dialogpacket .. "\nadd_item_picker|" .. pickername .. "|" .. pickertext .. "|" .. headText .. "|"
end

function addStaticBlueFrame(itemID, count, textUnderFrame, buttonName, isEndLine)
    if not isEndLine then
        dialogpacket = dialogpacket .. "\nadd_button_with_icon|" .. buttonName .. "|" .. textUnderFrame .. "|frame|" .. itemID .. "|" .. count .. "|"
    else
        dialogpacket = dialogpacket .. "\nadd_button_with_icon||END_LIST|noflags|0|0|\nadd_button_with_icon|" .. buttonName .. "|" .. textUnderFrame .. "|frame|" .. itemID .. "|" .. count .. "|"
    end
end

function addLabelWithIcon(text, tileid, type)
    if type == "big" then
        dialogpacket = dialogpacket .. "add_label_with_icon|big|" .. text .. "|left|" .. tileid .. "|\n"
    else
        dialogpacket = dialogpacket .. "add_label_with_icon|small|" .. text .. "|left|" .. tileid .. "|\n"
    end 
end

function addButton(buttonname, buttontext)
    dialogpacket = dialogpacket .. "add_button|" .. buttonname .. "|" .. buttontext .. "|noflags|0|0|\n"
end

function addCheckbox(checkboxname, checkboxtext, checked)
    if checked then
        dialogpacket = dialogpacket .. "add_checkbox|" .. checkboxname .. "|" .. checkboxtext .. "|1|\n"
    else
        dialogpacket = dialogpacket .. "add_checkbox|" .. checkboxname .. "|" .. checkboxtext .. "|0|\n"
    end
end

function addTextBox(text)
    dialogpacket = dialogpacket .. "add_textbox|" .. text .. "|left|\n"
end

function addSmallText(text)
    dialogpacket = dialogpacket .. "add_smalltext|" .. text .. "|\n"
end

function addInputBox(name, text, cont, size)
    dialogpacket = dialogpacket .. "add_text_input|" .. name .. "|" .. text .. "|" .. cont .. "|" .. size .. "|\n"
end

function addQuickExit()
    dialogpacket = dialogpacket .. "add_quick_exit|\n"
end

function addEndDialog(name, accept, cancel)
    dialogpacket = dialogpacket .. "end_dialog|" .. name .. "|" .. cancel .. "|" .. accept .. "|\n"
end

function addCustom(packet)
    dialogpacket = dialogpacket .. packet .. "\n"
end

function finishDialog()
    local var = {} --table
    var[0] = "OnDialogRequest"
    var[1] = dialogpacket
    var.netid = -1 --required netid
    SendVarlist(var)
    dialogpacket = ""
end