abnejesus

Para quem não sabe como funciona o script : O player precisar ter uma certa quantia de gold para poder comprar um item pelo baú.(o item ficará atrás do baú no caso)
 
• Adicionando o script •
 
Em "data/actions/scripts/comprabau1.lua" :
function onUse(cid, item) local price = 50000 -- Preço do item local it = 8932 -- ID do item local count = 1 -- Quantia do item if not doPlayerRemoveMoney(cid, price) then doPlayerSendCancel(cid, "Você precisa ter "..price.." gold coins para comprar "..count.."x "..getItemNameById(it)..".") return true end doPlayerAddItem(cid, it, count) doPlayerSendCancel(cid, "Você comprou "..count.."x "..getItemNameById(it).." por "..price.." gold coins.") return true end Em "data/actions/actions.xml" :
<action actionid="6002" script="comprabau1.lua"/> • Configurando •
 
 
 

Mais fácil, altere no seu script, substitui seu script por este:
 
 

Fala galera do TK, hoje eu vim trazer pra vocês uma coisa que se perdeu em todos esses anos de OT e que é uma das coisas mais importantes prum scripter intermediário/avançado. São as explicações dos respectivos callbacks de creaturescripts. Espero que ajude bastante gente

Créditos: 90% Zonnebloem (um gringo ai que postou isso das sources) e 10% pra mim por completar oque ele não tinha escrito e arrumado umas coisas que ele escreveu errado.
 
    ____________________________     CREATURE EVENTS TIPOS:  _________________

TFS 0.2
type="login"     function onLogin(cid)   type="logout"     function onLogout(cid)   type="advance"     function onAdvance(cid, skill, oldLevel, newLevel)   type="think"     function onThink(cid, interval)   type="kill"     function onKill(cid, target)   type="death"     function onDeath(cid, corpse, lasthitkiller, mostdamagekiller, lasthitunjustified, mostdamageunjustified)   type="preparedeath"     function onPrepareDeath(cid, killer) TFS 0.3/0.4
type="login"     function onLogin(cid)   type="logout"     function onLogout(cid)   type="advance"     function onAdvance(cid, skill, oldLevel, newLevel)   type="think"     function onThink(cid, interval)   type="kill"     function onKill(cid, target, lastHit)   type="death"     function onDeath(cid, corpse, deathList)   type="preparedeath"     function onPrepareDeath(cid, deathList)   type="statschange"     function onStatsChange(cid, attacker, type, combat, value)   type="combat"     function onCombat(cid, target)   type="target"     function onTarget(cid, target)   type="look"     function onLook(cid, thing, position, lookDistance)   type="textedit"     function onTextEdit(cid, item, newText)   type="outfit"     function onOutfit(cid, old, current)   type="push"     function onPush(cid, target)   type="follow"     function onFollow(cid, target)   type="attack"     function onAttack(cid, target)   type="areacombat"     function onAreaCombat(cid, tileItem, tilePosition, isAggressive)   type="cast"     function onCast(cid, target)   type="direction"     function onDirection(cid, old, current)   type="reportbug"     function onReportBug(cid, comment)   type="sendmail"     function onSendMail(cid, receiver, item, openBox)   type="receivemail"     function onReceiveMail(cid, sender, item, openBox)   type="traderequest"     function onTradeRequest(cid, target, item)   type="tradeaccept"     function onTradeAccept(cid, target, item, targetItem)   type="joinchannel"     function onJoinChannel(cid, channel, users)   type="leavechannel"     function onLeaveChannel(cid, channel, users) TFS 1.0
type="login"     function onLogin(cid)   type="logout"     function onLogout(cid)   type="think"     function onThink(cid, interval)   type="preparedeath"     function onPrepareDeath(cid, killer)   type="death"     function onDeath(cid, corpse, lasthitkiller, mostdamagekiller, lasthitunjustified, mostdamageunjustified)   type="kill"     function onKill(cid, target)   type="advance"     function onAdvance(cid, skill, oldLevel, newLevel)   type="modalwindow"     function onModalWindow(cid, modalWindowId, buttonId, choiceId)   type="textedit"     function onTextEdit(cid, item, text)   type="changehealth"     function onChangeHealth(cid, attacker, primaryDamage, primaryType, secondaryDamage, secondaryType)   type="changemana"     function onChangeMana(cid, attacker, manaChange)   type="extendedopcode"     function onExtendedOpcode(cid, opcode, buffer)     ____________________________     INFORMAÇÃO SOBRE OS TIPOS:  _________________
antes de tudo tenha em mente que os tipos só serão executados no player ou monstro em que eles forem registrados; Registrar no login.lua vai fazer com que ele seja executado em todos os players assim q eles logarem. Se deve ser executado somente por alguns monstros, registre no monstro em questão no xml dele.

login

Quando é executada:
- Quando um player loga

Parametros:
- cid = creatureid do player que logou

quando está return false:
- nada

registra creature event:
- não

~~~~

logout

Quando é executada:
- quando um player desloga pelo logout do próprio cliente. Não acontece se o player morrer, for disconectado ou xlogs

Parametros:
- cid = creatureid do player que deslogou

