[Request] Treasure Box Quest working script ..

hi there
i wonder if someone can give me a working script for Treasure box quest
i tried to make it and i didn't succeed
ill really appreciate your help if someone share it with me
thanks .

anybody can help ?

This is the' Jewelry Box' (QEV_CH_EVENT_KISAENG_110529) event quest script, is that what you searching for?


Regards

Quote:

Originally Posted by hexcode This is the' Jewelry Box' (QEV_CH_EVENT_KISAENG_110529) event quest script, is that what you searching for? PHP Code: function QEV_CH_EVENT_KISAENG_110529()   EventID = 10188   SetEventOne(EventID, "SN_QEV_CH_EVENT_KISAENG_110529", 1, 1, 1)   SetEventTwo(2, "SN_TALK_QEV_CH_EVENT_KISAENG_090714_B", "SN_TALK_COMMON_EXIT")   NPC_COUNT = 1   LuaInsertNpc(NPC_COUNT, "NPC_CH_EVENT_KISAENG1")   InsertPayItemCodeName(13, "ITEM_ETC_E051123_AGILITY_SCROLL", "ITEM_ETC_E051123_EVATION_SCROLL", "ITEM_ETC_E051123_HIT_SCROLL", "ITEM_ETC_E080723_SKILL_EXP_5", "ITEM_ETC_E080723_SKILL_EXP_10", "ITEM_ETC_BALLOON_MANGNYANG", "ITEM_ETC_BALLOON_MOVOI", "ITEM_ETC_E051123_HP500_SCROLL", "ITEM_ETC_E051123_MP500_SCROLL", "ITEM_ETC_E041225_CANDY_RED", "ITEM_ETC_E041225_CANDY_BLUE", "ITEM_EVENT_AVATAR_M_NASRUN", "ITEM_EVENT_AVATAR_W_NASRUN")   LuaInsertDropItem(1, "ITEM_ETC_E050618_TREASUREBOX", 1.5)   InsertMenuStringList("NPC_CH_EVENT_KISAENG1", 5, "EVENT_MENUSTRING_GREETING", "SN_NPC_CH_EVENT_KISAENG1_QS", "EVENT_MENUSTRING_REQUEST_ACCEPT_QUEST", "SN_TALK_QEV_CH_EVENT_KISAENG_090714_A", "EVENT_MENUSTRING_NOT_ACHIEVED", "SN_TALK_QEV_CH_EVENT_KISAENG_090714_E", "EVENT_MENUSTRING_INVENTORY_FULL", "SN_TALK_QEV_CH_EVENT_KISAENG_090714_D", "EVENT_MENUSTRING_ACHIEVED", "SN_TALK_QEV_CH_EVENT_KISAENG_090714_C")   CONVERSATION_SINGLE = 0   LuaInsertFunctionStringList(1, "CONVERSATION_SINGLE", "KISAENG_110529_Conversation") end function KISAENG_110529_ItemCheck()   if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E050618_TREASUREBOX", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) then     return 0   else     return 1   end end function KISAENG_110529_ItemDel()   if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E050618_TREASUREBOX", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then     slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E050618_TREASUREBOX", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)     LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)   end end function KISAENG_110529_GiveEventRewardItem()   bGiveItemNum = 0   btErrorCode = 0   SYSOP_REASON_Event = 0   EventID = 10188   Gender = 0   if LuaGetPlayerGender() == 0 then     Gender = 1   end   RewardItemMax = 11   RewardItemCount = {     1,     1,     1,     1,     1,     1,     1,     1,     1,     1,     1   }   RewardItemRatio = {     0,     1000,     2000,     3000,     3600,     3800,     4800,     5800,     6490,     6990,     8490,     9990   }   while KISAENG_110529_ItemCheck() == 0 do     if 1 > LuaGetCountEmptyInventory(0, -1) then       return     else       nGive = LuaRanged_rand_n(1, 10000)       if 9990 < nGive then         LuaAddItem_EXT(EventID, 0, RewardItemCount[i], SYSOP_REASON_Event, FALSE, FALSE, 12 + Gender)       else         for i = 1, RewardItemMax do           if nGive > RewardItemRatio[i] and nGive <= RewardItemRatio[i + 1] then             LuaAddItem_EXT(EventID, 0, RewardItemCount[i], SYSOP_REASON_Event, FALSE, FALSE, i)             KISAENG_110529_ItemDel()             break           end         end       end     end   end end function KISAENG_110529_Conversation(EventID_Sub, CharName)   CONVERSATION_START = 0   CONVERSATION_RESPONSE = 2   EventID = 10188   EventID_Message = EventID_Sub   NpcHandlerNum = LuaNpcHandlerNum()   if CONVERSATION_START == EventID_Sub and CharName == "NPC_CH_EVENT_KISAENG1" then     CurPage = 1     LuaSetCurPage(CurPage)     CurString = 5     SelectionList_CommonIndex = 0     Button = 2     LuaShowMenu(CurString, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)     return   end   if CONVERSATION_RESPONSE == EventID_Sub then     if LuaGetCurPage() == 1 then       MenuOffset = LuaGetEventMenuResponse()       MenuOffset = MenuOffset - TALK_RESPONSE_LIST_BASE       if MenuOffset == 0 then         if KISAENG_110529_ItemCheck() == 0 then           if 0 < LuaGetCountEmptyInventory(0, -1) then             CurPage = 2             SelectionList_CommonIndex = 1             Button = 1             LuaSetCurPage(CurPage)             CurString = 3             LuaShowMenu(CurString, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)             KISAENG_110529_GiveEventRewardItem()             return           else             CurPage = 2             SelectionList_CommonIndex = 1             Button = 1             LuaSetCurPage(CurPage)             CurString = 2             LuaShowMenu(CurString, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)             return           end         else           CurPage = 2           SelectionList_CommonIndex = 1           Button = 1           LuaSetCurPage(CurPage)           CurString = 1           LuaShowMenu(CurString, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)           return         end       elseif MenuOffset == 1 then         LuaTerminateMenu()         return       end     else       LuaTerminateMenu()       return     end   end end  Regards

man ur the best i rlly appreciate ur help :handsdown: thanks.

Glad your question is solved

#Closed