Após anos sem contribuir com um servidor fico feliz em lançar essa versão com muitas correções!

Está versão é a versão OPEN_BETA.

Que pode ser testada aqui. (Online até dia 25/05/2023)

Foram corrigos muitos bugs e existem diversas melhorias em muitos dos sistemas existentes.

Vocês podem encontrar as Libs que devem estar com uns 30% desses novos sistemas que foram adicionados e podem testar ou usar os códigos.

O servidor esta online a 120+ dias, foi construído com XP 1 e bateu 66 Players Online.

O ideal é usar este servidor em low rate.

Atualizações

Verifique a pagina do facebook para saber todas as atualizações!
Se você curtiu acompanhe a pagina para acompanha o lançamento do jogo oficial!
 
Importante
 

A cada onda do nosso sistema de incursões, você terá a chance de encontrar um Pokémon Shiny raro e, após a terceira onda, um chefe shiny ainda mais raro aparecerá, oferecendo recompensas valiosas para os treinadores ousados o suficiente para enfrentá-lo.
Utilize seus tokens de incursão para reiniciar o sistema e tentar novamente.

Para saber sobre todas as novidades Por favor considere olhar nossa pagina,

https://www.facebook.com/pokexadventure/photos
 
Imagens
 
 
Downloads

Para configurar basta substituir a pasta data que você pode encontrar fazendo download da source, cole a pasta data baixa do Pokexadventure e divirta-se!

Sources

pokexadventure_open_beta_datapack.rar

DLLS + Executaveis (Windows)

OTC
 
(mediafire.com)
 
Website
 
https://github.com/otsoft/myaac

Ferramentas : 
auto_restarter_windows.bat

RME 3.5 ou superior.

Object builder 10.98 Support ou superior.

Item editor 10.98 Support ou superior.

Tutoriais para Compilações
 

Créditos : @Underewar @pota

PokeFans é um servidor feito em cima base disponibilizada pelo @pota. No inicio era um projeto para estudar a TFS 1.2, visto que sempre trabalhei com 0.3.6.
Fiquei maravilhado com a simplicidade e as possibilidades quase infinitas da base. Comecei a me dedicar mais e eventualmente nos tornamos um servidor sério.
 
O PokeFans possui diversos sistemas novos que foram implementados em cima da base POTA, muitos mesmos, seria incapaz de nomear todos neste post, então deixo o link do https://trello.com/b/ELrkzeTi/pokefans
 
O servidor era muito popular por um tempo, atingindo números bem altos para um Poketibia (100 ~ 120 players), mas eventualmente tivemos problemas sérios com lag,
não sei se por alguém atacando, conflito de código causado pela quantidade de mudanças que fiz, fato é que após muito buscar uma resposta, finalmente consegui resolver o lag, mas não sem antes perder certa de 70% da player base.
Junto à isso tive problemas pessoas sérios e tudo isso acabou me desmotivando bastante, entretanto, PokeFans pra mim foi uma ótima fase, fiz muitos amigos, tive bons momentos e aprendi ainda mais sobre lua, c++ e até esse HTML esquisito que usamos no OTC. Por isso não podia deixar a base mofando no meu drive, ela merece estar online e proporcionar bons momentos à todos.
 
E com esta longa carta introdutória, com vocês, PokeFans.
 
IMAGENS/SISTEMAS/CONTEUDO
 
DOWNLOAD
https://mega.nz/file/zVBVgKIZ#mfJZjw93ir3Rrpb05qfnafMMw9dlU3KJL9hLUQCXoV8
https://www.mediafire.com/file/ejry9qxpe71mkvz/pokefans.rar/file
SCAN
https://www.virustotal.com/gui/url/f5da18695fff6d14f92c75e6d211de27c450abc5c12bfe861466c6ee9ed37578/detection
https://www.virustotal.com/gui/url/d750e2fad1faab64b5f549c854ecddb03a27ff938e03981f0f696aa16eb4a818?nocache=1
(Deu flag ESTsecurity - Malicious, não faço ideia do que seja, se alguém puder me auxiliar no que seja)
 
OBSERVAÇÕES
Não prestarei suporte à base, entretanto, atuo como freelancer de luascript e modulos para OTC, você pode entrar em contato comigo pelo Discord: zayonowatari
Para abrir o mapa no Remeres você precisa de um SPR/DAT sem transparência, basta salvar sem transparência diretamente do object builder.
Caso você tenha gostado da base e tenha interesse em fazer uma doação, utilize essa chave pix: f3cb7525-2b8c-47f8-8db6-876c8cd68bde
 
