Halloween event

[Shevo Manser]

السلام عليكم و رحمة الله و بركاته

اليوم جايب معايا هالووين ايفينت ايفينت جميل جدا نخوش فى الموضوع

QEV_EVENT_HAPPY = function()
  EventID = 10168
  SetEventOne(EventID, "SN_QEV_EVENT_HAPPY", 1, 1, 9)
  SetEventTwo(2, "SN_TALK_QEV_CH_EVENT_HAPPY_B", "SN_TALK_COMMON_EXIT")
  NPC_COUNT = 1
  LuaInsertNpc(NPC_COUNT, "NPC_CH_EVENT_KISAENG1")
  InsertPayItemCodeName(20, "ITEM_EVENT_AVATAR_M_HALLOWEEN", "ITEM_EVENT_AVATAR_W_HALLOWEEN", "ITEM_EVENT_AVATAR_M_HALLOWEEN_HAT", "ITEM_EVENT_AVATAR_W_HALLOWEEN_HAT", "ITEM_EVENT_ARCHEMY_REINFORCE_RECIPE_SHIELD_B", "ITEM_ETC_ALL_POTION_05", "ITEM_ETC_ALL_SPOTION_01", "ITEM_EVENT_ARCHEMY_REINFORCE_RECIPE_ACCESSARY_B", "ITEM_EVENT_ARCHEMY_REINFORCE_RECIPE_WEAPON_B", "ITEM_ETC_E080723_SKILL_EXP_5", "ITEM_ETC_E080723_SKILL_EXP_10", "ITEM_ETC_E080723_SKILL_EXP_15", "ITEM_ETC_E080723_SKILL_EXP_20", "ITEM_EVENT_HP_INC_1900_POTION", "ITEM_EVENT_HP_INC_4100_POTION", "ITEM_ETC_ARCHEMY_MAGICSTONE_STR_10", "ITEM_ETC_ARCHEMY_MAGICSTONE_INT_10", "ITEM_ETC_E090930_HIT_SUPER_SCROLL", "ITEM_ETC_E090930_EVATION_SUPER_SCROLL", "ITEM_ETC_E060526_SUMMON_PARTY_SCROLL_A")
  InsertPayItemRatio(20, 10, 10, 15, 7, 5, 15, 15, 7, 3, 2, 1, 0.6, 0.5, 1.8, 1, 1, 1, 1, 1, 3)
   LuaInsertDropItem(9, "ITEM_ETC_E110125_HALLOWEEN_H", 2, "ITEM_ETC_E110125_HALLOWEEN_A", 2, "ITEM_ETC_E110125_HALLOWEEN_L", 2, "ITEM_ETC_E110125_HALLOWEEN_L_2", 2, "ITEM_ETC_E110125_HALLOWEEN_O", 2, "ITEM_ETC_E110125_HALLOWEEN_W", 2, "ITEM_ETC_E110125_HALLOWEEN_E", 2, "ITEM_ETC_E110125_HALLOWEEN_E_2", 2, "ITEM_ETC_E110125_HALLOWEEN_N", 2)
   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_HAPPY_A", "EVENT_MENUSTRING_NOT_ACHIEVED", "SN_TALK_QEV_CH_EVENT_HAPPY_E", "EVENT_MENUSTRING_INVENTORY_FULL", "SN_TALK_QEV_CH_EVENT_HAPPY_D", "EVENT_MENUSTRING_ACHIEVED", "SN_TALK_QEV_CH_EVENT_HAPPY_C")
  CONVERSATION_SINGLE = 0
  LuaInsertFunctionStringList(1, "CONVERSATION_SINGLE", "KISAENG_100315_Conversation")
end

ItemCheck = function()
 if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_H", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_A", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_L", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_L_2", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_O", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_W", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_E", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_E_2", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_N", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) then
    return 0
  else
    return 1
  end
end


ItemDel = function()
  if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_H", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_H", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
  if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_A", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_A", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
   if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_L", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_L", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
   if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_L_2", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_L_2", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
  if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_O", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_O", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
  if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_W", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_W", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
  if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_E", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_E", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
  if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_E_2", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_E_2", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
	if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_N", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
    slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E110125_HALLOWEEN_N", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
    LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
  end
