TalkAction Self Information[Simple script]

Darkhaos · Jan 15, 2009

This one is a script created by me (based on the script of the creators of the The Forgotten Server for the command "/info").. but this show more information =)! (Only works in TFS v0.3 beta 2)

Here is...

Code:

[COLOR="Blue"]function onSay(cid, words, param)

local [COLOR="DarkGreen"]sex[/COLOR] = ""
if getPlayerSex(cid) == 1 then
[COLOR="DarkGreen"]sex[/COLOR] = "[COLOR="DarkGreen"]Male[/COLOR]"
else
[COLOR="DarkGreen"]sex[/COLOR] = "[COLOR="DarkGreen"]Female[/COLOR]"
end

local config = {
	accessToUse = [COLOR="DarkGreen"]0[/COLOR],

	[COLOR="DarkGreen"]playerName[/COLOR] = getCreatureName(cid),
	[COLOR="DarkGreen"]playerAccount[/COLOR] = getPlayerAccount(cid),
	[COLOR="DarkGreen"]playerIp[/COLOR] = getPlayerIp(cid),
	[COLOR="DarkGreen"]playerAccess[/COLOR] = getPlayerAccess(cid),
	[COLOR="DarkGreen"]playerGuild[/COLOR] = getPlayerGuildName(cid),
	[COLOR="DarkGreen"]playerGuildRank[/COLOR] = getPlayerGuildRank(cid),
	[COLOR="DarkGreen"]playerFrags[/COLOR] = getPlayerRedSkullTicks(cid),
	[COLOR="DarkGreen"]playerHealth[/COLOR] = getCreatureHealth(cid),
	[COLOR="DarkGreen"]playerMaxHealth[/COLOR] = getCreatureMaxHealth(cid),
	[COLOR="DarkGreen"]playerMana[/COLOR] = getCreatureMana(cid),
	[COLOR="DarkGreen"]playerMaxMana[/COLOR] = getCreatureMaxMana(cid),
	[COLOR="DarkGreen"]playerBaseSpeed[/COLOR] = getCreatureBaseSpeed(cid),
	[COLOR="DarkGreen"]playerSpeed[/COLOR] = getCreatureSpeed(cid),
	[COLOR="DarkGreen"]playerMaster[/COLOR] = getCreatureMaster(cid),
	[COLOR="DarkGreen"]playerLevel[/COLOR] = getPlayerLevel(cid),
	[COLOR="DarkGreen"]playerExp[/COLOR] = getPlayerExperience(cid),
	[COLOR="DarkGreen"]playerMagLevel[/COLOR] = getPlayerMagLevel(cid),
	[COLOR="DarkGreen"]playerTown[/COLOR] = getTownName(getPlayerTown(cid)),
	[COLOR="DarkGreen"]playerNotations[/COLOR] = getNotationsCount(playerAccount),
	[COLOR="DarkGreen"]playerVocation[/COLOR] = getPlayerVocation(cid),
	[COLOR="DarkGreen"]playerVocationInfo[/COLOR] = getVocationInfo(playerVocation),
	[COLOR="DarkGreen"]playerMoney[/COLOR] = getPlayerMoney(cid),
	[COLOR="DarkGreen"]playerCrystal[/COLOR] = getPlayerItemCount(cid, 2160),
	[COLOR="DarkGreen"]playerPlatinum[/COLOR] = getPlayerItemCount(cid, 2152),
	[COLOR="DarkGreen"]playerGold[/COLOR] = getPlayerItemCount(cid, 2148),
	[COLOR="DarkGreen"]playerBalance[/COLOR] = getPlayerBalance(cid),
	[COLOR="DarkGreen"]playerGroup[/COLOR] = getPlayerGroupName(cid),
	[COLOR="DarkGreen"]playerPremDays[/COLOR] = getPlayerPremiumDays(cid)
}

if config.playerAccess [COLOR="DarkGreen"]>=[/COLOR] config.accessToUse then

