MoveEvent Teleport Online!

[Printer]

Hello,

Here is a script Requested By: Ghazer, you enter a teleport depending on how many players you have configure it with.

Pretty simple, but may come handy!

At Movements/movements.xml add this line:

<movevent type="StepIn" actionid="1337" event="script" value="onlinetp.lua"/>

Now at Movements/scripts create new lua and name it "onlinetp" and paste this code below:

local Cyko = {
	Pos = {x = 1000, y = 1000, z = 7}, --Where they get teleported
	Count = 30, --How many players have to be online, to enter the teleport
}

function onStepIn(cid, item, position, fromPos, fromPosition)
	local Online = getWorldCreatures()
        if isPlayer(cid) then
	if Online < Cyko.Count then
		doPlayerSendTextMessage(cid,27, "Sorry, but its only "..Online.." Players Online. Have to be "..Cyko.Count.."+ Players online, to enter this teleport.")
		doTeleportThing(cid, fromPosition, true)
		doSendMagicEffect(fromPos, CONST_ME_TELEPORT) 
		return true
	elseif Online >= Cyko.Count then
		doTeleportThing(cid, Cyko.Pos) 
		doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
		doSendMagicEffect(posistion, CONST_ME_TELEPORT) 
		end
        end
	return true
end

Enjoy!

 

[Nottinghster]

local Cyko = {
	Pos = {x = 1000, y = 1000, z = 7}, --Where they get teleported
	Count = 30, --How many players have to be online, to enter the teleport
}
 
function onStepIn(cid, item, position, fromPos, fromPosition)
	local Online = getWorldCreatures()
        if isPlayer(cid) then
	if Online < Cyko.Count then
		doPlayerSendTextMessage(cid,27, "Sorry, but its only "..Online.." Players Online. Have to be "..Cyko.Count.."+ Players online, to enter this teleport.")
		doTeleportThing(cid, fromPosition, true)
		doSendMagicEffect(fromPos, CONST_ME_TELEPORT) 
		return true
	elseif Online >= Cyko.Count then
		doTeleportThing(cid, Cyko.Pos) 
		doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
		doSendMagicEffect(position, CONST_ME_TELEPORT) 
		end
        end
	return true
end

Just modified that part:

elseif Online == Cyko.Count then
	doTeleportThing(cid, Cyko.Pos) 
	doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
	doSendMagicEffect(position, CONST_ME_TELEPORT) 
elseif Online > Cyko.Count then
	doTeleportThing(cid, Cyko.Pos)
	doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
	doSendMagicEffect(position, CONST_ME_TELEPORT)

 

[ond]

nevermind this post

 

[Printer]

local Cyko = {
	Pos = {x = 1000, y = 1000, z = 7}, --Where they get teleported
	Count = 30, --How many players have to be online, to enter the teleport
}
 
function onStepIn(cid, item, position, fromPos, fromPosition)
	local Online = getWorldCreatures()
        if isPlayer(cid) then
	if Online < Cyko.Count then
		doPlayerSendTextMessage(cid,27, "Sorry, but its only "..Online.." Players Online. Have to be "..Cyko.Count.."+ Players online, to enter this teleport.")
		doTeleportThing(cid, fromPosition, true)
		doSendMagicEffect(fromPos, CONST_ME_TELEPORT) 
		return true
	elseif Online >= Cyko.Count then
		doTeleportThing(cid, Cyko.Pos) 
		doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
		doSendMagicEffect(position, CONST_ME_TELEPORT) 
		end
        end
	return true
end

Just modified that part:

elseif Online == Cyko.Count then
	doTeleportThing(cid, Cyko.Pos) 
	doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
	doSendMagicEffect(position, CONST_ME_TELEPORT) 
elseif Online > Cyko.Count then
	doTeleportThing(cid, Cyko.Pos)
	doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
	doSendMagicEffect(position, CONST_ME_TELEPORT)

I never thougt about that, thanks for reminding me

 

[Nurn]

wow!

 

[Nottinghster]

I never thougt about that, thanks for reminding me

Don't worry bro ;]

 

[JoSePh15_]

Hello,

Here is a script Requested By: Ghazer, you enter a teleport depending on how many players you have configure it with.

Pretty simple, but may come handy!

At Movements/movements.xml add this line:

<movevent type="StepIn" actionid="1337" event="script" value="onlinetp.lua"/>

Now at Movements/scripts create new lua and name it "onlinetp" and paste this code below:

local Cyko = {
	Pos = {x = 1000, y = 1000, z = 7}, --Where they get teleported
	Count = 30, --How many players have to be online, to enter the teleport
}

function onStepIn(cid, item, position, fromPos, fromPosition)
	local Online = getWorldCreatures()
        if isPlayer(cid) then
	if Online < Cyko.Count then
		doPlayerSendTextMessage(cid,27, "Sorry, but its only "..Online.." Players Online. Have to be "..Cyko.Count.."+ Players online, to enter this teleport.")
		doTeleportThing(cid, fromPosition, true)
		doSendMagicEffect(fromPos, CONST_ME_TELEPORT) 
		return true
	elseif Online >= Cyko.Count then
		doTeleportThing(cid, Cyko.Pos) 
		doSendMagicEffect(Cyko.Pos, CONST_ME_TELEPORT) 
		doSendMagicEffect(position, CONST_ME_TELEPORT) 
		end
        end
	return true
end

Enjoy!

What's that position at the end ?? Did you actually test this out before releasing it ??

 

[Printer]

Yes it is, but posistion, its showing the effect when i enter the tp and effect on the dest.

 

[JoSePh15_]

My pleasure

 

[Ghazer]

haha

 

[Cykotitan]

thou hath chosen a path of cancer, my little apprentice

 

[Printer]

You shall remove the kebab then!

 

[Ratser]

Doesn't getWorldCreatures(type) returns ALL the creatures including NPCs and/or monsters or did I miss something?

 

[JoSePh15_]

Doesn't getWorldCreatures(type) returns ALL the creatures including NPCs and/or monsters or did I miss something?

Yes, you are right, Cyko should have used

getOnlinePlayers()

 

[Pheenix]

Doesn't getWorldCreatures(type) returns ALL the creatures including NPCs and/or monsters or did I miss something?

i second this