quando está return false:
- Player não vai conseguir deslogar

registra creature event:
- não

~~~~

advance

Quando é executado:
- Toda vez que um player avançar de level, magic level ou qualquer outra skill

Parametros:
- cid = creature id do player que avançou
- skill = tipo da skill que o player avançou vide tabela abaixo (note que vc pode utilizar tanto o nome SKILL_FIST quanto o numero 0)
SKILL_FIST = 0 SKILL_CLUB = 1 SKILL_SWORD = 2 SKILL_AXE = 3 SKILL_DISTANCE = 4 SKILL_SHIELD = 5 SKILL_FISHING = 6 SKILL__MAGLEVEL = 7 SKILL__LEVEL = 8 - oldlevel = level antes do player avançar
- newlevel = o novo level após avançar

quando está return false:
- ele não vai avançar o nível

Registra creature event:
- sim (isso significa que vc pode colocar pra ele registrar um outro creatureevent dentro desse script após alcançar X level)

~~~~

think

Quando é executada:
- Pelo tempo

Parametros:
- cid = creatureid do monstro ou player
- interval = intervalo entre cada checagem OU em que intervalo deve ser executada, 500 é 0.5 segundo.

quando está return false:
- nada

Registra creature event:
- sim

~~~~

kill

Quando é executada:
- Ao matar um player/monstro

Parametros:
- cid = creatureid do player ou do monstro que mata
- target = creatureid do player ou monstro que é morto

quando está return false:
- O target não morrerá, ele ficará com 0 de vida e a barra sumirá para os inimigos.Ele precisará se curar para que sua barra de vida volte

registra creature event:
-sim

~~~~

death

Quando é executada:
- Quando um player ou monstro morrem

Parametros:
- cid = creatureid do player monstro que morre
- corpse = corpo do monstro ou player que morre

exemplo de adicionando 3 crystal coins no corpo que morreu.
doAddContainerItem(corpse.uid, 2160, 3) - deathlist = uma table com o nome de todos que mataram, sendo na ordem o deathlist[1] oque deu o ultimo hit e o deathlist[2] sendo oque deu mais dano.
quando está return false:
- O corpo não será criado

Registra creature event:
- Sim

~~~~

preparedeath

Quando é executada:
- Quando um monstro ou player está prestes a morrer (pode ser usada em scripts que devem ser executados no segundo antes do player morrer)

Parameters:
- cid = creatureid do player ou monstro que está prestes a morrer
- deathlist = uma tabela com o nome dos atacantes

quando está return false:
- o player ou monstro não irá morrer (mesma história do kill)

Registra creature event:
- Sim

~~~~

statschange

quando é executada:
-Quando um player ou monstro ou ganha ou perde vida/mana de um combat ou uma função (combats não são só os das spells, mas também weapons/fist/melee... vale lembrar também que monstros não possuem mana)

Parametros:
- cid = creatureid do player ou monstro q ganha/perde vida/mana
- attacker = creatureid do player ou monstro que causou a mudança na health/mana
- type = tipo da mudança, sendo ela:Ganho de vida, perca de vida, ganho de mana e perca de mana vide tabela abaixo:
STATSCHANGE_HEALTHGAIN = 0 STATSCHANGE_HEALTHLOSS = 1 STATSCHANGE_MANAGAIN = 2 STATSCHANGE_MANALOSS = 3 - combat = o tipo de combat que causou a alteração, sendo esses tipos:
COMBAT_NONE = 0 COMBAT_PHYSICALDAMAGE = 1 COMBAT_ENERGYDAMAGE = 2 COMBAT_EARTHDAMAGE = 4 COMBAT_POISONDAMAGE = 4 COMBAT_FIREDAMAGE = 8 COMBAT_UNDEFINEDDAMAGE = 16 COMBAT_LIFEDRAIN = 32 COMBAT_MANADRAIN = 64 COMBAT_HEALING = 128 COMBAT_DROWNDAMAGE = 256 COMBAT_ICEDAMAGE = 512 COMBAT_HOLYDAMAGE = 1024 COMBAT_DEATHDAMAGE = 2048 - value = valor da mudança
quando está return false:
- O player ou o monstro não ganharão/perderão vida/mana no combat. Pode ser usado pra fazer ele ficar imortal por um certo período ou não ser capaz de tomar dano de certos players/creaturas 

Registra creature event:
- Sim

~~~~

combat

Quando é executado:
- Quando um player ou monstro starta um combat (qualquer tipo de ataque)

Parametros:
- cid = creatureid do player ou monstro que usa o combat
- target = creatureid do player ou monstro que sofre o combat

quando está return false:
- O player ou monstro não será capaz de levar ataques, isso também inclui que ele não poderá dar target em alguém/algo . Isso pode ser usado para criar monstros que não possam levar ataques ou fazer players ficarem imunes a dano por um certo tempo.

Registra creature event:
- Sim


_______________________________________________________________________________________________

Agora começa a graça da coisa:


~~~~

target

Quando é executado:
- Quando um player ou monstro dá target em um player/mostro (follow/attack)

Parametros:
- cid = creatureid do player ou monstro que dá o target
- target = creatureid do player ou monstro que é targeted

