ADM WAR

Eu estava com este erro oque eu fis?
criei uma pasta com o nome Ot
ai eu coloquei meu otserv dentro desta pasta fui na pasta do otserv copiei a config.lua editei isso

worldType = "pvp"
 
por

worldType = "open"
 
coloquei na pasta de nome OT fui no xampp --> htdocs --> config --> config.ini coloquei o diretorio do meu otserv direcionando para a pasta ot
para nao dar dbug copia a pasta data e joga dentro da pasta ot
 
fmz ajudei ?

cara tive o mesmo erro vc já deve ter resolvido mais fic aqui a dica pra quem tiver o mesmo problema  é o sguinte
execute isso no terminal
 
sudo su
coloque sua senha.. e de enter
 
en seguida isntale 
  apt-get install lua50 liblua50 liblua50-dev   apos terminar execute essa sequencia ainda como ROOT!! caso contrario ele n instala!! pq  vai ter autorização!
 
wget http://www.lua.org/ftp/lua-5.1.4.tar.gz
tar -xzvf lua-5.1.4.tar.gz
cd lua*
make linux && make install
 
e depois só voltar ao seu usuario adm com su seu usuario
 
e refazer o tutorial para compilar !!!!

esse post e para aquelas pessoas que sofre com isso na hora de abrir a tfs em linux
./tfs: error while loading shared libraries: liblua5.1.so.0: cannot open shared object file: No such file or directory
 
so basta executar isso
 
apt-get install subversion autoconf build-essential pkg-config libboost-dev libgmp3-dev libxml2-dev liblua5.1-0-dev libmysqlclient-dev libcrypto++-dev ccache libboost-filesystem-dev libboost-regex-dev libboost-system-dev libboost-thread-dev screen libssl-dev

você quer uma task que o player possa fazer quantas vezes quiser?
somente isso
ae o npc ^^

dalila.xml
 

npc/scripts/NpcMulti.lua
Spoiler   


creaturescripts/scripts/TaskMulti.lua
Spoiler 

vai no creaturescripts/scripts/login.lua e coloca isso la tb.. registerCreatureEvent(cid, "TaskMulti")
creaturescripts/craturescripts.xml
<event type="death" name="TaskMulti" event="script" value="TaskMulti.lua"/>
dai vai no .xml do Multi e coloca isso la no final do .xml antes do </monster>
<script> <event name="TaskMulti"/> </script>

@ADM WAR, amo seus mapas! Você deveria disponibilizar mais conteúdos e você mesmo postar aqui, poxa. Eu apoio a causa, haha.

hehe meus mapas sempre sao bãos vou atualizar eli quando atulizar eu te passo para tu postar aqui hehe

vai abrir um portal tal hora ai vai ser levado para uma area depois o tp vai fechar e elis vao ser levador para arena ai la vai ter um boss que vai matar elis kk , o ultimo que ficar ganha
 

Olá pessoal, hoje vou ensinar como deixar as urls limpas (amigáveis) no Gesior.

Mas Luan, oque é URL?
URL vem de Uniform Resource Locator, em português Localizador-Padrão de Recursos, é o vulgo endereço de uma rede, seja internet, ou até mesmo uma intranet. Resumindo é o endereço que você coloca no seu browser.

exemplo: URL para entrar no TK: http://www.tibiaking.com/forum/

Como podem ver no exemplo, a estrutura de uma URL é basicamente esse:
protocolo://dominio-ou-ip/caminho
 
Mas Luan, para que vou querer limpar as urls do meu site?
Seguinte, existe um termo que se chama 'boas praticas', que a maioria (não todos)dos desenvolvedores web procuram seguir. A verdade é que a única coisa que altera é o visual, você vai ver as urls, e com elas limpas qualquer leigo consegue entender onde está em um site.

Mas Luan, oque é realmente uma URL limpa (amigável)?
Bom, vou usar o próprio site do tibia.com (que é o mesmo jeito do Gesior) como exemplo ... 

tibia.com/index.php?subtopic=latestnews
tibia.com/index.php?subtopic=archives
tibia.com/index.php?subtopic=rules

E etc ... o tibia.com ainda não fica tão feio, mas existem sites que ficam muito ruim mesmo.

E se colocássemos um arquivo simples no gesior que alterasse as urls escondendo uma parte delas ... 

Por exemplo, nos exemplos acima, temos algo em comum depois do domínio, que seria o index.php?subtopic=, e se escondêssemos essa parte? Não ficaria muito melhor?
tibia.com/latestnews
tibia.com/archives
tibia.com/rules

Apenas olhando no endereço da internet qualquer leigo entenderia onde está facilmente, e é isso que este arquivo faz. bem básico.