doPlayerPopupFYI(cid, "Information about " .. config.playerName .. "\n\nInformation about account.\n\nGroup: " .. config.playerGroup .. "\nAccount: " .. config.playerAccount .. "\nIP: " .. doConvertIntegerToIp(config.playerIp) .. " (" .. config.playerIp .. ")\nAccess: " .. config.playerAccess .. "\nNotations: " .. config.playerNotations .. "\nPremium Days: " .. config.playerPremDays .. "\n\nInformation about character.\n\nName: " .. config.playerName .."\nLevel: " .. config.playerLevel .. "\nExperience: " .. config.playerExp .."\nMagic level: " .. config.playerMagLevel .. "\nVocation: " .. getVocationInfo(config.playerVocation).name .. "\nSex: " .. sex .. "\nBase speed: " .. config.playerBaseSpeed .. "\nSpeed: " .. config.playerSpeed .. "\nTown: " .. config.playerTown .. "\nUnjustified frags: " .. config.playerFrags .. "\nGuild: " .. config.playerGuild .. "\nGuild rank: " .. config.playerGuildRank .. "\nHealth: " .. config.playerHealth .. " - " .. config.playerMaxHealth .. "\nMana: " .. config.playerMana .. " - " .. config.playerMaxMana .. "\n\nSkills:\nFist: " .. getPlayerSkillLevel(cid,0) .. "\nClub: " .. getPlayerSkillLevel(cid,1) .. "\nSword: " .. getPlayerSkillLevel(cid,2) .. "\nAxe: " .. getPlayerSkillLevel(cid,3) .. "\nDistance: " .. getPlayerSkillLevel(cid,4) .. "\nShielding: " .. getPlayerSkillLevel(cid,5) .. "\nFishing: " .. getPlayerSkillLevel(cid,6) .. "\n\nMoney:\nGold: " .. config.playerGold .. "\nPlatinum: " .. config.playerPlatinum .. "\nCrystal: " .. config.playerCrystal .. "\nTotal money: " .. config.playerMoney .. "\nBank balance: " .. config.playerBalance .. " ") 

else

doPlayerSendTextMessage(cid,22,"[COLOR="DarkGreen"]You cannot execute this command[/COLOR].")
	
	end
end[/COLOR]

Here is this if you want use in others players (by Pitufo)

Code:

function onSay(cid, words, param)
if(param == "") then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
        return TRUE
    end

    local pid = getPlayerByNameWildcard(param)
    if(pid == 0 or (isPlayerGhost(pid) == TRUE and getPlayerAccess(pid) > getPlayerAccess(cid))) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.")
        return TRUE
    end
local sex = ""
if getPlayerSex(cid) == 1 then
sex = "Male"
else
sex = "Female"
end
local config = {
    accessToUse = 0,

    playerName = getCreatureName(pid),
    playerAccount = getPlayerAccount(pid),
    playerIp = getPlayerIp(pid),
    playerAccess = getPlayerAccess(pid),
    playerGuild = getPlayerGuildName(pid),
    playerGuildRank = getPlayerGuildRank(pid),
    playerFrags = getPlayerRedSkullTicks(pid),
    playerHealth = getCreatureHealth(pid),
    playerMaxHealth = getCreatureMaxHealth(pid),
    playerMana = getCreatureMana(pid),
    playerMaxMana = getCreatureMaxMana(pid),
    playerBaseSpeed = getCreatureBaseSpeed(pid),
    playerSpeed = getCreatureSpeed(pid),
    playerMaster = getCreatureMaster(pid),
    playerLevel = getPlayerLevel(pid),
    playerExp = getPlayerExperience(pid),
    playerMagLevel = getPlayerMagLevel(pid),
    playerTown = getTownName(getPlayerTown(pid)),
    playerNotations = getNotationsCount(playerAccount),
    playerVocation = getPlayerVocation(pid),
    playerVocationInfo = getVocationInfo(playerVocation),
    playerMoney = getPlayerMoney(pid),
    playerCrystal = getPlayerItemCount(pid, 2160),
    playerPlatinum = getPlayerItemCount(pid, 2152),
    playerGold = getPlayerItemCount(pid, 2148),
    playerBalance = getPlayerBalance(pid),
    playerGroup = getPlayerGroupName(pid),
    playerPremDays = getPlayerPremiumDays(pid)
}

if config.playerAccess >= config.accessToUse then

