_ShieldWeak =
{
}
setmetatable(_ShieldWeak, {__mode = "v"})

_g_CurrentExcuteMacro = nil

_ShieldList =
{
    ["_G"] = true,
    ["_ShieldWeak"] = true,
    ["_ShieldList"] = true,
    ["setfenv"] = true,
    ["getfenv"] = true,
    ["io"] = true,
    ["os"] = true,
    ["Ini"] = true,
    ["Tab"] = true,
    ["dofile"] = true,
    ["loadfile"] = true,
    ["loadstring"] = true,
    ["dostring"] = true,
    ["load"] = true,
    ["require"] = true
    ["package"] = true,
    ["Camera_EnableControl"] = true,
    ["MoveForwardStart"] = true,
    ["MoveForwardStop"] = true,
    ["MoveBackwardStart"] = true,
    ["MoveBackwardStop"] = true,
    ["TurnLeftStart"] = true,
    ["TurnLeftStop"] = true,
    ["TurnRightStart"] = true,
    ["TurnRightStop"] = true,
    ["StrafeLeftStart"] = true,
    ["StrafeLeftStop"] = true,
    ["StrafeRightStart"] = true,
    ["StrafeRightStop"] = true,
    ["MoveUpStart"] = true,
    ["MoveUpStop"] = true,
    ["MoveDownStart"] = true,
    ["MoveDownStop"] = true,
    ["ShieldValue"] = true,
    ["ShieldTable"] = true,
    ["ShieldFunction"] = true,
    ["AutoMoveToTarget"] = true,
    ["AutoMoveToPoint"] = true,
    ["LoadScriptLib"] = true,
    ["LoadLoginScriptLib"] = true,
    ["LoadDefaultScriptLib"] = true,
    ["RemoteCallToServer"] = true,
    ["ActionBar_ButtonDown"] = true,
    ["ActionBar_ButtonUp"] = true,
    ["_g_CurrentExcuteMacro"] = true,
    ["GMMessage"] = true,
    ["GMCheck"] = true,
}

function ShieldValue(t, szKey)
    t[szKey] = true
end

function ShieldTable(t, szTable, tShield)
    t[szTable] = function(tOwner)
        local result = tOwner[szTable]
        if not result then
            return nil
        end
        
        if _ShieldWeak[result] then
            return _ShieldWeak[result]
        end
        
        local proxy = {}
        local mt =
        {
            __index = function(t, k)
                if tShield[k] then
                    if type(tShield[k]) == "function" then
                        return tShield[k](result)
                    end
                    return nil
                end
                return result[k]
            end;
            __newindex = function(t, k, v)
                if tShield[k] then
                    return
                end
                result[k] = v
            end;
        }
        
        setmetatable(proxy, mt);
        
        _ShieldWeak[result] = proxy
        return proxy
    end
end

function ShieldFunction(t, szFunc, tResult, tParam, bInUserAction, szOnceKey)
    t[szFunc] = function(tOwner)
        return function(...)
            if _g_CurrentExcuteMacro then
                if szOnceKey then
                    if _g_CurrentExcuteMacro.aOnce[szOnceKey] then
                        return nil
                    end
                    _g_CurrentExcuteMacro.aOnce[szOnceKey] = true
                end
            else
                if bInUserAction and not Station.IsInUserAction() then
                    return nil
                end            
            end
            
            if tParam then
                for k, v in pairs(tParam) do
                    local a = select(k, ...)
                    if v[a] then
                        if type(v[a]) == "function" then
                            return v[a](...)
                        end
                        return nil
                    end
                end
            end
                        
            if not tResult then
                return tOwner[szFunc](...)
            end
            
            local r = tOwner[szFunc](...)
            if not r then
                return nil
            end
            
            if _ShieldWeak[r] then
                return _ShieldWeak[r]
            end
            
            local proxy = {}
            local mt =
            {
                __index = function(t, k)
                    if tResult[k] then
                        if type(tResult[k]) == "function" then
                            return tResult[k](r)
                        end
                        return nil
                    end
                    return r[k]
                end;
                __newindex = function(t, k, v)
                    if tResult[k] then
                        return
                    end
                    r[k] = v
                end;
            }
            setmetatable(proxy, mt);
            
            _ShieldWeak[r] = proxy
            
            return proxy
        end
    end
end

local _WindowShild =
{
}