quando está return false:
- O player/monstro não poderá dar target.. alguns testes com monstros revelaram que o monstro ainda consegue te atacar então acho que essa função só serve para player

Registra creature event:
- Sim
 

~~~~

look

Quando é executado:
- Quando um player dá look em algo

Parametros:
- cid = creatureid do player que dá o look
- thing = objeto/player/monstro que o player dá look
- position = não tenho certeza se é a posição do objeto que é dado look ou se é a minha posição.
- lookDistance = distancia entre esse objeto e eu.

quando está return false:
- Não aparece a mensagem de look na tela

Registra creature event:
- Sim
 
~~~~

textedit

Quando é executado:
- Quando um player edita um texto em algum item writeable (livros por exemplos)

Parametros:
- cid = creatureid do player
- item = item que está sendo modificiado
- newText = texto novo que foi escrito 

quando está return false:
- O player não conseguirá editar o texto, quando ele tentar dar ok o item continuará com o mesmo texto.. Pode ser usado numa quest com muito RPG pra checar se a senha que o player escreveu no livro é a correta.

Registra creature event:
- sim
 
~~~~

outfit

Quando é executado:
- Quando um player ou monstro muda de outfit

Parametros:
- cid = creatureid do player ou monstro que muda de outfit
- old = outfit antiga
- current = outfit atual (após ter trocado)

quando está return false:
- a troca de outfit será cancelada e o player/monstro voltará para a antiga outfit

Registra creature event:
- sim
 
~~~~

push

Quando é executado:
- Quando um player tenta empurrar um monstro ou um player

Parametros:
- cid = creatureid do player que empurrar
- target = creatureid do player ou monstro que é empurrado

quando está return false:
- O player não conseguirá empurrar (arrastar o oponente com o mouse). É bastante util em eventos para que eles não possam ficar se empurrando

Registra creature event:
- sim
 
~~~~

follow

Quando é executado:
- Quando um player dá follow em algum monstro ou player ou até num NPC

Parametros:
- cid = creatureid do player que dá o follow
- target = creatureid da criatura (monstro/npc/player) que é seguida

quando está return false:
- O follow não irá ocorrer

Registra creature event:
- Sim
 
~~~~

attack

Quando é executado:
- Quando um player ou monstro ataca (melee, spells não contam)

Parametros:
- cid = creatureid do player ou monstro que ataca
- target = creatureid do player ou monstrp que sofre o ataque

quando está return false:
- O player/monstro não irá atacar, é bastante útil em sistemas que vc queira deixar uma certa criatura imune a ataques mas que ela ainda possa morrer pra spells

Registra creature event:
- Sim
 
~~~~

areacombat

Quando é executado:
- Quando um player ou monstro starta um combat em área (usa uma spell ou dano em área)

Parametros:
- cid = creatureid do player ou monstro que usa o combat
- tileItem = player que está dentro da area
- tilePosition = posição do player que está dentro da area
- isAggressive = se esse combat em área é agressivo ou não, lembre-se que magias como exura gran mas res fazem combat em área mas esse combat não é agressivo porque ela cura em área

quando está return false:
- o combat é cancelado

Registra creature event:
- Sim
 

~~~~

cast

Quando é executado:
- Quando um player ou monstro solta uma magia

Parametros:
- cid = creatureid do player ou monstro que usa a magia
- target = creatureid do player ou monstro que sofre o dano da magia

quando está return false:
- a magia não é lançada

Registra creature event:
- sim
 
~~~~

direction

Quando é executado:
- Quando uma criatura (NPC/Player/Monster) muda de direção 

Parametros:
- cid = creatureid do player ou monstro que mudará de direção
- old =  direção antiga
- current = direção atual, após ter mudado, vide tabela abaixo:
NORTH = 0EAST = 1 SOUTH = 2 WEST = 3 SOUTHWEST = 4 SOUTHEAST = 5 NORTHWEST = 6 NORTHEAST = 7 atente-se no fato de que não é possível virar pras direções 4,5,6 e 7 mas você utilizá-las num script que cheque a direção entre dois players, daí sim seria possível (como é no caso do exiva)
quando está return false:
- A criatura não será capaz de mudar de direção

Registra creature event:
- Sim
 
~~~~

reportbug

Quando é executado:
- Quando um player reporta um bug

Parametros:
- cid = creatureid do player que reportou o bug
- comment = comentário que ele adicionou ao reportar

quando está return false:
- O report será cancelado e não será enviado. Pode ser usado num script avançado de reports onde se o player não tiver escrito nenhum comentário ou tiver escrito determinadas palavras o envio será cancelado (pra evitar spams)

Registra creature event:
- Sim
 
~~~~

sendmail

Quando é executado:
- Quando um player manda uma carta/parcel para outro

Parametros:
- cid = creatureid do player que mandou a correspondencia
- receiver = creatureid do player que irá receber essa correspondencia
- item = item que foi enviado (id dele)
- openBox = conteúdo (no caso de parcel)

quando está return false:
- Correspondência não será enviada. É util pra registrar um log de todas as trocas entre players e pegar hackers.

Registra creature event:
- Sim
 
~~~~

