fram.lua--声望牌

Global_Reg.RegInit("fram_Init");

function fram_Init()
        fram_Init2();
        return 0;
end

function fram_Init2(fram_index)
        if fram_index == nil or fram_index < 0 then
        fram_index = NL.CreateNpc(nil,"fram_Init3")
        end
        Char.SetData(fram_index,%对象_形象%,10414);
        Char.SetData(fram_index,%对象_原形%,10414);
        Char.SetData(fram_index,%对象_X%,231);
        Char.SetData(fram_index,%对象_Y%,83);
        Char.SetData(fram_index,%对象_地图%,1000);
        Char.SetData(fram_index,%对象_方向%,4);
        Char.SetData(fram_index,%对象_名字%,"阿蒙的声望查询牌");
        NLG.UpChar(fram_index)
        LuaNpcIndex["fram_Init"]=fram_index;
        InstallNpc("fram_Init",fram_index);
        Char.SetTalkedEvent(nil, "FramTalk", fram_index);
        Char.SetWindowTalkedEvent(nil, "FramEvent", fram_index);
        return true
end

function fram_Init3(index)
        return true;
end

function FramTalk(_NpcIndex,_PlayerIndex)
        if (NLG.CanTalk(_NpcIndex,_PlayerIndex) == true) then
                WindowMsg = "3\\n\\n                         你来找我有什么事情吗？\\n\\nHi,我想查查我现在有多少声望啦!嘿嘿!\\n\\n声望是什么";
                NLG.ShowWindowTalked(_PlayerIndex,%窗口_选择框%,%按钮_关闭%,1,WindowMsg,_NpcIndex);
        end
        return;
end

function FramEvent(_NpcIndex,_PlayerIndex,_SqeNo,_select,_data)
        if ((_select == 0 or _select == "0") and (_data ~= "")) then
        local selectitem = tonumber(_data) -1;
                if (selectitem == 0) then
                Msg = "\\n\\n你现在已经有"..Char.GetData(_PlayerIndex,%对象_声望%).."点声望噢!";
                NLG.ShowWindowTalked(_PlayerIndex,%窗口_信息框%,%按钮_关闭%,1,Msg,_NpcIndex);
                end
                if (selectitem == 2) then
                        NLG.ShowWindowTalked(_PlayerIndex,%窗口_信息框%,%按钮_关闭%,1,"\n\n一转晋级需要声望到达呢喃的歌声(刻于新月之铭)\n二转晋级需要声望到达苍之风云(踏入神的领域)\n三转晋级需要声望到达欢喜的慈雨(神匠)\n四转晋级需要声望到达敬畏的寂静(万物创造者)\n\n声望高还会有$4『NPC伙伴』$0慕名而来哦!",_NpcIndex);
                end
        end
end