前端抽奖脚本

meinvwudi

local zhuanpanOBJ = {}

zhuanpanOBJ.Name = "zhuanpanOBJ"

zhuanpanOBJ.cfg = SL:Require("GUILayout/A/zhuanpanCFG",true)

function zhuanpanOBJ:main()
    local parent = GUI:Win_Create(self.Name, 0, 0, 0, 0, false, false, true, false)
    self._parent = parent
    self.old_idx = nil
    --加载UI
    GUI:LoadExport(parent, "A/zhuanpanUI",function ()
        self.ui = GUI:ui_delegate(parent)

        --背景关闭
        GUI:addOnClickEvent(self.ui.CloseLayout, function()
            GUI:Win_Close(self._parent)
        end)

        --关闭按钮
        GUI:addOnClickEvent(self.ui.CloseButton, function()
            GUI:Win_Close(self._parent)
        end)

        --给服务端发消息
        GUI:addOnClickEvent(self.ui.btn_lottery, function()
            -- 请求服务端下发奖励idx
            -- SL:SendLuaNetMsg(100,0,0,0,"请求获取奖励道具idx")
            SL:SendNetMsg(10000, 0, 0, 0, "请求获取奖励道具idx")
            -- self:lotteryAnim(math.random(1, 9))
        end)

        self:createItemShow()
    end)
end

--创建奖励道具
function zhuanpanOBJ:createItemShow()
    for i = 1, 9 do
        local cfgData = self.cfg[i]
        local item = GUI:ItemShow_Create(self.ui["item_" .. i], "item", 0, 0, {index=cfgData.showReward[1][1], look=true, count=cfgData.showReward[1][2]})
        GUI:setAnchorPoint(item, 0.5, 0.5)
    end
end