receivemail

Quando é executado:
- Quando um player recebe uma carta/parcel de outro

Parametros:
- cid = creatureid do player que recebou a correspondência
- sender = creatureid do player que enviou a correspondência
- item =  item recebido
- openBox =  conteúdo da correspondencia (no caso de ser uma parcel)

quando está return false:
- Ele não receberá a correspondência.

Registra creature event:
- Sim 

~~~~

traderequest

Quando é executado:
- Quando um player dá trade

Parametros:
- cid = creatureid do player que deu o trade
- target = creatureid do player que ele tentou iniciar uma troca
- item = item que foi iniciada a troca (se for uma backpack cheia de coisas dentro esse item será uma table com todos os itens)

quando está return false:
- A troca não será executada. É útil para scripts de itens vip onde o player não possa trocar determinados itens

Registra creature event:
- Sim
 
~~~~

tradeaccept

Quando é executado:
- Quando um player aceita a troca com outro)

Parametros:
- cid = creatureid do player que aceitou a troca (você)
- target = creatureid do player que aceitou a troca (cara com quem você trocou)
- item = items que você deu em troca, no caso de uma backpack cheia de itens esse parametro será uma table com todos os itens
- targetItem =  items que você recebeu em troca, no caso de uma backpack cheia de itens esse parametro será uma table com todos os itens

quando está return false:
- a troca não será concluída.

Registra creature event:
- Sim
 
~~~~

joinchannel

Quando é executado:
- Quando um player entra num channel (aqueles canais tipo trade/ help chat/ info/ guild/ etc...)

Parametros:
- cid = creatureid do player que entrou no chat
- channel = canal que o player entrou.. vide lista abaixo:
CHANNEL_GUILD = 0 CHANNEL_PARTY = 1 CHANNEL_RVR = 3 CHANNEL_HELP = 9 CHANNEL_DEFAULT = 0xFFFE CHANNEL_PRIVATE = 0xFFFF - users = outros usuários do canal.
quando está return false:
- O player não conseguirá entrar no channel

Registra creature event:
- Sim
 
OBS: a mesma coisa vale pra função leavechannel, só que o return false o player não conseguirá sair do channel.


Espero que isso ajude bastante gente, eu não expliquei os types da versão 1.0 porque é basicamente a mesma coisa e pelos parametros dá pra você ter uma ideia doque é oque. :]

Opa, galerinha do TK, pro meu primeiro tutorial resolvi fazer uma solução de um problema que desde que cheguei no TK, vejo que ocorre com uma certa frequência. Os erros da data base.
 
Neste tutorial vou ensinar a resolver os erros do tipo No such table, Insert into, No such column, ... has no column named... etc.
 
1°) NO SUCH TABLE
 
Bom, para o erro No such table, basta vc visualizar qual table está faltando. Para isso basta ler o erro na distro:

 
No caso da imagem, está faltando a table: player_statements
Para resolver este e qualquer outro problema deste tipo, caso sua data base seja sqlite,
basta abrir sua data base pelo Sqlite Studio(download: http://sqlitestudio.pl/?act=download) e clicar em Open SQL query editor:



 
Mas caso sua data base seja Mysql abra pelo phpMyadmin, ou por outro editor de sua preferencia.
 
1.1°) EXECUTANDO OS COMANDOS PARA RESOLVER O PROBLEMA
  Bom, dependendo da table que estiver faltando, vc irá colocar seu respectivo comando, segue abaixo TODOS os comandos básicos necessários para que sua data base fique Ok! :   (VC VAI PEGAR O COMANDO REFERENTE À TABLE QUE VC QUER!!!)
 
 
account_viplist



 
Sqlite




 
accounts



 
Sqlite




 
bans



 
Sqlite




 
environment_killers



 
Sqlite




 
global_storage



 
Sqlite




 
guild_invites



 
Sqlite




 
guild_kills



 
Sqlite




 
guild_ranks



 
Sqlite




 
guild_wars



 
Sqlite




 
guilds



 
Sqlite




 
house_auctions



 
Sqlite




 
house_data



 
Sqlite




 
house_lists



 
Sqlite




 
houses



 
Sqlite




 
killers



 
Sqlite




 
market_history



 
Sqlite




 
market_offers



 
Sqlite




 
player_deaths



 
Sqlite




 
player_depotitems



 
Sqlite




 
player_inboxitems



 
Sqlite




 
player_items



 
Sqlite




 
player_killers



 
Sqlite




 
player_namelocks



 
Sqlite




 
player_skills



 
Sqlite




 
player_spells



 
Sqlite




 
player_statements



 
Sqlite




 
player_storage



 
Sqlite




 
player_viplist



 
Sqlite




 
players



 
Sqlite




 
server_config



 
Sqlite




 
server_motd



 
Sqlite




 
server_record



 
Sqlite




 
server_reports



 
Sqlite




 
tile_items



 
Sqlite




 
tile_store



 
Sqlite




 
tiles



 
Sqlite




 
announcements



 
Sqlite




 
pagsegurotransacoes



 
Sqlite




 
player_advances



 
Sqlite




 
reports



 
Sqlite




 
thanks



 
Sqlite




 
z_bug_logs



 
Sqlite




 
z_featured_article



 
Sqlite




 
z_forum



 
Sqlite




 
z_helpdesk



 
Sqlite




 
z_monsters



 
Sqlite




 
z_network_box



 
Sqlite




 
z_news_tickers



 
Sqlite




 
z_ots_comunication



 
Sqlite




 
z_polls



 
Sqlite




 
z_polls_answers



 
Sqlite




 
z_poll_votes



 
Sqlite




 
z_shop_history_item



 
Sqlite




 
z_shop_history_pacc



 
Sqlite




 
z_shop_offer



 
Sqlite




 
z_spells



 
Sqlite




 
z_news_big



 
Sqlite




 
 
