Action Blue Legs Quest Scripts ;p

[GeKirAh]

blue legs quest

first of all

its like a quest to get four pieces of a broken amulet (Koshei The Deathless Quest/Spoiler - TibiaWiki - see more)

so i wanna these scripts when taking one piece you get a actionID (or storage, don't know much about lua ;p)

the broken amulet id's are:
8262
8263
8264
8265

8266 (this is the finished one - need an npc script that exchange these four pieces into this finished one (you need to pay 5000 gold)

then when using on a 'strange carving' (id: 3900 - but set actionID) when you click on this, the id 7520 switches with 7525 then if it possible to like on x: xxx y: xxx z: x that it says CLICK! in orange color ;p
or something like that, maybe on the sqm where 7520 and 7525 switches ^^

screenshot - just an example;
http://i40.tinypic.com/jj2oau.jpg


and then when reached to x: xxx y: xxx z: x sqm ( i want have 3x of these since it's 3 sqm you can step forward in^^ )then spawn the monster 'Koshei The Deathless'
and after he died, you have 10seconds to use the amulet on the body or he will spawn again until done it...

then after used the amulet on the body, you get a actionID / storage that does you can go through the quest door



thanks

edit:
i have done the 4 quest for the 4 pieces of the broken amulet:

report please

poba = piece of broken amulet

poba1.lua
PHP Code:

-- blue legs quest
-- by krille09
function onUse(cid, item, frompos, item2, topos)

if item.uid == 7511 then
queststatus = getPlayerStorageValue(cid,7611)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8262,1)
setPlayerStorageValue(cid,7611,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
else
return 0
end

return 1
end

poba2.lua
PHP Code:

-- blue legs quest
-- by krille09
function onUse(cid, item, frompos, item2, topos)

if item.uid == 7512 then
queststatus = getPlayerStorageValue(cid,7612)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8263,1)
setPlayerStorageValue(cid,7612,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
else
return 0
end

return 1
end

poba3.lua
PHP Code:

-- blue legs quest
-- by krille09
function onUse(cid, item, frompos, item2, topos)

if item.uid == 7513 then
queststatus = getPlayerStorageValue(cid,7613)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8264,1)
setPlayerStorageValue(cid,7613,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
else
return 0
end

return 1
end

poba4.lua
PHP Code:

-- blue legs quest
-- by krille09
function onUse(cid, item, frompos, item2, topos)


if item.uid ==7514 then
queststatus = getPlayerStorageValue(cid,7614)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8265,1)
setPlayerStorageValue(cid,7614,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
else
return 0
end

return 1
end

blue_legs_quest_npc.lua
PHP Code:

-- based on a sweaty cyclops.lua (no credits since he didn't leave any names)
-- edited by krille09

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)

-- OTServ event handling functions start
function onCreatureAppear(cid) npcHandlernCreatureAppear(cid) end
function onCreatureDisappear(cid) npcHandlernCreatureDisappear(cid) end
function onCreatureSay(cid, type, msg) npcHandlernCreatureSay(cid, type, msg) end
function onThink() npcHandlernThink() end
-- OTServ event handling functions end

function creatureSayCallback(cid, type, msg)
-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
if(npcHandler.focus ~= cid) then
return false
end

-- use the real conversation? (true/false)
real = false

if real == true then
tradeMsg = 'I can fix all the four pieces of the broken amulet into one!'
fourpobaMsg = 'Do you want me to fix all the four pieces of that broken amulet?'
hasNoMsg = 'You need all four piece of the broken amulet to get all, or I can't fix it!'
noMsg = 'I have no time, I\'m a busy man, LEAVE!'
else
tradeMsg = 'I can fix all the four pieces of the broken amulet into one!'
fourpobaMsg = 'Do you want me to fix all the four pieces of that broken amulet?'
hasNoMsg = 'You need all four piece of the broken amulet to get all, or I can\'t fix it!'
noMsg = 'I have no time, I\'m a busy man, LEAVE!'
end
if msgcontains(msg, 'trade') or msgcontains(msg, 'fix') then
selfSay(tradeMsg)
elseif msgcontains(msg, 'change') or msgcontains(msg, 'piece') or msgcontains(msg, 'four') then
selfSay(fourpobaMsg)
talk_state = 1
------------------------------------------------ confirm yes ------------------------------------------------
elseif msgcontains(msg, 'yes') and talk_state == 1 then
if getPlayerItemCount(cid,8262) >= 1 then
if getPlayerItemCount(cid,8263) >= 1 then
if getPlayerItemCount(cid,8264) >= 1 then
if getPlayerItemCount(cid,8265) >= 1 then
if doPlayerTakeItem(cid,8262,1) == 0 then
if doPlayerTakeItem(cid,8263,1) == 0 then
if doPlayerTakeItem(cid,8264,1) == 0 then
if doPlayerTakeItem(cid,8265,1) == 0 then
selfSay('Here you are.')
doPlayerAddItem(cid,8266,1)
end
else
selfSay(hasNoMsg)
end
talk_state = 0

------------------------------------------------ confirm no ------------------------------------------------
elseif msgcontains(msg, 'no') and (talk_state == 1) then
selfSay(noMsg)
talk_state = 0
end
-- Place all your code in here. Remember that hi, bye and all that stuff is already handled by the npcsystem, so you do not have to take care of that yourself.
return true
end

npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

To Find Amullet:

function onUse(cid, item, frompos, item2, topos)

if item.uid == 7511 then
queststatus1 = getPlayerStorageValue(cid,7611)
if queststatus1 == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8262,1)
setPlayerStorageValue(cid,7611,1)

else if item.uid == 7512 then
queststatus2 = getPlayerStorageValue(cid,7612)
if queststatus2 == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8263,1)
setPlayerStorageValue(cid,7612,1)

else if item.uid == 7513 then
queststatus3 = getPlayerStorageValue(cid,7613)
if queststatus3 == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8264,1)
setPlayerStorageValue(cid,7613,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end

else if item.uid ==7514 then
queststatus4 = getPlayerStorageValue(cid,7614)
if queststatus4 == -1 then
doPlayerSendTextMessage(cid,22,"You have found one piece of the broken amulet.")
doPlayerAddItem(cid,8265,1)
setPlayerStorageValue(cid,7614,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
else
return 0
end

return 1
end

Take him for other forum,
Him maked by Krille and Niprons Credits to him,
First time it was with "ONE REQUEST", and second time it was with all {doned by niprons last part}

Good Bye

Edited: Now all ok ;D

 

[Zoriath]

What do you want to achieve by this? Getting rep?

 

[Master-m]

U didnt used the code tags correct When people copy it now, they get bugss.

 

[GeKirAh]

Can you edit please? ;S dont have to much time, talking in msn with girlfriend =S


Edited:

Now all OK ;D

 

[Zoriath]

@up

wtf?

use CODE tags, not quotes -.- Please listen before spamming us all -.-

 

[freak15]

Fix the thread lol ?
oh my...

 

[Showarn]

Dont Forgett to add this in actions.xml

		<!-- Blue Legs Quest -->
    <action uniqueid="7511" script="blue legs/poba1.lua" />
    <action uniqueid="7512" script="blue legs/poba2.lua" />
    <action uniqueid="7513" script="blue legs/poba3.lua" />
    <action uniqueid="7514" script="blue legs/poba4.lua" />