Mò 2 3 ngày rồi chưa ra bác nè, nhìn xem thì dễ thật nhưng xem kỹ clip thì quy định code nó rất phức tạp, ngay cái chổ bắt đầu, ngừng quy và tới cho quay trúng thưởng quay tiếp tục đc luôn, bác có fb hay sky k có thể giúp dev thêm đx k bác
.
cái công đoạn làm ảnh thì lâu thôi chứ code thì cũng dễ mà. tổng thời gian hôm qua mình làm là khoảng 2h từ khi đọc bài và bắt đầu làm thử cho đến khi thành công.
đây là code mình nhét vào túi tân thủ, ảnh cho hiện trên Dialog:Say và Opt bắt đầu, dừng quay. với số lần quay k giới hạn. bạn tham khảo
----------- hộp may mắn
function tbGift:hopmayman(
)local szMsg = "fb.com/Vn.Unique - jambovt05\n\n\n\n\n\n <pic=202>"
local tbOpt =
{
{"Mày đang giấu cái gì đó !", self.hopmayman2, self},
{"Thôi để lúc khác"}
}
Dialog:Say(szMsg, tbOpt);
end
function tbGift:hopmayman2()
local i = 0;
local nAdd = 0;
local nRand = 0;
local nIndex = 0;
nRand = MathRandom(1, 100);
local tbRate = {20,20,60};
local tbAward =
{
[1] = {"<pic=199>"};
[2] = {"<pic=200>"};
[3] = {"<pic=201>"};
}
if me.CountFreeBagCell() < 5 then
Dialog:Say("Phải Có 5 Ô Trống Trong Túi Hành Trang");
return 0;
end
for i = 1, 3 do
nAdd = nAdd + tbRate[i];
if nAdd >= nRand then
nIndex = i;
break;
end
end
local pItem = nIndex;
if pItem == 1 then
Dialog:Say("Bạn đã trúng phần quà:\n\n\n\n\n\n <pic=199>\n\n\n\n\n\nNhận được <color=cyan>5 Vạn đồng thường<color>");
me.AddJbCoin(50000) -- 5 vạn đồng thường
me.Msg("Nhận được <color=cyan>5 Vạn đồng thường<color>");
GlobalExcute({"Dialog:GlobalNewsMsg_GS","<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>5 Vạn đồng thường<color><color> khi chơi Hộp May Mắn"});
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT,"<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>5 Vạn đồng thường<color><color> khi chơi Hộp May Mắn");
KDialog.MsgToGlobal("<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>5 Vạn đồng thường<color><color> khi chơi Hộp May Mắn");
end
if pItem == 2 then
Dialog:Say("Bạn đã trúng phần quà:\n\n\n\n\n\n <pic=200>\n\n\n\n\n\nNhận được <color=cyan>1 Huyền Tinh trời ban (cấp 12)<color>");
me.AddItem(18,1,1,12) -- 1 HT 12 me.Msg("Nhận được <color=cyan>1 Huyền Tinh trời ban (cấp 12)<color>");
GlobalExcute({"Dialog:GlobalNewsMsg_GS","<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>1 Huyền Tinh trời ban (cấp 12)<color><color> khi chơi Hộp May Mắn"});
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT,"<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>1 Huyền Tinh trời ban (cấp 12)<color><color> khi chơi Hộp May Mắn");
KDialog.MsgToGlobal("<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>1 Huyền Tinh trời ban (cấp 12)<color><color> khi chơi Hộp May Mắn");
end
if pItem == 3 then
me.AddStackItem(18,10,11,2,nil,10) -- 10 xu
Dialog:Say("Bạn đã trúng phần quà:\n\n\n\n\n\n <pic=201>\n\n\n\n\n\nNhận được <color=cyan>10 Tiền Xu<color>");
me.Msg("Nhận được <color=cyan>10 Tiền Xu<color>");
GlobalExcute({"Dialog:GlobalNewsMsg_GS","<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>10 Tiền Xu<color><color> khi chơi Hộp May Mắn"});
KDialog.NewsMsg(1, Env.NEWSMSG_COUNT,"<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>10 Tiền Xu<color><color> khi chơi Hộp May Mắn");
KDialog.MsgToGlobal("<color=yellow><color=pink>"..me.szName.."<color> đã nhận được <color=pink>10 Tiền Xu<color><color> khi chơi Hộp May Mắn");
end
end-------
để quay tiếp tục được luôn thì sau khi nhận thưởng lại gọi cái hàm quay là được. ví dụ từ code của mình ở trên. thêm đoạn này vào sau đoạn trao thưởng
local tbOpt =
{
{"Chơi tiếp!", self.hopmayman, self},
}
và ở dòng Dialog:say thêm vào ,tbOpt ở cuối cùng. ví dụ
Dialog:Say("Bạn đã trúng phần quà:\n\n\n\n\n\n <pic=199>\n\n\n\n\n\nNhận được <color=cyan>5 Vạn đồng thường<color>",tbOpt);
thế thôi 8->