发个天龙到等级就送元宝和赠点的脚本[手工打造]

-- 领奖NPC

x002093_g_scriptId = 002093

-- 奖励标记

x002093_g_flag={


        [70]        =MF_LINGQUZENGDIAN
        [80]        =MF_LINGQUYUANBAO80
        [90]        =MF_LINGQUYUANBAO90

}


--*****************************

--事件交互入口

--*****************************
        
        function x002093_OnDefaultEvent(scencId,selfId,targetId)

                BeginEvent(sceneId)
                
                        strText = "欢迎光临我爱天龙"
                        
                        AddText(sceneid,str Text)
                        AddNum Text(sceneId,x002093_g_scriptId,"领取赠点",5,101)
                        AddNum Text(sceneId,x002093_g_scriptId,"领取元宝",5,101)

        EndEvent(sceneId)
        
        DispatchEventList(scencId,selfId,targetId)
end


--**********************

--事件列表选中一项

--**********************

        function x002093_OnEventRequest( sceneId, selfId, targetId, eventId ) 

                if GetNumText() == 101 then

                local index = GetMissonFlag( sceneId, selfId,MF_LINGQUZENGDIAN)


                if index == 1 then


                x002093_g_TalkMsg( sceneId, selfId, targetId,"您已经领取该项奖励,不能再领取.") 

                return

end

                ZengDian(SceneId,selfId,targetId,1,10000)
        
                SetMissionFlag(SceneId,selfId,MF_LINGQUZENGDIAN,1)

                BeginEvent(sceneID)

                AddText(sceneId,"领取元宝成功,您获得了10000赠点,谢谢你对[我爱天龙]的支持")

                EndEvent(sceneId)

                DiapatchEventList( sceneId, selfId, targetId)

                elsif GetNum Text() == 102 then

                BeginEvent(sceneId)

                DispatchEventList(sceneId,selfid,targetId)

        elseif GetNum Text() == 102 then

                BeginEvent(secneId)
                
        AddText(sceneId,"为了回馈广大玩家对[我爱天龙]的支持,现推出免费领取赠点的活动,请选择相应的等级领取奖励")         
        
        AddText(scened,x002093_g_scriptId,"领取80级7万元宝奖励",5,80)
        AddText(scened,x002093_g_scriptId,"领取90级15万元宝奖励",5,90)

        EndEvent(scened)

                DispatchEventList(scenedId,selfid,targetId)
        elseif GetNum Text() == 80 or GetNum Text() == 90 then

                x002093_lingquyuanbao(scened,selfId,targetid)

        return

end

end

--********************

--对话提示

--********************
                

        function x002093_OnEventRequest( sceneId, selfId, targetId, eventId )

                BeginEvent(sceneId)
                
                AddText(sceneId,str)

        EndEvent(sceneId)

        DispatchEventList( sceneId, selfId, targetId, eventId)        

        end

--*******************

--领取元宝

--*******************


        function x002093_OnEventRequest( sceneId, selfId, targetId, eventId )


        local mylevel = GetLevel(sceneId, selfId, targetId, eventId)

        if mylevel <        GetNumText() then

        local str Text = format("您的等级不够,待等级达到%d再来找我吧",GetNumText())

        X002093,TalkMsg(sceneId, selfId, targetId,str Text)

        return

        end
        
        if GetNumText()==80 then

        local index = GetMissionFlag(sceneId, selfId, MF_LINGQUYUANBAO80)

        
        if index == 1 then

        x002093_TalkMsg(sceneId, selfId, targetId,"您已经领取过该奖励,不能再领取了")        

        return

        end
        
        YuanBao(sceneId,selfId,targetId,1,70000)
        ZengDian(sceneId,selfId,targetId,1,70000)
        
        SetMissionFlag((sceneId,selfId,targetId,"领取元宝成功,您获得了70000元宝和赠点,谢谢你对[我爱天龙]的支持")

elseif GetNum Text() == 90 then

        local index = GetMissionFlag(sceneId,selfId,MF_LINGQUYUANBAO90)

        if index == 1 then

        x002093_TalkMsg(sceneId,selfId,targetId,"您已经领取过该项奖励,不能再领取了")

        return

end

        YuanBao(sceneId,selfId,targetId,1,150000)

        ZengDian(sceneId,selfId,targetId,1,150000)

        SetMissionFlag((sceneId,selfId,MF_LINGQUYUANBAO90,1)

        x002093_TalkMsg(sceneId,selfId,targetId,"领取元宝成功,您获得了150000元宝和150000赠点,感谢您对[我爱天龙]的支持")
        
        end

end