Luan, como eu instalo esse arquivo?
Usamos o arquivo .htaccess e determinado código nele.

Basta coloca esse arquivo no diretório do site (pasta www ou htdocs) com o código.

Para funcionar você terá um pequeno trabalho de alterar todos os 'caminhos' que existem no layout e nas pastas do ot, mas é simples, vá em cada arquivo e aperta Ctrl+F e procure por subtopic e muda o caminho, no caso se tiver o index.php?subtopic=, é só apagar tudo e deixar só que esta depois do =, se não tiver o index.php, só tiver ?subtopic=, apaga essa parte e deixa só o que ta depois do =, simples e fácil, só fazer isso na layout.php e em todas as páginas que tiver no seu site.

Se você já tem o arquivo .htaccess no diretório do seu site, coloque esse código dentro:
RewriteEngine On RewriteCond %{REQUEST_FILENAME} !-f RewriteCond %{REQUEST_FILENAME} !-d RewriteRule ^(.*)$ index.php?subtopic=$1 Caso não tenha o arquivo, provavelmente existe um arquivo .htaccess na pasta config do seu site, copie ele e cole no diretório do site, apague o código e coloque o código que eu passei.

É isso pessoal, espero que tenham gostado. Até a próxima, abração!

ai da uma editada 
http://www.tibiaking.com/forum/topic/12994-new-marriage-system/

demorei horas preocurando a resposta espero ter ajudado
 

accountManager = false
namelockManager = true
newPlayerChooseVoc = false
newPlayerSpawnPosX = 1183
newPlayerSpawnPosY = 1097
newPlayerSpawnPosZ = 15
newPlayerTownId = 1
newPlayerLevel = 1
newPlayerMagicLevel = 0
generateAccountNumber = false

lightInterval = 7500
lightChange = 1
startupTime = 351
startupLight = 40


limitPokeballs = 6 -- deprecated
happyDropTime = 12 -- a cada "happyDropTime" segundos o pokemon vai perder HAPPINESS
minHappinessEffectDelay = 25 -- a cada min de "happinessEffectDelay" segundos o pokemon vai mostrar a felicidade
maxHappinessEffectDelay = 40 -- a cada min de "happinessEffectDelay" segundos o pokemon vai mostrar a felicidade
PokemonStageVeryHappy = 0 -- com quanto de happy o poke precisa pra estar muito feliz
PokemonStageHappy = 50 -- ... pra estar feliz
PokemonStageOK = 200 -- ... pra estar normal
PokemonStageSad = 1000 -- ... pra estar triste
PokemonStageMad = 1000 -- ... pra estar bravo
maximumHunger = 120 -- maior fome possivel
stateHunger = 10000 -- 19estagio que precisa estar pra ficar com fome
increaseHunger = 1000 -- a cada X segundos (xml do monstro) aumenta o hunger em "increaseHunger"
decreaseHappy = 1 -- HAPPINESS que o pokemon vai perder a cada "happyDropTime"
decreaseHungryHappy = 4 -- 3HAPPINESS a mais que o pokemon vai perder se estiver com fome
useTeleportWithFly = false
dropHappyDuringBattles = true -- HAPPINESS vai cair enquanto estiver batalhando ? true / false

allowBlockSpawn = false
rateGymSpellInterval = 0.68

redSkullLength = 30 * 24 * 60 * 60
blackSkullLength = 45 * 24 * 60 * 60
dailyFragsToRedSkull = 3
weeklyFragsToRedSkull = 5
monthlyFragsToRedSkull = 10
dailyFragsToBlackSkull = dailyFragsToRedSkull
weeklyFragsToBlackSkull = weeklyFragsToRedSkull
monthlyFragsToBlackSkull = monthlyFragsToRedSkull
dailyFragsToBanishment = dailyFragsToRedSkull
weeklyFragsToBanishment = weeklyFragsToRedSkull
monthlyFragsToBanishment = monthlyFragsToRedSkull
blackSkulledDeathHealth = 40
blackSkulledDeathMana = 0
useBlackSkull = true
useFragHandler = true
advancedFragList = false

notationsToBan = 3
warningsToFinalBan = 4
warningsToDeletion = 5
banLength = 7 * 24 * 60 * 60
killsBanLength = 7 * 24 * 60 * 60
finalBanLength = 30 * 24 * 60 * 60
ipBanishmentLength = 1 * 24 * 60 * 60
broadcastBanishments = true
maxViolationCommentSize = 200
violationNameReportActionType = 2
autoBanishUnknownBytes = false

