Como criar um script de quest

[Wolf Admin 250]

Eu uso esse aqui se servir para algo.. Funciona certinho e é a mesma coisa daquele

 

function onUse(cid, item, fromPosition, itemEx, toPosition)

 

a = 90004

id = 11639

id2 = 2160

level = 2

 

if getPlayerLevel(cid) < level then

doTeleportThing(cid, fromPosition, true)

doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_RED)

doPlayerSendCancel(cid,"Somente level " .. level .. " pode fazer a quest.")

end

if getPlayerStorageValue(cid, a) < 1 then

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Voce terminou a Box +2 Quest")

doPlayerAddItem(cid, id, 1)

doPlayerAddItem(cid, id2, 50)

doPlayerSetStorageValue(cid, a, 1)

else

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Esta vazio.")

end

if getPlayerLevel(cid) < level then

doTeleportThing(cid, fromPosition, true)

doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_RED)

doPlayerSendCancel(cid,"Somente level " .. level .. "+ pode fazer a quest.")

end

return TRUE

end