2°) No such column /  "NOME DA TABLE" has no column named "NOME DA COLUMN QUE FALTA" / Insert into
  Bom, para resolver esse problema vc deve identificar em qual TABLE está essa coluna que falta. Para isso, basta ler o erro como na imagem:

 
No caso da imagem, está faltando a column WORLD_ID dentro da table MARKET_OFFERS. Para resolver, vc deve executar excluir a sua table MARKET_OFFERS existante em sua data base, e em seguida, executar o domando da da market_offers, encontrado acima, logicamente isso só se aplica ao caso da imagem, depende do seu caso, vc deve excutar o comando da table que estiver sendo referida no erro. Mas antes de executá-lo vc deve excluir a sua table EXISTENTE, para então executar o comando.
 
ESTA FORMA DE RESOLUÇÃO SE APLICA AOS TRÊS CASOS: NO SUCH COLUMN, ...HAS NO COLUMN NAMED... e INSERT INTO.
 
 
 
Bom galera, é isso.
 
SE ENCONTRAREM, OU SE DEPARAREM COM ALGUM ERRO, BASTA ME PEDIR AJUDA QUE EU DAREI TOTAL SUPORTE PARA VOCÊS!
 
SE ESTIVR FALTANDO MAIS ALGUMA TABLE QUE EU NÃO COLOQUEI AQUI, PF ME INFORMEM E EU ATUALIZAREI O TÓPICO!!!
 
 
Lembrem-se, se eu te ajudei, por favor, deem REP++ pois foi meio trabolhoso fazer este tutorial todo...
 
ESTOU A DISPOSIÇÃO DE TODOS! Tanto por PM quanto por SKYPE, e até mesmo por aqui, pois vou checar este tópico regularmente!!
 
 
Espero ter ajudado!!
Abraços.

Galera é um script muito simples, porém pra mim é muito ÚTIL.
 
Abra a pasta data/globalevents/scripts crie um arquivo .lua com o nome GlobalSave.lua, em seguida adicone o code:
function prepareShutdown(minutes)         if(minutes <= 0) then                 doSetGameState(GAMESTATE_SHUTDOWN)                 return false         end         if(minutes == 1) then                 doBroadcastMessage("Server is going down in " .. minutes .. " minute for global save, please log out now!")         elseif(minutes <= 3) then                 doBroadcastMessage("Server is going down in " .. minutes .. " minutes for global save, please log out.")         else                 doBroadcastMessage("Server is going down in " .. minutes .. " minutes for global save.")         end         shutdownEvent = addEvent(prepareShutdown, 60000, minutes - 1)         return true end function onTime()     return prepareShutdown(5) -- Quantos minutos pra executar o ServeSave. end Ajustes:
Quando quiser modificar os minutos altere:  -return prepareShutdown(5) - (5) = 5 minutos, eu recomendo no mínimo 5 minutos, em outras palavras não mexa. Em globalevents.xml adicione a tag seguinte:
<globalevent name="GlobalSave" time="05:30" event="script" value="GlobalSave.lua"/> No meu ServeSave é feito as 05:30 da manhã, modifique pro horário desejado!
 
Em config.lua verifique essa regra:
Se tiver TRUE deixa, assim ele fecha o .exe se não tiver no seu config.lua não tem problema closeInstanceOnShutdown = true -
-
-
Esse tutorial é só isso, clique em GOSTEI, e comente no tópico, muito obrigado!
 
--------------------------------------------------------------------------------------------------------------------------------------------------------
AUTO RESTART
--------------------------------------------------------------------------------------------------------------------------------------------------------
Pra você que utiliza Windows esse é perfeito:
Dezon OT Admin [restarter]
 
Pra você que utiliza Linux:
 
Baixe esse arquivo, TFS.SH, bote dentro da pasta do seu OT.
Esse arquivo está configurado pra abrir outro arquivo chamado tfs caso o seu seja outro nome mude pra esse, tfs.
Sempre que for abrir seu OT execute esse comando ./tfs.sh& e assim toda vez que o OT cair ele renicia automaticamente.

DEV C++,  aprenda a compila uma source TFS!
 
Downloads(Baixe de acordo as configurações do seu windows):
DEV C++ CONFIGURADO PARA 32BITS
DEV C++ CONFIGURADO PARA 64BITS
REV 3884 TFS 0.4
 
Certo, feitos os downloads, extrai DEV C++ no Disco C e REV 3884 em Documentos.
======================================
Abra o DEV C++:
======================================