worldType = "pvp"
protectionLevel = 1000
pvpTileIgnoreLevelAndVocationProtection = true
pzLocked = 18 * 1000
huntingDuration = 60 * 1000
criticalHitChance = 7
criticalHitMultiplier = 1
displayCriticalHitNotify = false
removeWeaponAmmunition = true
removeWeaponCharges = true
removeRuneCharges = true
whiteSkullTime = 15 * 60 * 1000
noDamageToSameLookfeet = false
showHealingDamage = false
showHealingDamageForMonsters = false
fieldOwnershipDuration = 5 * 1000
stopAttackingAtExit = false
oldConditionAccuracy = false
loginProtectionPeriod = 10 * 1000
deathLostPercent = 1
stairhopDelay = 0 * 1000
pushCreatureDelay = 1 * 1000
deathContainerId = 0
gainExperienceColor = 215
addManaSpentInPvPZone = true
squareColor = 0
allowFightback = true

worldId = 0
ip = "192.168.12.1"
bindOnlyConfiguredIpAddress = false
loginPort = 7171
gamePort = 7172
adminPort = 7171
statusPort = 7171
loginTries = 10
retryTimeout = 5 * 1000
loginTimeout = 60 * 1000
maxPlayers = 300 -- codificado e limitado para 7
motd = "Bem-vindo, ao Pokemon Infinity."
displayOnOrOffAtCharlist = false
onePlayerOnlinePerAccount = false
allowClones = true
serverName = "Pokemon Infinity"
loginMessage = "Bem-vindo ao Pokemon Infinity, Boa sorte em sua Jornada"
statusTimeout = 5 * 60 * 1000
replaceKickOnLogin = true
forceSlowConnectionsToDisconnect = false
loginOnlyWithLoginServer = false
premiumPlayerSkipWaitList = true

sqlType = "mysql"
sqlHost = "localhost"
sqlPort = 3306
sqlUser = "root"
sqlPass = ""
sqlDatabase = "poketibia"
sqlFile = ""
sqlKeepAlive = 0
mysqlReadTimeout = 10
mysqlWriteTimeout = 10
encryptionType = "sha1"

deathListEnabled = true
deathListRequiredTime = 1 * 60 * 1000
deathAssistCount = 19
maxDeathRecords = 10

ingameGuildManagement = true
levelToFormGuild = 40
premiumDaysToFormGuild = 0
guildNameMinLength = 2
guildNameMaxLength = 25

highscoreDisplayPlayers = 15
updateHighscoresAfterMinutes = 60

buyableAndSellableHouses = true
houseNeedPremium = false
bedsRequirePremium = true
levelToBuyHouse = 1
housesPerAccount = 0
houseRentAsPrice = false
housePriceAsRent = false
housePriceEachSquare = 2975
houseRentPeriod = "never"
houseCleanOld = 0
guildHalls = false

timeBetweenActions = 500
timeBetweenExActions = 500
hotkeyAimbotEnabled = true

mapName = "mastermap"
mapAuthor = "brun123"
randomizeTiles = true
storeTrash = false
cleanProtectedZones = true
mailboxDisabledTowns = "1"

defaultPriority = "high"
niceLevel = 5
coresUsed = "-1"

optimizeDatabaseAtStartup = true
removePremiumOnInit = true
confirmOutdatedVersion = false

formulaLevel = 5.0
formulaMagic = 1.0
bufferMutedOnSpellFailure = false
spellNameInsteadOfWords = true
emoteSpells = false

allowChangeOutfit = true
allowChangeColors = true
allowChangeAddons = true
disableOutfitsForPrivilegedPlayers = false
addonsOnlyPremium = false

dataDirectory = "data/"
bankSystem = true
displaySkillLevelOnAdvance = false
promptExceptionTracerErrorBox = true
separateViplistPerCharacter = false
maximumDoorLevel = 500
maxMessageBuffer = 4

saveGlobalStorage = true
useHouseDataStorage = true
storePlayerDirection = true

checkCorpseOwner = true
monsterLootMessage = 3
monsterLootMessageType = 22

ghostModeInvisibleEffect = false
ghostModeSpellEffects = false

idleWarningTime = 14 * 60 * 1000
idleKickTime = 15 * 60 * 1000
expireReportsAfterReads = 1
playerQueryDeepness = 2
maxItemsPerPZTile = 0
maxItemsPerHouseTile = 0

freePremium = false
premiumForPromotion = true

blessingOnlyPremium = true
blessingReductionBase = 30
blessingReductionDecreament = 5
eachBlessReduction = 8

experienceStages = false
rateExperience = 80
rateExperienceFromPlayers = 0
rateSkill = 1
rateMagic = 1.0
rateLoot = 1
rateSpawn = 1