doPlayerPopupFYI(cid, "Information about " .. config.playerName .. "\n\nInformation about account.\n\nGroup: " .. config.playerGroup .. "\nAccount: " .. config.playerAccount .. "\nIP: " .. doConvertIntegerToIp(config.playerIp) .. " (" .. config.playerIp .. ")\nAccess: " .. config.playerAccess .. "\nNotations: " .. config.playerNotations .. "\nPremium Days: " .. config.playerPremDays .. "\n\nInformation about character.\n\nName: " .. config.playerName .."\nLevel: " .. config.playerLevel .. "\nExperience: " .. config.playerExp .."\nMagic level: " .. config.playerMagLevel .. "\nVocation: " .. getVocationInfo(config.playerVocation).name .. "\nSex: " .. sex .. "\nBase speed: " .. config.playerBaseSpeed .. "\nSpeed: " .. config.playerSpeed .. "\nTown: " .. config.playerTown .. "\nUnjustified frags: " .. config.playerFrags .. "\nGuild: " .. config.playerGuild .. "\nGuild rank: " .. config.playerGuildRank .. "\nHealth: " .. config.playerHealth .. " - " .. config.playerMaxHealth .. "\nMana: " .. config.playerMana .. " - " .. config.playerMaxMana .. "\n\nSkills:\nFist: " .. getPlayerSkillLevel(cid,0) .. "\nClub: " .. getPlayerSkillLevel(cid,1) .. "\nSword: " .. getPlayerSkillLevel(cid,2) .. "\nAxe: " .. getPlayerSkillLevel(cid,3) .. "\nDistance: " .. getPlayerSkillLevel(cid,4) .. "\nShielding: " .. getPlayerSkillLevel(cid,5) .. "\nFishing: " .. getPlayerSkillLevel(cid,6) .. "\n\nMoney:\nGold: " .. config.playerGold .. "\nPlatinum: " .. config.playerPlatinum .. "\nCrystal: " .. config.playerCrystal .. "\nTotal money: " .. config.playerMoney .. "\nBank balance: " .. config.playerBalance .. " ") 

else

doPlayerSendTextMessage(cid,22,"You cannot execute this command.")
    
    end

end

This can be used only to see your information, you can't see information about other players. If you want that the script works to see the information of other players as the command "/info", tell me.

Pitufo™ · Jan 15, 2009

Thanks, it will be good for GMs

Edit:

Updated script...

Now you can look for information of other player:

PHP:

function onSay(cid, words, param)
if(param == "") then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
		return TRUE
	end

	local pid = getPlayerByNameWildcard(param)
	if(pid == 0 or (isPlayerGhost(pid) == TRUE and getPlayerAccess(pid) > getPlayerAccess(cid))) then
		doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.")
		return TRUE
	end
local sex = ""
if getPlayerSex(cid) == 1 then
sex = "Male"
else
sex = "Female"
end
local config = {
	accessToUse = 0,

	playerName = getCreatureName(pid),
	playerAccount = getPlayerAccount(pid),
	playerIp = getPlayerIp(pid),
	playerAccess = getPlayerAccess(pid),
	playerGuild = getPlayerGuildName(pid),
	playerGuildRank = getPlayerGuildRank(pid),
	playerFrags = getPlayerRedSkullTicks(pid),
	playerHealth = getCreatureHealth(pid),
	playerMaxHealth = getCreatureMaxHealth(pid),
	playerMana = getCreatureMana(pid),
	playerMaxMana = getCreatureMaxMana(pid),
	playerBaseSpeed = getCreatureBaseSpeed(pid),
	playerSpeed = getCreatureSpeed(pid),
	playerMaster = getCreatureMaster(pid),
	playerLevel = getPlayerLevel(pid),
	playerExp = getPlayerExperience(pid),
	playerMagLevel = getPlayerMagLevel(pid),
	playerTown = getTownName(getPlayerTown(pid)),
	playerNotations = getNotationsCount(playerAccountId),
	playerVocation = getPlayerVocation(pid),
	playerVocationInfo = getVocationInfo(playerVocation),
	playerMoney = getPlayerMoney(pid),
	playerCrystal = getPlayerItemCount(pid, 2160),
	playerPlatinum = getPlayerItemCount(pid, 2152),
	playerGold = getPlayerItemCount(pid, 2148),
	playerBalance = getPlayerBalance(pid),
	playerGroup = getPlayerGroupName(pid),
	playerPremDays = getPlayerPremiumDays(pid)
}

