luanluciano93

Eu não queria falar nada, mas esse script que você postou não tem nada haver com uma premium scroll, enfim .. 
-- <action itemid="16101" script="other/premiumscroll.lua"/> function onUse(cid, item, fromPosition, itemEx, toPosition) local player, days = Player(cid), 30 -- quantidade de dias vip if(player:getPremiumDays() < 330) then player:addPremiumDays(days) player:sendTextMessage(MESSAGE_INFO_DESCR, 'You have bought ' .. days .. ' days of premium account.') player:getPosition():sendMagicEffect(CONST_ME_MAGIC_GREEN) Item(item.uid):remove(1) else player:sendCancelMessage('You can not buy more than 360 days of Premium Account.') player:getPosition():sendMagicEffect(CONST_ME_POFF) end return true end 2 bjs!

.

ALTER TABLE`accounts` ADD `vip_time` INT(11) NOT NULL DEFAULT '0'

Mude:
Game.setGameState(GAMESTATE_SHUTDOWN) Para:
Game.setGameState(GAME_STATE_SHUTDOWN) ACHO que é isso!

@makerrox, onde esta db.executeQuery, mude para db.query

@PriisioneR, o que o script que tu postou tem de diferente do dele? 

Vá em movements/scripts/ e crie um arquivo com o nome castle24_movements.lua e coloque isso dentro:
function isPlayerGuild(cid) if getPlayerGuildName(cid) ~= "" then return true end end function onStepIn(cid, item, position, fromPosition) local STORAGE_GUILD_WIN = 123123, if isPlayerGuild(cid) == true then if getPlayerGuildId(cid) ~= getGlobalStorageValue(STORAGE_GUILD_WIN) then doBroadcastMessage("O(a) Jogador "..getCreatureName(cid).." esta tentando invadir o castle da guild \""..getPlayerGuildName(cid) ..".", 22) else doPlayerSendCancel(cid,"Avance") end else doPlayerSendCancel(cid,"Avance") end return true end Só verifica se o STORAGE da Guild vencedora está correto!
 
E depois adicione a tag em movements/movements.xml:
<action uniqueid="9001" script="castle24_movements.lua" />

Vá no arquivo config_and_functions e depois de:
session_start();   Coloque: date_default_timezone_set("America/Sao_Paulo");

Se criar coloca no diretório, agora se quiser a pasta normal, mude no script todas as partes que tem isso ...
<img src="item_images/'.$item['id'].'.gif"> Para a pasta que tu quer ....
<img src="xxxx/'.$item['id'].'.gif">

@, barra de pesquisas *--*

• http://www.tibiaking.com/forum/topic/22899-shop-system-completo-modern-aac/
 
@Law Trafalgar, crie um tópico para tal coisa, não venha comentar o tópico de outros com assuntos totalmente diferentes, LEIA AS REGRAS, por favor  ​   
@Max willain, você já deve saber disso tbem!  

Eu não entendo nada de poketibia, mas vou tentar ajudar ... deixe apenas 1 sample, para ser a vocação base, provavelmente o poketibia usa o first items igual aos ots de tibia, para dar os pokemons inicias .. se tu quiser fazer como quest retire o first items .... 
 
No config.php deixe assim .. 
/*Names of vocations as in database as samples. First key is world id and second vocation id.*/ $config['newchar_vocations'][0][1] = "Charmander Sample"; /*List of vocation available to choose when creating new character*/ $config['vocations'] = array(1=>"Charmander");   /*List of vocation that exists on server*/ $config['server_vocations'] = array(1=>"Pokemon Trainer"); E no arquivo de criação volte a opção de escolher vocaton ... 

Cara eu nunca mexi com Nicaw, eu aconselho pesquisar sobre como implementar o captcha ... poderia resolver facilmente seu problema!

Caso não consigo, poste aqui o arquivo de criarção de account que podemos tentar juntos .. 

<img src="./layouts\tibiacom\images\menu/anthack.jpg">
 
ou 
 
