Niesprawdzałem czy na tym forum jest już taki skrypt. Jeśli jest to prosze szanownego Admina o usunięcie tego tematu, a teraz to żeczy....
Skrypt zrobiłem sam i niejest to plagiat :)

Pewnie wielu was nieumie zrobić Annihilatora na swoim OTS, ale dzięki temu skryptowi będziecie mogli go zrobić.

W data/actions/actions.xml dodajemy wpis na samym dole w dziale "olther quest"

<action uniqueid="8000" script="anni.lua" />

nastepnie wchodzimy do folderu data/actions/scripts i dodajemy plik lua o nazwie anni ktory powinien zawierac taki wpis:

-- anni

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

if item.uid == 8000 and item.itemid == 1945 then
player1pos = {x=194, y=106, z=9, stackpos=253}
player1 = getThingfromPos(player1pos)

player2pos = {x=193, y=106, z=9, stackpos=253}
player2 = getThingfromPos(player2pos)

player3pos = {x=192, y=106, z=9, stackpos=253}
player3 = getThingfromPos(player3pos)

player4pos = {x=191, y=106, z=9, stackpos=253}
player4 = getThingfromPos(player4pos)


if player1.itemid > 0 and player2.itemid > 0 and player3.itemid > 0 and player4.itemid > 0 then
queststatus1 = getPlayerStorageValue(player1.uid,8000)
queststatus2 = getPlayerStorageValue(player2.uid,8000)
queststatus3 = getPlayerStorageValue(player3.uid,8000)
queststatus4 = getPlayerStorageValue(player4.uid,8000)

if queststatus1 == -1 and queststatus2 == -1 and queststatus3 == -1 and queststatus4 == -1 then
nplayer1pos = {x=194, y=106, z=10}
nplayer2pos = {x=193, y=106, z=10}
nplayer3pos = {x=192, y=106, z=10}
nplayer4pos = {x=191, y=106, z=10}

doSendMagicEffect(player1pos,2)
doSendMagicEffect(player2pos,2)
doSendMagicEffect(player3pos,2)
doSendMagicEffect(player4pos,2)

doTeleportThing(player1.uid,nplayer1pos)
doTeleportThing(player2.uid,nplayer2pos)
doTeleportThing(player3.uid,nplayer3pos)
doTeleportThing(player4.uid,nplayer4pos)

doSendMagicEffect(nplayer1pos,10)
doSendMagicEffect(nplayer2pos,10)
doSendMagicEffect(nplayer3pos,10)
doSendMagicEffect(nplayer4pos,10)

doTransformItem(item.uid,item.itemid+1)
else
doPlayerSendCancel(cid,"Somebody in your team has already done this quest.")
end
else
doPlayerSendCancel(cid,"You need four players for this quest.")
end

elseif item.uid ==8000 and item.itemid == 1946 then
if getPlayerAccess(cid) >= 0 then
doTransformItem(item.uid,item.itemid-1)
else
doPlayerSendCancel(cid,"Sorry, not possible.")
end
else
return 0
end

return 1
end

Później w MAP EDITOR musimy zrobić dźwignie taką jak na RL i takie płytki jak na RL. Klikamy prawym na dźwignie i w obu okienkach wpisujemy 8000
Pomieszczenie z Questem musi być oczywiście piętro niżej ponieważ dźwigna przenosi PIĘTRO niżej!

Quest na 100% działa jęsli się go poprawnie zrobi :) później dodam Skrypt na skrzynki

UWAGA! na Tibia.org.pl jest podobny temat lecz z AnniII i jest zgapiosy odemnie ponieważ na Otfans.pl miałem ten temat, a twórca tematu na tibia.org.pl niepodał linku do orginalnego tematu :/

było :) http://tibia11.pun.pl/viewtopic.php?id=316

Ale mój skrypt bliżej :P i wiele osób juz z niego skorzystało :D

Dzisiaj dodam skrzynki :D

w data/actions/actions.xml dodajemy w olther quest wpisy

<action uniqueid="9000" script="annichest.lua" />
<action uniqueid="9001" script="annichest.lua" />
<action uniqueid="9002" script="annichest.lua" />
<action uniqueid="9003" script="annichest.lua" />