CRÉDITOS
@pota - por todo o seu trabalho e humildade em disponibilizar sua base inicialmente, sem ela não estariamos aqui.
theforgottenserver - sem eles nenhuma base estaria aqui.
OTLand e Tibiaking - ambas as comunidades me auxiliaram a vida toda com todas as dúvidas que tive, respeito máximo à todos que fazem parte disso.

Sorry I don't speak spanish so you will have to bare with me.
 
This is a new way for people to create npc's which use different types of currency, rather than a coming up with different items to trade with the npc or trying to edit the npc modules this method simplifies everything by providing the npc with a npc currency id.
 
All this npc currency id is, is a storage value.. pretty simple eh?
If the npc doesn't have a currency id then it will use the normal currency e.g. gold, plat, cc etc..
 
I originally posted this on otland, but fuck them xD
 
Using Lailene here you can see she has a currency attribute with id of 123456
<?xml version="1.0" encoding="UTF-8"?> <npc name="Lailene" currency="123456" script="lailene.lua" walkinterval="2000" floorchange="0" speechbubble="2"> <health now="100" max="100"/> <look type="279" head="114" body="94" legs="113" feet="114" addons="0"/> </npc>  
Now any player who has a storage value of 123456 can purchase things from her shop provided they have enough value stored within the storage, similar to having money in the bank.
The money or in this case the storage value is added and removed from the player in real time.
 
Lets get to the code
 