<img src="./'.$layout_name.'\images\menu/anthack.jpg"> [se tiver dentro do php]
<img src="./<?php $layout_name ?>\images\menu/anthack.jpg"> [se tiver fora do php]

ALTER TABLE `accounts` ADD `viptime` INT(11) NOT NULL DEFAULT '0';

-- ### CONFIG ### -- message send to player by script "type" (types you can check in "global.lua") SHOP_MSG_TYPE = 18 -- time (in seconds) between connections to SQL database by shop script SQL_interval = 30 -- ### END OF CONFIG ### function onThink(interval, lastExecution) local result_plr = db.storeQuery("SELECT * FROM z_ots_comunication") if(result_plr ~= false) then repeat local id = tonumber(result.getDataInt(result_plr, "id")) local action = tostring(result.getDataString(result_plr, "action")) local delete = tonumber(result.getDataInt(result_plr, "delete_it")) local cid = getPlayerByName(tostring(result.getDataString(result_plr, "name"))) if(cid) then local itemtogive_id = tonumber(result.getDataInt(result_plr, "param1")) local itemtogive_count = tonumber(result.getDataInt(result_plr, "param2")) local container_id = tonumber(result.getDataInt(result_plr, "param3")) local container_count = tonumber(result.getDataInt(result_plr, "param4")) local add_item_type = tostring(result.getDataString(result_plr, "param5")) local add_item_name = tostring(result.getDataString(result_plr, "param6")) local received_item = 0 local full_weight = 0 if(add_item_type == 'container') then container_weight = getItemWeight(container_id, 1) if(isItemRune(itemtogive_id)) then items_weight = container_count * getItemWeight(itemtogive_id, 1) else items_weight = container_count * getItemWeight(itemtogive_id, itemtogive_count) end full_weight = items_weight + container_weight else full_weight = getItemWeight(itemtogive_id, itemtogive_count) if(isItemRune(itemtogive_id)) then full_weight = getItemWeight(itemtogive_id, 1) else full_weight = getItemWeight(itemtogive_id, itemtogive_count) end end local free_cap = getPlayerFreeCap(cid) if(full_weight <= free_cap) then if(add_item_type == 'container') then local new_container = doCreateItemEx(container_id, 1) local iter = 0 while(iter ~= container_count) do doAddContainerItem(new_container, itemtogive_id, itemtogive_count) iter = iter + 1 end received_item = doPlayerAddItemEx(cid, new_container) else local new_item = doCreateItemEx(itemtogive_id, itemtogive_count) received_item = doPlayerAddItemEx(cid, new_item) end if(type(received_item) == "number" and received_item == RETURNVALUE_NOERROR) then doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, 'You received >> '.. add_item_name ..' << from OTS shop.') db.query("DELETE FROM `z_ots_comunication` WHERE `id` = " .. id .. ";") db.query("UPDATE `z_shop_history_item` SET `trans_state`='realized', `trans_real`=" .. os.time() .. " WHERE id = " .. id .. ";") else doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. Please make place for this item in your backpack/hands and wait about '.. SQL_interval ..' seconds to get it.') end else doPlayerSendTextMessage(cid, SHOP_MSG_TYPE, '>> '.. add_item_name ..' << from OTS shop is waiting for you. It weight is '.. full_weight ..' oz., you have only '.. free_cap ..' oz. free capacity. Put some items in depot and wait about '.. SQL_interval ..' seconds to get it.') end end until not result.next(result_plr) result.free(result_plr) end return true end <globalevent name="Shop" interval="60000" script="shop.lua" />

cria uma database, entra nela, depois tu importa .. 