wchodziy do folderu data/actions/scripts twozymy plik lua o nazwie annichest

wpisujemy tam:


-- annihilator chests

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

if item.uid == 9000 then
queststatus = getPlayerStorageValue(cid,5010)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found a Magic LongSword.")
doPlayerAddItem(cid,2310,1)
setPlayerStorageValue(cid,5010,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
elseif item.uid == 9001 then
queststatus = getPlayerStorageValue(cid,5010)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found a Great Axe.")
doPlayerAddItem(cid,2415,1)
setPlayerStorageValue(cid,5010,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
elseif item.uid == 9002 then
queststatus = getPlayerStorageValue(cid,5010)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found a Golden Boots.")
doPlayerAddItem(cid,2646,1)
setPlayerStorageValue(cid,5010,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
elseif item.uid == 9003 then
queststatus = getPlayerStorageValue(cid,5010)
if queststatus == -1 then
doPlayerSendTextMessage(cid,22,"You have found a Eleven Legs.")
doPlayerAddItem(cid,2507,1)
setPlayerStorageValue(cid,5010,1)
else
doPlayerSendTextMessage(cid,22,"It is empty.")
end
else
return 0
end

return 1
end



następnie robimy w map editor 4 skrzynki questowe klikamy na nie prawym i na link na samym dole i w drugie okienko (uniqueid) wpisujemy.

w pierwszą 9000
w drugą 9001
w trzecią 9002
w czwartą 9003


i Jest cool :D

Taki quest to mozna skopiować z byle jakiego otsa, który posiada Annihilator

DZIENKI SZUKALEM TEGO SKRYPTU :*

WITAM ZAPRASZAM NA MOJEGO OTS POD TIBIE 8.0 NIESTETY HAMACHI ALE NIEDLUGO BEZ !
-------------------------------------------------------------------------
NAZWA SIECI :Piterots
HASLO SIECI : piterots
IP :xxx
--------------------------------------------------------------------------
ACC: 111111/TIBIA
-------------------------------------------------------------------------
O OTSIE :

EXP : X9
SKILS : X80
MLVL : X 30
--------------------------------------------------------------------------

ZAPRASZAM SERDECZNIE 1 GRACZ OTRZYMUJE GM`A


JAKBY COS MOJE GG 5158878

@up nie w tym temacie

a jak umnie jest ,,Simple quests"to tam tez moge?? bo umnie nie ma ,,olther Quest"

OK Zrobiłem Tego Questa Ani wszystko ładnie chodzi ale Gdy biore z krzyni np magic long sworda to Pisze mi "You Have Magic Long Sword" czyli ze go wzielem, ale w BP i nigdzie w miejsach na EQ go nie ma... Wiec co z tym mam zrobic?

mi tez cos nie działa :/

A jak mam dodać demony? Bo w map edytorze wybieram demona i nie mogę go ustawić :cry:

a zrobiłes spawn ??? a anihilator działa bez zarzutu :D

Nie zrobiłem spawnu, bo jestem początkujący. Wielkie dzięki!

Mam problem, bo u mnie nie ma Other Quest. Jak już to Simple Quest. W tym mogę dopisać?

Nie moge znalesc tych kafelek jak na rl gdzie one sa??? POMOCY  dajcie + ja nowy xd

mysle ze 10/10 ale mi niepotszebny :)

____________________________

RonOTS Szkoda czasu na sen...
3 Servy !
Testoria - x100 - PvP
Werona - Stage Exp - PvP
Rawenna - x10 - NoNPvP
Messina - x10 - PvP

mysle ze 10/10 ale mi niepotszebny :)

____________________________

RonOTS Szkoda czasu na sen...
4 Servy !
Testoria - x100 - PvP
Werona - Stage Exp - PvP
Rawenna - x10 - NoNPvP
Messina - x10 - PvP

WWW.RONOTS.COM 

Gmi:

GM Ron Testoria
GM Ron Messina
GM Ron Rawenna
GM Ron Werona

Polecam.

szkoda że nie zauważyłeś że odkopujesz temat sprzed prawie 2 lat.

Dzieki za skrypta szukalem go i wkoncu znalazlem dziala na 100% polecam go innym jeszcze raz THX