Chia sẻ Script GiftCode

**s2bac95** · 23-11-15, 07:12 PM

Thao tác ở client:

PHP Code:


            Clear_XSCRIPT();

                Set_XSCRIPT_Function_Name("GiftCode");

                Set_XSCRIPT_ScriptID(id scipt);

                Set_XSCRIPT_Parameter(0,xâu truyền về);

                Set_XSCRIPT_ParamCount(1);

            Send_XSCRIPT();

Script:

PHP Code:




x990127_g_scriptId = 990127



x990127_g_MaxBagSize = 60        

x990127_g_Key = {

                1234567891,

                }





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

-- ÊÂ¼þ½»»¥Èë¿Ú

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

function x990127_OnDefaultEvent( sceneId, selfId )

    if GetNumText() =100 then

        x990127_Check(sceneId, selfId, 0,0)

    end

end



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

--×°±¸¹¦ÄÜ

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

function x990127_BackToIndex( sceneId, selfId )

    x399999_OnDefaultEvent( sceneId, selfId, -1 )

end

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

--Íæ¼ÒÆÁÄ»ÖÐ¼äÌáÊ¾

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

function x990127_Tips( sceneId, selfId, str )

    BeginEvent( sceneId )

        AddText( sceneId, str )

    EndEvent( sceneId )

    DispatchMissionTips( sceneId, selfId )

end



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

--¶Ô»°´°¿ÚÐÅÏ¢ÌáÊ¾

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

function x990127_MsgBox( sceneId, selfId, msg )

    BeginEvent( sceneId )

        AddText( sceneId, msg )

    EndEvent( sceneId )

    DispatchEventList( sceneId, selfId, -1 )

end

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

--¹Ø±Õ¶Ô»°¿ò

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

function x990127_CloseMe(sceneId, selfId)

    BeginUICommand(sceneId)

    EndUICommand(sceneId)

    DispatchUICommand(sceneId,selfId, 1000)

end

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

--ËæÉí¹¦ÄÜ

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

function x990127_Check(sceneId,selfId,key,isNPC)

    if key==0 then

        key=GetNumText()    

    end

    if key==100 then

    local strGUID = LuaFnGetGUID( sceneId, selfId )

    local Is_Active = GetMissionData(sceneId, selfId, MD_ACTIVE_CODE)    

        BeginEvent(sceneId)





            AddText(sceneId, "  #GXin chào các hÕ! #r#WM¶i ch÷n nhæng chÑc nång h² trþ các hÕ c¥n.")        

            if (Is_Active <= 190000000) then

                AddNumText(sceneId, x990127_g_scriptId,"#b#GNh§p Gift Code (C¥n 4 Ô tr¯ng)", 4, 114)

            end            

            if isNPC==0 then

                AddNumText(sceneId, x990127_g_scriptId,"Quay lÕi", 8, 8888)

            else    

            end    

            

        EndEvent(sceneId)

        DispatchEventList(sceneId,selfId,-1)

            



    elseif key==114  then --doi gift code

        BeginUICommand( sceneId )

            UICommand_AddInt( sceneId, selfId )

        EndUICommand( sceneId )

        DispatchUICommand( sceneId, selfId, 12125185 )        

            

    end

end



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

--Gift Code

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

function x990127_GiftCode( sceneId, selfId, GiftCode)

    local    nam    = LuaFnGetName( sceneId, selfId )

    local Code=GiftCode;

    local Is_Active = GetMissionData(sceneId, selfId, MD_ACTIVE_CODE)

    --i=1;

    local FreeSpace1 = LuaFnGetMaterialBagSpace( sceneId, selfId )

    local FreeSpace2 = LuaFnGetPropertyBagSpace( sceneId, selfId )

    if( FreeSpace1 < 2 ) then

       x990127_NotifyFailTips( sceneId, selfId,"Khu nguyên li®u cüa bÕn không ðü ch² tr¯ng.");

       x990127_CloseMe(sceneId, selfId)

    elseif( FreeSpace2 < 7 ) then

       x990127_NotifyFailTips( sceneId, selfId,"Khu v§t ph¦m cüa bÕn không ðü ch² tr¯ng.");

    else

        if(Is_Active <= 190000000) then

            for i = 1,10 do

                if (Code == x990127_g_Key[i]) then

                    local BindBagIndex1 = TryRecieveItem( sceneId, selfId, 39999901, QUALITY_CREATE_DEFAULT ) -- Vat pham

                    SetMissionData(sceneId, selfId, MD_ACTIVE_CODE, 200000001 )

                    x990127_NotifyFailTips( sceneId, selfId,"Chúc m×ng "..nam.." nh§n thß·ng thành công v¾i Code "..Code.." .");            

                    return

                end

            end

            x990127_NotifyFailTips( sceneId, selfId,"BÕn ðã nh§p sai Code");



        else

            x990127_NotifyFailTips( sceneId, selfId,"BÕn ðã nh§n thß·ng r°i!");

        end    

   end        



