KroniqWaqaa

TEŞEKKÜRLER Bi bakalım

neymiş bu ? -- mesaja ek olarak -- teşekkürler güzel paylaşım

teşekkürler.

teşekkürler güzel paylaşım.

teşekkürler.

QUEST Tarafını incelediğim zaman hiç bir problem yok ama benim anlamadığım neden item şeklinde veriyo.

Merhaba; 21xx versionda skiller ile alakalı problemim var arkadaşlar. 60+ LwL den sonra Master açmada sorun yok görev alıp vermede sorun yok. Fakat 70-75 ve 80 Skillerini açtırmak istediğimde aşağıdaki resimdeki gibi "Skill" adında item veriyor. Skillerin görevle açılmasını istiyorum. Bunu nasıl görev ile otomatik açtırabiliriz. Problemimi nerede aramam gerekli -LUA? -TBL? -PROCEDURE? -SOURCE? Ayrıca "14201_Skaky.lua" da "GiveItem(UID, 900007000, 1)" Fonksiyonu yerine farklı bir fonksiyon olması gerekmiyor mu ? local Ret = 0; local NPC = 14201; if (EVENT == 190) then QuestNum = SearchQuest(UID, NPC); if (QuestNum == 0) then SelectMsg(UID, 2, -1, 3824, NPC, 3001, 193); elseif (QuestNum > 1 and QuestNum NpcMsg(UID, 3824, NPC) else EVENT = QuestNum end end if (EVENT == 193) then Ret = 1; end local savenum = 408; if (EVENT == 530) then Class = CheckClass (UID); if (Class == 5) then SaveEvent(UID, 4087); SelectMsg(UID, 2, savenum, 4081, NPC, 4080, 538); else Ret = 1; end end if (EVENT == 532) then -- 60 Level Job Change Level = CheckLevel(UID) if (Level > 59) then Class = CheckClass (UID); if (Class == 5 or Class == 7 or Class == 9 or Class == 11) then SelectMsg(UID, 4, savenum, 4084, NPC, 22, 533, 23, 534); else SaveEvent(UID, 4089); SelectMsg(UID, 2, savenum, 4083, NPC, 10, 193); end else SelectMsg(UID, 2, savenum, 4082, NPC, 10, 193); end end if (EVENT == 533) then SaveEvent(UID, 4088); end if (EVENT == 534) then SaveEvent(UID, 4091); end if (EVENT == 535) then SaveEvent(UID, 4090); SelectMsg(UID, 2, savenum, 4090, NPC, 4080, 193); end if (EVENT == 536) then ITEM_COUNTA = HowmuchItem(UID, 810095000); ITEM_COUNTB = HowmuchItem(UID, 810090000); ITEM_COUNTC = HowmuchItem(UID, 810094000); if (ITEM_COUNTA > 0 and ITEM_COUNTB > 0 and ITEM_COUNTC > 0) then SelectMsg(UID, 4, savenum, 4091, NPC, 4062, 537, 4063, 193); else if (ITEM_COUNTA SelectMsg(UID, 2, savenum, 4085, NPC, 18, 538); elseif (ITEM_COUNTB SelectMsg(UID, 2, savenum, 4085, NPC, 18, 539); elseif (ITEM_COUNTC SelectMsg(UID, 2, savenum, 4085, NPC, 18, 540); end end end if (EVENT == 538) then ShowMap(UID, 189); end if (EVENT == 539) then ShowMap(UID, 185); end if (EVENT == 540) then ShowMap(UID, 187); end if (EVENT == 537) then SaveEvent(UID, 4089); RobItem(UID, 810095000, 1) RobItem(UID, 810090000, 1) RobItem(UID, 810094000, 1) PromoteUser(UID) SelectMsg(UID, 2, savenum, 4093, NPC, 4064, 193); end if (EVENT == 220) then SelectMsg(UID, 2, 310, 3028, NPC, 3006, 221); end if (EVENT == 221) then ShowMap(UID, 304); SaveEvent(UID, 3142); end if (EVENT == 222) then SelectMsg(UID, 2, 310, 3028, NPC, 3006, 221); end if (EVENT == 223) then -- 61 Level Sream Scroll SelectMsg(UID, 2, 310, 3064, NPC, 3010, 224); end if (EVENT == 224) then SelectMsg(UID, 4, 310, 3065, NPC, 22, 225, 23, 193); end if (EVENT == 225) then SaveEvent(UID, 3143); end if (EVENT == 226) then SaveEvent(UID, 3145); SelectMsg(UID, 2, 310, 3070, NPC, 32, 193); end if (EVENT == 228) then ITEM_COUNT = HowmuchItem(UID, 900017000); if (ITEM_COUNT > 6) then SelectMsg(UID, 4, 310, 3071, NPC, 41, 230, 27, 193); else SelectMsg(UID, 2, 310, 3068, NPC, 18, 229); end end if (EVENT == 229) then ShowMap(UID, 726); end if (EVENT == 230) then RobItem(UID, 900017000, 7) GiveItem(UID, 379063000, 1) SaveEvent(UID, 3144); end if (EVENT == 300) then SelectMsg(UID, 2, 311, 3001, NPC, 28, 301); end if (EVENT == 301) then ShowMap(UID, 304); SaveEvent(UID, 3162); end if (EVENT == 302) then SelectMsg(UID, 2, 311, 3002, NPC, 28, 301); end if (EVENT == 303) then -- 69 Level Stamp of Strength SelectMsg(UID, 2, 311, 3072, NPC, 3002, 304); end if (EVENT == 304) then SelectMsg(UID, 4, 311, 3073, NPC, 22, 305, 23, 193); end if (EVENT == 305) then SaveEvent(UID, 3163); end if (EVENT == 306) then SaveEvent(UID, 3165); SelectMsg(UID, 2, 311, 3078, NPC, 21, 193); end if (EVENT == 308) then ITEM_COUNT1 = HowmuchItem(UID, 379042000); ITEM_COUNT2 = HowmuchItem(UID, 379040000); ITEM_COUNT3 = HowmuchItem(UID, 379236000); if (ITEM_COUNT1 > 0 and ITEM_COUNT2 > 0 and ITEM_COUNT3 > 1) then SelectMsg(UID, 4, 311, 3079, NPC, 41, 310, 27, 193); else if (ITEM_COUNT1 SelectMsg(UID, 2, 311, 3076, NPC, 18, 309); elseif (ITEM_COUNT2 SelectMsg(UID, 2, 311, 3076, NPC, 18, 311); elseif (ITEM_COUNT3 SelectMsg(UID, 2, 311, 3076, NPC, 18, 312); end end end if (EVENT == 309) then ShowMap(UID, 319); end if (EVENT == 311) then ShowMap(UID, 28); end if (EVENT == 312) then ShowMap(UID, 18); end if (EVENT == 310) then RobItem(UID, 379042000, 1) RobItem(UID, 379040000, 1) RobItem(UID, 379236000, 2) GiveItem(UID, 379243000, 1) SaveEvent(UID, 3164); end if (EVENT == 400) then SelectMsg(UID, 2, 312, 3001, NPC, 28, 401); end if (EVENT == 401) then ShowMap(UID, 304); SaveEvent(UID, 3182); end if (EVENT == 402) then SelectMsg(UID, 2, 312, 3002, NPC, 28, 401); end if (EVENT == 403) then -- 69 Level Nostrum of Constitution SelectMsg(UID, 2, 312, 3080, NPC, 3000, 404); end if (EVENT == 404) then SelectMsg(UID, 4, 312, 3081, NPC, 22, 405, 23, 407); end if (EVENT == 405) then SaveEvent(UID, 3183); end if (EVENT == 406) then SaveEvent(UID, 3185); SelectMsg(UID, 2, 312, 3086, NPC, 21, 193); end if (EVENT == 407) then SaveEvent(UID, 3186); end if (EVENT == 408) then ITEM_COUNT1 = HowmuchItem(UID, 320410011); ITEM_COUNT2 = HowmuchItem(UID, 320410012); ITEM_COUNT3 = HowmuchItem(UID, 379067000); if (ITEM_COUNT1 > 0 and ITEM_COUNT2 > 0 and ITEM_COUNT3 > 0) then SelectMsg(UID, 4, 312, 3087, NPC, 41, 410, 27, 193); else if (ITEM_COUNT1 SelectMsg(UID, 2, 312, 3084, NPC, 18, 409); elseif (ITEM_COUNT2 SelectMsg(UID, 2, 312, 3084, NPC, 18, 411); elseif (ITEM_COUNT3 SelectMsg(UID, 2, 312, 3084, NPC, 18, 412); end end end if (EVENT == 409) then ShowMap(UID, 309); end if (EVENT == 411) then ShowMap(UID, 310); end if (EVENT == 412) then ShowMap(UID, 30); end if (EVENT == 410) then RobItem(UID, 320410011, 1) RobItem(UID, 320410012, 1) RobItem(UID, 379067000, 1) GiveItem(UID, 379244000, 1) SaveEvent(UID, 3184); end if (EVENT == 620) then SelectMsg(UID, 2, 51, 3215, NPC, 3006, 621); end if (EVENT == 621) then ShowMap(UID, 304); SaveEvent(UID, 3402); end if (EVENT == 622) then SelectMsg(UID, 2, 51, 3214, NPC, 3006, 621); end if (EVENT == 623) then -- 70 Level Skill Class = CheckClass (UID); if (Class == 6 or Class == 8 or Class == 10 or Class == 12) then SelectMsg(UID, 2, 51, 3216, NPC, 10, 624); else SelectMsg(UID, 2, 51, 4710, NPC, 10, 193); end end if (EVENT == 624) then SelectMsg(UID, 4, 51, 3217, NPC, 22, 625, 23, 631); end if (EVENT == 625) then SaveEvent(UID, 3403); SelectMsg(UID, 2, 51, 3218, NPC, 10, 193); end if (EVENT == 631) then SelectMsg(UID, 2, 51, 3219, NPC, 10, 193); end if (EVENT == 626) then SaveEvent(UID, 3405); SelectMsg(UID, 2, 51, 3222, NPC, 32, 193); end if (EVENT == 628) then ITEM_COUNT1 = HowmuchItem(UID, 379243000); ITEM_COUNT2 = HowmuchItem(UID, 379244000); ITEM_COUNT3 = HowmuchItem(UID, 900000000); if (ITEM_COUNT1 > 0 and ITEM_COUNT2 > 0 and ITEM_COUNT3 > 6999999) then SelectMsg(UID, 4, 51, 3223, NPC, 41, 630, 27, 193); else if (ITEM_COUNT1 SelectMsg(UID, 2, 51, 3220, NPC, 18, 629); elseif (ITEM_COUNT3 SelectMsg(UID, 2, 51, 3220, NPC, 18, 632); end end end if (EVENT == 629) then ShowMap(UID, 304); end if (EVENT == 632) then ShowMap(UID, 336); end if (EVENT == 630) then RobItem(UID, 379243000, 1) RobItem(UID, 379244000, 1) GoldLose(UID, 7000000) GiveItem(UID, 900007000) SaveEvent(UID, 3404); end local savenum = 510; if (EVENT == 720) then SelectMsg(UID, 2, savenum, 5100, NPC, 3006, 721); end if (EVENT == 721) then ShowMap(UID, 304); SaveEvent(UID, 5101); end if (EVENT == 722) then SelectMsg(UID, 2, savenum, 5101, NPC, 3006, 721); end if (EVENT == 723) then -- 75 Level Skill Class = CheckClass (UID); if (Class == 6 or Class == 8 or Class == 10 or Class == 12) then SelectMsg(UID, 2, savenum, 5103, NPC, 10, 724); else SelectMsg(UID, 2, savenum, 5102, NPC, 10, 193); end end if (EVENT == 724) then SelectMsg(UID, 4, savenum, 5104, NPC, 22, 725, 23, 731); end if (EVENT == 725) then SaveEvent(UID, 5102); SelectMsg(UID, 2, savenum, 5105, NPC, 10, 193); end if (EVENT == 731) then SelectMsg(UID, 2, savenum, 5106, NPC, 10, 193); end if (EVENT == 726) then SaveEvent(UID, 5104); SelectMsg(UID, 2, savenum, 5109, NPC, 32, 193); end if (EVENT == 728) then ITEM_COUNT1 = HowmuchItem(UID, 379244000); ITEM_COUNT2 = HowmuchItem(UID, 379236000); ITEM_COUNT3 = HowmuchItem(UID, 900000000); if (ITEM_COUNT1 > 0 and ITEM_COUNT2 > 2 and ITEM_COUNT3 > 9999999) then SelectMsg(UID, 4, savenum, 5110, NPC, 41, 730, 27, 193); else if (ITEM_COUNT1 SelectMsg(UID, 2, savenum, 5107, NPC, 18, 727); elseif (ITEM_COUNT2 SelectMsg(UID, 2, savenum, 5107, NPC, 18, 729); elseif (ITEM_COUNT3 SelectMsg(UID, 2, savenum, 5107, NPC, 18, 732); end end end if (EVENT == 727) then ShowMap(UID, 304); end if (EVENT == 729) then ShowMap(UID, 18); end if (EVENT == 732) then ShowMap(UID, 336); end if (EVENT == 730) then RobItem(UID, 379244000, 1) RobItem(UID, 379236000, 3) GoldLose(UID, 10000000) GiveItem(UID, 900007000, 1) SaveEvent(UID, 5103); end local savenum = 511; if (EVENT == 820) then SelectMsg(UID, 2, savenum, 5111, NPC, 3006, 821); end if (EVENT == 821) then ShowMap(UID, 304); SaveEvent(UID, 5113); end if (EVENT == 822) then SelectMsg(UID, 2, savenum, 5112, NPC, 3006, 821); end if (EVENT == 823) then -- 80 Level Skill Class = CheckClass (UID); if (Class == 6 or Class == 8 or Class == 10 or Class == 12) then SelectMsg(UID, 2, savenum, 5114, NPC, 10, 824); else SelectMsg(UID, 2, savenum, 5113, NPC, 10, 193); end end if (EVENT == 824) then SelectMsg(UID, 4, savenum, 5115, NPC, 22, 825, 23, 831); end if (EVENT == 825) then SaveEvent(UID, 5114); SelectMsg(UID, 2, savenum, 5116, NPC, 10, 193); end if (EVENT == 831) then SelectMsg(UID, 2, savenum, 5117, NPC, 10, 193); end if (EVENT == 826) then SaveEvent(UID, 5116); SelectMsg(UID, 2, savenum, 5120, NPC, 32, 193); end if (EVENT == 828) then ITEM_COUNT1 = HowmuchItem(UID, 379243000); ITEM_COUNT2 = HowmuchItem(UID, 379236000); ITEM_COUNT3 = HowmuchItem(UID, 900000000); if (ITEM_COUNT1 > 0 and ITEM_COUNT2 > 2 and ITEM_COUNT3 > 9999999) then SelectMsg(UID, 4, savenum, 5121, NPC, 41, 830, 27, 193); else if (ITEM_COUNT1 SelectMsg(UID, 2, savenum, 5118, NPC, 18, 829); elseif (ITEM_COUNT2 SelectMsg(UID, 2, savenum, 5118, NPC, 18, 832); elseif (ITEM_COUNT3 SelectMsg(UID, 2, savenum, 5118, NPC, 18, 833); end end end if (EVENT == 829) then ShowMap(UID, 304); end if (EVENT == 832) then ShowMap(UID, 18); end if (EVENT == 833) then ShowMap(UID, 336); end if (EVENT == 830) then RobItem(UID, 379243000, 1) RobItem(UID, 379236000, 3) GoldLose(UID, 10000000) GiveItem(UID, 900007000, 1) SaveEvent(UID, 5115); end Şimdiden Teşekkür Ederim...

kardesm Source'den çok anlamadığım için şu diyip tarif edemiyecem malesef. TW verdim girdi hallediverdi çok sağolsun @ Mountain

teşekkür ederim

Sorunum @ Mountain tarafından çözülmüştür. Kendisine çok teşekkür ediyorum. Konuyu çözülen kısmına taşıyabilirsiniz.

Katılıyorum. işime yarar yorumları görebilmem için sayfa sayfa zaman kaybediyorum. Aslında güzel bir uygulama emek hırsızları için fakat Bence yorum yazma mecburiyeti yerine Forumda "giriş" yapıp "Teşekkür et" buttonu ile zorunluluk olsun benim tavsiyem.

@ Mountain Değerli yorumun için teşekkür ederim. Dediklerini yaptım m_sEventDataIndex = sQuestID; burayı açtım, fakat yine aynı monster kesince saymıyor. m_sEventDataIndex == 0 burayı 1 mi yapıcam ?

Arkadaşlar QUEST Monster görevlerinde görev alma ile bir sorun yok. Fakat sayma konusunda problemim var bu konuda bana yardımcı olabilecek varmı? QuestHandler.cpp de bulunan voidlerde bir problem varmı göremedim ? void CUser::SaveEvent(uint16 sQuestID, uint8 bQuestState) { m_questMap[sQuestID] = bQuestState; // Don't need to handle special/kill quests any further Packet result(WIZ_QUEST, uint8(2)); result Send(&result); _QUEST_MONSTER * pQuestMonster = g_pMain->m_QuestMonsterArray.GetData(sQuestID); if (bQuestState == 1 && pQuestMonster) if (pQuestMonster != nullptr && bQuestState == 1 && m_sEventDataIndex > 0) return; if (sQuestID >= QUEST_KILL_GROUP1) return; // Valid Finished Quest Count if (bQuestState == 2 ) AchieveMainCount(0, 0, sQuestID, 0); if (bQuestState == 2) { QuestV2MonsterDataDeleteAll(); QuestV2MonsterDataRequest(sQuestID); } if (bQuestState == 1 && pQuestMonster != nullptr) { // TODO: Decipher this into more meaningful code. int16 v11 = ((int16)((uint32)(6711 * sQuestID) >> 16) >> 10) - (sQuestID >> 15); int16 v12 = ((int16)((uint32)(5243 * (int16)(sQuestID - 10000 * v11)) >> 16) >> 3) - ((int16)(sQuestID - 10000 * v11) >> 15); SaveEvent(32005, (uint8)v11); SaveEvent(32006, (uint8)v12); SaveEvent(32007, sQuestID - 100 * v12); for(int i = 0; i { _QUEST_DATA * uQuest = GetQuestID(i); if (uQuest != nullptr) continue; uQuest->dQuestID = sQuestID; break; } //m_sEventDataIndex = sQuestID; QuestV2MonsterDataRequest(sQuestID); } } void CUser::QuestV2MonsterCountAdd(uint16 sNpcID) { if (m_sEventDataIndex == 0) return; // it looks like they use an active quest ID which is kind of dumb // we'd rather search through the player's active quests for applicable mob counts to increment // but then, this system can't really handle that (static counts). More research is necessary. uint16 sQuestNum = m_sEventDataIndex; // placeholder so that we can implement logic mockup _QUEST_MONSTER *pQuestMonster = g_pMain->m_QuestMonsterArray.GetData(sQuestNum); if (pQuestMonster == nullptr) return; // TODO: Implement obscure zone ID logic for (int Count = 0; Count { for (int i = 0; i { if (pQuestMonster->sNum[Count][i] != sNpcID) continue; if (m_bKillCounts[Count] + 1 > pQuestMonster->sCount[Count]) return; m_bKillCounts[Count]++; SaveEvent(QUEST_KILL_GROUP1 + Count, m_bKillCounts[Count]); Packet result(WIZ_QUEST, uint8(9)); result Send(&result); if (m_bKillCounts[Count] >= pQuestMonster->sCount[Count]) //Closing conditions { uint8 bQuestState = 3; SaveEvent(QUEST_KILL_GROUP1 + Count, bQuestState); //Fixed Number Quest_Moster_Couner_Map::iterator itr = m_quest_moster_map.find(sQuestNum); if(itr == m_quest_moster_map.end()) { m_quest_moster_map.insert(std::make_pair(sQuestNum,m_bKillCounts[Count])); } else { itr->second = m_bKillCounts[Count]; } } return; } } } uint8 CUser::QuestV2CheckMonsterCount(uint16 sQuestID) { if (sQuestID >= QUEST_KILL_GROUP1) { QuestMap::iterator itr = m_questMap.find(sQuestID); // If it doesn't exist, it doesn't exist. if (itr == m_questMap.end()) return 0; return itr->second; } else { Quest_Moster_Couner_Map::iterator itr = m_quest_moster_map.find(sQuestID); if(itr == m_quest_moster_map.end()) return 0; return itr->second; } } uint8 CUser::QuestV2CheckMonsterCount(uint16 sQuestID) { if (sQuestID >= QUEST_KILL_GROUP1) { QuestMap::iterator itr = m_questMap.find(sQuestID); // If it doesn't exist, it doesn't exist. if (itr == m_questMap.end()) return 0; return itr->second; } else { Quest_Moster_Couner_Map::iterator itr = m_quest_moster_map.find(sQuestID); if(itr == m_quest_moster_map.end()) return 0; return itr->second; } } uint8 CUser::CheckMonsterCount(uint8 bGroup) { _QUEST_MONSTER * pQuestMonster = g_pMain->m_QuestMonsterArray.GetData(m_sEventDataIndex); if (pQuestMonster == nullptr || bGroup == 0 || bGroup >= QUEST_MOB_GROUPS) return 0; return m_bKillCounts[bGroup]; }

teşekkürler.

yararlı bir paylaşım. paylaşım için teşekkür ederim.

bi bakalım

teşekkürler.

teşekkürler. güzel paylaşım

teşekkürler.

teşekkürler.

teşekkürler.

bi bakalım

teşekkürler.

deneyelim

bi bakalım