rateMonsterHealth = 1.0
rateMonsterMana = 1.0
rateMonsterAttack = 1.0
rateMonsterDefense = 1.0

minLevelThresholdForKilledPlayer = 0.9
maxLevelThresholdForKilledPlayer = 1.1

rateStaminaLoss = 1
rateStaminaGain = 3
rateStaminaThresholdGain = 12
staminaRatingLimitTop = 41 * 60
staminaRatingLimitBottom = 14 * 60
rateStaminaAboveNormal = 1.0
rateStaminaUnderNormal = 1.0
staminaThresholdOnlyPremium = true

experienceShareRadiusX = 30
experienceShareRadiusY = 30
experienceShareRadiusZ = 1
experienceShareLevelDifference = 200 * 200
extraPartyExperienceLimit = 20
extraPartyExperiencePercent = 20
experienceShareActivity = 2 * 60 * 1000

globalSaveEnabled = false
globalSaveHour = 1260
shutdownAtGlobalSave = false
cleanMapAtGlobalSave = false

deSpawnRange = 2
deSpawnRadius = 25

maxPlayerSummons = 1
teleportAllSummons = true
teleportPlayerSummons = true

ownerName = "Pokemon Infinity [Advanced]"
ownerEmail = ""
url = ""
location = "Brazil"
displayGamemastersWithOnlineCommand = false

adminLogsEnabled = false
displayPlayersLogging = true
prefixChannelLogs = ""
runFile = ""
outLogName = ""
errorLogName = ""
truncateLogsOnStartup = false

cliente mas serve
http://www.4shared.com/rar/1B-cbyyP/kit_host_pokemon_legendary.html
site
http://www.tibiaking.com/forum/topic/14364-modern-aac-web-site-para-poketibia-minitutorial/
 
https://www.youtube.com/watch?v=VTG2Wbi8qdI

mano se tu tem copia meu script e coloca no lugar do velho.
"porque seu script ta com defeito"

como tu remove clica em select house dps como se fosse adicionar porem aperte CTRL ai tu vai escluindo
se vc quiser coloca vai na area de houses e clica em add

vai no rmes em creatures vc vai ver spawntime coloque 10,
a não deixa um monstro do lado do outro da um espaço

ai mano para ficar massa coloca uns corpos e flam no chao e umas splash de sangue fica bem legal i
-mas voutando ao asumto o pvp zone toll esta certo mas coloca protetion zone no tp para entrar na arena e para sair

Executa isso na sua data base:
UPDATE `NOME DA SUA DATA BASE`. `players` SET `town_id` = "2", `posx` = "32369", `posy` = "32241", `posz` = "7" Não esqueça de configurar tudo aí. Coloque o nome da sua data base no lugar indicado, em town_id coloque o id da cidade que vc qr que os players nasçam e em posx, posy e em posz coloque as coordenadas certas do templo dessa cidade.

*Junto vem um dll com o ip(127.0.0.1) mais não se preocupe coloquei o projeto do Visual C++ para você mudar o ip e recompilar.
 
Ela está disponivel aki:
  Audio Dll+Project VC++.rar   498.3KB   21 downloads
 
 
 
Prontinho agora vamos a instalação:
 
Primeiro execute o server de audio junto ao seu otserv:
  Server Audio Dll or Vb Form.rar   80.84KB   15 downloads
 
Instale a blibioteca lua socket no seu otserv:
http://w3.impa.br/~d...ware/luasocket/
 
 
 
Agora coloque está funcão na sua lib:
function sendAudio(cid, audio)
require('socket') 
local ip = "127.0.0.1" -- Seu ip Aki
local client = socket.connect(ip, 1234)
local t = "Send,"..doConvertIntegerToIp(getPlayerIp(cid))..","..audio..""
    client:send(t.."\n")
    client:settimeout(0.1)
client:close()
end Pronto quando quiser executar um som basta usar a função sendAudio(cid, "id audio")
 
Se tiver usando a dll todos o sons devem ser guardados junto a ela.
 
Todos os formatos de audio devem ser ".wav" e todos precisam ser enumerados de 000 a 999 se não seguir tal regra terá varios problemas.
 
Agora vou passar um codigo em vb que fiz para você injentar a dll antes que o seu client inicie:
E NECESSARIO EXECUTAR DENTRO DE UM THEARED QUANDO FOR FAZER O SEU LAUNCHER.
 
 
Spoiler     
Imports System.Threading

 

