iframe-proxy | Sunbelt Computer Software

73 lines (61 loc) · 1.89 KB

local _ENV = mkmodule('plugins.tailor')
local argparse = require('argparse')
local utils = require('utils')
local function process_args(opts, args)
    if args[1] == 'help' then
        opts.help = true
        return
    return argparse.processArgsGetopt(args, {
            {'h', 'help', handler=function() opts.help = true end},
function status()
    dfhack.print(('tailor is %s'):format(isEnabled() and "enabled" or "disabled"))
    print((' %s confiscating tattered clothing'):format(tailor_getConfiscate() and "and" or "but not"))
    print(('tailor %s automating dye'):format(tailor_getAutomateDye() and "is" or "is not"))
    print('materials preference order:')
    for _,name in ipairs(tailor_getMaterialPreferences()) do
        print(('  %s'):format(name))
function setMaterials(names)
    local idxs = utils.invert(names)
    tailor_setMaterialPreferences(
            idxs.silk or -1,
            idxs.cloth or -1,
            idxs.yarn or -1,
            idxs.leather or -1,
            idxs.adamantine or -1)
function setConfiscate(opt)
    local fl = argparse.boolean(opt[1], "set confiscate")
    tailor_setConfiscate(fl)
function setAutomateDye(opt)
    local fl = argparse.boolean(opt[1], "set dye")
    tailor_setAutomateDye(fl)
function parse_commandline(...)
    local args, opts = {...}, {}
    local positionals = process_args(opts, args)
    if opts.help then
        return false
    local command = table.remove(positionals, 1)
    if not command or command == 'status' then
        status()
    elseif command == 'now' then
        tailor_doCycle()
    elseif command == 'materials' then
        setMaterials(positionals)
    elseif command == 'confiscate' then
        setConfiscate(positionals)
    elseif command == 'dye' then
        setAutomateDye(positionals)
        return false
    return true
return _ENV

Sunbelt Computer Software

PL/B Language Development and Support

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Uh oh!

Sunbelt Computer Software

PL/B Language Development and Support

Uh oh!

FilesExpand file tree

tailor.lua

Latest commit

History

tailor.lua

File metadata and controls