end

GiveEventRewardItem = function()
  bGiveItemNum = 0
  btErrorCode = 0
  SYSOP_REASON_Event = 0
  EventID = 10168
  RewardItemMax = 20
  RewardItemCount = {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}
  RewardItemRatio = {0, 1000, 2000, 3470, 4170, 4670, 6140, 7610, 8310, 8610, 8810, 8910, 8970, 9020, 9200, 9300, 9400, 9500, 9600, 9700, 10000}
  if LuaGetCountEmptyInventory(0, -1) < 1 then
    return
  else
    nGive = LuaRanged_rand_f(1, 10000)
    for i = 1, RewardItemMax do
      if RewardItemRatio[i] < nGive and nGive <= RewardItemRatio[i + 1] then
        LuaAddItem_EXT(EventID, 0, RewardItemCount[i], SYSOP_REASON_Event, FALSE, FALSE, i)
        ItemDel()
    else
      end
    end
  end
end

KISAENG_100315_Conversation = function(l_11_0, l_11_1)
  CONVERSATION_START = 0
  CONVERSATION_RESPONSE = 2
  EventID = 10168
  EventID_Message = l_11_0
  NpcHandlerNum = LuaNpcHandlerNum()
  if CONVERSATION_START == l_11_0 and l_11_1 == "NPC_CH_EVENT_KISAENG1" then
    CurPage = 5
    SelectionList_CommonIndex = 0
    Button = 2
    LuaShowMenu(CurPage, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)
  end
  if CONVERSATION_RESPONSE == l_11_0 then
    if CurPage <= 3 and CurPage >= 1 then
      LuaTerminateMenu()
      return
    end
    MenuOffset = LuaGetEventMenuResponse()
    MenuOffset = MenuOffset - TALK_RESPONSE_LIST_BASE
    if MenuOffset == 0 then
      if ItemCheck() == 0 then
        if LuaGetCountEmptyInventory(0, -1) > 0 then
          CurPage = 3
          SelectionList_CommonIndex = 1
          Button = 1
          LuaSetCurPage(CurPage)
          LuaShowMenu(CurPage, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)
          GiveEventRewardItem()
          return
        else
          CurPage = 2
          SelectionList_CommonIndex = 1
          Button = 1
          LuaSetCurPage(CurPage)
          LuaShowMenu(CurPage, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)
          return
        end
      else
        CurPage = 1
        SelectionList_CommonIndex = 1
        Button = 1
        LuaSetCurPage(CurPage)
        LuaShowMenu(CurPage, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)
        return
      end
    end
  end
  if MenuOffset == 1 then
    LuaTerminateMenu()
  elseif CONVERSATION_RESPONSE == l_11_0 and LuaGetCurPage() == 1 then
    LuaTerminateMenu()
  end
end

itemdata_45000

1	42871	ITEM_ETC_E110125_HALLOWEEN_H	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_H	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_h.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42872	ITEM_ETC_E110125_HALLOWEEN_A	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_A	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_a.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42873	ITEM_ETC_E110125_HALLOWEEN_L	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_L	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_l.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42874	ITEM_ETC_E110125_HALLOWEEN_L_2	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_L	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_l.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42875	ITEM_ETC_E110125_HALLOWEEN_O	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_O	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_o.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42876	ITEM_ETC_E110125_HALLOWEEN_W	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_W	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_w.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42877	ITEM_ETC_E110125_HALLOWEEN_E	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_E	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_e.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42878	ITEM_ETC_E110125_HALLOWEEN_E_2	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_E	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_e.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0
1	42879	ITEM_ETC_E110125_HALLOWEEN_N	??? ??? A	xxx	SN_ITEM_ETC_E110125_HAPPY_N	SN_ITEM_ETC_E110125_HAPPY_A_TT_DESC	0	0	3	3	9	0	180000	3	0	1	1	1	0	0	1	0	0	0	0	1	0	0	0	1	1	-1	0	-1	0	-1	0	-1	0	-1	0	0	0	0	0	0	0	100	0	0	0	xxx	item\etc\drop_ch_eventbox.bsr	item\etc\event_news_n.ddj	xxx	xxx	50	2	0	0	1	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	0	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	-1	xxx	0	0