Quests 7.8

Devmoxawx DArtesão

info

Grupo: Artesão

Registrado: 10/11/05

Posts: 100

Reputação: 0

07 de dezembro de 2006 às 02:02

~Quests 7.8 All Credts by Devmox-Awx~

È bem sim ple o tutorial mais vcs precisam prestar atenção para que ele seja elaborado.

1* Abra o Map editor 7.8, coloque um bau no local em que deseja criar a quest.

2* Sem Fechar o map editor, Va na pasta de seu OTS(Open Tibia Server) e vai em data/actions/scripts/chest.lua.

Vou po como está o meu.

function onUse(cid, item, frompos, item2, topos)
--- behe quest

if item.uid == 5010 then

   queststatus = getPlayerStorageValue(cid,5010)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Golden Armor.")

doPlayerAddItem(cid,2466,1)

setPlayerStorageValue(cid,5010,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5011 then

   queststatus = getPlayerStorageValue(cid,5011)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Demon Shield.")

doPlayerAddItem(cid,2520,1)

setPlayerStorageValue(cid,5011,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5012 then

   queststatus = getPlayerStorageValue(cid,5012)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Guardian Halberd.")

doPlayerAddItem(cid,2427,1)

setPlayerStorageValue(cid,5012,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5013 then

   queststatus = getPlayerStorageValue(cid,5013)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a platinum amulet.")

doPlayerAddItem(cid,2171,1)

setPlayerStorageValue(cid,5013,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

---DH Quest

elseif item.uid == 5049 then

   queststatus = getPlayerStorageValue(cid,5049)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Demon Helmet.")

doPlayerAddItem(cid,2493,1)

setPlayerStorageValue(cid,5049,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5050 then

   queststatus = getPlayerStorageValue(cid,5050)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Steel Boots.")

doPlayerAddItem(cid,2645,1)

setPlayerStorageValue(cid,5050,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5051 then

   queststatus = getPlayerStorageValue(cid,5051)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Golden Legs.")

doPlayerAddItem(cid,2470,1)

setPlayerStorageValue(cid,5051,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

---Karmia City Simples

elseif item.uid == 5014 then

   queststatus = getPlayerStorageValue(cid,5014)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Bright Sword.")

doPlayerAddItem(cid,2407,1)

setPlayerStorageValue(cid,5014,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5069 then

   queststatus = getPlayerStorageValue(cid,5069)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Brass Legs.")

doPlayerAddItem(cid,2478,1)

setPlayerStorageValue(cid,5069,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5019 then

   queststatus = getPlayerStorageValue(cid,5019)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Serpent Sword.")

doPlayerAddItem(cid,2409,1)

setPlayerStorageValue(cid,5019,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5021 then

   queststatus = getPlayerStorageValue(cid,5021)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Halberd.")

doPlayerAddItem(cid,2381,1)

setPlayerStorageValue(cid,5021,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5022 then

   queststatus = getPlayerStorageValue(cid,5022)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found an Amazon Shield.")

doPlayerAddItem(cid,2537,1)

setPlayerStorageValue(cid,5022,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5023 then

   queststatus = getPlayerStorageValue(cid,5023)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Broad Sword.")

doPlayerAddItem(cid,2413,1)

setPlayerStorageValue(cid,5023,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5025 then

   queststatus = getPlayerStorageValue(cid,5025)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Noble Armor.")

doPlayerAddItem(cid,2486,1)

setPlayerStorageValue(cid,5025,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5026 then

   queststatus = getPlayerStorageValue(cid,5026)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Tower Shield.")

doPlayerAddItem(cid,2528,1)

setPlayerStorageValue(cid,5026,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5029 then

   queststatus = getPlayerStorageValue(cid,5029)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Snakebite Rod.")

doPlayerAddItem(cid,2182,1)

setPlayerStorageValue(cid,5029,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5030 then

   queststatus = getPlayerStorageValue(cid,5030)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Wand of Vortex.")

doPlayerAddItem(cid,2190,1)

setPlayerStorageValue(cid,5030,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5031 then

   queststatus = getPlayerStorageValue(cid,5031)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a 200 Gps.")

doPlayerAddItem(cid,2152,2)

setPlayerStorageValue(cid,5031,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5067 then

   queststatus = getPlayerStorageValue(cid,5067)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Key.\nKey usada na bk quest!")

doPlayerAddItem(cid,2088,2)

setPlayerStorageValue(cid,5067,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5068 then

   queststatus = getPlayerStorageValue(cid,5068)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Plate armor.")

doPlayerAddItem(cid,2463,2)

setPlayerStorageValue(cid,5068,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

---Desert City

elseif item.uid == 5032 then

   queststatus = getPlayerStorageValue(cid,5032)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Blue Robe.")

doPlayerAddItem(cid,2656,2)

setPlayerStorageValue(cid,5032,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5033 then

   queststatus = getPlayerStorageValue(cid,5033)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Medusa Shield.")

doPlayerAddItem(cid,2536,2)

setPlayerStorageValue(cid,5033,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5034 then

   queststatus = getPlayerStorageValue(cid,5034)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Crystal Mace.")

doPlayerAddItem(cid,2445,1)

setPlayerStorageValue(cid,5034,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5035 then

   queststatus = getPlayerStorageValue(cid,5035)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Dragon Lance.")

doPlayerAddItem(cid,2414,1)

setPlayerStorageValue(cid,5035,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5036 then

   queststatus = getPlayerStorageValue(cid,5036)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Knight Legs.")

doPlayerAddItem(cid,2477,1)

setPlayerStorageValue(cid,5036,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5037 then

   queststatus = getPlayerStorageValue(cid,5037)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a 100 platinum coins.")

doPlayerAddItem(cid,2152,100)

setPlayerStorageValue(cid,5037,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5038 then

   queststatus = getPlayerStorageValue(cid,5038)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Rinf of Healing.")

doPlayerAddItem(cid,2214,1)

setPlayerStorageValue(cid,5038,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5039 then

   queststatus = getPlayerStorageValue(cid,5039)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2339,1)

setPlayerStorageValue(cid,5039,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5040 then

   queststatus = getPlayerStorageValue(cid,5040)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2337,1)

setPlayerStorageValue(cid,5040,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5041 then

   queststatus = getPlayerStorageValue(cid,5041)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2336,1)

setPlayerStorageValue(cid,5041,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5073 then

   queststatus = getPlayerStorageValue(cid,5073)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2340,1)

setPlayerStorageValue(cid,5073,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5074 then

   queststatus = getPlayerStorageValue(cid,5074)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2341,1)

setPlayerStorageValue(cid,5074,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5042 then

   queststatus = getPlayerStorageValue(cid,5042)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2335,1)

setPlayerStorageValue(cid,5042,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5043 then

   queststatus = getPlayerStorageValue(cid,5043)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Lady Armor.")

doPlayerAddItem(cid,2500,1)

setPlayerStorageValue(cid,5043,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5044 then

   queststatus = getPlayerStorageValue(cid,5044)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Lady Helmet.")

doPlayerAddItem(cid,2499,1)

setPlayerStorageValue(cid,5044,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

---Lost City

elseif item.uid == 5015 then

   queststatus = getPlayerStorageValue(cid,5015)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Knight Armor.")

doPlayerAddItem(cid,2476,1)

setPlayerStorageValue(cid,5015,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5016 then

   queststatus = getPlayerStorageValue(cid,5016)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Fire Sword.")

doPlayerAddItem(cid,2392,1)

setPlayerStorageValue(cid,5016,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5017 then

   queststatus = getPlayerStorageValue(cid,5017)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Beholder Shield.")

doPlayerAddItem(cid,2518,1)

setPlayerStorageValue(cid,5017,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5018 then

   queststatus = getPlayerStorageValue(cid,5018)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Warrior Helmet.")

doPlayerAddItem(cid,2475,1)

setPlayerStorageValue(cid,5018,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

--Premmy City

elseif item.uid == 5045 then

   queststatus = getPlayerStorageValue(cid,5045)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a knight Axe.")

doPlayerAddItem(cid,2430,1)

setPlayerStorageValue(cid,5045,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5046 then

   queststatus = getPlayerStorageValue(cid,5046)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Fire Axe.")

doPlayerAddItem(cid,2432,1)

setPlayerStorageValue(cid,5046,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5047 then

   queststatus = getPlayerStorageValue(cid,5047)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Vampire Shield.")

doPlayerAddItem(cid,2534,1)

setPlayerStorageValue(cid,5047,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5048 then

   queststatus = getPlayerStorageValue(cid,5048)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Obsidian Lance.")

doPlayerAddItem(cid,2425,1)

setPlayerStorageValue(cid,5048,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5058 then

   queststatus = getPlayerStorageValue(cid,5058)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Piece of Ancient Helmet.")

doPlayerAddItem(cid,2338,1)

setPlayerStorageValue(cid,5058,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5059 then

   queststatus = getPlayerStorageValue(cid,5059)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Black Shield.")

doPlayerAddItem(cid,2529,1)

setPlayerStorageValue(cid,5059,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5060 then

   queststatus = getPlayerStorageValue(cid,5060)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Winged Helmet.")

doPlayerAddItem(cid,2474,1)

setPlayerStorageValue(cid,5060,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5088 then

   queststatus = getPlayerStorageValue(cid,5088)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Thunder Hammer.")

doPlayerAddItem(cid,2421,1)

setPlayerStorageValue(cid,5088,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

---Tiquanda

elseif item.uid == 5052 then

   queststatus = getPlayerStorageValue(cid,5052)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Dwarven Axe.")

doPlayerAddItem(cid,2435,1)

setPlayerStorageValue(cid,5052,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5053 then

   queststatus = getPlayerStorageValue(cid,5053)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Boots of Haste.")

doPlayerAddItem(cid,2195,1)

setPlayerStorageValue(cid,5053,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5054 then

   queststatus = getPlayerStorageValue(cid,5054)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Royal Helmet.")

doPlayerAddItem(cid,2498,1)

setPlayerStorageValue(cid,5054,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5055 then

   queststatus = getPlayerStorageValue(cid,5055)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Barbarian Axe.")

doPlayerAddItem(cid,2429,1)

setPlayerStorageValue(cid,5055,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5056 then

   queststatus = getPlayerStorageValue(cid,5056)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Post Officers Hat.")

doPlayerAddItem(cid,2665,1)

setPlayerStorageValue(cid,5056,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5057 then

   queststatus = getPlayerStorageValue(cid,5057)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Shield of Honor.")

doPlayerAddItem(cid,2517,1)

setPlayerStorageValue(cid,5057,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5066 then

queststatus = getPlayerStorageValue(cid, 5066)

if queststatus == -1 then

   container = doPlayerAddItem(cid, 1991, 1)

   doContainerAddItem(container, 2187, 1)

   doContainerAddItem(container, 2160, 1)

   doPlayerSendTextMessage(cid, 22, "You have found a bag.")

   setPlayerStorageValue(cid,5066,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

---RookGuard

elseif item.uid == 5061 then

   queststatus = getPlayerStorageValue(cid,5061)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Spike Sword.")

doPlayerAddItem(cid,2383,1)

setPlayerStorageValue(cid,5061,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5062 then

   queststatus = getPlayerStorageValue(cid,5062)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Brass Shield.")

doPlayerAddItem(cid,2478,1)

setPlayerStorageValue(cid,5062,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

---Venore

elseif item.uid == 5076 then

   queststatus = getPlayerStorageValue(cid,5076)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Crown Armor.")

doPlayerAddItem(cid,2487,1)

setPlayerStorageValue(cid,5076,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5077 then

   queststatus = getPlayerStorageValue(cid,5077)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Crown Legs.")

doPlayerAddItem(cid,2488,1)

setPlayerStorageValue(cid,5077,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5063 then

   queststatus = getPlayerStorageValue(cid,5063)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Dragon Hammer.")

doPlayerAddItem(cid,2434,1)

setPlayerStorageValue(cid,5063,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5064 then

   queststatus = getPlayerStorageValue(cid,5064)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Blue Robe.")

doPlayerAddItem(cid,2656,1)

setPlayerStorageValue(cid,5064,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5065 then

   queststatus = getPlayerStorageValue(cid,5065)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Giant Sword.")

doPlayerAddItem(cid,2393,1)

setPlayerStorageValue(cid,5065,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5080 then

   queststatus = getPlayerStorageValue(cid,5080)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Doll. \nTroca esse item pela segunda addon.")

doPlayerAddItem(cid,2110,1)

setPlayerStorageValue(cid,5080,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

--- Folda

elseif item.uid == 5081 then

queststatus = getPlayerStorageValue(cid, 5081)

if queststatus == -1 then

   container = doPlayerAddItem(cid, 1987, 1)

   doContainerAddItem(container, 2148, 42)

   doContainerAddItem(container, 2580, 1)

   doPlayerSendTextMessage(cid, 22, "You have found a bag.")

   setPlayerStorageValue(cid,5081,1)

   else

doPlayerSendTextMessage(cid,22,"It is empty.")

   end

elseif item.uid == 5082 then

   queststatus = getPlayerStorageValue(cid,5082)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Book. \nTroca esse item pela primeira addon.")

doPlayerAddItem(cid,2217,1)

setPlayerStorageValue(cid,5082,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5083 then

   queststatus = getPlayerStorageValue(cid,5083)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Crusader helmet.")

doPlayerAddItem(cid,2497,1)

setPlayerStorageValue(cid,5083,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

--- Libera Bay

elseif item.uid == 5084 then

   queststatus = getPlayerStorageValue(cid,5084)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Dark Shield.")

doPlayerAddItem(cid,2521,1)

setPlayerStorageValue(cid,5084,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5086 then

   queststatus = getPlayerStorageValue(cid,5086)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Dragon Scale Armor.")

doPlayerAddItem(cid,2492,1)

setPlayerStorageValue(cid,5086,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5087 then

   queststatus = getPlayerStorageValue(cid,5087)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Tortoise Shield.")

doPlayerAddItem(cid,6131,1)

setPlayerStorageValue(cid,5087,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5087 then

   queststatus = getPlayerStorageValue(cid,5070)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Fire Sword.")

doPlayerAddItem(cid,2392,1)

setPlayerStorageValue(cid,5070,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

elseif item.uid == 5087 then

   queststatus = getPlayerStorageValue(cid,5071)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Knight Armor.")

doPlayerAddItem(cid,2476,1)

setPlayerStorageValue(cid,5071,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

end

return 1

   end

Isso que está em Vermelho é o script de uma das quests.Cada quest tem um desce.

3*Copie um desce e cole em baixo da uma das quests ficando assim:

elseif item.uid == 5087 then
queststatus = getPlayerStorageValue(cid,5071)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Knight Armor.")

doPlayerAddItem(cid,2476,1)

setPlayerStorageValue(cid,5071,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

   elseif item.uid == 5087 then

queststatus = getPlayerStorageValue(cid,5071)

   if queststatus == -1 then

doPlayerSendTextMessage(cid,22,"You have found a Knight Armor.")

doPlayerAddItem(cid,2476,1)

setPlayerStorageValue(cid,5071,1)

   else

doPlayerSendTextMessage(cid,23,"It is empty.")

   end

end

return 1

   end

AZUL: N Mude.

LARANJA:Unique ID da Quest o qual vc tem que colocar no bau que está no map editor.Para isso vc deve clicar com o boão direito em cima do baú e ir em propriedades no Unique ID vc Coloca o que está em Laranja(Não pode ser repetido EX: uma quest é 5071 e a outra tbm 5071)

OBS: Se for repetido ñ da certo e o uid tem que ser maior do que 5000.

ROXO:O Item da Quest No Exemplo é uma Knight Armor.

VERDE:ID do item que o player vai ganhar no caso é uma Knight Armor ID 2476.

Bom sua Quest está Pronta Have Fun.Qualquer Dúvda Poste!

Editado Dezembro 7 por Devmoxawx

Devmoxawx DArtesão

info

Grupo: Artesão

Registrado: 10/11/05

Posts: 100

Reputação: 0

07 de dezembro de 2006 às 02:15

Eu tbm queria uma ajudinha.

n sei mecher no forum direito

como eu faço pra colocar uma imagem ali?

<<<<<<<<<<<<

me ajuda ae

Jvchequer"Veni, vidi, vici."JLenda Lenda

info

Grupo: Lenda

Registrado: 10/10/05

Posts: 2.2k

Reputação: +63

Char no Tibia: Master Chequer

08 de junho de 2007 às 15:24

Movido para Actions.

Cya