CREATE TABLE `z_forum` ( `id` int(11) NOT NULL auto_increment, `sticky` tinyint(1) NOT NULL DEFAULT '0', `closed` tinyint(1) NOT NULL DEFAULT '0', `first_post` int(11) NOT NULL default '0', `last_post` int(11) NOT NULL default '0', `section` int(3) NOT NULL default '0', `icon_id` int(3) NOT NULL default '1', `replies` int(20) NOT NULL default '0', `views` int(20) NOT NULL default '0', `author_aid` int(20) NOT NULL default '0', `author_guid` int(20) NOT NULL default '0', `post_text` text NOT NULL, `post_topic` varchar(255) NOT NULL, `post_smile` tinyint(1) NOT NULL default '0', `post_date` int(20) NOT NULL default '0', `last_edit_aid` int(20) NOT NULL default '0', `edit_date` int(20) NOT NULL default '0', `post_ip` varchar(32) NOT NULL default '0.0.0.0', PRIMARY KEY (`id`), KEY `section` (`section`) ) ENGINE=MyISAM AUTO_INCREMENT=1; Ajudei? Clique em Gostei.

É no layout.php ...

Altera aqui: 
$acc = $SQL->query('SELECT flag, vip_time, premdays FROM '.$SQL->tableName('accounts').' WHERE '.$SQL->fieldName('id').' = '.$player['account_id'].' LIMIT 1;')->fetch(); E aqui:
<TD>'.($acc['premdays'] > 0 ? '<font color="green"><b>Premium Account</b></font>' : '<font color="red"><b>Free Account</b></font></TD>').' Não testei, mas deve dar certo ...

Tente usar add isso na database: 
ALTER TABLE `guilds` ADD `frags` INT(11) NOT NULL DEFAULT 0; ALTER TABLE `guilds` ADD `acesstime` INT(15) NOT NULL DEFAULT 0; Acho que se servidor usa esse sistema ...

http://www.tibiaking.com/forum/topic/12235-gfs-guild-frag-system/

• Source 10.37 - Cast System - Exclusiva !
http://www.tibiaking.com/forum/topic/34384-source-1037-cast-system-exclusiva/

ALTER TABLE `bans` ADD `reason` INT(10) NOT NULL;

O erro é na linha 33, eu não entendi a expressão .. 
doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_ORANGE,getCreatureName(getGlobalStorageValue(cid, arena_room))..' is now in next room. Wait a moment and try again.') Alguém pode ajudar?

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE) setCombatParam(combat, COMBAT_PARAM_TARGETCASTERORTOPMOST, TRUE) function onCastSpell(cid, var) doCreatureAddHealth(cid, 10000) doCreatureSay(cid,"Aaaah...", TALKTYPE_ORANGE_1) return doCombat(cid, combat, var) end

Tenta ai e me avisa
-- <globalevent name="Server" interval="900000" script="serversave.lua"/> -- 900000 = 15 MIN local shutdownAtServerSave = false local cleanMapAtServerSave = false local function serverSave() if shutdownAtServerSave then Game.setGameState(GAME_STATE_SHUTDOWN) else Game.setGameState(GAME_STATE_NORMAL) end if cleanMapAtServerSave then cleanMap() end saveServer() end local function secondServerSaveWarning() broadcastMessage("Server is saving game in one minute. Please go to a safe place.", MESSAGE_STATUS_WARNING) addEvent(serverSave, 60000) end local function firstServerSaveWarning() broadcastMessage("Server is saving game in 3 minutes. Please go to a safe place.", MESSAGE_STATUS_WARNING) addEvent(secondServerSaveWarning, 120000) end function onThink(interval) broadcastMessage("Server is saving game in 5 minutes. Please go to a safe place.", MESSAGE_STATUS_WARNING) Game.setGameState(GAME_STATE_STARTUP) addEvent(firstServerSaveWarning, 120000) return not shutdownAtServerSave end

Tem vários na seção de download de websites amigo .... 

• http://www.tibiaking.com/forum/topic/9581-modern-aac-website-poketibia-10/
• http://www.tibiaking.com/forum/topic/14364-modern-aac-web-site-para-poketibia-minitutorial/
• http://www.tibiaking.com/forum/topic/26728-modern-accpoketibiawebsite-poketibia-30/
• http://www.tibiaking.com/forum/topic/33828-layout-pokemon-modernaac/
 
E outros ... espero ter ajudado!