end



function x990127_MsgBox( sceneId, selfId, msg )

    BeginEvent( sceneId )

        AddText( sceneId, msg )

    EndEvent( sceneId )

    DispatchEventList( sceneId, selfId, -1 )

end



function x990127_NotifyFailTips( sceneId, selfId, Tip )

    BeginEvent( sceneId )

        AddText( sceneId, Tip )

    EndEvent( sceneId )

    DispatchMissionTips( sceneId, selfId )

end



function x990127_Restore_hpmp( sceneId, selfId, targetId )

    RestoreHp( sceneId, selfId )

    RestoreMp( sceneId, selfId )

    RestoreRage( sceneId, selfId )

end

nhớ khai náo hàm mới để cho client hiểu nhé !

**Sói Đẹp Trai** · 23-11-15, 07:38 PM

Cái này mình đã làm và xong, gợi ý là cái code dùng MD check thì không ổn vì nhiều nhân vật có thể nhập cùng 1 loại code để kích hoạt. Không tin cứ thử. Giải pháp là dùng biến cao cấp hơn MD để lưu. Biến có tác dụng trên toàn sv

--- Chế độ gộp bài viết ---

Còn cái nữa là không truyền đc string về sv đâu nhé

**s2bac95** · 23-11-15, 08:22 PM

Gửi bởi Sói Đẹp Trai

Cái này mình đã làm và xong, gợi ý là cái code dùng MD check thì không ổn vì nhiều nhân vật có thể nhập cùng 1 loại code để kích hoạt. Không tin cứ thử. Giải pháp là dùng biến cao cấp hơn MD để lưu. Biến có tác dụng trên toàn sv

--- Chế độ gộp bài viết ---

Còn cái nữa là không truyền đc string về sv đâu nhé

đúng là xâu khi phải chuyển về tonumber. cám ơn sói

**thanhluan12a14** · 04-12-15, 07:27 PM

Gửi bởi s2bac95

Thao tác ở client:

PHP Code:


            Clear_XSCRIPT();

                Set_XSCRIPT_Function_Name("GiftCode");

                Set_XSCRIPT_ScriptID(id scipt);

                Set_XSCRIPT_Parameter(0,xâu truyền về);

                Set_XSCRIPT_ParamCount(1);

            Send_XSCRIPT();

Script:

PHP Code:




x990127_g_scriptId = 990127



x990127_g_MaxBagSize = 60        

x990127_g_Key = {

                1234567891,

                }





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

-- ÊÂ¼þ½»»¥Èë¿Ú

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

function x990127_OnDefaultEvent( sceneId, selfId )

    if GetNumText() =100 then

        x990127_Check(sceneId, selfId, 0,0)

    end

end



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

--×°±¸¹¦ÄÜ

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

function x990127_BackToIndex( sceneId, selfId )

    x399999_OnDefaultEvent( sceneId, selfId, -1 )

end

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

--Íæ¼ÒÆÁÄ»ÖÐ¼äÌáÊ¾

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

function x990127_Tips( sceneId, selfId, str )

    BeginEvent( sceneId )

        AddText( sceneId, str )

    EndEvent( sceneId )

    DispatchMissionTips( sceneId, selfId )

end



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

--¶Ô»°´°¿ÚÐÅÏ¢ÌáÊ¾

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

function x990127_MsgBox( sceneId, selfId, msg )

    BeginEvent( sceneId )

        AddText( sceneId, msg )

    EndEvent( sceneId )

    DispatchEventList( sceneId, selfId, -1 )

end

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

--¹Ø±Õ¶Ô»°¿ò

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

function x990127_CloseMe(sceneId, selfId)

    BeginUICommand(sceneId)

    EndUICommand(sceneId)

    DispatchUICommand(sceneId,selfId, 1000)

end

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

--ËæÉí¹¦ÄÜ

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

function x990127_Check(sceneId,selfId,key,isNPC)

    if key==0 then

        key=GetNumText()    

    end

    if key==100 then

    local strGUID = LuaFnGetGUID( sceneId, selfId )

    local Is_Active = GetMissionData(sceneId, selfId, MD_ACTIVE_CODE)    

        BeginEvent(sceneId)





            AddText(sceneId, "  #GXin chào các hÕ! #r#WM¶i ch÷n nhæng chÑc nång h² trþ các hÕ c¥n.")        

            if (Is_Active <= 190000000) then

                AddNumText(sceneId, x990127_g_scriptId,"#b#GNh§p Gift Code (C¥n 4 Ô tr¯ng)", 4, 114)

            end            

            if isNPC==0 then

                AddNumText(sceneId, x990127_g_scriptId,"Quay lÕi", 8, 8888)

            else    

            end    

            

        EndEvent(sceneId)

        DispatchEventList(sceneId,selfId,-1)

            



    elseif key==114  then --doi gift code

        BeginUICommand( sceneId )

            UICommand_AddInt( sceneId, selfId )

        EndUICommand( sceneId )

        DispatchUICommand( sceneId, selfId, 12125185 )        

            

    end