======================================
Abra a Source:
======================================

======================================
Localize a pasta da Source e abra o arquivo TheForgottenServer.dev, Documentos> trunk.r3884> dev-cpp> TheForgottenServer.dev:
======================================

=============================================================

======================================
Aguarde carregar todos os arquivos:
======================================

======================================
Vamos adicionar o parâmetro -D__CONSOLE__ no teclado digita ALT + P, clique em parameters e adicione o parâmetro... Feito? clique em OK:
======================================

======================================
Vamos compilar Source, no teclado digite CTRL+F9 e aguarde finalizar o processo:
======================================

======================================
Se der tudo certo em Log vai estar como mostra a imagem abaixo:
======================================

======================================
Verifique na pasta Documentos> trunk.r3884> dev-cpp você vai encontrar o arquivo TheForgottenServer.exe e pronto meu parabéns você compilou!
======================================

===========================================
Só isso galera tutorial rápido resumido e útil!
Créditos Natanael Beckman!    
===========================================     
 
Caso você adquira uma source com apenas os arquivos .cpp e .h e não sabe como compilar o projeto, abaixo vamos explicar:
Na pasta onde está localizado os arquivos .cpp e .h crie uma pasta chamada dev-cpp, e dentro dela adicione uma imagem icone.
 

 
Abra o DEV-C++, clique em  File> New> Project:
 

 
Logo em seguida selecione Empty Project, em name terá o nome Project1 altere utilize o nome quer quiser, após isso clique em OK e em seguida selecione a pasta dev-cpp que criamos:
 

 
Agora selecione a opção Win32GUI caso use source OTX ou TFS selecione Win32Console ao lado << Browse selecione a imagem do icone que está na pasta Dev-Cpp.
 

 
No mesmo menu na aba Parameters em C++ compiler adicione os seguintes parâmetros:
-D__ENABLE_SERVER_DIAGNOSTIC__ -D__ROOT_PERMISSION__ -D__GROUND_CACHE__ -D__USE_SQLITE__ -D__USE_MYSQL__ -D__CONSOLE__ -D__WAR_SYSTEM__ E em Linker adicione as seguintes libs:
-lboost_filesystem -lboost_thread -lboost_system -lboost_regex -lsqlite3 -lwsock32 -llua5.1 -lws2_32 -leay32 -lmysql -lxml2 -lgmp -lz -s   No mesmo Menu na aba Build Option escreva na segunda coluna horizontal escreva Obj e dê OK.     Na lateral terá o nome do seu projeto o meu no caso é The Forgotten Server, clique com o botão direito do mouse em cima do nome e clique na opção Add Project:      Selecione na pasta da sua source todos os arquivos .cpp e .h após isso salva o projeto e já pode compilar CTRL+F9:         OpenSSL 0.9.8   1º baixe http://devpaks.org/details.php?devpak=73 2° abra Dev-Cpp > Tools > Packager Manager > Install > Seleciona o arquivo baixado e instala, fecha abre e testa!
  Clica aqui \/

não precisa adicionar nada em creaturescripts.xml, só no login.lua mesmo.

salve o arquivo em actions como miner.lua e adiciona a tag no actions.xml
<action itemid="2553" script="miner.lua"/> fim x)

obs: se possivel clique em melhor resposta pra que o tópico fique como resolvido

exatamente como vc pediu... 
 
 terra = {351,352,353,354,355}  levels = { [-1] = 2229, ---- skull [0] = 1294, --- small stone [1] = 3976, --- worm [10] = 2149, -- Small Emerald [12] = 2146, -- Small Sapphire [15] = 2145, -- Small Diamond  [17] = 2150, -- Small Amethyst [20] = 2147, -- Small Ruby [25] = 2144, -- Black Pearls  [27] = 2143, -- White Pearls [30] = 2157, -- Gold Nuggets [35] = 2156, --- red gem [36] = 2158, -- blue gem  [37] = 2155, -- green gem  [38] = 2153, -- violet gem [39] = 2154, -- yellow gem [40] = 2157, -- small enchanted emerald  [42] = 2157, -- Small Enchanted Sapphiire [45] = 2158, -- Small Enchanted Amethyst [50] = 2161, -- Small Enchanted Ruby [70] = 2162  -- Life Crystal } local config = { storage = 19333, chance = 40, --- chance de achar um item ou não k = 2, --- constante de level.. quanto maior, mais fácil é upar. (a fórmula é level ao quadrado dividido pela constante) experience = 19334 } function onUse(cid, item, fromPosition, itemEx, toPosition) local drops = {} function getDrops(cid) for i= -1,getPlayerStorageValue(cid, config.storage) do if levels[i] then table.insert(drops, levels[i]) end end return true end if isInArray(terra, itemEx.itemid) then getDrops(cid) doPlayerSetStorageValue(cid, config.experience, getPlayerStorageValue(cid, config.experience)+1) local experience = getPlayerStorageValue(cid, config.experience) if experience >= (getPlayerStorageValue(cid, config.storage)^2)/config.k then doPlayerSetStorageValue(cid, config.storage, getPlayerStorageValue(cid, config.storage)+1) doPlayerSendTextMessage(cid, 27, "Congratulations, you have leveled! Your currect level is "..getPlayerStorageValue(cid, config.storage) ..".") if getPlayerStorageValue(cid, config.storage) == 50 then doPlayerSendTextMessage(cid, 20, "For reaching level "..getPlayerStorageValue(cid, config.storage) .." you have been awarded with Mining Helmet.") doPlayerAddItem(cid, 7497, 1, true) end end if config.chance >= math.random(1,100) then if #drops >= 1 then local item = drops[math.random(1,#drops)] doPlayerSendTextMessage(cid, 27, "You have found a "..getItemNameById(item)..".") doPlayerAddItem(cid, item, 1, true) end doSendMagicEffect(toPosition, 3) else doSendMagicEffect(toPosition, 2) return TRUE end elseif itemEx.itemid == item.itemid then doPlayerSendTextMessage(cid, 27, "You're currenctly level "..getPlayerStorageValue(cid, config.storage)..".") else return FALSE end return true end agora é só ir no creaturescripts\scripts\login.lua e colocar antes do ultimo return true:
 