if config.playerAccess >= config.accessToUse then

doPlayerPopupFYI(cid, "Information about " .. config.playerName .. "\n\nInformation about account.\n\nGroup: " .. config.playerGroup .. "\nAccount: " .. config.playerAccount .. "\nIP: " .. doConvertIntegerToIp(config.playerIp) .. " (" .. config.playerIp .. ")\nAccess: " .. config.playerAccess .. "\nNotations: " .. config.playerNotations .. "\nPremium Days: " .. config.playerPremDays .. "\n\nInformation about character.\n\nName: " .. config.playerName .."\nLevel: " .. config.playerLevel .. "\nExperience: " .. config.playerExp .."\nMagic level: " .. config.playerMagLevel .. "\nVocation: " .. getVocationInfo(config.playerVocation).name .. "\nSex: " .. sex .. "\nBase speed: " .. config.playerBaseSpeed .. "\nSpeed: " .. config.playerSpeed .. "\nTown: " .. config.playerTown .. "\nUnjustified frags: " .. config.playerFrags .. "\nGuild: " .. config.playerGuild .. "\nGuild rank: " .. config.playerGuildRank .. "\nHealth: " .. config.playerHealth .. " - " .. config.playerMaxHealth .. "\nMana: " .. config.playerMana .. " - " .. config.playerMaxMana .. "\n\nSkills:\nFist: " .. getPlayerSkillLevel(cid,0) .. "\nClub: " .. getPlayerSkillLevel(cid,1) .. "\nSword: " .. getPlayerSkillLevel(cid,2) .. "\nAxe: " .. getPlayerSkillLevel(cid,3) .. "\nDistance: " .. getPlayerSkillLevel(cid,4) .. "\nShielding: " .. getPlayerSkillLevel(cid,5) .. "\nFishing: " .. getPlayerSkillLevel(cid,6) .. "\n\nMoney:\nGold: " .. config.playerGold .. "\nPlatinum: " .. config.playerPlatinum .. "\nCrystal: " .. config.playerCrystal .. "\nTotal money: " .. config.playerMoney .. "\nBank balance: " .. config.playerBalance .. " ") 

else

doPlayerSendTextMessage(cid,22,"You cannot execute this command.")
	
	end

end

How to use:

/info NAME_OF_PLAYER

Credits:
darkhaos - For making the base script
Me? - Just a little

Albert José · Jan 15, 2009

Nice Work!!!
Please make this for tfs mystic spirit

Keraxel · Jan 15, 2009

Not bad

Change "-" in health and mana to "/".

Szakal · Jan 15, 2009

Amazing script gzzzzzz

mamon_2 · Jan 15, 2009

Great, thanks.

HeberPcL · Jan 16, 2009

Very Rox man!

Thx!

mamon_2 · Jan 16, 2009

The money that it shows, is all? Depot + Bank + In hand?

alissonlinneker · Jan 16, 2009

Very good!
....
My script?

link:

[talkaction][8.40+]totalstatsofplayer - XTibia - A sua comunidade de Tibia e OTserv