end



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

--Gift Code

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

function x990127_GiftCode( sceneId, selfId, GiftCode)

    local    nam    = LuaFnGetName( sceneId, selfId )

    local Code=GiftCode;

    local Is_Active = GetMissionData(sceneId, selfId, MD_ACTIVE_CODE)

    --i=1;

    local FreeSpace1 = LuaFnGetMaterialBagSpace( sceneId, selfId )

    local FreeSpace2 = LuaFnGetPropertyBagSpace( sceneId, selfId )

    if( FreeSpace1 < 2 ) then

       x990127_NotifyFailTips( sceneId, selfId,"Khu nguyên li®u cüa bÕn không ðü ch² tr¯ng.");

       x990127_CloseMe(sceneId, selfId)

    elseif( FreeSpace2 < 7 ) then

       x990127_NotifyFailTips( sceneId, selfId,"Khu v§t ph¦m cüa bÕn không ðü ch² tr¯ng.");

    else

        if(Is_Active <= 190000000) then

            for i = 1,10 do

                if (Code == x990127_g_Key[i]) then

                    local BindBagIndex1 = TryRecieveItem( sceneId, selfId, 39999901, QUALITY_CREATE_DEFAULT ) -- Vat pham

                    SetMissionData(sceneId, selfId, MD_ACTIVE_CODE, 200000001 )

                    x990127_NotifyFailTips( sceneId, selfId,"Chúc m×ng "..nam.." nh§n thß·ng thành công v¾i Code "..Code.." .");            

                    return

                end

            end

            x990127_NotifyFailTips( sceneId, selfId,"BÕn ðã nh§p sai Code");



        else

            x990127_NotifyFailTips( sceneId, selfId,"BÕn ðã nh§n thß·ng r°i!");

        end    

   end        



end



function x990127_MsgBox( sceneId, selfId, msg )

    BeginEvent( sceneId )

        AddText( sceneId, msg )

    EndEvent( sceneId )

    DispatchEventList( sceneId, selfId, -1 )

end



function x990127_NotifyFailTips( sceneId, selfId, Tip )

    BeginEvent( sceneId )

        AddText( sceneId, Tip )

    EndEvent( sceneId )

    DispatchMissionTips( sceneId, selfId )

end



function x990127_Restore_hpmp( sceneId, selfId, targetId )

    RestoreHp( sceneId, selfId )

    RestoreMp( sceneId, selfId )

    RestoreRage( sceneId, selfId )

end

nhớ khai náo hàm mới để cho client hiểu nhé !

Cám ơn bạn nhé!

Nhưng bỏ lâu quá rồi giờ không còn biết gì trơn trọi. Bạn có thể giúp mình về các bước được không? Hoặc cho mình xin đường dẫn các bài viết tương tự cũng được.
Cám ơn bạn nhiều!

**s2bac95** · 18-12-15, 11:04 PM

có gì cứ liên hệ tớ qua ib hoặc fb nhé.

https://www.facebook.com/profile.php?id=100009440310527

**Metalcore** · 19-09-18, 07:42 PM

[QUOTE=s2bac95;1049884]Thao tác ở client:

PHP Code:


            Clear_XSCRIPT();

                Set_XSCRIPT_Function_Name("GiftCode");

                Set_XSCRIPT_ScriptID(id scipt);

                Set_XSCRIPT_Parameter(0,xâu truyền về);

                Set_XSCRIPT_ParamCount(1);

            Send_XSCRIPT();

cái này chép ở đâu client vậy anh ơi

Chủ đề: Chia sẻ Script GiftCode

Công cụ Chủ đề

Chia sẻ Script GiftCode

The Following 2 Users Say Thank You to s2bac95 For This Useful Post:

Ðề: Chia sẻ Script GiftCode

Các thành viên gởi lời cảm ơn đến Sói Đẹp Trai vì bài viết này !

Ðề: Chia sẻ Script GiftCode

Ðề: Chia sẻ Script GiftCode

Ðề: Chia sẻ Script GiftCode

Ðề: Chia sẻ Script GiftCode

Các Chủ đề tương tự

[Gunny] Cần xin code giftcode và DB giftcode gunny 3.0

[KT] Xin script Giftcode nhập mã tại NPC hoạt động

[JX] Cần giúp đỡ học vài chiêu về add npc và viết script

Chia sẻ ý tưởng về JX Script

Quyền viết bài