if getPlayerStorageValue(cid, 19333) == -1 then         setPlayerStorageValue(cid, 19333, 0)  elseif getPlayerStorageValue(cid, 19334) == -1 then setPlayerStorageValue(cid, 19334, 0)      end obs: a fórmula pro level da skill tá assim:
level atual x level atual / k
dá pra mudar mas eu prefiri fazer assim pq a função quadrática é crescente então a cada level ia precisar de mais experiencia doque o level anterior, mas fica a seu critério mudar. Pode parecer que tá bem fácil upar no começo, mas lembre-se doque eu falei.

Fazendo uma continha simples você descobre que se precisa de somente 50 mineiradas pra pegar level 10, mas a mesma conta nos diz que é necessário 1250 mineiradas pra se chegar no 50. Então cuidado com oque faz na fórmula auheuhauheuh


Também tomei a liberdade de editar o formato inicial das recompensas.. fiz a cada 2 leveis pra facilitar e não complicar o script ainda mais, mas ainda assim está dentro daquilo que vc falou anteriormente. Espero que vc tenha gostado porque leveu quase 4 horas pra fazer isso aí auhuhauhauh  

http://www.tibiaking.com/forum/topic/28482-860-tfs-04-rev-3777-sem-bugs/
 
Esse ae!

Tenta assim amigo :
"data/npc/scripts/trocaitems.lua" :
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 playerHaveItems(cid, itemid) local items = type(itemid) == "table" and itemid or {itemid} for i = 1, #items do if getPlayerItemCount(cid, items[i]) <= 0 then return false end end return true end function doPlayerRemoveItems(cid, itemid, count) local items = type(itemid) == "table" and itemid or {itemid} for i = 1, #items do doPlayerRemoveItem(cid, items[i], count ~= nil and count or 1) end return nil end function creatureSayCallback(cid, type, msg) if(not npcHandler:isFocused(cid)) then return false end if msgcontains(msg, "trocar") then if playerHaveItems(cid, {1234, 1235, 1236, 1237, 1238, 1239, 1240}) then doPlayerRemoveItems(cid, {1234, 1235, 1236, 1237, 1238, 1239, 1240}, 10) doPlayerAddItem(cid, 2160, 10) else selfSay("Voce precisa de 1 item, 1 item, 1 item, 1 item, 1 item, 1 item e 1 item, para conseguir trocar por um item.") end end return true endnpcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) "data/npc/Osvaldo.xml"
<?xml version="1.0" encoding="UTF-8"?> <npc name="Osvaldo" script="trocaitems.lua" walkinterval="2000" floorchange="0"> <health now="100" max="100"/> <look type="146" head="123" body="74" legs="123" feet="0" addons="2"/> <parameters> <parameter key="message_greet" value="Olá,fale {trocar} para trocar items por comigo."/> </parameters> </npc> obs : caso não entenda como funciona o script fale que eu posto como "citar" e com cores para você identificar melhor!

PastadoOT/data/globalevents/script Exclui o Shop.lua e retire a tag do PastadoOT/data/globalevents/globalevents.lua.

Crie um arquivo chamado tilestorage.lua na pasta data/movements/scripts e cole isso

function onStepIn(cid, item, position, fromPosition)           if getPlayerStorageValue(cid, 11138) <= 0 then                     doTeleportThing(cid, fromPosition, TRUE)                     doPlayerSendCancel(cid, "You don't have premission to pass.")           end           return TRUE end  
Adicione a seguinte linha no arquivo movements.xml que se encontra na pasta data/movements

<movevent type="StepIn" actionid="6587" event="script" value="tilestorage.lua"/>  
No map editor coloque ActionID do tile 6587.
Não testado.
Dúvidas? Me avise.
 
Att.
Giovani Rodrigo

Olá pessoal, tive a iniciativa de criar esse tópico para atualizar e otimizar as sources do TFS 0.4 DEV que é uma das mais usadas no mundo do otserv. Conteúdo totalmente gratuito e pretendemos melhora-lo cada vez mais. 
 
