[Real Tibia NPC] Storkus, Vampire Hunter

hermes · Maj 1, 2009

Witam,

na request "Snow'a" z OTLandu napisalem NPCka, i mysle ze tutaj tez sie moze komus przydac.

Nie bede sie rozpisywal i wyjasnial jak dziala ten NPC, dokladny opis dzialania znajduje sie na stronie

Nie masz wystarczających uprawnień, aby zobaczyć link. Zaloguj or Rejestracja

NPC zamienia vampire lord tokeny na kolejne rangi vampire huntera oraz doswiadczenie. Po zdobyciu ostatniego, gracz dostaje vampire doll

Dodaje tylko plik LUA, XML dodajcie sami (nie jest to specjalnie trudne ._.).

Kod:

local keywordHandler = KeywordHandler:new()
local npcHandler = NpcHandler:new(keywordHandler)
NpcSystem.parseParameters(npcHandler)
local talkState = {}
function onCreatureAppear(cid)				npcHandler:onCreatureAppear(cid)			end
function onCreatureDisappear(cid)			npcHandler:onCreatureDisappear(cid)			end
function onCreatureSay(cid, type, msg)			npcHandler:onCreatureSay(cid, type, msg)		end
function onThink()					npcHandler:onThink()					end
function creatureSayCallback(cid, type, msg)
	if(not npcHandler:isFocused(cid)) then
		return false
	end
	local tokenid = 9020
	local storage = 9020
	local getstorage = getPlayerStorageValue(cid, storage)
	local sorrymessage = "Sorry, you don't have enough tokens to progress in rank..."
	local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
	if msgcontains(msg, 'vampire lord token') then
		if getstorage == 6 then
			npcHandler:say("You are the highest vampire hunter rank now.", cid)
		elseif getstorage < 6 then
			npcHandler:say("Would ye' like to give me vampire tokens?", cid)
			talkState[talkUser] = 1
		end
	elseif msgcontains(msg, 'rank') then
		if getstorage < 1 then
			npcHandler:say("You don't have any rank yet.", cid)
		elseif getstorage == 1 then
			npcHandler:say("You are {fluke} rank now.", cid)
		elseif getstorage == 2 then
			npcHandler:say("You are {lucky} rank now.", cid)
		elseif getstorage == 3 then
			npcHandler:say("You are {determined} rank now.", cid)
		elseif getstorage == 4 then
			npcHandler:say("You are {painstaking} rank now.", cid)
		elseif getstorage == 5 then
			npcHandler:say("You are {obliterative} rank now.", cid)
		elseif getstorage == 6 then
			npcHandler:say("You are {razing} rank now.", cid)
		end
	elseif msgcontains(msg, 'yes') then
		if talkState[talkUser] == 1 then
			if getstorage < 0 then
				if doPlayerRemoveItem(cid, tokenid, 1) == TRUE then
					npcHandler:say("Ye' brought the token needed to advance to the first vampire hunter rank. I consider that a fluke, but still, congrats! Let me share some of my experience with ye'.", cid)
					setPlayerStorageValue(cid, storage, 1)
					doPlayerAddExp(cid, 1000)
					talkState[talkUser] = 0
				elseif doPlayerRemoveItem(cid, tokenid, 1) == FALSE then
					npcHandler:say(sorrymessage, cid)
					talkState[talkUser] = 0
				end
			elseif getstorage == 1 then
				if doPlayerRemoveItem(cid, tokenid, 4) == TRUE then
					npcHandler:say("Ye' brought the token needed to advance to the second vampire hunter rank. I consider that a fluke, but still, congrats! Let me share some of my experience with ye'.", cid)
					setPlayerStorageValue(cid, storage, 2)
					doPlayerAddExp(cid, 5000)
					talkState[talkUser] = 0
				elseif doPlayerRemoveItem(cid, tokenid, 4) == FALSE then
					npcHandler:say(sorrymessage, cid)
					talkState[talkUser] = 0
				end
			elseif getstorage == 2 then
				if doPlayerRemoveItem(cid, tokenid, 5) == TRUE then
					npcHandler:say("Ye' brought the token needed to advance to the third vampire hunter rank. I consider that a fluke, but still, congrats! Let me share some of my experience with ye'.", cid)
					setPlayerStorageValue(cid, storage, 3)
					doPlayerAddExp(cid, 10000)
					talkState[talkUser] = 0
				elseif doPlayerRemoveItem(cid, tokenid, 5) == FALSE then
					npcHandler:say(sorrymessage, cid)
					talkState[talkUser] = 0
				end
			elseif getstorage == 3 then
				if doPlayerRemoveItem(cid, tokenid, 10) == TRUE then
					npcHandler:say("Ye' brought the ten tokens needed to advance to the fourth vampire hunter rank. You're absolutely painstaking! Let me share some of my experience with ye'.", cid)
					setPlayerStorageValue(cid, storage, 4)
					doPlayerAddExp(cid, 20000)
					talkState[talkUser] = 0
				elseif doPlayerRemoveItem(cid, tokenid, 10) == FALSE then
					npcHandler:say(sorrymessage, cid)
					talkState[talkUser] = 0
				end
			elseif getstorage == 4 then
				if doPlayerRemoveItem(cid, tokenid, 30) == TRUE then
					npcHandler:say("Ye' brought the thirty tokens needed to advance to the fifth vampire hunter rank. You're completely obliterative, kid! Let me share some of my experience with ye'.", cid)
					setPlayerStorageValue(cid, storage, 5)
					doPlayerAddExp(cid, 50000)
					talkState[talkUser] = 0
				elseif doPlayerRemoveItem(cid, tokenid, 30) == FALSE then
					npcHandler:say(sorrymessage, cid)
					talkState[talkUser] = 0
				end
			elseif getstorage == 5 then
				if doPlayerRemoveItem(cid, tokenid, 50) == TRUE then
					npcHandler:say("Ye' brought the fifty tokens needed to advance to the last vampire hunter rank. Now that's something. You're razing-amazing! Let me share some of my experience and a little something with ye'!", cid)
					setPlayerStorageValue(cid, storage, 6)
					doPlayerAddExp(cid, 100000)
					doPlayerAddItem(cid, 9019, 1)
					talkState[talkUser] = 0
				elseif doPlayerRemoveItem(cid, tokenid, 50) == FALSE then
					npcHandler:say(sorrymessage, cid)
					talkState[talkUser] = 0
				end
			end
		end
	elseif(msgcontains(msg, 'no') and talkState[talkUser] == 1) then
		npcHandler:say("Sure, come back when ye'll have enough tokens.", cid)
		talkState[talkUser] = 0
	end