Public Class PBO
    Private trd As Thread
 
    Private TargetProcessHandle As Integer
    Private pfnStartAddr As Integer
    Private pszLibFileRemote As String
    Private TargetBufferSize As Integer
 
    Public Const PROCESS_VM_READ = &H10
    Public Const TH32CS_SNAPPROCESS = &H2
    Public Const MEM_COMMIT = 4096
    Public Const PAGE_READWRITE = 4
    Public Const PROCESS_CREATE_THREAD = (&H2)
    Public Const PROCESS_VM_OPERATION = (&H8)
    Public Const PROCESS_VM_WRITE = (&H20)
 
    Public Declare Function ReadProcessMemory Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As String, _
    ByVal nSize As Integer, _
    ByRef lpNumberOfBytesWritten As Integer) As Integer
 
    Public Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" ( _
    ByVal lpLibFileName As String) As Integer
 
    Public Declare Function VirtualAllocEx Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpAddress As Integer, _
    ByVal dwSize As Integer, _
    ByVal flAllocationType As Integer, _
    ByVal flProtect As Integer) As Integer
 
    Public Declare Function WriteProcessMemory Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpBaseAddress As Integer, _
    ByVal lpBuffer As String, _
    ByVal nSize As Integer, _
    ByRef lpNumberOfBytesWritten As Integer) As Integer
 
    Public Declare Function GetProcAddress Lib "kernel32" ( _
    ByVal hModule As Integer, ByVal lpProcName As String) As Integer
 
    Private Declare Function GetModuleHandle Lib "Kernel32" Alias "GetModuleHandleA" ( _
    ByVal lpModuleName As String) As Integer
 
    Public Declare Function CreateRemoteThread Lib "kernel32" ( _
    ByVal hProcess As Integer, _
    ByVal lpThreadAttributes As Integer, _
    ByVal dwStackSize As Integer, _
    ByVal lpStartAddress As Integer, _
    ByVal lpParameter As Integer, _
    ByVal dwCreationFlags As Integer, _
    ByRef lpThreadId As Integer) As Integer
 
    Public Declare Function OpenProcess Lib "kernel32" ( _
    ByVal dwDesiredAccess As Integer, _
    ByVal bInheritHandle As Integer, _
    ByVal dwProcessId As Integer) As Integer
 
    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Integer
 
    Private Declare Function CloseHandle Lib "kernel32" Alias "CloseHandleA" ( _
    ByVal hObject As Integer) As Integer
 
 
    Dim ExeName As String = IO.Path.GetFileNameWithoutExtension(Application.ExecutablePath)
 
    Private Sub Inject()
        Dim client As String = Application.StartupPath + "\dll\client.exe"
        If Not System.IO.File.Exists(client) Then
            MsgBox("ERROR! Verifique se a os arquivos (data) estão todos presentes se não baixe o launcher denovo" + vbNewLine + "Error de caminho")
        End If
        Dim x = Shell(client)
        While True
            If x Then
                Exit While
            End If
        End While
 
        On Error GoTo 1 ' If error occurs, app will close without any error messages
        Dim caminho As String = Application.StartupPath + "\dll\dllPBO.dll"
        TargetProcessHandle = OpenProcess(PROCESS_CREATE_THREAD Or PROCESS_VM_OPERATION Or PROCESS_VM_WRITE, False, x)
        pszLibFileRemote = caminho
        pfnStartAddr = GetProcAddress(GetModuleHandle("Kernel32"), "LoadLibraryA")
        TargetBufferSize = 1 + Len(pszLibFileRemote)
        Dim Rtn As Integer
        Dim LoadLibParamAdr As Integer
        LoadLibParamAdr = VirtualAllocEx(TargetProcessHandle, 0, TargetBufferSize, MEM_COMMIT, PAGE_READWRITE)
        Rtn = WriteProcessMemory(TargetProcessHandle, LoadLibParamAdr, pszLibFileRemote, TargetBufferSize, 0)
        CreateRemoteThread(TargetProcessHandle, 0, 0, pfnStartAddr, LoadLibParamAdr, 0, 0)
        CloseHandle(TargetProcessHandle)
1:      Application.Exit()
    End Sub
 

Como colocar pra exemplo o player entra em X lugar a musica toca

olhe axo que isso da certo:
nome do seu script.lua
function onUse(cid, item, fromPosition, itemEx, toPosition)

local days,removeOnUse = 7,true

local daysvalue = days * 24 * 60 * 60
local storageplayer = getPlayerStorageValue(cid, 13545)
local timenow = os.time()
local time = getPlayerStorageValue(cid, 13545) - os.time() <= 0 and timenow + daysvalue or storageplayer + daysvalue

doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Foram adicionados ".. days .." dias de VIP no seu character.")
setPlayerStorageValue(cid, 13545, time)
local quantity = math.floor((getPlayerStorageValue(cid, 13545) - timenow)/(24 * 60 * 60))
doSendMagicEffect(getPlayerPosition(cid), math.random(28,30))
doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você tem ".. quantity .." dias de VIP restantes.")
if removeOnUse == true then doRemoveItem(item.uid, 1) end
return true
end
actions.xml

<action itemid="ID DO SEU ITEM" event="script" value="nome do seu script.lua"/>

á Tibia King's!
Reflect System[0.1]
Função
Ao ser obtido um item que possua o atributo Reflect o player será capaz de refletir danos Fisicos e Mágicos ao mesmo tempo. A idéia geral desse script é bem simples mesmo. Quando o player receber um damage de uma criatura (monstro ou player) esse attack será refletido em uma certa porcentagem.

Exemplo:
22:46 You see a golden amulet. It weighs 8.30 oz. [Reflect: 80%]
Obs¹: Os items pode ser acumulativo. Ou seja, se o amuleto der 10% de reflect e o ring der 35%. O player possuirá um Reflect = 45%.
[MOD]reflectSystem.xml
<?xml version="1.0" encoding="UTF-8"?>
<mod name="Reflect System" version="0.1" author="Aluccard" contact="" enabled="yes">
        <description>
                Script que funciona para refletir danos para as creatures que o atacar.
        </description>

        <event type="login" name="regReflectDamage" event="script"><![CDATA[
                function onLogin(cid)
                        registerCreatureEvent(cid,"ReflectDamage")
                        return true
                end
    ]]></event>

        <event type="statschange" name="ReflectDamage" event="script"><![CDATA[

local slotPos = {CONST_SLOT_NECKLACE, CONST_SLOT_FEET, CONST_SLOT_RING}
    
function onStatsChange(cid, attacker, type, combat, value)
        local reflectPercent = 0
    local dmg = value
    local playerPos = getCreaturePosition(cid)
    local attackerPos = getCreaturePosition(attacker)

    for i = 1, #slotPos do
        if getPlayerSlotItem(cid, slotPos).uid > 1 then
            if getItemReflectPercent(getPlayerSlotItem(cid, slotPos).uid) then
                reflectPercent = reflectPercent + getItemReflectPercent(getPlayerSlotItem(cid, slotPos).uid)
            end
        end
    end
        
    if reflectPercent > 0 then
        dmg = math.ceil(-value*((100-reflectPercent)/100))        
        if (dmg < 0) then
            doCreatureAddHealth(cid, dmg)    
            doSendAnimatedText(playerPos, -dmg, COLOR_RED)
            doSendMagicEffect(playerPos, 0)                    
        else
            doSendMagicEffect(playerPos, 3)
        end

        dmg = math.ceil(-value*(reflectPercent/100))
        if (dmg < 0) then
            doCreatureAddHealth(attacker, dmg)
            doSendAnimatedText(attackerPos, -dmg, COLOR_RED)
            doSendDistanceShoot(playerPos, attackerPos, CONST_ANI_SMALLHOLY)
        end
    else
        return true
    end
end]]></event>
</mod>
Obs²: O código está meio enferrujado, mas funciona. Como podes ver o sistema está na versão 0.1 e irá ser atualizada com o tempo.
ReflectLib.lua
function getItemReflectPercent(itemuid)
    return getItemAttribute(itemuid, "reflectPercent")
end
function doPlayerAddReflectedItem(cid, itemid, percent)
local item = doPlayerAddItem(cid, itemid)
doItemSetAttribute(item, "description", "[Reflect: "..percent.."%]")
doItemSetAttribute(item, "reflectPercent", percent)
end
Obs³: Para adicionarmos novos items com o atributo Reflect usamos o comando doPlayerAddReflectedItem(cid,itemid,percent).
{itemid = id do item escolhido / percent = porcentagem do reflect}
Creio que não esqueci de nada. Qualquer dúvida é só postar!

Sem mais,
Aluccard.
 

tenta asim

https://www.youtube.com/watch?v=SpjKGizK3JM

Ai se tem outro tópico igual malz aew soq tenho certeza q não é com esse video
 
function onUse(cid, item)   local chest = {1746,1747,1748,1749} -- IDs dos chests   if isInArray(chests, item.itemid) then for i = 1, 10 do doPlayerAddItem(cid, getContainerItem(item.uid, i)) end else doPlayerSendCancel(cid, "The chest it's empty") end return true end  
credito do script Caronte
 
se te ajudei mi ajude dando um like