ShieldFunction(_WindowShild, "Lookup", _WindowShild)
ShieldFunction(_WindowShild, "GetParent", _WindowShild)
ShieldFunction(_WindowShild, "GetFirstChild", _WindowShild)
ShieldFunction(_WindowShild, "GetNext", _WindowShild)
ShieldFunction(_WindowShild, "GetPrev", _WindowShild)
ShieldFunction(_WindowShild, "AppendItemFromIni", _WindowShild)
ShieldFunction(_WindowShild, "RegisterEvent", nil, {[2] = {["ON_REMOTE_COMMAND"] = true}})

ShieldTable(_ShieldList, "this", _WindowShild)

local _StationShild =
{
    ["IsInUserAction"] = true,
}
ShieldFunction(_StationShild, "Lookup", _WindowShild)

ShieldTable(_ShieldList, "Station", _StationShild)

local _WndShild =
{
}

ShieldFunction(_WndShild, "OpenWindow", _WindowShild)

ShieldTable(_ShieldList, "Wnd", _WndShild)

ShieldFunction(_ShieldList, "RegisterEvent", nil, {[2] = {["ON_REMOTE_COMMAND"] = true}})

local _PlayerShild =
{
    ["CastSkill"] = true,
    ["UseItem"] = true,
}

ShieldFunction(_PlayerShild, "TradingConfirm", nil, nil, true, "Trading")

ShieldFunction(_ShieldList, "GetPlayer", _PlayerShild)
ShieldFunction(_ShieldList, "GetClientPlayer", _PlayerShild)

ShieldFunction(_ShieldList, "OnUseSkill", nil, nil, true, "UseSkillOrItem")
ShieldFunction(_ShieldList, "OnUseItem", nil, nil, true, "UseSkillOrItem")
ShieldFunction(_ShieldList, "ActionButtonDown", nil, nil, true, "UseSkillOrItem")
ShieldFunction(_ShieldList, "ActionButtonUp", nil, nil, true, "UseSkillOrItem")

ShieldFunction(_ShieldList, "BuyItem", nil, nil, true, "BuyItem")
ShieldFunction(_ShieldList, "SendMail", nil, nil, true, "SendMail")

local _ActionBarShild =
{
    ["OnUseActionBarObject"] = true,
    ["OnItemLButtonClick"] = true,
}

ShieldTable(_ShieldList, "ActionBar", _ActionBarShild)

[窗体名]
._WndType=WndFrame
._Parent=Normal ;这里可以不是Normal，我见过用topmost的
Left=30 ;这几个尺寸没什么研究的意义
Top=150
Width=768
Height=512
MinWidth=0
MinHeight=0
MaxWidth=0
MaxHeight=0
DragAreaLeft=0 ;这里是控制可以拖拽的区域的，通过组合这里的数据可以描述拖拽的区域
DragAreaTop=0
DragAreaRight=310
DragAreaBottom=30
AnimateStartPosX=0 ;和动画有关的，暂时解读不能
AnimateStartPosY=0
AnimateEndPosX=0
AnimateEndPosY=0
AnimateTimeSpace=0
AnimateMoveSpeed=0
ScriptFile=interface\插件目录\lua文件名
IsCustomDragable=0
DragAreaWidth=0
DragAreaHeight=0
DummyWnd=0 ;下面三行不必须，recount的窗体就没用这个，具体还是解读不明
DisableBreath=1
DisableBringToTop=1

._WndType=Handle
._Parent=MyFrame ;父框架，可以是窗体，也可以是其他的层
HandleType=0 ;这里0代表只是一个窗体，如果改变这里可能是其他的控件，比如list
FirstItemPosType=0
Left=0
Top=0
PosType=0
Width=771
Height=517

._WndType=Shadow ;这里表示它是个阴影
._Parent=Handle_Title
ShadowColor=red2 ;颜色，囧了，没对应表么
Alpha=200 ;阿尔法值，设置透明度用，越高越深，255最大值
Left=0
Top=0
PosType=0
Width=200
Height=20

._WndType=Image ;图片的标志
._Parent=Handle_UI
Image=ui\Image\UICommon\CommonPanel.UITex ;图片的文件名
Frame=2;编号
Left=0
Top=5
PosType=0 ;摆放类型，很重要，因为有的图片是平铺的，比如窗体背景，用很细的一条平铺了整个窗体。
Alpha=255