Monster Arena (READ)

[exique]

I want this:

A npc that creates monsters.
Player: Hi
Npc: Hello |PLAYERNAME| {arena}.
Player: Arena
Npc: I can make Penguins, Demons, Flamingos, Ghazbarans, Orshabaals and Amazons.
Player: Penguin
Npc: How many penguins would you like me to create?
Player: 3
Npc: Are you sure?
Player: Yes

And he creates 3 penguins!
Reputation (Ofc) :thumbup:

 

[chojrak]

:untested:

local monsters = {"demon", "ghazbaran"}
local monster = {}
local count = {}

if (msg == "arena" and talkState[talkUser] < 1) then
	local msg = "I can summon "
	for i = 1, #monsters
		if (i == 1) then
			msg = msg .." ".. monsters[i]
		else
			msg = msg ..", ".. monsters[i]
		end
	end
	npcHandler:selfSay(msg, cid)
	talkState[talkUser] = 1
elseif (isInArray(monsters, msg) and talkState[talkUser] == 2) then
	monster[talkUser] = msg
	talkState[talkUser] = 3
elseif (msg and talkState[talkUser] == 3) then
	if (msg.type == 'number') then
		count[talkUser] = msg
		talkState[talkUser] = 4 
	else
		npcHandler:selfSay("Uuuu it's not a number!", cid)
		talkState[talkUser] = 0
	end
elseif (msg == "yes" and talkState[talkUser] == 4) then
	for i = 1, count[talkUser] do
		doSummonCreature(monster[talkUser], getCreaturePosition(cid))
	end
	count[talkUser] = 0
	monster[talkUser] = 0
	talkState[talkUser] = 0
end

 

[exique]

Error!

line 8 'do' expected near 'if'

 

[chojrak]

So add "do" ? -.-

 

[exique]

local monsters = {"demon", "ghazbaran"}
local monster = {}
local count = {}

if (msg == "arena" and talkState[talkUser] < 1) then
    local msg = "I can summon "
    for i = 1, #monsters
    do    if (i == 1) then
            msg = msg .." ".. monsters[i]
        else
            msg = msg ..", ".. monsters[i]
        end
    end
    npcHandler:selfSay(msg, cid)
    talkState[talkUser] = 1
elseif (isInArray(monsters, msg) and talkState[talkUser] == 2) then
    monster[talkUser] = msg
    talkState[talkUser] = 3
elseif (msg and talkState[talkUser] == 3) then
    if (msg.type == 'number') then
        count[talkUser] = msg
        talkState[talkUser] = 4 
    else
        npcHandler:selfSay("Uuuu it's not a number!", cid)
        talkState[talkUser] = 0
    end
elseif (msg == "yes" and talkState[talkUser] == 4) then
    for i = 1, count[talkUser] do
        doSummonCreature(monster[talkUser], getCreaturePosition(cid))
    end
    count[talkUser] = 0
    monster[talkUser] = 0
    talkState[talkUser] = 0
end

He doesn't talk to me! I can't say hi! So I added:

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

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

npcHandler:addModule(FocusModule:new())

And now he answers on "hi"..
But!
Nothing happens when you say arena :S

 

[chojrak]

Have you inserted inside onCreatureSay ?

 

[exique]

I'm a uber newbie on lua..

I did what I wrote in my other post

 

[GSMaster]

Fix:

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

local monsters = {"wolf", "rat"}
local monster = {}
local count = {}


function creatureSayCallback(cid, type, msg)
	if(not npcHandler:isFocused(cid)) then
		return false
	end
	local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid
if (msgcontains(msg, 'arena')) then
	local msgs = "I can summon "
	for i = 1, #monsters do
	local monsteryy = monsters[i]
		if (i == 1) then
			msgs = msgs .." ".. monsters[i]
		else
			msgs = msgs ..", ".. monsters[i]
		end
	end
	selfSay(msgs, cid)
	talkState[talkUser] = 1
elseif (isInArray(monsters, msg) and talkState[talkUser] == 1) then
	monster[talkUser] = msg
	talkState[talkUser] = 2
	selfSay("Enter number of monsters.", cid)
elseif (string.find(msg, "[1-9]") and talkState[talkUser] == 2) then
		count[talkUser] = msg
		talkState[talkUser] = 3 
selfSay("Want to try your hand?", cid)
elseif (msgcontains(msg, 'yes') and talkState[talkUser] == 3) then
	for i = 1, count[talkUser] do
		doSummonCreature(monster[talkUser], getCreaturePosition(cid))
	end
	count[talkUser] = 0
	monster[talkUser] = 0
	talkState[talkUser] = 0
end

	
	
	
	
	return true
end
	
npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback)
npcHandler:addModule(FocusModule:new())

 

[exique]

Thanks a lot! Reputation for you!

 

[Henkos]

Thanks a lot! Reputation for you!

But.. If someone say 1337 penguins.. Will 1337 penguins get spawned?

 

[chojrak]

Nope, it will print error "no space" or smth like dat. Use getClosestFreeTile

@GSMaster:
Don't do it! If someone is not able to split piece of code with NPC, he should not have OTServ

 

[freak15]

you should do so ppls cant do it more than 1 time /h cuz else thay will abuse it and ur ot will crash

 

[exique]

Check the script.. maximum 9! BUt I get a error..

luaDoCreateMonster(). Cannot create monster: penguin

It creates.. but after a while... THEN IT KEEPS SPAMMING AND THE SERVER LAGGS AS HELL (MEGA FREEZE!) And then I need to restart! Help!