else{

[talkaction][8.40+]totalstatsofplayer - XTibia - A sua comunidade de Tibia e OTserv

Darkhaos · Jan 16, 2009

mamon_2 said:
The money that it shows, is all? Depot + Bank + In hand?

Only in hand

mamon_2 · Jan 19, 2009

When I use the command, it shows sword 13 and rest skills 10, just for me?

Pitufo™ · Jan 19, 2009

The first one[Made by darkhaos] only works for you but i updated that script so you can see the information of other players:

PHP:

function onSay(cid, words, param)
if(param == "") then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.")
        return TRUE
    end

    local pid = getPlayerByNameWildcard(param)
    if(pid == 0 or (isPlayerGhost(pid) == TRUE and getPlayerAccess(pid) > getPlayerAccess(cid))) then
        doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player " .. param .. " not found.")
        return TRUE
    end
local sex = ""
if getPlayerSex(cid) == 1 then
sex = "Male"
else
sex = "Female"
end
local config = {
    accessToUse = 0,

    playerName = getCreatureName(pid),
    playerAccount = getPlayerAccount(pid),
    playerIp = getPlayerIp(pid),
    playerAccess = getPlayerAccess(pid),
    playerGuild = getPlayerGuildName(pid),
    playerGuildRank = getPlayerGuildRank(pid),
    playerFrags = getPlayerRedSkullTicks(pid),
    playerHealth = getCreatureHealth(pid),
    playerMaxHealth = getCreatureMaxHealth(pid),
    playerMana = getCreatureMana(pid),
    playerMaxMana = getCreatureMaxMana(pid),
    playerBaseSpeed = getCreatureBaseSpeed(pid),
    playerSpeed = getCreatureSpeed(pid),
    playerMaster = getCreatureMaster(pid),
    playerLevel = getPlayerLevel(pid),
    playerExp = getPlayerExperience(pid),
    playerMagLevel = getPlayerMagLevel(pid),
    playerTown = getTownName(getPlayerTown(pid)),
    playerNotations = getNotationsCount(playerAccount),
    playerVocation = getPlayerVocation(pid),
    playerVocationInfo = getVocationInfo(playerVocation),
    playerMoney = getPlayerMoney(pid),
    playerCrystal = getPlayerItemCount(pid, 2160),
    playerPlatinum = getPlayerItemCount(pid, 2152),
    playerGold = getPlayerItemCount(pid, 2148),
    playerBalance = getPlayerBalance(pid),
    playerGroup = getPlayerGroupName(pid),
    playerPremDays = getPlayerPremiumDays(pid)
}

if config.playerAccess >= config.accessToUse then

doPlayerPopupFYI(cid, "Information about " .. config.playerName .. "\n\nInformation about account.\n\nGroup: " .. config.playerGroup .. "\nAccount: " .. config.playerAccount .. "\nIP: " .. doConvertIntegerToIp(config.playerIp) .. " (" .. config.playerIp .. ")\nAccess: " .. config.playerAccess .. "\nNotations: " .. config.playerNotations .. "\nPremium Days: " .. config.playerPremDays .. "\n\nInformation about character.\n\nName: " .. config.playerName .."\nLevel: " .. config.playerLevel .. "\nExperience: " .. config.playerExp .."\nMagic level: " .. config.playerMagLevel .. "\nVocation: " .. getVocationInfo(config.playerVocation).name .. "\nSex: " .. sex .. "\nBase speed: " .. config.playerBaseSpeed .. "\nSpeed: " .. config.playerSpeed .. "\nTown: " .. config.playerTown .. "\nUnjustified frags: " .. config.playerFrags .. "\nGuild: " .. config.playerGuild .. "\nGuild rank: " .. config.playerGuildRank .. "\nHealth: " .. config.playerHealth .. " - " .. config.playerMaxHealth .. "\nMana: " .. config.playerMana .. " - " .. config.playerMaxMana .. "\n\nSkills:\nFist: " .. getPlayerSkillLevel(cid,0) .. "\nClub: " .. getPlayerSkillLevel(cid,1) .. "\nSword: " .. getPlayerSkillLevel(cid,2) .. "\nAxe: " .. getPlayerSkillLevel(cid,3) .. "\nDistance: " .. getPlayerSkillLevel(cid,4) .. "\nShielding: " .. getPlayerSkillLevel(cid,5) .. "\nFishing: " .. getPlayerSkillLevel(cid,6) .. "\n\nMoney:\nGold: " .. config.playerGold .. "\nPlatinum: " .. config.playerPlatinum .. "\nCrystal: " .. config.playerCrystal .. "\nTotal money: " .. config.playerMoney .. "\nBank balance: " .. config.playerBalance .. " ") 

else

doPlayerSendTextMessage(cid,22,"You cannot execute this command.")
    
    end

end

Enjoy!

Azi · Jan 19, 2009

"config" veriable sux,because global uses it for a configuration, not save info, mayby "info" or "player" xd... else script isn't bad. ; )

TalkAction Self Information[Simple script]

Darkhaos

(:

Pitufo™

InfinityOT.com

Albert José

Rambocop Infernus

Keraxel

Ω Obfuscator Ω

Szakal

Frank Jaeger

mamon_2

Banned User

HeberPcL

[PowerOT.com.br]

mamon_2

Banned User

alissonlinneker

New Member

Darkhaos

(:

mamon_2

Banned User

Pitufo™

InfinityOT.com

Azi

Banned User