Qualquer um pode colaborar, postando bugs, erros, otimizando códigos, comentar aqui no tópico, toda ajuda é bem vinda, vamos tornar essa a melhor source disponível. Conto com vocês.
 
Versão do Tibia: 8.60
 
Alguns sistema já implementados na source:
• TFS 0.4 DEV rev 3777 (by TFS Team)
• Anti-Divulgação (.servegame, .no-ip, .net, .com, .org, .pl, .biz, .br, .sytes, .info)
• War System
• Cast System (by Summ)
• Retirado bugs de anti-push ..
• Retirado bugs de elfbot ...
• Retirado erro de não aceitar outros items ...
• Retirado erro de Malformed File ...
• Add creatureevent onMoveItem()  ...
• Add função getCreaturePathTo () ...
• E vários outros!
 
Complementos:
• Add cast System (passo a passo): [AQUI]
• Pode add o comando na config.lua:
healthHealingColor = COLOR_GREEN -- [podendo alterar a cor]. manaHealingColor = COLOR_DARKPURPLE -- [podendo alterar a cor]. Downloads:
• Distro Compilada 32x
• Distro Compilada 64x
• Sources 7
 
 
TESTADO EM WINDOWS, DEBIAN 7.8, UBUNTU 12.04 E 14.05!
 
 
• Compilar em Linux: 
 
 
 
• Erros para arrumar: 
 


Obrigado ao runeraserver pelo incentivo em fixa-la para linux

E é isso pessoal, espero ter ajudado, abraços
 

utevosio:
--Spell Method by Night Wolf local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 39) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) local config = { tempo = 15, --- tempo que vai ficar recuperando mana (tempo total) mana = 15, -- quanto de mana ganha a cada intervalo intervalo = 1  --- intervalo que leva pra recuperar X de mana,  } local condition = createConditionObject(CONDITION_FOOD) setConditionParam(condition, CONDITION_PARAM_TICKS, config.tempo*1000) setConditionParam(condition, CONDITION_PARAM_BUFF, true) setConditionParam(condition, CONDITION_PARAM_MANAGAIN, config.mana) setConditionParam(condition, CONDITION_PARAM_MANATICKS, config.intervalo*1000) setCombatCondition(combat, condition) function onCastSpell(cid, var) return doCombat(cid, combat, var) end   exorisio
--Spell Method by Night Wolf local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 39) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) local config = { tempo = 60, --- tempo que vai durar a spell percent = 20 -- quanto % vai aumentar } local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, config.tempo*1000) setConditionParam(condition, CONDITION_PARAM_BUFF, true) setConditionParam(condition, CONDITION_PARAM_SKILL_CLUBPERCENT, 100+config.percent) setConditionParam(condition, CONDITION_PARAM_SKILL_SWORDPERCENT, 100+config.percent) setConditionParam(condition, CONDITION_PARAM_SKILL_AXEPERCENT, 100+config.percent) setConditionParam(condition, CONDITION_PARAM_SKILL_DISTANCEPERCENT, 100+config.percent) setCombatCondition(combat, condition) function onCastSpell(cid, var) return doCombat(cid, combat, var) end utamogransio
 
--Spell Method by Night Wolf local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 39) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) local config = { tempo = 60, --- tempo que vai durar a spell percent = 25 -- quanto % vai aumentar } local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, config.tempo*1000) setConditionParam(condition, CONDITION_PARAM_BUFF, true) setConditionParam(condition, CONDITION_PARAM_SKILL_SHIELDPERCENT, 100+config.percent) setCombatCondition(combat, condition) function onCastSpell(cid, var) return doCombat(cid, combat, var) end vitagransio
 
--Spell Method by Night Wolf local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 39) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, false) local config = { tempo = 60, --- tempo que vai durar a spell percent = 25 -- quanto % vai aumentar } local condition = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition, CONDITION_PARAM_TICKS, config.tempo*1000) setConditionParam(condition, CONDITION_PARAM_BUFF, true) setConditionParam(condition, CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT, 100+config.percent) setCombatCondition(combat, condition) function onCastSpell(cid, var) return doCombat(cid, combat, var) end e no spells.xml
 
<instant name="Buff Mana" words="utevo sio" lvl="40" mana="100" maglv="90" prem="1" aggressive="0" needtarget="1" params="1" exhaustion="1500" needlearn="0" event="script" value="especiais/utevosio.lua"> </instant> <instant name="Buff Skills" words="exori sio" lvl="40" mana="100" maglv="90" prem="1" aggressive="0" needtarget="1" params="1" exhaustion="1500" needlearn="0" event="script" value="especiais/exorisio.lua"> </instant> <instant name="Buff Shield" words="utamo gran sio" lvl="40" mana="100" maglv="120" prem="1" aggressive="0" needtarget="1" params="1" exhaustion="1500" needlearn="0" event="script" value="especiais/utamogransio.lua"> </instant> <instant name="Buff Hit Points" words="vita gran sio" lvl="40" mana="100" maglv="120" prem="1" aggressive="0" needtarget="1" params="1" exhaustion="1500" needlearn="0" event="script" value="especiais/vitagransio.lua"> com base nisso vc cria as outras.. espero ter ajudado.