game.cpp
Find this
bool Game::removeMoney(Cylinder* cylinder, uint64_t money, uint32_t flags /*= 0*/) Replace the whole function with this.
bool Game::removeMoney(Cylinder* cylinder, uint64_t money, uint32_t flags /*= 0*/) { if (cylinder == nullptr) { return false; } if (money == 0) { return true; } uint32_t currencyId = 0; Player* player; if (Creature* creature = cylinder->getCreature()) { if (Player* p = creature->getPlayer()) { currencyId = p->getNpcCurrencyId(); player = p; } } if (!currencyId) { std::vector<Container*> containers; std::multimap<uint32_t, Item*> moneyMap; uint64_t moneyCount = 0; for (size_t i = cylinder->getFirstIndex(), j = cylinder->getLastIndex(); i < j; ++i) { Thing* thing = cylinder->getThing(i); if (!thing) { continue; } Item* item = thing->getItem(); if (!item) { continue; } Container* container = item->getContainer(); if (container) { containers.push_back(container); } else { const uint32_t worth = item->getWorth(); if (worth != 0) { moneyCount += worth; moneyMap.emplace(worth, item); } } } size_t i = 0; while (i < containers.size()) { Container* container = containers[i++]; for (Item* item : container->getItemList()) { Container* tmpContainer = item->getContainer(); if (tmpContainer) { containers.push_back(tmpContainer); } else { const uint32_t worth = item->getWorth(); if (worth != 0) { moneyCount += worth; moneyMap.emplace(worth, item); } } } } if (moneyCount < money) { return false; } for (const auto& moneyEntry : moneyMap) { Item* item = moneyEntry.second; if (moneyEntry.first < money) { internalRemoveItem(item); money -= moneyEntry.first; } else if (moneyEntry.first > money) { const uint32_t worth = moneyEntry.first / item->getItemCount(); const uint32_t removeCount = (money / worth) + 1; addMoney(cylinder, (worth * removeCount) - money, flags); internalRemoveItem(item, removeCount); break; } else { internalRemoveItem(item); break; } } } else { int32_t value; player->getStorageValue(currencyId, value); if (value < money) { return false; } player->addStorageValue(currencyId, value - money); } return true; } Next find this
void Game::addMoney(Cylinder* cylinder, uint64_t money, uint32_t flags /*= 0*/) Replace the whole function with this
void Game::addMoney(Cylinder* cylinder, uint64_t money, uint32_t flags /*= 0*/) { if (money == 0) { return; } if (Creature* creature = cylinder->getCreature()) { if (Player* player = creature->getPlayer()) { if(uint32_t currencyId = player->getNpcCurrencyId()){ int32_t value; player->getStorageValue(currencyId, value); player->addStorageValue(currencyId, value + money); return; } } } uint32_t crystalCoins = money / 10000; money -= crystalCoins * 10000; while (crystalCoins > 0) { const uint16_t count = std::min<uint32_t>(100, crystalCoins); Item* remaindItem = Item::CreateItem(ITEM_CRYSTAL_COIN, count); ReturnValue ret = internalAddItem(cylinder, remaindItem, INDEX_WHEREEVER, flags); if (ret != RETURNVALUE_NOERROR) { internalAddItem(cylinder->getTile(), remaindItem, INDEX_WHEREEVER, FLAG_NOLIMIT); } crystalCoins -= count; } uint16_t platinumCoins = money / 100; if (platinumCoins != 0) { Item* remaindItem = Item::CreateItem(ITEM_PLATINUM_COIN, platinumCoins); ReturnValue ret = internalAddItem(cylinder, remaindItem, INDEX_WHEREEVER, flags); if (ret != RETURNVALUE_NOERROR) { internalAddItem(cylinder->getTile(), remaindItem, INDEX_WHEREEVER, FLAG_NOLIMIT); } money -= platinumCoins * 100; } if (money != 0) { Item* remaindItem = Item::CreateItem(ITEM_GOLD_COIN, money); ReturnValue ret = internalAddItem(cylinder, remaindItem, INDEX_WHEREEVER, flags); if (ret != RETURNVALUE_NOERROR) { internalAddItem(cylinder->getTile(), remaindItem, INDEX_WHEREEVER, FLAG_NOLIMIT); } } }  
npc.cpp
Look for this
pugi::xml_attribute attr; if ((attr = npcNode.attribute("speed"))) { baseSpeed = pugi::cast<uint32_t>(attr.value()); } else { baseSpeed = 100; } Right underneath that you are going to place this.
if ((attr = npcNode.attribute("currency"))) { currency = pugi::cast<uint32_t>(attr.value()); }  
npc.h
Look for this
bool isPushable() const final { return walkTicks > 0; } Place this right underneath
uint32_t getCurrencyId() const { return currency; } Look for this
uint32_t walkTicks; Place this right underneath
uint32_t currency;  
player.cpp
Find this
void Player::openShopWindow(Npc* npc, const std::list<ShopInfo>& shop) Replace that function with this
void Player::openShopWindow(Npc* npc, const std::list<ShopInfo>& shop) { shopItemList = shop; sendShop(npc); sendSaleItemList(npc); } Next find this
bool Player::updateSaleShopList(const Item* item) Replace that function with this
bool Player::updateSaleShopList(const Item* item) { uint16_t itemId = item->getID(); if (itemId != ITEM_GOLD_COIN && itemId != ITEM_PLATINUM_COIN && itemId != ITEM_CRYSTAL_COIN) { auto it = std::find_if(shopItemList.begin(), shopItemList.end(), [itemId](const ShopInfo& shopInfo) { return shopInfo.itemId == itemId && shopInfo.sellPrice != 0; }); if (it == shopItemList.end()) { const Container* container = item->getContainer(); if (!container) { return false; } const auto& items = container->getItemList(); return std::any_of(items.begin(), items.end(), [this](const Item* containerItem) { return updateSaleShopList(containerItem); }); } } if (client) { client->sendSaleItemList(shopOwner, shopItemList); } return true; } Next you are going to look for
uint64_t Player::getMoney() const Now right underneath that function you are going to place these.
uint64_t Player::getMoney(Npc* npc) const { uint64_t cash; setNpcCurrencyId(npc); uint32_t currencyId = getNpcCurrencyId(); if (currencyId) { int32_t value; getStorageValue(currencyId, value); cash = (uint64_t)value; } else { cash = getMoney(); } return cash; } void Player::setNpcCurrencyId(Npc* npc) const{ currencyId = npc->getCurrencyId(); } uint32_t Player::getNpcCurrencyId() const { return currencyId; }  
player.h
Look for this
uint64_t getMoney() const; Place this right underneath
uint64_t getMoney(Npc*) const; void setNpcCurrencyId(Npc*) const; uint32_t getNpcCurrencyId() const; Find this
void sendShop(Npc* npc) const { if (client) { client->sendShop(npc, shopItemList); } } Place this right underneath
void sendSaleItemList(Npc* npc) const { if (client) { client->sendSaleItemList(npc, shopItemList); } } Find this
uint32_t manaMax; Place this right underneath
mutable uint32_t currencyId;  
protocolgame.cpp
Now find this function
void ProtocolGame::sendSaleItemList(const std::list<ShopInfo>& shop) Place this right underneath
void ProtocolGame::sendSaleItemList(Npc* npc, const std::list<ShopInfo>& shop) { NetworkMessage msg; msg.addByte(0x7B); msg.add<uint64_t>(player->getMoney(npc)); std::map<uint16_t, uint32_t> saleMap; if (shop.size() <= 5) { // For very small shops it's not worth it to create the complete map for (const ShopInfo& shopInfo : shop) { if (shopInfo.sellPrice == 0) { continue; } int8_t subtype = -1; const ItemType& itemType = Item::items[shopInfo.itemId]; if (itemType.hasSubType() && !itemType.stackable) { subtype = (shopInfo.subType == 0 ? -1 : shopInfo.subType); } uint32_t count = player->getItemTypeCount(shopInfo.itemId, subtype); if (count > 0) { saleMap[shopInfo.itemId] = count; } } } else { // Large shop, it's better to get a cached map of all item counts and use it // We need a temporary map since the finished map should only contain items // available in the shop std::map<uint32_t, uint32_t> tempSaleMap; player->getAllItemTypeCount(tempSaleMap); // We must still check manually for the special items that require subtype matches // (That is, fluids such as potions etc., actually these items are very few since // health potions now use their own ID) for (const ShopInfo& shopInfo : shop) { if (shopInfo.sellPrice == 0) { continue; } int8_t subtype = -1; const ItemType& itemType = Item::items[shopInfo.itemId]; if (itemType.hasSubType() && !itemType.stackable) { subtype = (shopInfo.subType == 0 ? -1 : shopInfo.subType); } if (subtype != -1) { uint32_t count; if (!itemType.isFluidContainer() && !itemType.isSplash()) { count = player->getItemTypeCount(shopInfo.itemId, subtype); // This shop item requires extra checks } else { count = subtype; } if (count > 0) { saleMap[shopInfo.itemId] = count; } } else { std::map<uint32_t, uint32_t>::const_iterator findIt = tempSaleMap.find(shopInfo.itemId); if (findIt != tempSaleMap.end() && findIt->second > 0) { saleMap[shopInfo.itemId] = findIt->second; } } } } uint8_t itemsToSend = std::min<size_t>(saleMap.size(), std::numeric_limits<uint8_t>::max()); msg.addByte(itemsToSend); uint8_t i = 0; for (std::map<uint16_t, uint32_t>::const_iterator it = saleMap.begin(); i < itemsToSend; ++it, ++i) { msg.addItemId(it->first); msg.addByte(std::min<uint32_t>(it->second, std::numeric_limits<uint8_t>::max())); } writeToOutputBuffer(msg); }  
protocolgame.h
Find this
void sendSaleItemList(const std::list<ShopInfo>& shop); Place this right underneath
void sendSaleItemList(Npc* npc, const std::list<ShopInfo>& shop);  
luascript.cpp
Find
int LuaScriptInterface::luaPlayerAddMoney(lua_State* L) Replace that whole function with this
int LuaScriptInterface::luaPlayerAddMoney(lua_State* L) { // player:addMoney(money[, currencyId]) uint64_t money = getNumber<uint64_t>(L, 2); uint32_t currencyId = getNumber<uint32_t>(L, 3); Player* player = getUserdata<Player>(L, 1); if (player) { if (currencyId) { int32_t value; player->getStorageValue(currencyId, value); player->addStorageValue(currencyId, value + money); } else { g_game.addMoney(player, money); } pushBoolean(L, true); } else { lua_pushnil(L); } return 1; } Next find this function which should be right below it.
int LuaScriptInterface::luaPlayerRemoveMoney(lua_State* L) Replace that whole function with this
int LuaScriptInterface::luaPlayerRemoveMoney(lua_State* L) { // player:removeMoney(money[, currencyId]) Player* player = getUserdata<Player>(L, 1); if (player) { uint64_t money = getNumber<uint64_t>(L, 2); uint32_t currencyId = getNumber<uint32_t>(L, 3); if (currencyId) { int32_t value; player->getStorageValue(currencyId, value); if (value < money) { pushBoolean(L, false); return 1; } player->addStorageValue(currencyId, value - money); pushBoolean(L, true); } else { pushBoolean(L, g_game.removeMoney(player, money)); } } else { lua_pushnil(L); } return 1; }  

Olá, bom dia a todos.
 
Como tenho visto muitíssimos pedidos neste sentido, lhes apresento o LMS - Last Man Standing com BroadCast




 

Evento Loteria 
 
 
Esse evento loteria é diferente dos demais que existem hoje nos servidores, é baseado em cima de um evento que ocorre no CraftLandia (um servidor de Minecraft).
Quando o evento for iniciado o jogador poderá pagar um valor (configurável) para tentar acertar o número premiado (que vai de 1 até o número configurado). O evento tem um tempo de duração (configurável) e o primeiro jogador a acertar qual é o número premiado levará um premio em dinheiro (configurável) e o evento será encerrado.
 
Demonstrações:
 
 
 
 
Comandos:
 
 
Configuração:
 
 
Caso queira implementar este evento em seu servidor, crie os arquivos abaixo.
 
data/lib/lottery/event.lua (as configurações ficam neste arquivo)
 
 
data/globalevents/scripts/lottery.lua
 
 
data/globalevents/globalevents.xml
 
você pode por com um intervalo de tempo
 
 
ou horário fixo
 
 
data/talkactions/scripts/lottery.lua
 
 
data/talkactions/talkactions.xml
 
 
Tradução para PT-BR!
 
Caso deseje traduzir o evento, substitua o Lottery.messages inteiro em data/lib/lottery/event.lua por este
 
 
Qualquer problema, sugestão, bug ou dúvida utilize este tópico!!!