--抽奖动画
function zhuanpanOBJ:lotteryAnim(gift_idx)
    self.old_idx = self.old_idx or 1
    GUI:setEnabled(self.ui.btn_lottery,false)
    local maxNum = 9        --奖励道具上限
    local turnsNum = 2      --轮盘空转圈数
    local start_idx = self.old_idx
    local randomNum = turnsNum * maxNum
    -- local anim_num = randomNum - ((self.old_idx + randomNum) % maxNum - gift_idx) --动画次数
    local anim_num = randomNum + gift_idx - self.old_idx % maxNum --动画次数
    -- SL:Print("anim_num=" .. anim_num .. ", self.old_idx=" .. self.old_idx)
    -- 18-(1+18)%9-3=14
    local actionList = {}
    for i = 1, anim_num do
        start_idx = (self.old_idx + i) % maxNum
        local cur_idx = start_idx == 0 and maxNum or start_idx
        local delayTime = 0.05
        if i <= 3 then
            --变快
            delayTime = 0.4 - 0.1 * i
        elseif i >= anim_num - 3 then
            --变慢
            delayTime = 0.1 + 0.1 * (i + 3 - anim_num)
        end
        actionList[#actionList + 1] = GUI:DelayTime(delayTime)
        actionList[#actionList + 1] = GUI:CallFunc(function()
            for k=1,maxNum do
                GUI:setVisible(self.ui["select_" .. k],k == cur_idx)
            end
        end)
        if i == anim_num then
            actionList[#actionList + 1] = GUI:CallFunc(function ()
                -- 动画播放完毕,解禁按钮
                GUI:setEnabled(self.ui.btn_lottery,true)
                -- 注:发送的奖励idx需要在服务端随机后存放于人物变量上
                -- local idx = self.cfg[i]
                SL:dump(i, "desciption", 2)
                SL:SendNetMsg(10002, 0, 0, 0, gift_idx)
            end)
        end
    end
    self.old_idx = gift_idx
    GUI:runAction(self._parent,GUI:ActionSequence(actionList))
end

-------------------------------↓↓↓ 网络消息 ↓↓↓-------------------------------
--收到服务端消息,抽奖动画
SL:RegisterNetMsg(10001, function(msgID, p1, p2, p3, msgData)
    local data = SL:JsonDecode(p1)
    -- SL:dump(..., "desciption", 1)
    -- SL:Print("--------抽奖--------2" .. data.test)
    -- SL:Print("--------抽奖--------:" .. tonumber(data.gift_idx) )
    zhuanpanOBJ:lotteryAnim(tonumber(data.gift_idx)) 
end)

--点击npc打开界面
SL:RegisterLUAEvent(LUA_EVENT_TALKTONPC, "GUIUtil", function(jsonData)
    if jsonData.name == "抽奖" then
        SL:Print("--------抽奖--------")
        zhuanpanOBJ:main()
    end
end)

return zhuanpanOBJ

meinvwudi

UI文件

local ui = {}
function ui.init(parent)
	-- Create CloseLayout
	local CloseLayout = GUI:Layout_Create(parent, "CloseLayout", 0.00, 0.00, 1136.00, 640.00, false)
	GUI:Layout_setBackGroundColorType(CloseLayout, 1)
	GUI:Layout_setBackGroundColor(CloseLayout, "#000000")
	GUI:Layout_setBackGroundColorOpacity(CloseLayout, 76)
	GUI:setTouchEnabled(CloseLayout, true)
	GUI:setTag(CloseLayout, -1)

	-- Create FrameLayout
	local FrameLayout = GUI:Layout_Create(parent, "FrameLayout", 568.00, 320.00, 790.00, 536.00, false)
	GUI:setAnchorPoint(FrameLayout, 0.50, 0.50)
	GUI:setTouchEnabled(FrameLayout, true)
	GUI:setTag(FrameLayout, -1)

	-- Create FrameBG
	local FrameBG = GUI:Image_Create(FrameLayout, "FrameBG", 0.00, 0.00, "res/public/1900000610.png")
	GUI:Image_setScale9Slice(FrameBG, 272, 272, 194, 194)
	GUI:setContentSize(FrameBG, 692, 582)
	GUI:setIgnoreContentAdaptWithSize(FrameBG, false)
	GUI:setTouchEnabled(FrameBG, false)
	GUI:setTag(FrameBG, -1)

	-- Create TitleText
	local TitleText = GUI:Text_Create(FrameLayout, "TitleText", 145.00, 487.00, 20, "#d8c8ae", [[抽奖]])
	GUI:setTouchEnabled(TitleText, false)
	GUI:setTag(TitleText, -1)
	GUI:Text_enableOutline(TitleText, "#000000", 1)

	-- Create CloseButton
	local CloseButton = GUI:Button_Create(FrameLayout, "CloseButton", 679.00, 477.00, "res/public/1900000510.png")
	GUI:Button_loadTexturePressed(CloseButton, "res/public/1900000511.png")
	GUI:Button_setTitleText(CloseButton, "")
	GUI:Button_setTitleColor(CloseButton, "#ffffff")
	GUI:Button_setTitleFontSize(CloseButton, 10)
	GUI:Button_titleEnableOutline(CloseButton, "#000000", 1)
	GUI:setTouchEnabled(CloseButton, true)
	GUI:setTag(CloseButton, -1)

	-- Create img_bg
	local img_bg = GUI:Image_Create(FrameLayout, "img_bg", 356.00, 255.00, "res/custom/XingYunZhuanPan/lianzhi_bg.png")
	GUI:setAnchorPoint(img_bg, 0.50, 0.50)
	GUI:setTouchEnabled(img_bg, true)
	GUI:setTag(img_bg, 12)

	-- Create btn_lottery
	local btn_lottery = GUI:Button_Create(img_bg, "btn_lottery", 289.00, 225.00, "res/custom/XingYunZhuanPan/lianzhi_btn.png")
	GUI:Button_loadTexturePressed(btn_lottery, "res/custom/XingYunZhuanPan/lianzhi_btn_1.png")
	GUI:Button_setScale9Slice(btn_lottery, 15, 15, 11, 11)
	GUI:setContentSize(btn_lottery, 142, 142)
	GUI:setIgnoreContentAdaptWithSize(btn_lottery, false)
	GUI:Button_setTitleText(btn_lottery, "")
	GUI:Button_setTitleColor(btn_lottery, "#414146")
	GUI:Button_setTitleFontSize(btn_lottery, 14)
	GUI:Button_titleDisableOutLine(btn_lottery)
	GUI:setAnchorPoint(btn_lottery, 0.50, 0.50)
	GUI:setTouchEnabled(btn_lottery, true)
	GUI:setTag(btn_lottery, 24)

	-- Create nd_Item
	local nd_Item = GUI:Node_Create(img_bg, "nd_Item", 289.00, 224.00)
	GUI:setAnchorPoint(nd_Item, 0.50, 0.50)
	GUI:setTag(nd_Item, 49)

	-- Create item_bg_1
	local item_bg_1 = GUI:Node_Create(nd_Item, "item_bg_1", 58.00, 157.00)
	GUI:setAnchorPoint(item_bg_1, 0.50, 0.50)
	GUI:setTag(item_bg_1, 50)

	-- Create item_1
	local item_1 = GUI:Node_Create(item_bg_1, "item_1", 0.00, 0.00)
	GUI:setAnchorPoint(item_1, 0.50, 0.50)
	GUI:setTag(item_1, 69)

	-- Create select_1
	local select_1 = GUI:Image_Create(item_bg_1, "select_1", 2.00, 0.00, "res/custom/XingYunZhuanPan/lianzhi_7.png")
	GUI:setAnchorPoint(select_1, 0.50, 0.50)
	GUI:setTouchEnabled(select_1, false)
	GUI:setTag(select_1, 51)

	-- Create img_get_1
	local img_get_1 = GUI:Image_Create(item_bg_1, "img_get_1", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_1, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_1, false)
	GUI:setTag(img_get_1, 68)
	GUI:setVisible(img_get_1, false)

	-- Create item_bg_2
	local item_bg_2 = GUI:Node_Create(nd_Item, "item_bg_2", 146.00, 84.00)
	GUI:setAnchorPoint(item_bg_2, 0.50, 0.50)
	GUI:setTag(item_bg_2, 52)

	-- Create item_2
	local item_2 = GUI:Node_Create(item_bg_2, "item_2", 0.00, 0.00)
	GUI:setAnchorPoint(item_2, 0.50, 0.50)
	GUI:setTag(item_2, 70)

	-- Create select_2
	local select_2 = GUI:Image_Create(item_bg_2, "select_2", 2.00, 0.00, "res/custom/XingYunZhuanPan/lianzhi_6.png")
	GUI:setAnchorPoint(select_2, 0.50, 0.50)
	GUI:setTouchEnabled(select_2, false)
	GUI:setTag(select_2, 53)
	GUI:setVisible(select_2, false)

	-- Create img_get_2
	local img_get_2 = GUI:Image_Create(item_bg_2, "img_get_2", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_2, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_2, false)
	GUI:setTag(img_get_2, 71)
	GUI:setVisible(img_get_2, false)

	-- Create item_bg_3
	local item_bg_3 = GUI:Node_Create(nd_Item, "item_bg_3", 166.00, -29.00)
	GUI:setAnchorPoint(item_bg_3, 0.50, 0.50)
	GUI:setTag(item_bg_3, 54)

	-- Create item_3
	local item_3 = GUI:Node_Create(item_bg_3, "item_3", 0.00, 0.00)
	GUI:setAnchorPoint(item_3, 0.50, 0.50)
	GUI:setTag(item_3, 86)

	-- Create select_3
	local select_3 = GUI:Image_Create(item_bg_3, "select_3", 1.00, -2.00, "res/custom/XingYunZhuanPan/lianzhi_5.png")
	GUI:setAnchorPoint(select_3, 0.50, 0.50)
	GUI:setTouchEnabled(select_3, false)
	GUI:setTag(select_3, 55)
	GUI:setVisible(select_3, false)

	-- Create img_get_3
	local img_get_3 = GUI:Image_Create(item_bg_3, "img_get_3", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_3, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_3, false)
	GUI:setTag(img_get_3, 87)
	GUI:setVisible(img_get_3, false)

	-- Create item_bg_4
	local item_bg_4 = GUI:Node_Create(nd_Item, "item_bg_4", 107.00, -129.00)
	GUI:setAnchorPoint(item_bg_4, 0.50, 0.50)
	GUI:setTag(item_bg_4, 56)

	-- Create item_4
	local item_4 = GUI:Node_Create(item_bg_4, "item_4", 0.00, 0.00)
	GUI:setAnchorPoint(item_4, 0.50, 0.50)
	GUI:setTag(item_4, 88)

	-- Create select_4
	local select_4 = GUI:Image_Create(item_bg_4, "select_4", 1.00, -2.00, "res/custom/XingYunZhuanPan/lianzhi_4.png")
	GUI:setAnchorPoint(select_4, 0.50, 0.50)
	GUI:setTouchEnabled(select_4, false)
	GUI:setTag(select_4, 57)
	GUI:setVisible(select_4, false)

	-- Create img_get_4
	local img_get_4 = GUI:Image_Create(item_bg_4, "img_get_4", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_4, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_4, false)
	GUI:setTag(img_get_4, 89)
	GUI:setVisible(img_get_4, false)

	-- Create item_bg_5
	local item_bg_5 = GUI:Node_Create(nd_Item, "item_bg_5", -1.00, -167.00)
	GUI:setAnchorPoint(item_bg_5, 0.50, 0.50)
	GUI:setTag(item_bg_5, 58)

	-- Create item_5
	local item_5 = GUI:Node_Create(item_bg_5, "item_5", 0.00, 0.00)
	GUI:setAnchorPoint(item_5, 0.50, 0.50)
	GUI:setTag(item_5, 90)

	-- Create select_5
	local select_5 = GUI:Image_Create(item_bg_5, "select_5", 0.00, -5.00, "res/custom/XingYunZhuanPan/lianzhi_3.png")
	GUI:setContentSize(select_5, 102, 103)
	GUI:setIgnoreContentAdaptWithSize(select_5, false)
	GUI:setAnchorPoint(select_5, 0.50, 0.50)
	GUI:setTouchEnabled(select_5, false)
	GUI:setTag(select_5, 59)
	GUI:setVisible(select_5, false)

	-- Create img_get_5
	local img_get_5 = GUI:Image_Create(item_bg_5, "img_get_5", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_5, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_5, false)
	GUI:setTag(img_get_5, 91)
	GUI:setVisible(img_get_5, false)

	-- Create item_bg_6
	local item_bg_6 = GUI:Node_Create(nd_Item, "item_bg_6", -108.00, -127.00)
	GUI:setAnchorPoint(item_bg_6, 0.50, 0.50)
	GUI:setTag(item_bg_6, 60)

	-- Create item_6
	local item_6 = GUI:Node_Create(item_bg_6, "item_6", 0.00, 0.00)
	GUI:setAnchorPoint(item_6, 0.50, 0.50)
	GUI:setTag(item_6, 93)

	-- Create select_6
	local select_6 = GUI:Image_Create(item_bg_6, "select_6", -1.00, -1.00, "res/custom/XingYunZhuanPan/lianzhi_2.png")
	GUI:setAnchorPoint(select_6, 0.50, 0.50)
	GUI:setTouchEnabled(select_6, false)
	GUI:setTag(select_6, 61)
	GUI:setVisible(select_6, false)

	-- Create img_get_6
	local img_get_6 = GUI:Image_Create(item_bg_6, "img_get_6", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_6, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_6, false)
	GUI:setTag(img_get_6, 92)
	GUI:setVisible(img_get_6, false)

	-- Create item_bg_7
	local item_bg_7 = GUI:Node_Create(nd_Item, "item_bg_7", -165.00, -29.00)
	GUI:setAnchorPoint(item_bg_7, 0.50, 0.50)
	GUI:setTag(item_bg_7, 62)

	-- Create item_7
	local item_7 = GUI:Node_Create(item_bg_7, "item_7", 0.00, 0.00)
	GUI:setAnchorPoint(item_7, 0.50, 0.50)
	GUI:setTag(item_7, 95)

	-- Create select_7
	local select_7 = GUI:Image_Create(item_bg_7, "select_7", -5.00, -1.00, "res/custom/XingYunZhuanPan/lianzhi_1.png")
	GUI:setAnchorPoint(select_7, 0.50, 0.50)
	GUI:setTouchEnabled(select_7, false)
	GUI:setTag(select_7, 63)
	GUI:setVisible(select_7, false)

	-- Create img_get_7
	local img_get_7 = GUI:Image_Create(item_bg_7, "img_get_7", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_7, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_7, false)
	GUI:setTag(img_get_7, 94)
	GUI:setVisible(img_get_7, false)

	-- Create item_bg_8
	local item_bg_8 = GUI:Node_Create(nd_Item, "item_bg_8", -144.00, 84.00)
	GUI:setAnchorPoint(item_bg_8, 0.50, 0.50)
	GUI:setTag(item_bg_8, 64)

	-- Create item_8
	local item_8 = GUI:Node_Create(item_bg_8, "item_8", 0.00, 0.00)
	GUI:setAnchorPoint(item_8, 0.50, 0.50)
	GUI:setTag(item_8, 97)

	-- Create select_8
	local select_8 = GUI:Image_Create(item_bg_8, "select_8", 0.00, 2.00, "res/custom/XingYunZhuanPan/lianzhi_9.png")
	GUI:setAnchorPoint(select_8, 0.50, 0.50)
	GUI:setTouchEnabled(select_8, false)
	GUI:setTag(select_8, 65)
	GUI:setVisible(select_8, false)

	-- Create img_get_8
	local img_get_8 = GUI:Image_Create(item_bg_8, "img_get_8", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_8, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_8, false)
	GUI:setTag(img_get_8, 96)
	GUI:setVisible(img_get_8, false)

	-- Create item_bg_9
	local item_bg_9 = GUI:Node_Create(nd_Item, "item_bg_9", -57.00, 157.00)
	GUI:setAnchorPoint(item_bg_9, 0.50, 0.50)
	GUI:setTag(item_bg_9, 66)

	-- Create item_9
	local item_9 = GUI:Node_Create(item_bg_9, "item_9", 0.00, 0.00)
	GUI:setAnchorPoint(item_9, 0.50, 0.50)
	GUI:setTag(item_9, 99)

	-- Create select_9
	local select_9 = GUI:Image_Create(item_bg_9, "select_9", -3.00, 4.00, "res/custom/XingYunZhuanPan/lianzhi_8.png")
	GUI:setAnchorPoint(select_9, 0.50, 0.50)
	GUI:setTouchEnabled(select_9, false)
	GUI:setTag(select_9, 67)
	GUI:setVisible(select_9, false)

	-- Create img_get_9
	local img_get_9 = GUI:Image_Create(item_bg_9, "img_get_9", 0.00, 0.00, "res/custom/common/tx_4.png")
	GUI:setAnchorPoint(img_get_9, 0.50, 0.50)
	GUI:setTouchEnabled(img_get_9, false)
	GUI:setTag(img_get_9, 98)
	GUI:setVisible(img_get_9, false)

	-- Create nd_anim
	local nd_anim = GUI:Node_Create(img_bg, "nd_anim", 289.00, 224.00)
	GUI:setAnchorPoint(nd_anim, 0.50, 0.50)
	GUI:setTag(nd_anim, 70)
end
return ui

meinvwudi

后端消息接收,发送

[@Message_10000]
#CALL [\游戏触发\抽奖转盘.txt] @抽奖转盘_QF

[@Message_10002]
#CALL [\游戏触发\抽奖转盘.txt] @抽奖给物品_QF

meinvwudi

发奖

[@抽奖转盘_QF]
{
#if 
#act 
movr N$抽奖物品 1 9 
sendmsg 6 -------------抽奖结果:<$STR(N$抽奖物品)>-------------
; SENDCUSTMSG 10001  {"gift_idx":"<$STR(N$抽奖物品)>"}
SENDCUSTMSG 10001  {"gift_idx":"<$STR(N$抽奖物品)>","test":123}


[@抽奖给物品_QF]
#if 
#act 
sendmsg 6 10002--<$CUSTMSGPARAM>
GetDBIdxItemFieldValue idx name S$奖品名字
; give <$STR(S$奖品名字)> 1
; sendmsg 5  -------------抽奖获得:<$STR(S$奖品名字)>-------------
; MOV S$奖品名字
}