1- Abra Iniciar > Executar > Cmd
2- Escreva Ipconfig e aperte enter, aparecera muita coisa, então procure por Gateway padrão e por IPv4
3- Abra uma aba na internet e na URL coloque o Gateway padrão.
4- Faça o login
5- No canto esquerdo, terá muitas abas, procure por: Forwarding e então clique em Virtual Servers
6- Depois de aberto o virtual servers, clique em "Add New"
7- Em Service Port coloque 7171, Em IP Adress coloque seu IPv4, Em Protocol coloque TCP e salve.
8- Repita o passo 7 mas em Service Port coloque 7172 e salve.
9- Agora feche a internet e abra a pasta de seu server.
10- Abra o config.lua e no lugar do IP coloque seu IP fixo feche e salve. 
 
https://www.youtube.com/channel/UCqGOf4zuzQGUIP3ArPEBsgw
 

Casino ElfBot [tutorial]  por oclipper em Seg Dez 30, 2013 9:39 pm
  Casino Script Tutorial 

Versão 2.0 100% ElfBot




Necessario:

Dice
Golden BackPack
Purple BackPack


1º Passo



Neste Script, usaremos 'purple backpack' e 'golden backpack' como na foto acima



>>> atenção <<<

Sempre  deixar  BP Dourada   FECHADA
Sempre  deixar  BP Roxa   ABERTA VAZIA
Sempre  deixar  mao  do lado  >   LIVRE
Sempre  DP do lado  ESQUERDO
Sempre  começar o script da primeira linha




Hotkey Bugar DP

auto 200 dropitemsxyzamount $posx [$posy-1] $posz 3031 01 | wait 500 | dropitemsxyzamount $posx [$posy-1] $posz 3035 01 | wait 500 2º Passo




Criar Script 'Casino' pode ser qualquer nome.
Aqui ele joga com 50k e paga 80k

Action START
setcaption 'script by Adolf' | if [$topitem.($posx+1).($posy-1).($posz) == 3043] {collectitems 'purple backpack' 3043 | wait 1000 | equiplhand 3043 | wait 1000 | gotolabel MOVE} else {gotolabel START}

ACTION MOVE
setcaption 'MOVE' | if .id == 3043 && $lhandslot.count >= 5 ] {openbpitem | wait 1500 | unequip 'lhand' 'golden backpack' | wait 1000 | say 'Fale H ou L agora.' | gotolabelCHECK} | else {gotolabel START}

Action CHECK
setcaption 'CHECK' | if [$curmsg.isdefault && $playersaround.2 && $curmsg.content == 'l'] {usegroundxyz [$posx] [$posy-1] [$posz] | wait 1000 | gotolabel LOW} if [$curmsg.isdefault && $playersaround.2 && $curmsg.content == 'h'] {usegroundxyz [$posx] [$posy-1] [$posz] | wait 1000 | gotolabel HIGH } | else {gotolabel CHECK}

Action LOW
setcaption 'LOW' | if [$topitem.($posx).($posy-1).($posz) == 5792 || $topitem.($posx).($posy-1).($posz) == 5793 || $topitem.($posx).($posy-1).($posz) == 5794]{gotolabel PAYOUT} else {say 'Perdeu Playboy' | openbpitem | gotolabel START}

Action HIGH
setcaption 'HIGH' | if [$topitem.($posx).($posy-1).($posz) == 5795 || $topitem.($posx).($posy-1).($posz) == 5796 || $topitem.($posx).($posy-1).($posz) == 5797] {gotolabel PAYOUT} else {say 'Perdeu Playboy' | openbpitem | gotolabel START}

Action PAYOUT
setcaption 'PAYOUT' | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 8 | say 'You Won.' | openbpitem | wait 500 | gotolabel START

Download
Colar na pasta 'Script' dentro da pasta do 'ElfBot'. Baixe apenas se tiver dificuldade de copiar e colar o codigo no Edit do CaveBot.
SPOILER:

V2.0 http://speedy.sh/JW67C/casino.txt
Copiar e Colar EDIT do Casino
SPOILER:
[Waypoints]
A 32332 31778 8 START

setcaption 'script by Adolf' | if [$topitem.($posx+1).($posy-1).($posz) == 3043] {collectitems 'purple backpack' 3043 | wait 1000 | equiplhand 3043 | wait 1000 | gotolabel MOVE} else {gotolabel START}

A 32332 31778 8 MOVE

if [$lhandslot.id == 3043 && $lhandslot.count >= 5 ] {openbpitem | wait 1500 | unequip 'lhand' 'golden backpack' | wait 1000 | say 'Fale H ou L agora.' | gotolabel CHECK} | else {gotolabel START}

A 32332 31778 8 CHECK

