Register for your free account! | Forgot your password?

You last visited: Today at 14:08

  • Please register to post and access all features, it's quick, easy and FREE!


Help !

Discussion on Help ! within the SRO Private Server forum part of the Silkroad Online category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: May 2017
Posts: 551
Received Thanks: 77
Help !

i need some one help me to make event happy working fine and change the reward of it because i try alot of time and i cant make it working


thanks



[GM]Dejo is offline  
Old 01/24/2019, 14:34   #2
 
elite*gold: 0
Join Date: Feb 2016
Posts: 998
Received Thanks: 251
never tried it before but i think its easy, all you have to do is changing the rewards codes from GameServer.exe with Ollydbg or dbgx32
that's for the rewards

and now lets say that it dosen't drop from mobs in your game, then u have to edit your server files script

hope that helps
i mentioned all i knew, nothing else can be said
good luck...


alydandy is offline  
Thanks
1 User
Old 01/24/2019, 18:54   #3

 
elite*gold: 80
Join Date: May 2015
Posts: 187
Received Thanks: 36
change reward from script i did it before
Mc-Diesel is offline  
Thanks
1 User
Old 01/25/2019, 03:40   #4
 
elite*gold: 0
Join Date: May 2017
Posts: 551
Received Thanks: 77
Quote:
Originally Posted by Mc-Diesel View Post
change reward from script i did it before
Can you share the files and lines for the happy event?


[GM]Dejo is offline  
Old 01/25/2019, 09:27   #5


 
elite*gold: 9795
Join Date: May 2013
Posts: 876
Received Thanks: 361
Quote:
Originally Posted by [GM]Dejo View Post
Can you share the files and lines for the happy event?
Quest Script Name is @SN_QEV_110221.lua
i Change Happy to Valtyr letter work fine 3 month ago i have this active
today i have full working Winter Event with exchange Snow flake by so-ok