return TRUE
end
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new()

Pisalem go na The Forgotten Server 0.3.4 ale zadziala takze na starszych wersjach.

Skrypt nie jest "skrocony", wolalem unikac uzywanie petli i tabel dlatego, ze na tym przykladzie moga sie uczyc adepci LUA, oraz latwiej jest uniknac bledow spowodowanych niedopatrzeniem w kodzie. Dodam tez ze skrypt jest moj, i NIKT do tej pory go nie wydal.

Pozdrawiam,
Hermes

Jogi88 · Maj 1, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

Skrypt bardzo przydatny, 100% jak na rl tibi

Pogratulowa? koledze z otlandu

hermes · Maj 1, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

"Kolega" z OTLandu tylko poprosil o wykonanie :f, napisalem go moze w 40 minut

Xart Irok · Maj 2, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

hermas znasz sie na tym ja tez probowalem tekiego sobie zrobic npc ale cos mi nie szlo z nim wymieniac wymienial ale zle

Milywzg2 · Maj 2, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

Z tego co widz? to niez?y npc a pod jak? tibi? on jest??

Micki · Maj 2, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

Opisz ja?niej na czym npc polega i na jakim silniku testowa?e? i pod jaki protok?? tibi on by?...
10/10

PoZdro

hermes · Maj 10, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

@up

Hermes napisał:
Nie bede sie rozpisywal i wyjasnial jak dziala ten NPC, dokladny opis dzialania znajduje sie na stronie TibiaWiki | Vampire Hunter Quest

Wersje silnika dodalem.

kacpiziomxd · Maj 10, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

dzieki juz dodaje na ots

:up::up::up::up:
Pozdro

YeTi_2 · Maj 21, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

Mi co? nie dzia?a z tym expem

Astamor92 · Maj 23, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

Ja mam inny problem, mam silnik 8.42 tfs ale w items.xml nie ma czego? takiego jak vampire lord token..

YeTi_2 · Maj 24, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

9020 <- token
9019 <- laleczka

PatulecxD · Czerwiec 29, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

[29/06/2009 21:15:02] [Warning - NpcScript::NpcScript] Can not load script: data/npc/scripts/noob.lua
[29/06/2009 21:15:02] data/npc/scripts/noob.lua:114: ')' expected (to close '(' at line 113) near '<eof>'

Nie dzia?a mo?esz naprawi? mam tfs 0.1.3 co? takiego.

Dragonas1 · Sierpień 6, 2009

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

#Refresz

Mi te? nie dzia?a tak jak up.
Pomo?e kto??

witmar · Luty 20, 2010

Odp: [Real Tibia NPC] Storkus, Vampire Hunter

Kod:

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

Szukaj

Szukaj

[Real Tibia NPC] Storkus, Vampire Hunter

hermes

Advanced User

Jogi88

Misiek ; x

hermes

Advanced User

Xart Irok

Senior User

Milywzg2

User

Micki

Advanced User

hermes

Advanced User

kacpiziomxd

User

YeTi_2

Active User

Astamor92

Active User

YeTi_2

Active User

PatulecxD

Advanced User

Dragonas1

New User

witmar

Active User