if [$curmsg.isdefault && $playersaround.2 && $curmsg.content == 'l'] {usegroundxyz [$posx] [$posy-1] [$posz] | wait 1000 | gotolabel LOW} if [$curmsg.isdefault && $playersaround.2 && $curmsg.content == 'h'] {usegroundxyz [$posx] [$posy-1] [$posz] | wait 1000 | gotolabel HIGH } | else {gotolabel CHECK}

A 32332 31778 8 LOW

if [$topitem.($posx).($posy-1).($posz) == 5792 || $topitem.($posx).($posy-1).($posz) == 5793 || $topitem.($posx).($posy-1).($posz) == 5794]{gotolabel PAYOUT} else {say 'Perdeu Playboy' | openbpitem | gotolabel START}

A 32332 31778 8 HIGH

if [$topitem.($posx).($posy-1).($posz) == 5795 || $topitem.($posx).($posy-1).($posz) == 5796 || $topitem.($posx).($posy-1).($posz) == 5797] {gotolabel PAYOUT} else {say 'Perdeu Playboy' | openbpitem | gotolabel START}

A 32332 31778 8 PAYOUT

dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 8 | say 'You Won.' | openbpitem | wait 500 | gotolabel START


[CavebotOptions]
Rope: Rope
Shovel: Shovel
SkipNearbyNodes: 0
OpenNextBp: no
LootNearbyTargets: no
LootDistantTargets: no

[Alerts]
PlayerOnScreen:
GmDetected:
PlayerAttacking:
DefaultMessage:
PrivateMessage:
Disconnected:

Versão 2.8 (pago)
Quem tiver interesse de adquirir mande mensagem.

- Funciona qualquer lado do DP (esquerda/ direita)


- Toca Instrumento (quando apostador ganha)


- Vira o char pra quem esta apostando


- Não tem bug ao pagar (com mais de 1kk na bp)

- Apostas 50, 100, 200 e 500k

 
 
 
 
 
 
 
ouuuuuuu
 
Nome do Arquivo: Casino Script
Autor: Rikardo
Arquivo enviado: 08 Ago 2014
Categoria: Scripts
 

Script de Casino (Dicer) para XenoBot
Maiores detalhes: http://tibiabot.in/x.../casino-script/
Comentários no fórum: http://tibiabot.in/f...-casino-script/

Changelog:
v1.0
- Multiplus containers;
- Customização Completa das mensagens;
- Customização dos HUD;
- Suporte completo para Otservers;
- Um canal de comunicação mais simplificado;
- Outras funções adicionadas.

v1.1
- Suporte para Odd/Even(135 / 246), single number(1,2,3,4,5,6) e double number(12/34/56);
- Último jogo na HUD;
- Próximo Server Saver na HUD;
- Sair quando o salto não é suficiente para jogar;
- Mensagens de interação adicionadas;
- Anti-trash system;
- Busca um novo Deport ( Cidades disponíveis: Yalahar, Venore e Thais );
- File LOG;
- Não há mensagem de SPAM e maior velocidade;
- Reseta todas as HUD e configurações com o comando /reset
- Rápido update de HUD;
- Um canal mais simples e bonito e HUD;
- Algumas falhas internas foram ajustadas.

v1.3
- Aceita itens (Rashid, Djin, Zao, etc);
- Aceita produtos;
- Anti-idle;
- Nova função "Minutos Inativos";
- Muitas novas funções foram inseridas ( um ping baixo é recomendado );
- Inserido um novo sistema anti-roubo
- Configurações organizadas por categoria;
- Algumas funções extras foram adicionadas.

v1.4
- Tempo correndo a HUD;
- Tira Screenshot;
- Kick automático caso detecte algo;
- Habilitar / Desabilitar o Anti-Idle
- Envio de mensagem para os players;
- Maiores detalhes no LOG ( caso habilitado );

v.1.5
- Adicionado o jogo BlackJack
- Adiciona a opção de selecionar diferente valores para diferentes jogos;
- Melhorado o sistema de Anti-Trash;
- O script para em certas situações como: Server Save / Pouco Dinheiro / todos os jogos estiverem desabilitados ( não ira fechar o cliente );
- Algumas funções simples adicionadas.

v1.6
- Verifica se a configuração da backpack existe dentro do Deport;
- O script só ira aceitar 5 itens por jogo a partir de agora;
- Novo sistema Anti-Trash
- Para o script caso menos de 10k são encontrados
- O player não precisa por o dinheiro e falar a keyworld a partir de agora;
- Regras do jogo inserida;
- Diversas modificações no código para prevenir a execução de multiplus clientes ao mesmo tempo;
- Inserido o limite de pagamento para no máximo 1KK
- Mais containers de Crystal Coins.
 

Clique aqui para fazer o download deste arquivo
-Jou. curtiu isso Estamos de volta...