Quote:
function QEV_CH_EVENT_KISAENG_100315()
EventID = 10168
SetEventOne(EventID, "SN_QEV_EVENT_KISAENG_100315", 1, 1, 4)
SetEventTwo(2, "SN_TALK_QEV_CH_EVENT_KISAENG_100315_B", "SN_TALK_COMMON_EXIT")
NPC_COUNT = 1
LuaInsertNpc(NPC_COUNT, "NPC_CH_EVENT_KISAENG1")
InsertPayItemCodeName(20, "ITEM_ETC_E051111_WHITECHOCO_PEPERO", "ITEM_ETC_E051111_ALMOND_PEPERO", "ITEM_ETC_E051111_GREENTEA_PEPERO", "ITEM_ETC_E051111_GINSENG_PEPERO", "ITEM_ETC_E051111_STRAWBERRY_PEPERO", "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_08", "ITEM_ETC_ARCHEMY_MAGICSTONE_INT_08", "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(4, "ITEM_ETC_E100603_LOVE_L", 2, "ITEM_ETC_E100603_LOVE_O", 2, "ITEM_ETC_E100603_LOVE_V", 2, "ITEM_ETC_E100603_LOVE_E", 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_KISAENG_100315_A", "EVENT_MENUSTRING_NOT_ACHIEVED", "SN_TALK_QEV_CH_EVENT_KISAENG_100315_E", "EVENT_MENUSTRING_INVENTORY_FULL", "SN_TALK_QEV_CH_EVENT_KISAENG_100315_D", "EVENT_MENUSTRING_ACHIEVED", "SN_TALK_QEV_CH_EVENT_KISAENG_100315_C")
CONVERSATION_SINGLE = 0
LuaInsertFunctionStringList(1, "CONVERSATION_SINGLE", "KISAENG_100315_Conversation")
end
function ItemCheck()
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_L", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_O", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_V", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_E", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) then
return 0
else
return 1
end
end
function ItemDel()
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_L", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_L", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_O", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_O", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_V", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_V", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_E", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_E100603_LOVE_E", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
end
function GiveEventRewardItem()
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 1 > LuaGetCountEmptyInventory(0, -1) then
return
else
nGive = LuaRanged_rand_f(1, 10000)
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)
ItemDel()
break
end
end
end
end
function KISAENG_100315_Conversation(EventID_Sub, CharName)
CONVERSATION_START = 0
CONVERSATION_RESPONSE = 2
EventID = 10168
EventID_Message = EventID_Sub
NpcHandlerNum = LuaNpcHandlerNum()
if CONVERSATION_START == EventID_Sub and CharName == "NPC_CH_EVENT_KISAENG1" then
CurPage = 5
SelectionList_CommonIndex = 0
Button = 2
LuaShowMenu(CurPage, EventID, SelectionList_CommonIndex, Button, NpcHandlerNum)
end
if CONVERSATION_RESPONSE == EventID_Sub 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 0 < LuaGetCountEmptyInventory(0, -1) 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
if MenuOffset == 1 then
LuaTerminateMenu()
end
elseif CONVERSATION_RESPONSE == EventID_Sub and LuaGetCurPage() == 1 then
LuaTerminateMenu()
end
end
function QEV_CH_EVENT_KISAENG_GLOBAL2011_2()
EventID = 10168
SetEventOne(EventID, "SN_QEV_EVENT_HAPPY", 1, 1, 6)
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_MALL_RETURN_SCROLL_HIGH_SPEED", "ITEM_MALL_HP_INC_1300_POTION", "ITEM_MALL_MP_INC_1300_POTION", "ITEM_MALL_HP_INC_1900_POTION", "ITEM_MALL_MP_INC_1900_POTION", "ITEM_ETC_ARCHEMY_REINFORCE_RECIPE_ARMOR_B", "ITEM_ETC_ARCHEMY_REINFORCE_RECIPE_SHIELD_B", "ITEM_ETC_ARCHEMY_REINFORCE_RECIPE_ACCESSARY_B ", "ITEM_ETC_ARCHEMY_REINFORCE_RECIPE_WEAPON_B", "ITEM_MALL_DAMAGE_INC_10P_SCROLL", "ITEM_MALL_DAMAGE_ABS_10P_SCROLL", "ITEM_ETC_ARCHEMY_MAGICSTONE_LUCK_08", "ITEM_ETC_150EXP_BASIC", "ITEM_MALL_REVERSE_RETURN_SCROLL", "ITEM_ETC_ARCHEMY_MAGICSTONE_STR_08", "ITEM_ETC_ARCHEMY_MAGICSTONE_INT_08", "ITEM_ETC_E080723_HWAN_POTION", "ITEM_ETC_E060526_SUMMON_PARTY_SCROLL_A", "ITEM_ETC_E060529_GOLDDRAGONFLAG_F", "ITEM_ETC_E060529_GOLDDRAGONFLAG_M")
InsertPayItemRatio(20, 10, 10, 10, 1, 1, 10, 10, 10, 10, 2, 1, 0.8, 0.7, 0.3, 0.5, 0.4, 0.3, 0.2, 0.1, 0.1)
LuaInsertDropItem(6, "ITEM_ETC_VALTYR_HAPPY_V", 1, "ITEM_ETC_VALTYR_HAPPY_A", 1, "ITEM_ETC_VALTYR_HAPPY_L", 1, "ITEM_ETC_VALTYR_HAPPY_T", 1, "ITEM_ETC_VALTYR_HAPPY_Y", 1, "ITEM_ETC_VALTYR_HAPPY_R", 1)
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
function ItemCheck()
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_V", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_A", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_L", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_T", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1)and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_Y", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1)and 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_R", INQUIRE_SAMEITEM_OP_COUNT_FIRST_ITEM, -1) then
return 0
else
return 1
end
end
function ItemDel()
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_V", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_V", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_A", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_A", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_L", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_L", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_T", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_T", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_Y", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_Y", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end
if 0 < LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_R", INQUIRE_SAMEITEM_OP_COUNT_ALL_SAMEITEM, 0) then
slot = LuaEventInQuireSameItem(0, "ITEM_ETC_VALTYR_HAPPY_R", INQUIRE_SAMEITEM_OP_FIND_FIRST_SLOT, 0)
LuaDelItem_EXT(0, slot, 1, SYSOP_REASON_Event, 0)
end

end
function GiveEventRewardItem()
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 1 > LuaGetCountEmptyInventory(0, -1) then
return
else
nGive = LuaRanged_rand_f(1, 10000)
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)
ItemDel()
break
end
end
end
end
Next time Use your Brain Please !! Happy event is xxx Times shared


NorseGodTyr is offline  
Reply



« what is these RegRegions ? | Required remove & reset scrolls please... »

Similar Threads
[HELP]HELP HELP HELP[HELP]
09/23/2013 - Facebook - 3 Replies
GUYS ^^ THIS IS A HELP THREAD NOT REQUEST THREAD BUT YOU CAN CONSIDER IT AS REQUEST THREAD DOES ANYONE OF YOU KNOW THE AUTO SUBMIT PHP CODE? THANKS!
[HELP][HELP][HELP][HELP]!!
09/11/2009 - Soldier Front - 3 Replies
Microsoft Visual C++ Run time error! :(:( **HELP ME PLEASE!!***
help help help help help help
06/28/2009 - Say Hello - 0 Replies
how i can dowmload Mangos 6385 ??????????????????????????????????? please give me the limk i can't see that i know it is in www.elitepvpers.com/.../153716-release-mangos-relea ses-blackscorpian-win32-2-4-3-a.html - but give me link sent it to my email plz



All times are GMT +2. The time now is 14:08.


Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

BTC: 3KeUpz52VCbhmLwuwydqxu6U1xsgbT8YT5
ETH: 0xc6ec801B7563A4376751F33b0573308aDa611E05

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2019 elitepvpers All Rights Reserved.