Líderes

Alguns dos poucos: [

OTChecker é uma ferramenta para jogadores e OT admins. O sistema coleta informações de jogadores e OT Servers e as utiliza para enviar notificações. Para jogadores: Encontre os melhores servidores e veja informações legais sobre eles. Você pode receber notificações quando um jogador for visto online ou avançar de level. Além disso, você pode seguir seus servers favoritos e saber quando eles estiverem offline, dentre outras opções. Para admins: Dê ao seu OT uma página bonita, mais visibilidade e veja informações úteis. Configure canais de notificação e aumente a competitividade entre seus jogadores. Diversas opções estão disponíveis. Beta test liberado! Lembre-se de selecionar o pacote Beta Tester ao criar sua conta. Site: https://otchecker.net Alguns guias: Como adicionar um server na OT List/Grid Aumentando o tamanho máximo das Network Messages Configurando notificações de OTServers e Players

Consiste em usar x item em Raichu ou Shiny raichu (Poder adicionar mais caso queira) e ao usar o x item ganhará Habilidade de fly,ja deve ter visto por ai em algum video de pxg. Créditos: Zipter98:Pela criação. Testado em PDA 1.9; Script: data/lib/configuration.lua: Coloque esta tabela: flyItem = { --["pokemon_name"] = {outfit = xxxx (número do Dat Editor - 351), speed = xxx}, ["Raichu"] = {outfit = id_outfit, speed = 600}, } data/lib/order.lua: Abaixo de: local pokemon = flys[getPokemonName(getCreatureSummons(cid)[1])] coloque: if not pokemon then pokemon = flyItem[getPokemonName(getCreatureSummons(cid)[1])].outfit else pokemon = pokemon[1] end abaixo de: local speed = flys[getPokemonName(getCreatureSummons(cid)[1])][2] coloque: if not speed then speed = flyItem[getPokemonName(getCreatureSummons(cid)[1])].speed else speed = speed[2] end Troque: doSetCreatureOutfit(cid, {lookType = pokemon[1] + 351}, -1) por: doSetCreatureOutfit(cid, {lookType = pokemon + 351}, -1) Depois, em data/creaturescripts/scripts, login.lua: Troque: doSetCreatureOutfit(cid, {lookType = flys[poke][1] + 351}, -1) por: local outfit = flys[poke] if not outfit then outfit = flyItem[poke].outfit else outfit = outfit[1] end doSetCreatureOutfit(cid, {lookType = outfit + 351}, -1) Depois, em data/actions/scripts, order.lua: Troque todos os: isInArray(skills["fly"], getPokemonName(mysum)) por: isInArray(skills["fly"], getPokemonName(mysum)) or getItemAttribute(getPlayerSlotItem(cid, 8).uid, "flyItem") Cuidado para não errar algum caractere. Ainda em data/actions/scripts, crie um arquivo com extensão .lua e coloque o seguinte conteúdo: function onUse(cid, item, fromPosition, itemEx, toPosition) if isCreature(itemEx.uid) then return doPlayerSendCancel(cid, "Use this in pokeballs.") elseif not getItemAttribute(itemEx.uid, "poke") then return doPlayerSendCancel(cid, "Use this in pbs w/ pokemons.") elseif not flyItem[getItemAttribute(itemEx.uid, "poke")] then return doPlayerSendCancel(cid, "You can't use this item on this pokemon.") elseif getItemAttribute(getPlayerSlotItem(cid, 8).uid, "flyItem") then return doPlayerSendCancel(cid, "This pokemon can already fly.") end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Now your pokemon can fly.") doItemSetAttribute(itemEx.uid, "flyItem", true) doRemoveItem(item.uid, 1) return true end Tag do actions: <action itemid="ID_DO_ITEM_que_dara_fly" event="script" value="nome_do_arquivo.lua"/>

Fala pessoal do XT, hoje vim trazer pra vocês um sistema que eu desenvolvi nessa última semana e inclusive fiz um tópico na seção de show off (confira o tópico aqui) numa tentativa de agitar um pouco e prover uma certa especulação em relação ao sistema. Bom, eu to aqui hoje pra informar que deu mais que certo e que meu tópico humilde (que eu realmente acreditava que seria ignorado, ainda mais numa seção morta como aquela) teve uma repercursão enorme (inclusive indo parar no portal do XT ) Bom, toda pessoa quando faz um código espera que ele agrade aos demais e tenha um certo valor, e bem, vocês superaram minhas expectativas.. com isso nada mais justo do que compartilhar com essa comunidade que me recebeu tão bem . Chega de falatório e vamos direto aos negócios: Introdução:O sistema em si é uma cópia dos jogos de ritmo (GuitarFreaks, Band Hero, Rocksmith e o próprio Guitar Hero). Neste jogo pequenas notas irão cair pela tela até atingir um local especial, onde você poderá usar as teclas (Shift + 7, Shift + 8, Shift + 9, ou apenas 7, 9 e 9 [com Num Lock desativado]) para escolher as direções que as notas estão afim de "ativá-las". Uma vez ativada a nota ela será "queimada" e será considerado 1 acerto. Caso você não consiga ativar a nota e ela passar direto, um efeito de fumaça indicará o "Miss", o mesmo vale para se você tentar ativar uma região sem notas. Sistema de pontuação:Haverão 3 classificadores estatísticos para cada música tocada, sendo eles: Notas acertadas: O principal fator de ponto, ele que definirá seu recorde e o valor máximo q ele pode assumir será o número de notas da música. Movimentos errados: Quantidade de movimentos que você fez para alguma região que não possuia notas, conta como pontuação punitiva. Notas passadas/erradas: Quantidade de notas que você deixou escapar, note que as notas acertadas + notas passadas compõe o número total de notas da música. Por enquanto o sistema não possui nenhum preço para se jogar mas também não possui nenhuma recompensa, fiz com o intuito de ser apenas um mini game divertido dentro do Tibia. Porém o código é livre e está disponibilizado aqui embaixo pra qualquer um modificar como desejar. Video explicativo: Dificuldades:O mini game possui 3 dificuldades, porém essa quantidade é tão configurável quanto as pré definições de cada dificuldade. Além da quantidade de notas ser diferente, a velocidade com que elas descem e consequentemente o tempo que você tem pra acertá-las fica diminuido. Diferenciais:Um forte diferencial desse sistema é que ele foi feito seguindo todas as regras possíveis pra melhorar seu desempenho, desde funções recursivas leves até separação em funções encapsuladas que carregam apenas as informações necessárias. O sistema contém também algumas seguranças que serão explicadas mais abaixo juntamente com o código para prevenir bugs e garantir diversão sem dores de cabeça! Instalação (Map Editor):Primeiramente faça uma área parecida com essa daqui: Não precisa ser igualzinha, apenas seguir a mesma proporção Agora use a ferramenta de No-Logout para setar os quadradinhos que contém UID e UID2 escritos como No-Logout, isso vai impedir que players desloguem e fiquem presos dentro da sala (se eles derem exit, quando eles relogarem estarão do lado de fora da sala) Ainda olhando a foto acima, coloque 42320 nos pisos que estão escritos UID, e 42319 no piso que contém UID2. Nas alavancas, coloque uid 2819 em todas elas e coloque actionid 101 para a alavanca do fácil, 102 na alavanca do médio e 103 na do dificil; A regra é sempre 100 + dificuldade, como nós estamos utilizando apenas 3 será do 101 ao 103. Note que se você esquecer ou colocar uma dificuldade não existente o sistema adotará a dificuldade 1 como padrão para aquela alavanca. Se chegou até aqui, meus parabéns. Muito provável que você tenha feito tudo certo. Agora vamos à parte do código. Instalação (scripts):Em actions.xml insira essa linha <action uniqueid="2819" event="script" value="GHtest.lua"/> Agora em data/actions/scripts crie um arquivo com extensão.lua e chameo de GHtest. Insira o seguinte bloco de instruções dentro dele: Aproveite e já configure as posições npos, startPos e finalPos de acordo com as posições do seu map editor (olhe na segunda imagem para ver onde deve ser cada uma das posições com base na sala) Feito isso crie um arquivo em data/lib com nome qualquer, aqui em casa eu utilizei o nome 120 - Guitar Hero Lib e a extensão.lua. Coloque isto dentro desse arquivo e salve: Agora adicione a seguinte tag em data/movements/movements.xml: <movevent type="StepIn" uniqueid="42320;42319" event="script" value="GHTestmov.lua"/> Por fim crie um arquivo chamado GHTestmov.lua em data/movements/scripts e preencha seu conteúdo com as linhas abaixo: Aproveite para deixar a npos idêntica à npos que você configurou lá no actions se baseando na posição da sua sala no map editor. ------------------------ FIM ------------------ O sistema já deve funcionar como foi planejado, se você não manja de código ou quer o sistema exatamente como foi mostrado no vídeo você pode ignorar a parte abaixo. Configurando seu sistema (básico): Para as pessoas que querem configurar apenas as coisas básicas, você pode fazê-lo nas primeiras linhas de cada script (actions/movements) ou alterando diretamente na lib, irei ensinar passo a passo aqui oque significa cada coisa. Alterando a libAs coisas básicas que podem ser alteradas na lib são as seguintes: dif = { -- [dificuldade] = notas que serao tocadas (nil = vazio, 0 = primeira posicao, 1 = segunda e 2 = terceira) [1] = {nil,nil,0,1,2,nil,nil,2,1,1,0,0,2,0,1}, [2] = {nil,nil,0,1,1,2,1,1,0,0,2,0,1,nil,1,2,1,1,0,0,2,0,1}, [3] = {nil,nil,0,nil,1,nil,1,1,0,0,2,0,1,1,1,nil,0,2,1,1,0,0,2,1,1,0,nil,2,2,1,1,1,1,2} } delay = { -- delay entre cada nota de acordo com a dificuldade [dificuldade] = delay [1] = 500, [2] = 400, [3] = 300 } recorde = { -- salva os recordes de cada dificuldade separadamente [1] = 12724, [2] = 12725, [3] = 12726 } dif separa como será cada música de cada dificuldade, as notas sempre serão nesse exato formato. nil significa que não estarei usando posição nenhuma naquela linha, 0 significa a primeira posição (nota verde), 1 significa segunda opção (nota vermelha) e 2 significa terceira opção (nota azul). Eu aconselho a começar todas as músicas com 2 ou mais 'nil' para dar tempo de o player entender que vai começar. A distribuição que eu usei foi meio que aleatória então sinta-se a vontade pra mudar tanto o tamanho das musicas quanto a variedade de notas. delay é a tabela que oganiza os delays de cada dificuldade, isso significa que para a dificuldade 1(fácil) nós temos 500 milisegundos para cada mudança de nota (1000 milisegundos = 1 segundo), ou seja, a cada 2 passadas de nota temos 1 segundo dentro da sala. No modo hard a cada 300 milisegundos mudamos a nota, deixando o jogo muito mais rápido e dificil. recorde é a tabela que possui os storages que irão salvar os recordes nas respectivas dificuldades. Alterando actions local storage_point = 12721 -- storage que salva os pontos local storage_erradas = 12722 -- storage que salva as notas erradas local storage_passadas = 12723 -- storage que salva as notas que passaram Apenas mude os storages Alterando movements local itemid = 1680 --- coloque o id da nota do meio local npos = {x = 141, y = 51, z = 7} -- posicao que ira nascer a primeira nota local storage_point = 12721 -- storage que salva os pontos local storage_erradas = 12722 -- storage que salva as notas erradas local storage_passadas = 12723 -- storage que salva as notas que passaram aconselho mexer somente nos storages, mantendo igual à action. Só abra o spoiler abaixo se você estiver descontente com a forma que seu código roda e tiver certeza absoluta de que você tem o conhecimento necessário para alterar as coisas que vou explicar. Espero que vocês tenham curtido, façam um bom uso e qualquer dúvida postem nos comentários abaixo. Agradecimento ao @dalvorsn pela função que limpa a sala antes de começar o jogo e ao pessoal do servidor Refugia que fez um script de guitar hero lá e me deu a idéia. Abraços do Lobo.

apenas adicione isso na script acima da linha que adiciona o dano: local tempo = 5 -- tempo em segundos que fica sem se mexer. doCreatureSetNoMove(variantToNumber(var), true) addEvent(function() if isPlayer(variantToNumber(var)) then doCreatureSetNoMove(variantToNumber(var), false) end end, tempo * 1000) Note que pra isso vc vai precisar ter um needtarget = "1" na tag do xml. Se for uma magia em área e vc quiser paralizar quem tiver na área tem uma outra forma de fazer mas daí vou precisar que vc poste o script.

E ai galerinha, estou afastado do Tibia após o encerramento das atividades na "chaitosoft" porém nestas férias estou com um projeto de OTServer 8.60 e me deparei com alguns pequenos problemas básicos referentes a revisão 3777 do executável theforgottenserver . Isto consequentemente fez com que fosse necessário efetuar pequenas correção de alguns "maus funcionamentos", lembrando que estes são alguns dos poucos erros que encontrei e estarei atualizando esta source sempre que possível além de estar aberto a sugestões para adição de alguma funcionalidade ou correção. Alterações Efetuadas Não irei descrever muito sobre o que foi feito pois pessoas poderão se utilizar disso para trapacear nos servidores. - Problema: Estouro de memória (house.cpp); - Problema: Estouro de memória (mailbox.cpp); - Função: Sistema de Cast / Live; - Edição: Remoção de "Salt" ao criar contas (permite usar simultaneamente ACC MANAGER & SITE; - Problema: Estouro de memória (game.cpp); - Edição: Sincronia entre CAST ~ ACC MANAGER; - Edição: Aceitar todas as versões de "items.otb"; - Problema: Compilação em Ubunto 12.04 - 64x bits; Sistema Operacional Recomendado Ubunto versões menores ou igual ao 12.04 com arquitetura 64x bits; Última Edição - 18/07/2015 (V.1.0); Sources - Utilize o link abaixo para efetuar o download: https://mega.co.nz/#!KgEgXAZR!4380dQWvcYjObWYSDCfvVvfghRooJ-UZ3BY8H0gdq6o Scan - Utilize o link abaixo para visualizar o scan: https://www.virustotal.com/pt/file/5c3f3ce63f9583b987690f796456a448c3d71f3ba06b247a5532cc1147be08a5/analysis/1437212639/ Créditos: Otland - (Disponibilizou as sources);

m método diferente de agir. Escolhas diferentes, um projeto surpreendente, e o melhor é open source. Sim, você pode ter acesso a este servidor que estou desenvolvendo em parceria com a Serversoft para você. Um servidor com uma mega estrutura para suportar seus jogadores online sem nenhum problema como: debug, bug de clonagem, instabilidade entre diversos outros dos servidores free's disponíveis para download nessa vasta internet tibiana. Uma inovação no ramo de OTservers, distribuindo não só a datapack como as sourcers e os sistemas, absolutamente tudo que você procura. Basta baixar, compilar... Mas eu não sei compilar. Não há problema nisso, o OTPanel da Serversoft faz tudo isso para você. Basta clicar num botão de "play" e ver a mágica acontecer. O projeto Vanaheim, foi criado com o intuito de ser inteiramente grátis para toda a comunidade. Um servidor no qual a diversão é o fator principal, um projeto com viabilidade absoluta por todos os tibianos. O projeto conta com uma área exclusiva no GitHub para que todos possam acompanhar a evolução do mesmo, dia a dia, diversas atualizações estarão disponíveis a todos. Desde uma action até uma modificação na source vocês terão acesso. O servidor conta com um mapa Global Full, quando eu digo full, quero dizer que está 99.99% do mapa completo, sem bugs entre outros. Um servidor que você escolhe a rate experience/skill que desejar, ele vai se adaptar! Você pode escolher se quer ou não que as quests tenham as missões originais 100%! GITHUB Para acompanhar e baixar o servidor atualizado, segue o link do nosso projeto no GitHub: DOWNLOADS Servidor Mapa Yasir Scan CRÉDITOS TFS Team Orts Project

RESULTADO 1º lugar - Lumus (15 reps + medalha de ouro) 2º lugar - @Daniel & @The Jv (10 reps + medalha de prata) 3º lugar - @LinaInverse (6reps + medalha de bronze) Parabéns a todos que participaram do concurso, espero ver mais participantes no próximo!

Dice Cassino Number Random dice.lua BETS = { --[[ HIGH/LOW = 123 OR 456 ]]-- HL_MODE = true, HL_MIN = 50000, HL_MAX = 500000, HL_PAYOUT = 80, --[[ ODD/EVEN = 135 OR 246 ]]-- OE_MODE = true, OE_MIN = 30000, OE_MAX = 500000, OE_PAYOUT = 80, --[[ BLACKJACK ]]-- BJ_MODE = true, BJ_MIN = 30000, BJ_MAX = 500000, BJ_PAYOUT = 120, --[[ SINGLE NUMBERS = 1, 2, 3, 4, 5 OR 6 ]]-- NUMBERS_MODE = false, NUMBERS_MIN = 30000, NUMBERS_MAX = 500000, NUMBERS_PAYOUT = 150, --[[ FIRST/SECOND/LAST = 12, 34 OR 56 ]]-- FSL_MODE = false, FSL_MIN = 30000, FSL_MAX = 500000, FSL_PAYOUT = 80 } CONFIG = { CHECK_MONEY_BACKPACK = "Backpack", CRYSTAL_COINS_BACKPACK = "brocade Backpack", PLATINUM_COINS_BACKPACK = "Red Backpack", EXTRA_PLATINUM_COINS_BACKPACK = "beach Backpack", ITEMS_BACKPACK = "orange Backpack", PING_COMPENSATION = 60, SAY_ADVERTISEMENT = true, SAY_TIME = 45, YELL_ADVERTISEMENT = true, YELL_TIME = 120, CUSTOM_MESSAGES = true, CUSTOM_MESSAGES_RAND = 4, INFO_MESSAGES = true, WON_BET_ITEM = "lyre", LOST_BET_ITEM = "coal basin kit", FIRST_DECORATION_ITEM = "Parcel", SECOND_DECORATION_ITEM = "none", PARTY_HAT = true, PARTY_HAT_TIME = 1.5, SERVER_SAVE_TIME = "09:55:00", SHOW_HUD = true, LOGS = true, SAFE_EXIT = false, AMOUNT_CC_TO_EXIT = 3, --[[3 IS 3CC]]-- AMOUNT_PL_TO_EXIT = 10, --[[10 IS 1K]]-- ANTI_IDLE_TIME = 3, SS_EXIT = false, SAFE_BET = true, SERVER = "OTS" } AD_SAY_MSG = { "|SELF|'s Casino - Try your luck with the fastest game!", "Become a millionaire in a second at |SELF|'s Casino!", "Come and play the fastest game!", "Feeling lucky? The best payrate in all Tibia!", "Tired of slow games? Come and play at |SELF|'s Casino!" } AD_YELL_MSG = { "|SELF|'s Casino - Try your luck with the fastest game!", "Become a millionaire in a second at |SELF|'s Casino!", "Come and play the fastest game!", "Feeling lucky? The best payrate in all Tibia!", "Tired of slow games? Come and play at |SELF|'s Casino!" } INFO_MSG = { "Bets: H/L - |HLP|% | ODD/EVEN - |OEP|% | BLACKJACK - |BJP|% | NUMBERS - |NUMBERSP|% | FIRST/SECOND/LAST - |FSLP|%. Also I accepting ITEMS! If you don't know value of items ask me about 'price ItemName'." } MIN_MAX_MSG = { "Minimum: |MIN|K, Maximum: |MAX|K.", "Hello! Minumum is |MIN|K, and Maximum is |MAX|K." } ADVANCED_MIN_MAX = { "H/L - [|HLMIN|K ~ |HLMAX|K ~ |HLP|%] | ODD/EVEN - [|OEMIN|K ~ |OEMAX|K ~ |OEP|%] | BLACKJACK - [|BJMIN|K ~ |BJMAX|K ~ |BJP|%] | NUMBERS - [|NUMBERSMIN|K ~ |NUMBERSMAX|K ~ |NUMBERSP|%] | FIRST/SECOND/LAST - [|FSLMIN|K ~ |FSLMAX|K ~ |FSLP|%]." } GAMES_MSG = { "HIGH / LOW ~ ODD / EVEN ~ BLACKJACK ~ FIRST / SECOND / LAST ~ LUCKY NUMBER - {1, 2, 3, 4, 5 or 6}." } CHEAT_MSG = "Dude what you doing? Do you wanna cheat your boss?" ROLL_MSG = "" .. Self.Name() .. " rolled a" NOT_ENOUGH_GOLD = "I'm very sorry, but your bet is too high for my current money." BJ_OVER = { "Your count was |GAMBLER| and mine |PLAYER|. We were both above 21 and you lose |MONEY|K", "Looks like we both were over 21 with |PLAYER| vs. |GAMBLER|. You lose |MONEY|K" } BJ_TIE = { "It's a tie! We both got a total of |GAMBLER|, here are your |MONEY|K!", "We are tied. Both counts were |GAMBLER|. Here are your |MONEY|K back!" } BJ_WON = { "Congratulations! You rolled a |GAMBLER|, the house rolled |PLAYER|. You won |MONEY|K!", "Congratulations! Your count is |GAMBLER| and mine |PLAYER|. You have won |MONEY|K!", "Gratz! The counts were |PLAYER| vs. |GAMBLER|. Here you are, |MONEY|K!", "Aaaand we have a winner! The counts were |PLAYER| vs. |GAMBLER|. You have won |MONEY|K!", "Today must be your lucky day! Your count was |GAMBLER| and mine |PLAYER|. You won |MONEY|K!" } BJ_LOSE = { "The house wins: |PLAYER| versus |GAMBLER|. You lost |MONEY|K.", "Rough day, huh? The house wins: |PLAYER| versus |GAMBLER| You lost |MONEY|K.", "I'm sorry, maybe another time. The counts were |PLAYER| vs. |GAMBLER|", "Oh well, that's |PLAYER| vs. |GAMBLER|. I guess you can't always win..." } WELCOME = { "Welcome, |GAMBLER|! Do you want to try your luck?", "Hello, |GAMBLER|! I feel you want to become millionaire!", "Hello, |GAMBLER|! Are you curious about my games? Say 'info' or 'games'.", "Hi, |GAMBLER|! Are you feeling lucky today?" } WIN = { "Congratulations! You won |MONEY|K!", "Gratz! Here you are, |MONEY|K!", "Aaaand we have a winner! You have won |MONEY|K!", "Today must be your lucky day! You won |MONEY|K!" } LOSE = { "I'm sorry, maybe another time, btw. you lose |MONEY|K!", "Oh well you can't always win... You lose |MONEY|K!" } ITEMS = { --[[ BLUE DJINN ]]-- {id = 7436, name = "angelic axe", value = 5000}, {id = 3567, name = "blue robe", value = 10000}, {id = 3418, name = "bonelord shield", value = 1200}, {id = 3079, name = "boots of haste", value = 30000}, {id = 7412, name = "butcher's axe", value = 18000}, {id = 3381, name = "crown armor", value = 12000}, {id = 3382, name = "crown legs", value = 12000}, {id = 3419, name = "crown shield", value = 8000}, {id = 3385, name = "crown helmet", value = 2500}, {id = 3391, name = "crusader helmet", value = 6000}, {id = 3302, name = "dragon lance", value = 9000}, {id = 3416, name = "dragon shield", value = 4000}, {id = 3320, name = "fire axe", value = 8000}, {id = 3280, name = "fire sword", value = 4000}, {id = 7454, name = "glorious axe", value = 3000}, {id = 3415, name = "guardian shield", value = 2000}, {id = 3439, name = "phoenix shield", value = 16000}, {id = 7410, name = "queen's sceptre", value = 20000}, {id = 3392, name = "royal helmet", value = 30000}, {id = 7451, name = "shadow sceptre", value = 10000}, {id = 7391, name = "thaian sword", value = 16000}, {id = 3279, name = "war hammer", value = 1200}, {id = 3071, name = "wand of inferno", value = 3000}, {id = 3073, name = "wand of cosmic energy", value = 2000}, {id = 8092, name = "wand of starstorm", value = 3600}, {id = 8093, name = "wand of draconia", value = 1500}, {id = 8094, name = "wand of voodoo", value = 4400}, {id = 16096, name = "wand of defiance", value = 6500}, {id = 16115, name = "wand of everblazing", value = 6000}, --[[ GREEN DJINN ]]-- {id = 7428, name = "bonebreaker", value = 10000}, {id = 3322, name = "dragon hammer", value = 2000}, {id = 7419, name = "dreaded cleaver", value = 15000}, {id = 3281, name = "giant sword", value = 17000}, {id = 7407, name = "haunted blade", value = 8000}, {id = 3370, name = "knight armor", value = 5000}, {id = 3371, name = "knight legs", value = 5000}, {id = 3318, name = "knight axe", value = 2000}, {id = 7421, name = "onyx flail", value = 22000}, {id = 7411, name = "ornamented axe", value = 20000}, {id = 3324, name = "skull staff", value = 6000}, {id = 7413, name = "titan axe", value = 4000}, {id = 3428, name = "tower shield", value = 6000}, {id = 3434, name = "vampire shield", value = 15000}, {id = 3369, name = "warrior helmet", value = 5000}, {id = 3067, name = "hailstorm rod", value = 3000}, {id = 16117, name = "muck rod", value = 6000}, {id = 3065, name = "terra rod", value = 2000}, {id = 8082, name = "underworld rod", value = 4400}, {id = 8083, name = "northwind rod", value = 1500}, {id = 8084, name = "springsprout rod", value = 3600}, {id = 16118, name = "glacial rod", value = 20000}, --[[ RASHID ]]-- {id = 7414, name = "abyss hammer", value = 20000}, {id = 7426, name = "amber staff", value = 8000}, {id = 7404, name = "assassin dagger", value = 20000}, {id = 3344, name = "beastslayer axe", value = 1500}, {id = 10457, name = "beetle necklace", value = 1500}, {id = 7403, name = "berserker", value = 40000}, {id = 7406, name = "blacksteel sword", value = 6000}, {id = 7429, name = "blessed sceptre", value = 40000}, {id = 3408, name = "bonelord helmet", value = 7500}, {id = 7379, name = "brutetamer's staff", value = 1500}, {id = 17829, name = "buckle", value = 7000}, {id = 3435, name = "castle shield", value = 5000}, {id = 8022, name = "chain bolter", value = 40000}, {id = 7427, name = "chaos mace", value = 9000}, {id = 11674, name = "cobra crown", value = 50000}, {id = 8027, name = "composite hornbow", value = 25000}, {id = 7415, name = "cranial basher", value = 30000}, {id = 16163, name = "crystal crossbow", value = 35000}, {id = 3333, name = "crystal mace", value = 9000}, {id = 8050, name = "crystalline armor", value = 16000}, {id = 3420, name = "demon shield", value = 30000}, {id = 3019, name = "demonbone amulet", value = 32000}, {id = 7382, name = "demonrage sword", value = 36000}, {id = 7387, name = "diamond sceptre", value = 3000}, {id = 3339, name = "djinn blade", value = 15000}, {id = 3386, name = "dragon scale mail", value = 40000}, {id = 7402, name = "dragon slayer", value = 15000}, {id = 7430, name = "dragonbone staff", value = 3000}, {id = 7419, name = "dreaded cleaver", value = 15000}, {id = 3397, name = "dwarven armor", value = 30000}, {id = 7438, name = "elvish bow", value = 2000}, {id = 3326, name = "epee", value = 8000}, {id = 7457, name = "fur boots", value = 2000}, {id = 823, name = "glacier kilt", value = 11000}, {id = 829, name = "glacier mask", value = 2500}, {id = 824, name = "glacier robe", value = 11000}, {id = 819, name = "glacier shoes", value = 2500}, {id = 3063, name = "gold ring", value = 8000}, {id = 3360, name = "golden armor", value = 20000}, {id = 3364, name = "golden legs", value = 30000}, {id = 3315, name = "guardian halberd", value = 11000}, {id = 3332, name = "hammer of wrath", value = 30000}, {id = 7380, name = "headchopper", value = 6000}, {id = 3340, name = "heavy mace", value = 50000}, {id = 12683, name = "heavy trident", value = 2000}, {id = 17852, name = "helmet of the lost", value = 2000}, {id = 7389, name = "heroic axe", value = 30000}, {id = 8045, name = "hibiscus dress", value = 3000}, {id = 7422, name = "jade hammer", value = 25000}, {id = 8049, name = "lavos armor", value = 16000}, {id = 820, name = "lightning boots", value = 2500}, {id = 816, name = "lightning pendant", value = 1500}, {id = 822, name = "lightning legs", value = 11000}, {id = 828, name = "lightning headband", value = 2500}, {id = 825, name = "lightning robe", value = 11000}, {id = 7424, name = "lunar staff", value = 5000}, {id = 3366, name = "magic plate armor", value = 90000}, {id = 818, name = "magma boots", value = 2500}, {id = 826, name = "magma coat", value = 11000}, {id = 821, name = "magma legs", value = 11000}, {id = 827, name = "magma monocle", value = 2500}, {id = 7463, name = "mammoth fur cape", value = 6000}, {id = 3414, name = "mastermind shield", value = 50000}, {id = 3436, name = "medusa shield", value = 9000}, {id = 7386, name = "mercenary sword", value = 12000}, {id = 7384, name = "mystic blade", value = 30000}, {id = 3314, name = "naginata", value = 2000}, {id = 7418, name = "nightmare blade", value = 35000}, {id = 7456, name = "noble axe", value = 10000}, {id = 7460, name = "norse shield", value = 1500}, {id = 7392, name = "orcish maul", value = 6000}, {id = 17828, name = "pair of iron fists", value = 4000}, {id = 8063, name = "paladin armor", value = 15000}, {id = 3550, name = "patched boots", value = 2000}, {id = 3334, name = "pharaoh sword", value = 23000}, {id = 5461, name = "pirate boots", value = 3000}, {id = 3055, name = "platinum amulet", value = 2500}, {id = 7383, name = "relic sword", value = 25000}, {id = 3006, name = "ring of the sky", value = 30000}, {id = 7434, name = "royal axe", value = 40000}, {id = 3016, name = "ruby necklace", value = 2000}, {id = 6553, name = "ruthless axe", value = 45000}, {id = 7437, name = "sapphire hammer", value = 7000}, {id = 3440, name = "scarab shield", value = 2000}, {id = 5741, name = "skull helmet", value = 40000}, {id = 8061, name = "skullcracker armor", value = 18000}, {id = 7452, name = "spiked squelcher", value = 5000}, {id = 3554, name = "steel boots", value = 30000}, {id = 8052, name = "swamplair armor", value = 16000}, {id = 3442, name = "tempest shield", value = 35000}, {id = 812, name = "terra legs", value = 11000}, {id = 813, name = "terra boots", value = 2500}, {id = 830, name = "terra hood", value = 2500}, {id = 811, name = "terra mantle", value = 11000}, {id = 7390, name = "the justice seeker", value = 40000}, {id = 7388, name = "vile axe", value = 30000}, {id = 3342, name = "war axe", value = 12000}, {id = 2958, name = "war horn", value = 8000}, {id = 9653, name = "witch hat", value = 5000}, {id = 7408, name = "wyvern fang", value = 1500}, {id = 3549, name = "pair of soft boots", value = 1000000}, {id = 6529, name = "pair of soft boots", value = 1000000}, {id = 8026, name = "warsinger bow", value = 350000}, {id = 8023, name = "royal crossbow", value = 350000}, {id = 8090, name = "spellbook of dark mysteries", value = 750000}, {id = 8096, name = "hellforged axe", value = 350000}, {id = 8102, name = "emerald sword", value = 350000}, {id = 8100, name = "obsidian truncheon", value = 50000}, {id = 8060, name = "master archer's armor", value = 350000}, {id = 16109, name = "prismatic helmet", value = 800000}, {id = 16110, name = "prismatic armor", value = 800000}, {id = 16111, name = "prismatic legs", value = 900000}, {id = 16112, name = "prismatic boots", value = 700000}, {id = 11686, name = "royal draken mail", value = 500000}, {id = 11689, name = "elite draken helmet", value = 500000}, {id = 11688, name = "shield of corruption", value = 500000}, {id = 11691, name = "snake god's wristguard", value = 50000}, {id = 11687, name = "royal scale robe", value = 1000000}, {id = 16164, name = "mycological bow", value = 35000}, {id = 16162, name = "mycological mace", value = 30000}, {id = 8864, name = "yalahari mask", value = 800000}, {id = 8863, name = "yalahari leg piece", value = 110000}, {id = 8862, name = "yalahari armor", value = 50000}, {id = 9018, name = "firewalker boots", value = 80000}, {id = 9019, name = "firewalker boots", value = 80000}, {id = 9020, name = "worn firewalker boots", value = 80000}, {id = 6530, name = "worn soft boots", value = 100000}, --[[ ERSIK ]]-- {id = 11651, name = "elite draken mail", value = 50000}, {id = 10384, name = "zaoan armor", value = 14000}, {id = 10385, name = "zaoan helmet", value = 30000}, {id = 10386, name = "zaoan shoes", value = 5000}, {id = 10387, name = "zaoan legs", value = 14000}, {id = 4033, name = "draken boots", value = 40000}, {id = 10323, name = "guardian boots", value = 35000}, {id = 10390, name = "zaoan sword", value = 30000}, {id = 11657, name = "twiceslicer", value = 28000}, {id = 10389, name = "sais", value = 16500}, {id = 10388, name = "drakinata", value = 10000}, {id = 10391, name = "drachaku", value = 10000}, {id = 10412, name = "wailing widow's necklace", value = 3000}, --[[ WARZONE ]]-- {id = 5803, name = "arbalest", value = 42000}, {id = 3341, name = "arcane staff", value = 42000}, {id = 11693, name = "blade of corruption", value = 60000}, {id = 7416, name = "bloody edge", value = 30000}, {id = 645, name = "blue legs", value = 15000}, {id = 3295, name = "bright sword", value = 6000}, {id = 6162, name = "ceremonial ankh", value = 20000}, {id = 9394, name = "claw of 'the noxious spawn'", value = 15000}, {id = 3068, name = "crystal wand", value = 10000}, {id = 3387, name = "demon helmet", value = 40000}, {id = 10439, name = "dragon robe", value = 10000}, {id = 3398, name = "dwarven legs", value = 40000}, {id = 9606, name = "egg of the many", value = 15000}, {id = 7453, name = "executioner", value = 55000}, {id = 3249, name = "frozen starlight", value = 20000}, {id = 8041, name = "greenwood coat", value = 50000}, {id = 902, name = "marlin trophy", value = 5000}, {id = 8021, name = "modified crossbow", value = 10000}, {id = 5080, name = "panda teddy", value = 30000}, {id = 7417, name = "runed sword", value = 45000}, {id = 9613, name = "sea serpent trophy", value = 10000}, {id = 8029, name = "silkweaver bow", value = 12000}, {id = 11679, name = "souleater trophy", value = 7500}, {id = 5791, name = "stuffed dragon", value = 6000}, {id = 6527, name = "the avenger", value = 42000}, {id = 8025, name = "the ironworker", value = 50000}, {id = 6103, name = "unholy book", value = 30000}, {id = 8055, name = "windborn colossus armor", value = 50000}, --[[ PRODUCTS ]]-- {id = 5904, name = "magic sulphur", value = 8000}, {id = 5919, name = "dragon claw", value = 300000}, {id = 5809, name = "soul stone", value = 500000}, {id = 5879, name = "spider silk", value = 4000}, {id = 6546, name = "dracola's eye", value = 50000}, {id = 5911, name = "red piece of cloth", value = 20000}, {id = 5885, name = "flask of warrior's sweat", value = 10000}, {id = 6537, name = "mr. punish's handcuffs", value = 50000}, {id = 6540, name = "piece of massacre's shell", value = 50000}, {id = 6525, name = "skeleton decoration", value = 3000}, {id = 5875, name = "sniper gloves", value = 2000}, {id = 5884, name = "spirit container", value = 40000}, {id = 11666, name = "tentacle piece", value = 5000}, {id = 6535, name = "the plasmother's remains", value = 50000}, {id = 6499, name = "demonic essence", value = 1000} } ----------------------------------------------- --[[ DO NOT EDIT ANYTHING BELOW THIS LINE ]] -- ----------------------------------------------- CONTAINERS = {COUNTER_BROWSE_FIELD = nil, LOCKER_BROWSE_FIELD = nil, CHECK_MONEY_BACKPACK = nil, CRYSTAL_COINS_BACKPACK = nil, DEPOT_LOCKER = nil, PLATINUM_COINS_BACKPACK = nil, EXTRA_PLATINUM_COINS_BACKPACK = nil, ITEMS_BACKPACK = nil} CASH = {PLATINUM_COIN = 3035, CRYSTAL_COIN = 3043} CASH_ID = {CASH.PLATINUM_COIN, CASH.CRYSTAL_COIN} COUNTER_ID = {2323, 2317, 2318, 2320, 2321, 2343, 2345, 17385, 17389, 17392} LOCKER_ID = {3497, 3498, 3499, 3500} LOCKER = {X = 0, Y = 0, Z = 0} COUNTER = {X = 0, Y = 0, Z = 0} GAMBLE_OPTION = {LAST = 8, SECOND = 7, FIRST = 6, BJ = 5, EVEN = 4, ODD = 3, HIGH = 2, LOW = 1, NONE = 0, ONE = 10, TWO = 20, THREE = 30, FOUR = 40, FIVE = 50, SIX = 60} PLAYER = {WELCOMED = false, DETECTED = false, BALANCE = 0, OPTION = GAMBLE_OPTION.NONE, SPOT = {X = 0, Y = 0, Z = 0, TURN_G = -1, TURN_L = -1}} TABLE = {NAMES = {}, ITEMS = {}, GAMES = {}, INFO = {}, MIN_MAX = {}, PRICE = {}} FIRST_DECORATION_ITEM_ID = Item.GetID(CONFIG.FIRST_DECORATION_ITEM) SECOND_DECORATION_ITEM_ID = Item.GetID(CONFIG.SECOND_DECORATION_ITEM) WON_BET_ITEM_ID = Item.GetID(CONFIG.WON_BET_ITEM) LOST_BET_ITEM_ID = Item.GetID(CONFIG.LOST_BET_ITEM) THROW_POS = {x = Self.Position().x, y = Self.Position().y, z = Self.Position().z} LOADING_COMPLETED = false COUNTER_INDEX = nil DEPOT_INDEX = nil MAIN_TIME = os.time() BET_TIME = os.time() BET_OPTION = {MIN = 0, MAX = 0, PAYOUT = 0, PROFIT = 0} WORDS = { L = {"l", "low", "123"}, H = {"h", "high", "456"}, O = {"odd", "o", "135"}, E = {"even", "e", "246"}, BJ = {"bj", "blackjack"}, NUM = {"1", "2", "3", "4", "5", "6"}, FSL = {"first", "second", "last"} } function onSpeak(CZANEL, message) CZANEL:SendYellowMessage("You", message) message = message:lower() local SET, VALUE = message:match("^/([a-z]+) (.+)$") if (SET == "hlmin") then if (VALUE) then BETS.HL_MIN = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Minimum H/L bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. VALUE / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "hlmax") then if (VALUE) then BETS.HL_MAX = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Maximum H/L bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. VALUE / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "oemin") then if (VALUE) then BETS.OE_MIN = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Minimum ODD/EVEN bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. VALUE / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "oemax") then if (VALUE) then BETS.OE_MAX = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Maximum ODD/EVEN bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. VALUE / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "bjmin") then if (VALUE) then BETS.BJ_MIN = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Mininum BLACKJACK bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. VALUE / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "bjmax") then if (VALUE) then BETS.BJ_MAX = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Maximum BLACKJACK bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. VALUE / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "nummin") then if (VALUE) then BETS.NUMBERS_MIN = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Minumum NUMBERS bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. VALUE / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "nummax") then if (VALUE) then BETS.NUMBERS_MAX = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Maximum NUMBERS bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. VALUE / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "fslmin") then if (VALUE) then BETS.FSL_MIN = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Minumum F/S/L bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. VALUE / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "fslmax") then if (VALUE) then BETS.FSL_MAX = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Maximum F/S/L bet is: " .. VALUE / 1000 .. "K.") if (CONFIG.SHOW_HUD) then HUD.MIN_MAX_BET.VALUE:SetText("[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. VALUE / 1000 .. "K].") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "hlp") then if (VALUE) then BETS.HL_PAYOUT = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Payout H/L is: " .. VALUE .. "%.") if (CONFIG.SHOW_HUD) then HUD.PAYOUTS.VALUE:SetText("" .. VALUE .. " ~ " .. BETS.OE_PAYOUT .. " ~ " .. BETS.BJ_PAYOUT .. " ~ " .. BETS.NUMBERS_PAYOUT .. " ~ " .. BETS.FSL_PAYOUT .. "%") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "oep") then if (VALUE) then BETS.OE_PAYOUT = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Payout H/L is: " .. VALUE .. "%.") if (CONFIG.SHOW_HUD) then HUD.PAYOUTS.VALUE:SetText("" .. BETS.HL_PAYOUT .. " ~ " .. VALUE .. " ~ " .. BETS.BJ_PAYOUT .. " ~ " .. BETS.NUMBERS_PAYOUT .. " ~ " .. BETS.FSL_PAYOUT .. "%") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "bjp") then if (VALUE) then BETS.BJ_PAYOUT = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Payout H/L is: " .. VALUE .. "%.") if (CONFIG.SHOW_HUD) then HUD.PAYOUTS.VALUE:SetText("" .. BETS.HL_PAYOUT .. " ~ " .. BETS.OE_PAYOUT .. " ~ " .. VALUE .. " ~ " .. BETS.NUMBERS_PAYOUT .. " ~ " .. BETS.FSL_PAYOUT .. "%") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "nump") then if (VALUE) then BETS.NUMBERS_PAYOUT = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Payout H/L is: " .. VALUE .. "%.") if (CONFIG.SHOW_HUD) then HUD.PAYOUTS.VALUE:SetText("" .. BETS.HL_PAYOUT .. " ~ " .. BETS.OE_PAYOUT .. " ~ " .. BETS.BJ_PAYOUT .. " ~ " .. VALUE .. " ~ " .. BETS.FSL_PAYOUT .. "%") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "fslp") then if (VALUE) then BETS.FSL_PAYOUT = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Payout H/L is: " .. VALUE .. "%.") if (CONFIG.SHOW_HUD) then HUD.PAYOUTS.VALUE:SetText("" .. BETS.HL_PAYOUT .. " ~ " .. BETS.OE_PAYOUT .. " ~ " .. BETS.BJ_PAYOUT .. " ~ " .. BETS.NUMBERS_PAYOUT .. " ~ " .. VALUE .. "%") end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (message == "/hlmode") then if (BETS.HL_MODE) then BETS.HL_MODE= false CZANEL:SendOrangeMessage("[BOT]", "H/L turned off.") else BETS.HL_MODE = true CZANEL:SendOrangeMessage("[BOT]", "H/L turned on.") end elseif (message == "/oemode") then if (BETS.OE_MODE) then BETS.OE_MODE= false CZANEL:SendOrangeMessage("[BOT]", "ODD/EVEN turned off.") else BETS.OE_MODE = true CZANEL:SendOrangeMessage("[BOT]", "ODD/EVEN turned on.") end elseif (message == "/bjmode") then if (BETS.BJ_MODE) then BETS.BJ_MODE= false CZANEL:SendOrangeMessage("[BOT]", "BLACKJACK turned off.") else BETS.BJ_MODE = true CZANEL:SendOrangeMessage("[BOT]", "BLACKJACK turned on.") end elseif (message == "/nummode") then if (BETS.NUMBERS_MODE) then BETS.NUMBERS_MODE= false CZANEL:SendOrangeMessage("[BOT]", "NUMBERS turned off.") else BETS.NUMBERS_MODE = true CZANEL:SendOrangeMessage("[BOT]", "NUMBERS turned on.") end elseif (message == "/fslmode") then if (BETS.FSL_MODE) then BETS.FSL_MODE= false CZANEL:SendOrangeMessage("[BOT]", "F/S/L turned off.") else BETS.FSL_MODE = true CZANEL:SendOrangeMessage("[BOT]", "F/S/L turned on.") end elseif (SET == "ping") then if (VALUE) then CONFIG.PING_COMPENSATION = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "Ping is: " .. VALUE .. ".") if (CONFIG.SHOW_HUD) then HUD.PING_COMPENSATION.VALUE:SetText(tostring(VALUE)) end else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "ptime") then if (VALUE) then CONFIG.PARTY_HAT_TIME = tonumber(VALUE) CZANEL:SendOrangeMessage("[BOT]", "PartyHat exhaust is: " .. VALUE .. ".") else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "counter") then if (VALUE) then COUNTER_INDEX = tonumber(VALUE - 1) CZANEL:SendOrangeMessage("[BOT]", "Counter set: " .. VALUE .. ".") else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (SET == "depot") then if (VALUE) then DEPOT_INDEX = tonumber(VALUE - 1) CZANEL:SendOrangeMessage("[BOT]", "Depot set: " .. VALUE .. ".") else CZANEL:SendOrangeMessage("[BOT]", "Oppps. Something Wrong!") end elseif (message == "/pause") then LOADING_COMPLETED = false CZANEL:SendOrangeMessage("[BOT]", "Script paused.") elseif (message == "/resume") then LOADING_COMPLETED = true CZANEL:SendOrangeMessage("[BOT]", "Script resumed.") elseif (message == "/start") then if (CONFIG.SERVER == "OTS" and COUNTER_INDEX == nil or DEPOT_INDEX == nil) then CZANEL:SendOrangeMessage("[BOT]", "You need to setup counter and depot indexes!") else Casino_Start:Start() CZANEL:SendOrangeMessage("[BOT]", "Script starting.") end elseif (message == "/stop") then Casino_Stop() CZANEL:SendOrangeMessage("[BOT]", "Script stopping.") elseif (message == "/ad") then if (CONFIG.SAY_ADVERTISEMENT) then CONFIG.SAY_ADVERTISEMENT = false CZANEL:SendOrangeMessage("[BOT]", "Ads turned off.") else CONFIG.SAY_ADVERTISEMENT = true CZANEL:SendOrangeMessage("[BOT]", "Ads turned on.") end elseif (message == "/party hat") then if (CONFIG.PARTY_HAT) then CONFIG.PARTY_HAT = false CZANEL:SendOrangeMessage("[BOT]", "Party Hat turned off.") else CONFIG.PARTY_HAT = true CZANEL:SendOrangeMessage("[BOT]", "Party Hat turned on.") end if (CONFIG.SHOW_HUD) then HUD.USE_PARTY_HAT.VALUE:SetText(tostring(CONFIG.PARTY_HAT)) end elseif (message == "/logs") then if (CONFIG.LOGS) then CONFIG.LOGS = false CZANEL:SendOrangeMessage("[BOT]", "Logs turned off.") else CONFIG.LOGS = true CZANEL:SendOrangeMessage("[BOT]", "Logs turned on.") end if (CONFIG.SHOW_HUD) then HUD.WRITE_LOGS.VALUE:SetText(tostring(CONFIG.LOGS)) end elseif (message == "/reset") then if (CONFIG.SHOW_HUD) then HUD.BETS.WON.AMOUNT:SetText("0 (0 GP)") HUD.BETS.WON.AMOUNT_RAW = 0 HUD.BETS.WON.AMOUNT_CASH = 0 HUD.BETS.LOST.AMOUNT:SetText("0 (0 GP)") HUD.BETS.LOST.AMOUNT_RAW = 0 HUD.BETS.LOST.AMOUNT_CASH = 0 HUD.BETS.OUTCOME.AMOUNT:SetText("0 (0 GP)") HUD.BETS.OUTCOME.AMOUNT_RAW = 0 HUD.BETS.OUTCOME.AMOUNT_CASH = 0 HUD.BETS.OUTCOME.AMOUNT:SetTextColor(255, 255, 255) CZANEL:SendOrangeMessage("[BOT]", "HUD Cleaned.") end elseif (message == "/help") then commands = {"start", "stop", "hlmin", "hlmax", "oemin", "oemax", "bjmin", "bjmax", "nummin", "nummax", "fslmin", "fslmax", "hlp", "oep", "bjp", "nump", "fslp", "hlmode", "oemode", "bjmode", "nummode", "fslmode", "ping", "ptime", "ad", "party hat", "logs", "reset", "counter", "depot"} CZANEL:SendOrangeMessage("[BOT]", "Available commands:\n/" .. table.concat(commands, "\n/") .. "") end end CZANEL = Channel.Open("[BOT_LOG]", onSpeak, onClose) CZANEL:SendYellowMessage("[BOT]", "Write /help for more info.") if (CONFIG.SHOW_HUD) then HUD = { MAIN_HEADER = HUD.New(10, 25, "" .. Self.Name() .. "'s Casino (" .. getUserName() .. ").", 154, 205, 50), STATISTICS = HUD.New(10, 44, "STATISTICS", 124, 254, 139), BETS = HUD.New(10, 124, "BETS INFO", 124, 254, 139), SETTINGS = HUD.New(10, 188, "SETTINGS", 124, 254, 139), AMOUNT_CASH = { DISPLAY_CRYSTAL = { TEXT = HUD.New(10, 60, "Crystal Coins", 199, 199, 199), AMOUNT = HUD.New(140, 60, "0 GP", 255, 255, 255)}, DISPLAY_PLATINUM = { TEXT = HUD.New(10, 76, "Platinum Coins", 199, 199, 199), AMOUNT = HUD.New(140, 76, "0 GP", 255, 255, 255)}, DISPLAY_ITEMS = { TEXT = HUD.New(10, 92, "Items Value", 199, 199, 199), AMOUNT = HUD.New(140, 92, "0 GP", 255, 255, 255)}, ALL_CASH = { TEXT = HUD.New(10, 108, "Whole Money", 199, 199, 199), AMOUNT = HUD.New(140, 108, "0 GP", 255, 255, 255)}}, BETS = { WON = { TEXT = HUD.New(10, 140, "Bets Won", 199, 199, 199), AMOUNT = HUD.New(140, 140, "0 (0 GP)", 255, 255, 255), AMOUNT_RAW = 0, AMOUNT_CASH = 0}, LOST = { TEXT = HUD.New(10, 156, "Bets Lost", 199, 199, 199), AMOUNT = HUD.New(140, 156, "0 (0 GP)", 255, 255, 255), AMOUNT_RAW = 0, AMOUNT_CASH = 0}, OUTCOME = { TEXT = HUD.New(10, 172, "OUTCOME", 254, 215, 0), AMOUNT = HUD.New(140, 172, "0 (0 GP)", 255, 255, 255), AMOUNT_RAW = 0, AMOUNT_CASH = 0}}, PAYOUTS = { TEXT = HUD.New(10, 204, "PAYOUTS", 199, 199, 199), VALUE = HUD.New(140, 204, "" .. BETS.HL_PAYOUT .. " ~ " .. BETS.OE_PAYOUT .. " ~ " .. BETS.BJ_PAYOUT .. " ~ " .. BETS.NUMBERS_PAYOUT .. " ~ " .. BETS.FSL_PAYOUT .. "%", 255, 255, 255)}, PING_COMPENSATION = { TEXT = HUD.New(10, 220, "PING EXHAUST", 199, 199, 199), VALUE = HUD.New(140, 220, tostring(CONFIG.PING_COMPENSATION), 255, 255, 255)}, MIN_MAX_BET = { TEXT = HUD.New(10, 236, "MIN / MAX BETS", 199, 199, 199), VALUE = HUD.New(140, 236, "[" .. BETS.HL_MIN / 1000 .. "K - " .. BETS.HL_MAX / 1000 .. "K] [" .. BETS.OE_MIN / 1000 .. "K - " .. BETS.OE_MAX / 1000 .. "K] [" .. BETS.BJ_MIN / 1000 .. "K - " .. BETS.BJ_MAX / 1000 .. "K] [" .. BETS.NUMBERS_MIN / 1000 .. "K - " .. BETS.NUMBERS_MAX / 1000 .. "K] [" .. BETS.FSL_MIN / 1000 .. "K - " .. BETS.FSL_MAX / 1000 .. "K].", 255, 255, 255)}, USE_PARTY_HAT = { TEXT = HUD.New(10, 252, "PARTY HAT STATUS", 199, 199, 199), VALUE = HUD.New(140, 252, tostring(CONFIG.PARTY_HAT), 255, 255, 255)}, WINNING_ITEM = { TEXT = HUD.New(10, 268, "WIN ITEM", 199, 199, 199), VALUE = HUD.New(140, 268, CONFIG.WON_BET_ITEM, 255, 255, 255)}, LOSING_ITEM ={ TEXT = HUD.New(10, 284, "LOST ITEM", 199, 199, 199), VALUE = HUD.New(140, 284, CONFIG.LOST_BET_ITEM, 255, 255, 255)}, FIRST_DECORATION_ITEM = { TEXT = HUD.New(10, 300, "1ST DECORATION", 199, 199, 199), VALUE = HUD.New(140, 300, CONFIG.FIRST_DECORATION_ITEM, 255, 255, 255)}, SECOND_DECORATION_ITEM = { TEXT = HUD.New(10, 316, "2ND DECORATION", 199, 199, 199), VALUE = HUD.New(140, 316, CONFIG.SECOND_DECORATION_ITEM, 255, 255, 255)}, WRITE_LOGS = { TEXT = HUD.New(10, 332, "WRITE LOGS", 199, 199, 199), VALUE = HUD.New(140, 332, tostring(CONFIG.LOGS), 255, 255, 255)}, SAVE_TIME = { TEXT = HUD.New(10, 348, "SERVER SAVE TIME", 199, 199, 199), VALUE = HUD.New(140, 348, CONFIG.SERVER_SAVE_TIME, 255, 255, 255)}, MAIN_TIME = { TEXT = HUD.New(10, 364, "RUNNING TIME", 199, 199, 199), VALUE = HUD.New(140, 364, "00:00:00", 255, 255, 255)}, BET_TIME = { TEXT = HUD.New(10, 380, "LAST BET", 199, 199, 199), VALUE = HUD.New(140, 380, "00:00:00", 255, 255, 255)} } end function Casino_UpdateHUD(TYPE, DOLCE) if (CONFIG.SHOW_HUD) then if (TYPE == "LOST") then HUD.BETS.LOST.AMOUNT_RAW = HUD.BETS.LOST.AMOUNT_RAW + 1 HUD.BETS.LOST.AMOUNT_CASH = HUD.BETS.LOST.AMOUNT_CASH + DOLCE HUD.BETS.LOST.AMOUNT:SetText(tostring(HUD.BETS.LOST.AMOUNT_RAW) .. " (" .. tostring(HUD.BETS.LOST.AMOUNT_CASH) .. "K)") HUD.BETS.OUTCOME.AMOUNT_RAW = HUD.BETS.OUTCOME.AMOUNT_RAW + 1 end if (TYPE == "WON") then HUD.BETS.WON.AMOUNT_RAW = HUD.BETS.WON.AMOUNT_RAW + 1 HUD.BETS.WON.AMOUNT_CASH = HUD.BETS.WON.AMOUNT_CASH + DOLCE HUD.BETS.WON.AMOUNT:SetText(tostring(HUD.BETS.WON.AMOUNT_RAW) .. " (" .. tostring(HUD.BETS.WON.AMOUNT_CASH) .. "K)") HUD.BETS.OUTCOME.AMOUNT_RAW = HUD.BETS.OUTCOME.AMOUNT_RAW + 1 end OUTCOME = HUD.BETS.WON.AMOUNT_CASH - HUD.BETS.LOST.AMOUNT_CASH if (OUTCOME > 0) then HUD.BETS.OUTCOME.AMOUNT:SetTextColor(106, 141, 34) elseif (OUTCOME == 0) then HUD.BETS.OUTCOME.AMOUNT:SetTextColor(255, 255, 255) else HUD.BETS.OUTCOME.AMOUNT:SetTextColor(177, 33, 33) end HUD.BETS.OUTCOME.AMOUNT:SetText(tostring(HUD.BETS.OUTCOME.AMOUNT_RAW) .. " (" .. tostring(OUTCOME) .. "K)") HUD.AMOUNT_CASH.DISPLAY_CRYSTAL.AMOUNT:SetText(tonumber(Casino_CountMoney(CONTAINERS.CRYSTAL_COINS_BACKPACK, CASH.CRYSTAL_COIN) / 1000) .. "K") HUD.AMOUNT_CASH.DISPLAY_PLATINUM.AMOUNT:SetText(tonumber((Casino_CountMoney(CONTAINERS.PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_CountMoney(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN)) / 1000) .. "K") HUD.AMOUNT_CASH.DISPLAY_ITEMS.AMOUNT:SetText(tonumber(Casino_GetValueOfItems(CONTAINERS.ITEMS_BACKPACK) / 1000) .. "K") HUD.AMOUNT_CASH.ALL_CASH.AMOUNT:SetText(tonumber((Casino_CountMoney(CONTAINERS.CRYSTAL_COINS_BACKPACK, CASH.CRYSTAL_COIN) + Casino_CountMoney(CONTAINERS.PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_CountMoney(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_GetValueOfItems(CONTAINERS.ITEMS_BACKPACK)) / 1000) .. "K") end end function Casino_Normal(ROLLED_NUMBER, OPTION) if (OPTION ~= GAMBLE_OPTION.NONE and ROLLED_NUMBER) then local WON, SAID = false, false repeat wait(CONFIG.PING_COMPENSATION) Self.Say("".. ROLL_MSG .. " " .. ROLLED_NUMBER .. ".") SAID = true until SAID CZANEL:SendOrangeMessage("[BOT]", "Script Rolled: " .. ROLLED_NUMBER .. ".") if (OPTION == GAMBLE_OPTION.LOW) then if (ROLLED_NUMBER >= 1 and ROLLED_NUMBER <= 3) then WON = true end elseif (OPTION == GAMBLE_OPTION.HIGH) then if (ROLLED_NUMBER >= 4 and ROLLED_NUMBER <= 6) then WON = true end elseif (OPTION == GAMBLE_OPTION.ODD) then if (table.contains(({1, 3, 5}), ROLLED_NUMBER)) then WON = true end elseif (OPTION == GAMBLE_OPTION.EVEN) then if (table.contains(({2, 4, 6}), ROLLED_NUMBER)) then WON = true end elseif (OPTION == GAMBLE_OPTION.ONE) then if (ROLLED_NUMBER == 1) then WON = true end elseif (OPTION == GAMBLE_OPTION.TWO) then if (ROLLED_NUMBER == 2) then WON = true end elseif (OPTION == GAMBLE_OPTION.THREE) then if (ROLLED_NUMBER == 3) then WON = true end elseif (OPTION == GAMBLE_OPTION.FOUR) then if (ROLLED_NUMBER == 4) then WON = true end elseif (OPTION == GAMBLE_OPTION.FIVE) then if (ROLLED_NUMBER == 5) then WON = true end elseif (OPTION == GAMBLE_OPTION.SIX) then if (ROLLED_NUMBER == 6) then WON = true end end if (WON) then Casino_PlayerWon() else Casino_PlayerLose() end end end function Casino_BlackJack(OPTION) if (OPTION ~= GAMBLE_OPTION.NONE) then local MY_NUM, G_NUM, WON = 0, 0, 0 for i = 1, 5 do G_NUM = G_NUM + Casino_RollRandom() MY_NUM = MY_NUM + Casino_RollRandom() end CZANEL:SendOrangeMessage("[BOT]", "Script Rolled BJ Numbers: " .. MY_NUM .. " and " .. G_NUM .. ".") if (MY_NUM > 21 and G_NUM > 21) then WON = 3 --[[OVER]]-- elseif (MY_NUM == G_NUM) then BET_OPTION.PAYOUT = 0 WON = 2 --[[TIE]]-- elseif (G_NUM == 21 or (MY_NUM <= G_NUM and MY_NUM ~= 21 and G_NUM <= 21)) then WON = 1 elseif (G_NUM <= 21 and (MY_NUM < G_NUM)) then WON = 1 else WON = 0 end if (WON == 1) then Casino_PlayerWon() Casino_BJ_MSG(BJ_WON, (PLAYER.BALANCE + (BET_OPTION.PAYOUT * PLAYER.BALANCE / 100)) / 1000, G_NUM, MY_NUM) elseif (WON == 2) then Casino_PlayerWon(true) Casino_BJ_MSG(BJ_TIE, PLAYER.BALANCE / 1000, G_NUM, MY_NUM) elseif (WON == 3) then Casino_PlayerLose() Casino_BJ_MSG(BJ_OVER, PLAYER.BALANCE / 1000, G_NUM, MY_NUM) else Casino_PlayerLose() Casino_BJ_MSG(BJ_LOSE, PLAYER.BALANCE / 1000, G_NUM, MY_NUM) end end end function Casino_BJ_MSG(TABLE, MONEY, G_NUM, MY_NUM) replacements = { ["|GAMBLER|"] = G_NUM, ["|PLAYER|"] = MY_NUM, ["|MONEY|"] = MONEY } tmp = string.gsub(tostring(TABLE[math.random(1, table.getn(TABLE))]), "|%a+|", function (str) return replacements [str] or str end) local SAID = false repeat wait(CONFIG.PING_COMPENSATION) Self.Say(tmp) SAID = true until SAID end function Casino_FirstSecondLast(OPTION) if (OPTION ~= GAMBLE_OPTION.NONE) then local FIRST, SECOND, WON, SAID = 0, 0, false, false FIRST, SECOND = Casino_RollRandom(), Casino_RollRandom() repeat wait(CONFIG.PING_COMPENSATION) Self.Say("Numbers: " .. FIRST .. " and " .. SECOND .. ".") SAID = true until SAID CZANEL:SendOrangeMessage("[BOT]", "Script Rolled Numbers: " .. FIRST .. " and " .. SECOND .. ".") if (OPTION == GAMBLE_OPTION.FIRST) then if (FIRST == 1 and SECOND == 2) then WON = true end elseif (OPTION == GAMBLE_OPTION.SECOND) then if (FIRST == 3 and SECOND == 4) then WON = true end elseif (OPTION == GAMBLE_OPTION.LAST) then if (FIRST == 5 and SECOND == 6) then WON = true end end if (WON) then Casino_PlayerWon() else Casino_PlayerLose() end end end function Casino_GetDirection(TYPE, X, Y, DIR) if (TYPE == "GAMBLER") then if (DIR ~= PLAYER.SPOT.TURN_G) then Self.Turn(PLAYER.SPOT.TURN_G) Casino_Messages(MSGW) PLAYER.WELCOMED = true end elseif (TYPE == "LOCKER") then if (DIR ~= PLAYER.SPOT.TURN_L) then Self.Turn(PLAYER.SPOT.TURN_L) PLAYER.WELCOMED = false end end end function Casino_Messages(TBL) for name, creature in Creature.iPlayers(2) do if (creature:Position().x == PLAYER.SPOT.X and creature:Position().y == PLAYER.SPOT.Y and creature:Position().z == PLAYER.SPOT.Z) then if (CONFIG.CUSTOM_MESSAGES and not PLAYER.WELCOMED and not table.contains(TABLE.NAMES, name)) then tmp = string.gsub(tostring(WELCOME[math.random(1, table.getn(WELCOME))]), "|GAMBLER|", name) Self.Say(tmp) table.insert(TABLE.NAMES, name) end end end end function Casino_GetValueOfItems(CONTAINER) local tmp = 0 for i = 1, #ITEMS do tmp = tmp + CONTAINER:CountItemsOfID(ITEMS[i].id) * ITEMS[i].value end return tmp end function Casino_MoveExtra(FROM, TO) for SPOT = FROM:ItemCount() - 1, 0, -1 do local tmp = FROM:GetItemData(SPOT) if (tmp.id == CASH.PLATINUM_COIN) then FROM:MoveItemToContainer(SPOT, TO:Index(), TO:ItemCapacity() - 1) break end end end function Casino_MoveMoney(FROM, TO) while (Casino_CountMoney(FROM, "all") > 0) do for SPOT = FROM:ItemCount() - 1, 0, -1 do local tmp = FROM:GetItemData(SPOT) if (table.contains(CASH_ID, tmp.id)) then if (TO:Name() == "Browse Field") then FROM:MoveItemToGround(SPOT, COUNTER.X, COUNTER.Y, COUNTER.Z, tmp.count) else FROM:MoveItemToContainer(SPOT, TO:Index(), TO:ItemCapacity() - 1) end end end end end function Casino_SortMoney() while (Casino_CountMoney(CONTAINERS.CHECK_MONEY_BACKPACK, "all") > 0) do for SPOT = CONTAINERS.CHECK_MONEY_BACKPACK:ItemCount() - 1, 0, - 1 do local tmp = CONTAINERS.CHECK_MONEY_BACKPACK:GetItemData(SPOT) if (tmp.id == CASH.PLATINUM_COIN) then if (CONTAINERS.PLATINUM_COINS_BACKPACK:isFull()) then CONTAINERS.CHECK_MONEY_BACKPACK:MoveItemToContainer(SPOT, CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK:Index(), CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK:ItemCapacity() - 1) else CONTAINERS.CHECK_MONEY_BACKPACK:MoveItemToContainer(SPOT, CONTAINERS.PLATINUM_COINS_BACKPACK:Index(), CONTAINERS.PLATINUM_COINS_BACKPACK:ItemCapacity() - 1) end elseif (tmp.id == CASH.CRYSTAL_COIN) then CONTAINERS.CHECK_MONEY_BACKPACK:MoveItemToContainer(SPOT, CONTAINERS.CRYSTAL_COINS_BACKPACK:Index(), CONTAINERS.CRYSTAL_COINS_BACKPACK:ItemCapacity() - 1) end end end end function Casino_MoveItems(FROM, TO) while (Casino_GetValueOfItems(FROM) > 0) do for SPOT = FROM:ItemCount() - 1, 0, -1 do local tmp = FROM:GetItemData(SPOT) if (CONTAINERS.ITEMS_BACKPACK:isFull()) then CONTAINERS.ITEMS_BACKPACK:UseItem(CONTAINERS.ITEMS_BACKPACK:ItemCapacity() - 1, true) end for i = 1, #ITEMS do if (tmp.id == ITEMS[i].id) then if (TO:Name() == "Browse Field") then FROM:MoveItemToGround(SPOT, COUNTER.X, COUNTER.Y, COUNTER.Z, tmp.count) else FROM:MoveItemToContainer(SPOT, TO:Index(), TO:ItemCapacity() - 1) end end end end end end function Casino_MoveWonPlatinum(FROM, AMOUNT) for SPOT = FROM:ItemCount() - 1, 0, -1 do local tmp = FROM:GetItemData(SPOT) if (tmp.id == CASH.PLATINUM_COIN) then local MOVED = 0 while (MOVED == 0) do MOVED = FROM:MoveItemToGround(SPOT, COUNTER.X, COUNTER.Y, COUNTER.Z, AMOUNT) end break end end end function Casino_MoveWonCrystal(FROM, AMOUNT) for SPOT = FROM:ItemCount() - 1, 0, -1 do local tmp = FROM:GetItemData(SPOT) if (tmp.id == CASH.CRYSTAL_COIN) then local MOVED = 0 while (MOVED == 0) do MOVED = FROM:MoveItemToGround(SPOT, COUNTER.X, COUNTER.Y, COUNTER.Z, AMOUNT) end break end end end function Casino_Decorations() if (LOADING_COMPLETED) then if (FIRST_DECORATION_ITEM_ID > 0) then if (CONTAINERS.LOCKER_BROWSE_FIELD:CountItemsOfID(FIRST_DECORATION_ITEM_ID) < 1) then if (CONTAINERS.DEPOT_LOCKER:CountItemsOfID(FIRST_DECORATION_ITEM_ID) > 0) then for FirstItem = CONTAINERS.DEPOT_LOCKER:ItemCount() - 1, 0, -1 do if (FIRST_DECORATION_ITEM_ID == CONTAINERS.DEPOT_LOCKER:GetItemData(FirstItem).id) then wait(CONFIG.PING_COMPENSATION * 5) CONTAINERS.DEPOT_LOCKER:MoveItemToGround(FirstItem, LOCKER.X, LOCKER.Y, LOCKER.Z) wait(CONFIG.PING_COMPENSATION * 5) end end end end end if (SECOND_DECORATION_ITEM_ID > 0) then if (CONTAINERS.LOCKER_BROWSE_FIELD:CountItemsOfID(SECOND_DECORATION_ITEM_ID) < 1) then if (CONTAINERS.DEPOT_LOCKER:CountItemsOfID(SECOND_DECORATION_ITEM_ID) > 0) then for SecondItem = CONTAINERS.DEPOT_LOCKER:ItemCount() - 1, 0, -1 do if (SECOND_DECORATION_ITEM_ID == CONTAINERS.DEPOT_LOCKER:GetItemData(SecondItem).id) then wait(CONFIG.PING_COMPENSATION * 5) CONTAINERS.DEPOT_LOCKER:MoveItemToGround(SecondItem, LOCKER.X, LOCKER.Y, LOCKER.Z) wait(CONFIG.PING_COMPENSATION * 5) end end end end end end end function Casino_CountMoney(CONTAINER, ID) local tmp = 0 if (type(ID) == "string") then tmp = tmp + (CONTAINER:CountItemsOfID(CASH.CRYSTAL_COIN) * 10000) tmp = tmp + (CONTAINER:CountItemsOfID(CASH.PLATINUM_COIN) * 100) else if (ID == CASH.CRYSTAL_COIN) then tmp = tmp + (CONTAINER:CountItemsOfID(CASH.CRYSTAL_COIN) * 10000) elseif (ID == CASH.PLATINUM_COIN) then tmp = tmp + (CONTAINER:CountItemsOfID(CASH.PLATINUM_COIN) * 100) end end return tmp end function Casino_PlayerWon(TIE) local MONEY, PL_A, CC_A, HUD = PLAYER.BALANCE + (BET_OPTION.PAYOUT * PLAYER.BALANCE / 100), 0, 0, 0, 0 if (MONEY > 0) then while (MONEY >= 10000) do CC_A = CC_A + 1 MONEY = MONEY - 10000 end while (MONEY >= 100) do PL_A = PL_A + 1 MONEY = MONEY - 100 end end if (PL_A > 0) then Casino_MoveWonPlatinum(CONTAINERS.PLATINUM_COINS_BACKPACK, PL_A) end if (CC_A > 0) then Casino_MoveWonCrystal(CONTAINERS.CRYSTAL_COINS_BACKPACK, CC_A) end HUD = (PL_A * 100 + CC_A * 10000) Casino_UseItem(WON_BET_ITEM_ID, CONTAINERS.DEPOT_LOCKER) CZANEL:SendOrangeMessage("[BOT]", "Player Won: " .. HUD / 1000 .. "K.") doWriteLog("Player Won: " .. HUD / 1000 .. "K.\nYour Balance is " .. ((Casino_CountMoney(CONTAINERS.CRYSTAL_COINS_BACKPACK, CASH.CRYSTAL_COIN) + Casino_CountMoney(CONTAINERS.PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_CountMoney(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_GetValueOfItems(CONTAINERS.ITEMS_BACKPACK)) / 1000) .. "K\n") if (CONFIG.CUSTOM_MESSAGES and math.random(4) < CONFIG.CUSTOM_MESSAGES_RAND and PLAYER.OPTION ~= GAMBLE_OPTION.BJ) then tmp = string.gsub(tostring(WIN[math.random(1, table.getn(WIN))]), "|MONEY|", HUD / 1000) Self.Say(tmp) end PLAYER.OPTION = GAMBLE_OPTION.NONE TIE = TIE or false if (not TIE) then Casino_UpdateHUD("LOST", (HUD - PLAYER.BALANCE) / 1000) BET_OPTION.PROFIT = BET_OPTION.PROFIT + (HUD - PLAYER.BALANCE) end end function Casino_PlayerLose() Casino_UseItem(LOST_BET_ITEM_ID, CONTAINERS.DEPOT_LOCKER) CZANEL:SendOrangeMessage("[BOT]", "Player Lost: " .. PLAYER.BALANCE / 1000 .. "K.") BET_OPTION.PROFIT = BET_OPTION.PROFIT - PLAYER.BALANCE doWriteLog("Player Lost: " .. PLAYER.BALANCE / 1000 .. "K.\nYour Balance is " .. ((Casino_CountMoney(CONTAINERS.CRYSTAL_COINS_BACKPACK, CASH.CRYSTAL_COIN) + Casino_CountMoney(CONTAINERS.PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_CountMoney(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) + Casino_GetValueOfItems(CONTAINERS.ITEMS_BACKPACK)) / 1000) .. "K\n") if (CONFIG.CUSTOM_MESSAGES and math.random(4) < CONFIG.CUSTOM_MESSAGES_RAND and PLAYER.OPTION ~= GAMBLE_OPTION.BJ) then tmp = string.gsub(tostring(LOSE[math.random(1, table.getn(LOSE))]), "|MONEY|", PLAYER.BALANCE / 1000) Self.Say(tmp) end PLAYER.OPTION = GAMBLE_OPTION.NONE Casino_UpdateHUD("WON", PLAYER.BALANCE / 1000) end function Casino_UseItem(ITEM, CONTAINER) if (ITEM > 0) then for SPOT = CONTAINER:ItemCount() - 1, 0, -1 do local tmp = CONTAINER:GetItemData(SPOT) if (tmp.id == ITEM) then local USED = 0 while (USED == 0) do wait(CONFIG.PING_COMPENSATION) USED = CONTAINER:UseItem(SPOT, true) wait(CONFIG.PING_COMPENSATION) end end end end end function Casino_GetPositions() local POS = Self.Position() for x = -1, 1 do for y = -1, 1 do if (table.contains(LOCKER_ID, Map.GetTopUseItem(POS.x + x, POS.y + y, POS.z).id)) then LOCKER.X = POS.x + x LOCKER.Y = POS.y + y LOCKER.Z = POS.z break end end end for x = -1, 1 do for y = -1, 1 do if (table.contains(COUNTER_ID, Map.GetTopUseItem(POS.x + x, POS.y + y, POS.z).id)) then COUNTER.X = POS.x + x COUNTER.Y = POS.y + y COUNTER.Z = POS.z break end end end if (POS.x + 1 == LOCKER.X or POS.x - 1 == LOCKER.X) and POS.y + 1 == COUNTER.Y then PLAYER.SPOT = {X = POS.x, Y = POS.y + 2, Z = POS.z, TURN_G = SOUTH} elseif (POS.x + 1 == LOCKER.X or POS.x - 1 == LOCKER.X) and POS.y - 1 == COUNTER.Y then PLAYER.SPOT = {X = POS.x, Y = POS.y - 2, Z = POS.z, TURN_G = NORTH} elseif (POS.y + 1 == LOCKER.Y or POS.y - 1 == LOCKER.Y) and POS.x + 1 == COUNTER.X then PLAYER.SPOT = {X = POS.x + 2, Y = POS.y, Z = POS.z, TURN_G = EAST} elseif (POS.y + 1 == LOCKER.Y or POS.y - 1 == LOCKER.Y) and POS.x - 1 == COUNTER.X then PLAYER.SPOT = {X = POS.x - 2, Y = POS.y, Z = POS.z, TURN_G = WEST} end PLAYER.SPOT.TURN_L = Self.LookDirection() local POSITIONS = { {x = PLAYER.SPOT.X - 1, y = PLAYER.SPOT.Y, z = PLAYER.SPOT.Z}, {x = PLAYER.SPOT.X + 1, y = PLAYER.SPOT.Y, z = PLAYER.SPOT.Z}, {x = PLAYER.SPOT.X, y = PLAYER.SPOT.Y - 1, z = PLAYER.SPOT.Z}, {x = PLAYER.SPOT.X, y = PLAYER.SPOT.Y + 1, z = PLAYER.SPOT.Z} } for i = 1, #POSITIONS do if (table.contains(LOCKER_ID, Map.GetTopUseItem(POSITIONS[i].x, POSITIONS[i].y, POSITIONS[i].z).id)) then THROW_POS = ({x = POSITIONS[i].x, y = POSITIONS[i].y, z = POSITIONS[i].z}) break end end CZANEL:SendOrangeMessage("[BOT]", "Locker Position: {x = " .. LOCKER.X .. ", y = " .. LOCKER.Y .. ", z = " .. LOCKER.Z .. "}") CZANEL:SendOrangeMessage("[BOT]", "Counter Position: {x = " .. COUNTER.X .. ", y = " .. COUNTER.Y .. ", z = " .. COUNTER.Z .. "}") CZANEL:SendOrangeMessage("[BOT]", "Gambler Position: {x = " .. PLAYER.SPOT.X .. ", y = " .. PLAYER.SPOT.Y .. ", z = " .. PLAYER.SPOT.Z .. "}") CZANEL:SendOrangeMessage("[BOT]", "Throw Position: {x = " .. THROW_POS.x .. ", y = " .. THROW_POS.y .. ", z = " .. THROW_POS.z .. "}") end function doWriteLog(TEXT) if (CONFIG.LOGS) then PATH = "../" .. Self.Name() .. " - [" .. getUserName() .. "] Casino.txt" F = io.open(PATH, "a+") if(not F) then return false end F:write("[" .. os.date("%d/%m/%Y %H:%M:%S") .. "] " .. TEXT .. "\n") F:close() end end function Casino_PickupItems(ID, FROM, TO) if (ID > 0) then for SPOT = FROM:ItemCount() - 1, 0, -1 do local tmp = FROM:GetItemData(SPOT) if (ID == tmp.id) then local PICKED = 0 while (PICKED == 0) do wait(CONFIG.PING_COMPENSATION * 6) PICKED = FROM:MoveItemToContainer(SPOT, TO:Index(), TO:ItemCapacity() - 1) wait(CONFIG.PING_COMPENSATION * 6) end end end end end function Casino_AntiIdle() local TRUN, LD = 0, Self.LookDirection() if (LD < 2) then TURN = LD + 1 else TURN = LD - 1 end return TURN end function Casino_FormatValue(n) local left, num, right = string.match(n,"^([^%d]*%d)(%d*)(.-)$") return left .. (num:reverse():gsub("(%d%d%d)","%1,"):reverse()) .. right end function Casino_Stop() if (CONFIG.SS_EXIT) then screenshot("" .. Self.Name() .. " Casino " .. os.date("%d.%m.%Y %H'%M'%S") .. "") end Casino_PickupItems(FIRST_DECORATION_ITEM_ID, CONTAINERS.LOCKER_BROWSE_FIELD, CONTAINERS.DEPOT_LOCKER) Casino_PickupItems(SECOND_DECORATION_ITEM_ID, CONTAINERS.LOCKER_BROWSE_FIELD, CONTAINERS.DEPOT_LOCKER) for i = 0, 15 do Container.New(i):Close() end LOADING_COMPLETED = false Casino_Start:Stop() end function Casino_InfoMessages(TABLE) replacements = { ["|SELF|"] = Self.Name(), ["|HLMIN|"] = BETS.HL_MIN / 1000, ["|HLMAX|"] = BETS.HL_MAX / 1000, ["|OEMIN|"] = BETS.OE_MIN / 1000, ["|OEMAX|"] = BETS.OE_MAX / 1000, ["|BJMIN|"] = BETS.BJ_MIN / 1000, ["|BJMAX|"] = BETS.BJ_MAX / 1000, ["|NUMBERSMIN|"] = BETS.NUMBERS_MIN / 1000, ["|NUMBERSMAX|"] = BETS.NUMBERS_MAX / 1000, ["|FSLMIN|"] = BETS.FSL_MIN / 1000, ["|FSLMAX|"] = BETS.FSL_MAX / 1000, ["|MIN|"] = BET_OPTION.MIN / 1000, ["|MAX|"] = BET_OPTION.MAX / 1000, ["|HLP|"] = BETS.HL_PAYOUT, ["|OEP|"] = BETS.OE_PAYOUT, ["|BJP|"] = BETS.BJ_PAYOUT, ["|NUMBERSP|"] = BETS.NUMBERS_PAYOUT, ["|FSLP|"] = BETS.FSL_PAYOUT } if (CONFIG.INFO_MESSAGES) then tmp = string.gsub(tostring(TABLE[math.random(1, table.getn(TABLE))]), "|%a+|", function (str) return replacements [str] or str end) return tmp end end function Casino_RollRandom() return math.random(6) end Casino_GetHours = function(t, c) local seconds = (c) and os.difftime(os.time(), t) or t return (math.floor(os.difftime(os.time(), t) / 3600)) end Casino_GetMinutes = function(t, c) local seconds = (c) and os.difftime(os.time(), t) or t return math.floor((seconds - (Casino_GetHours(t, c) * 3600)) / 60) end Casino_GetSeconds = function(t, c) local seconds = (c) and os.difftime(os.time(), t) or t return math.floor(seconds - (Casino_GetHours(t, c) * 3600) - (Casino_GetMinutes(t, c) * 60)) end Casino_GetTime = function(t, current) local c = current or true return string.format("%02.f", Casino_GetHours(t, c))..':'..string.format("%02.f", Casino_GetMinutes(t, c))..':'..string.format("%02.f", Casino_GetSeconds(t, c)) end function getArticle(str) return string.sub(str:reverse(), str:len()) end function setArticle(str) if (table.contains(({"a", "e", "i", "o", "u", "y"}), getArticle(str))) then return "an " .. str .. "" elseif (string.sub(str, 1, 4) == "the ") then return "" .. str .. "" else return "a " .. str .. "" end end function mTable(t1, t2) tmp = {} for k, v in pairs(t1) do table.insert(tmp, v) end for k, v in pairs(t2) do table.insert(tmp, v) end return tmp end function Casino_GetProfit(tbl) if (tbl > 0) then Self.Say("Your profit is " .. Casino_FormatValue(tbl) .. " GP in this session!") elseif (tbl < 0) then Self.Say("aKAOksokAOSKaoskAOSK! You lose " .. Casino_FormatValue(math.abs(tbl)) .. " GP in this session!") else Self.Say("C'mon play with me! Don't be shy.") end end function Casino_SafeBet(data) tmp = false local FORMULA, PL_A, CC_A, CC, PL = PLAYER.BALANCE + (BET_OPTION.PAYOUT * PLAYER.BALANCE / 100), 0, 0, Casino_CountMoney(CONTAINERS.CRYSTAL_COINS_BACKPACK, CASH.CRYSTAL_COIN), Casino_CountMoney(CONTAINERS.PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) while (FORMULA >= 10000) do CC_A = CC_A + 1 FORMULA = FORMULA - 10000 end while (FORMULA >= 100) do PL_A = PL_A + 1 FORMULA = FORMULA - 100 end if ((CC_A * 10000 - CC) > Casino_CountMoney(CONTAINERS.COUNTER_BROWSE_FIELD, CASH.CRYSTAL_COIN) or (PL_A * 100 - PL) > Casino_CountMoney(CONTAINERS.COUNTER_BROWSE_FIELD, CASH.PLATINUM_COIN)) then if (not table.contains(TABLE.MIN_MAX, data)) then table.insert(TABLE.MIN_MAX, data) Self.Say(NOT_ENOUGH_GOLD) end tmp = true PLAYER.OPTION = GAMBLE_OPTION.NONE end return tmp end Casino_Start = Module("Casino_PROJECT: MAIN MODULE", function(moduleObject) if (#Container.GetAll() ~= 8) then for i = 0, 15 do closeContainer(i) end Client.HideEquipment() Casino_GetPositions() if Self.BrowseField(COUNTER.X, COUNTER.Y, COUNTER.Z) then wait(CONFIG.PING_COMPENSATION * 4) if (CONFIG.SERVER == "OTS") then CONTAINERS.COUNTER_BROWSE_FIELD = Container.New(COUNTER_INDEX) else CONTAINERS.COUNTER_BROWSE_FIELD = Container.New(0) end end if Self.BrowseField(LOCKER.X, LOCKER.Y, LOCKER.Z) then wait(CONFIG.PING_COMPENSATION * 4) if (CONFIG.SERVER == "OTS") then CONTAINERS.LOCKER_BROWSE_FIELD = Container.New(DEPOT_INDEX) else CONTAINERS.LOCKER_BROWSE_FIELD = Container.New(1) end end CONTAINERS.LOCKER_BROWSE_FIELD:UseItem(0, false) wait(CONFIG.PING_COMPENSATION * 4) if (CONFIG.SERVER == "OTS") then CONTAINERS.DEPOT_LOCKER = Container.New(0) else CONTAINERS.DEPOT_LOCKER = Container.New(2) end CONTAINERS.DEPOT_LOCKER:UseItem(0, true) wait(CONFIG.PING_COMPENSATION * 4) CONTAINERS.DEPOT_LOCKER:OpenChildren({CONFIG.CHECK_MONEY_BACKPACK, true}) if (CONFIG.SERVER == "OTS") then CONTAINERS.CHECK_MONEY_BACKPACK = Container.New(1) else CONTAINERS.CHECK_MONEY_BACKPACK = Container.New(3) end wait(CONFIG.PING_COMPENSATION * 4) CONTAINERS.DEPOT_LOCKER:OpenChildren({CONFIG.CRYSTAL_COINS_BACKPACK, true}) if (CONFIG.SERVER == "OTS") then CONTAINERS.CRYSTAL_COINS_BACKPACK = Container.New(2) else CONTAINERS.CRYSTAL_COINS_BACKPACK = Container.New(4) end wait(CONFIG.PING_COMPENSATION * 4) CONTAINERS.DEPOT_LOCKER:OpenChildren({CONFIG.PLATINUM_COINS_BACKPACK, true}) if (CONFIG.SERVER == "OTS") then CONTAINERS.PLATINUM_COINS_BACKPACK = Container.New(3) else CONTAINERS.PLATINUM_COINS_BACKPACK = Container.New(5) end wait(CONFIG.PING_COMPENSATION * 4) CONTAINERS.DEPOT_LOCKER:OpenChildren({CONFIG.EXTRA_PLATINUM_COINS_BACKPACK, true}) if (CONFIG.SERVER == "OTS") then CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK = Container.New(4) else CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK = Container.New(6) end wait(CONFIG.PING_COMPENSATION * 4) CONTAINERS.DEPOT_LOCKER:OpenChildren({CONFIG.ITEMS_BACKPACK, true}) if (CONFIG.SERVER == "OTS") then CONTAINERS.ITEMS_BACKPACK = Container.New(5) else CONTAINERS.ITEMS_BACKPACK = Container.New(7) end wait(CONFIG.PING_COMPENSATION * 4) if (#Container.GetAll() >= 8 and not LOADING_COMPLETED) then LOADING_COMPLETED = true for i = 1, #ITEMS do table.insert(TABLE.ITEMS, ITEMS[i].id) end Casino_Decorations() Casino_UpdateHUD() end end end, false) Module.New("Casino_PROJECT: TURN_TO_GAMBLER", function(moduleObject) local POS, LD = Self.Position(), Self.LookDirection() if (LOADING_COMPLETED) then PLAYER.DETECTED = false for name, creature in Creature.iPlayers(2) do if (creature:Position().x == PLAYER.SPOT.X and creature:Position().y == PLAYER.SPOT.Y and creature:Position().z == PLAYER.SPOT.Z) then PLAYER.DETECTED = true end end if (PLAYER.DETECTED) then Casino_GetDirection("GAMBLER", POS.x, POS.y, LD) else Casino_GetDirection("LOCKER", POS.x, POS.y, LD) end end moduleObject:Delay(CONFIG.PING_COMPENSATION) end) Module.New("Casino_PROJECT: Extra Backpacks", function(moduleObject) if (LOADING_COMPLETED) then if (CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK:isFull() or CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK:isEmpty()) then CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK:UseItem(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK:ItemCapacity() - 1, true) end if (CONTAINERS.PLATINUM_COINS_BACKPACK:EmptySlots() < 7) then Casino_MoveExtra(CONTAINERS.PLATINUM_COINS_BACKPACK, CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK) elseif (CONTAINERS.PLATINUM_COINS_BACKPACK:EmptySlots() > 7 and Casino_CountMoney(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) > 0) then Casino_MoveExtra(CONTAINERS.EXTRA_PLATINUM_COINS_BACKPACK, CONTAINERS.PLATINUM_COINS_BACKPACK) end end moduleObject:Delay(CONFIG.PING_COMPENSATION) end) Module.New("Casino_PROJECT: PARTY_HAT", function(moduleObject) if (CONFIG.PARTY_HAT) then if (LOADING_COMPLETED) then if (not PLAYER.DETECTED) then if (Self.Head().id == Item.GetID("party hat")) then Self.UseItemFromEquipment("head") end end end end moduleObject:Delay(CONFIG.PARTY_HAT_TIME * 1000) end) Module.New("Casino_PROJECT: RESTACK MONEY", function(moduleObject) if (LOADING_COMPLETED) then if (CONTAINERS.PLATINUM_COINS_BACKPACK:ItemCount() > 1) then for SPOT = CONTAINERS.PLATINUM_COINS_BACKPACK:ItemCount() - 1, 0, -1 do if (SPOT ~= 0) then local tmp = CONTAINERS.PLATINUM_COINS_BACKPACK:GetItemData(SPOT) if (tmp.count < 100) then CONTAINERS.PLATINUM_COINS_BACKPACK:MoveItemToContainer(SPOT, CONTAINERS.PLATINUM_COINS_BACKPACK:Index()) wait(CONFIG.PING_COMPENSATION) end end end end if(CONTAINERS.CRYSTAL_COINS_BACKPACK:ItemCount() > 1) then for SPOT = CONTAINERS.CRYSTAL_COINS_BACKPACK:ItemCount() - 1, 0, -1 do if (SPOT ~= 0) then local tmp = CONTAINERS.CRYSTAL_COINS_BACKPACK:GetItemData(SPOT) if(tmp.count < 100) then CONTAINERS.CRYSTAL_COINS_BACKPACK:MoveItemToContainer(SPOT, CONTAINERS.CRYSTAL_COINS_BACKPACK:Index()) wait(CONFIG.PING_COMPENSATION) end end end end end moduleObject:Delay(CONFIG.PING_COMPENSATION) end) Module.New("Casino_PROJECT: NORMAL BROADCASTER", function(moduleObject) if (CONFIG.SAY_ADVERTISEMENT) then if (LOADING_COMPLETED) then if (not PLAYER.DETECTED) then Self.Say(Casino_InfoMessages(AD_SAY_MSG)) end end end moduleObject:Delay(CONFIG.SAY_TIME * 1000) end) Module.New("Casino_PROJECT: YELL BROADCASTER", function(moduleObject) if (CONFIG.YELL_ADVERTISEMENT) then if (LOADING_COMPLETED) then if (not PLAYER.DETECTED) then Self.Yell(Casino_InfoMessages(AD_YELL_MSG)) end end end moduleObject:Delay(CONFIG.YELL_TIME * 1000) end) Module.New("Casino_PROJECT: ANTI-TRASHER", function(moduleObject) if (LOADING_COMPLETED) then for SPOT = CONTAINERS.COUNTER_BROWSE_FIELD:ItemCount() - 1, 0, -1 do local tmp = CONTAINERS.COUNTER_BROWSE_FIELD:GetItemData(SPOT) if not table.contains(CASH_ID, tmp.id) and not table.contains(TABLE.ITEMS, tmp.id) then Map.MoveItem(COUNTER.X, COUNTER.Y, THROW_POS.x, THROW_POS.y) end end for SPOT = CONTAINERS.LOCKER_BROWSE_FIELD:ItemCount() - 1, 0, -1 do local tmp = CONTAINERS.LOCKER_BROWSE_FIELD:GetItemData(SPOT) if not table.contains(LOCKER_ID, tmp.id) and not table.contains(({FIRST_DECORATION_ITEM_ID, SECOND_DECORATION_ITEM_ID}), tmp.id) then Map.MoveItem(LOCKER.X, LOCKER.Y, THROW_POS.x, THROW_POS.y) end end end moduleObject:Delay(CONFIG.PING_COMPENSATION) end) Module.New("Casino_PROJECT: CLEAN_TABLE", function(moduleObject) if (LOADING_COMPLETED) then table.remove(TABLE.NAMES, 1) table.remove(TABLE.INFO, 1) table.remove(TABLE.GAMES, 1) table.remove(TABLE.MIN_MAX, 1) table.remove(TABLE.PRICE, 1) end moduleObject:Delay(5 * 1000) end) Module.New("Casino_PROJECT: PICK_WHEN_SS", function(moduleObject) if (LOADING_COMPLETED) then if (os.date("%H:%M") == CONFIG.SERVER_SAVE_TIME) then Casino_Stop() end end moduleObject:Delay(CONFIG.PING_COMPENSATION) end) Module.New("Casino_PROJECT: ANTI-IDLE", function(moduleObject) if (LOADING_COMPLETED) then if (PLAYER.OPTION == GAMBLE_OPTION.NONE) then Self.Turn(Casino_AntiIdle()) end end moduleObject:Delay(CONFIG.ANTI_IDLE_TIME * 60 * 1000) end) Module.New("Casino_PROJECT: SAFE_LOGOUT", function(moduleObject) if (LOADING_COMPLETED) then if (CONFIG.SAFE_EXIT and (Casino_CountMoney(CONTAINERS.CRYSTAL_COINS_BACKPACK, CASH.CRYSTAL_COIN) / 10000 < CONFIG.AMOUNT_CC_TO_EXIT or Casino_CountMoney(CONTAINERS.PLATINUM_COINS_BACKPACK, CASH.PLATINUM_COIN) / 100 < CONFIG.AMOUNT_PL_TO_EXIT)) then Casino_Stop() end end moduleObject:Delay(CONFIG.PING_COMPENSATION) end) Module.New("Casino_PROJECT: SET_TIME_TICKS", function(moduleObject) if (CONFIG.SHOW_HUD) then HUD.MAIN_TIME.VALUE:SetText(Casino_GetTime(MAIN_TIME)) HUD.BET_TIME.VALUE:SetText(Casino_GetTime(BET_TIME)) end moduleObject:Delay(500) end) Signal.OnReceive("SignalListener", function(signal, data) for name, creature in Creature.iPlayers(2) do if (LOADING_COMPLETED and name == data.creature and creature:Position().x == PLAYER.SPOT.X and creature:Position().y == PLAYER.SPOT.Y and creature:Position().z == PLAYER.SPOT.Z) then local MSG = data.message:lower() if (table.contains((mTable(WORDS.L, WORDS.L)), MSG) and not BETS.HL_MODE or table.contains((mTable(WORDS.O, WORDS.E)), MSG) and not BETS.OE_MODE or table.contains((WORDS.NUM), MSG) and not BETS.NUMBERS_MODE or table.contains((WORDS.BJ), MSG) and not BETS.BJ_MODE or table.contains((WORDS.FSL), MSG) and not BETS.FSL_MODE) then Self.Say("I'm sorry but this game is disabled right now.") return false end if (table.contains((WORDS.L), MSG)) then PLAYER.OPTION = GAMBLE_OPTION.LOW elseif (table.contains((WORDS.H), MSG)) then PLAYER.OPTION = GAMBLE_OPTION.HIGH end if (table.contains((WORDS.O), MSG)) then PLAYER.OPTION = GAMBLE_OPTION.ODD elseif (table.contains((WORDS.E), MSG)) then PLAYER.OPTION = GAMBLE_OPTION.EVEN end if (MSG == WORDS.NUM[1]) then PLAYER.OPTION = GAMBLE_OPTION.ONE elseif (MSG == WORDS.NUM[2]) then PLAYER.OPTION = GAMBLE_OPTION.TWO elseif (MSG == WORDS.NUM[3]) then PLAYER.OPTION = GAMBLE_OPTION.THREE elseif (MSG == WORDS.NUM[4]) then PLAYER.OPTION = GAMBLE_OPTION.FOUR elseif (MSG == WORDS.NUM[5]) then PLAYER.OPTION = GAMBLE_OPTION.FIVE elseif (MSG == WORDS.NUM[6]) then PLAYER.OPTION = GAMBLE_OPTION.SIX end if (table.contains((WORDS.NUM), MSG)) then PLAYER.OPTION = GAMBLE_OPTION.BJ end if (MSG == WORDS.FSL[1]) then PLAYER.OPTION = GAMBLE_OPTION.FIRST elseif (MSG == WORDS.FSL[2]) then PLAYER.OPTION = GAMBLE_OPTION.SECOND elseif (MSG == WORDS.FSL[3]) then PLAYER.OPTION = GAMBLE_OPTION.LAST end for i = 1, #ITEMS do if (not table.contains(TABLE.PRICE, data.creature) and MSG == "price " .. ITEMS[i].name .. "") then table.insert(TABLE.PRICE, data.creature) Self.Say("I accept " .. setArticle(ITEMS[i].name) .. " as bet for " .. Casino_FormatValue(ITEMS[i].value) .. " GP.") end end if (MSG == "info" and not table.contains(TABLE.INFO, data.creature)) then table.insert(TABLE.INFO, data.creature) Self.Say(Casino_InfoMessages(INFO_MSG)) elseif (table.contains(({"min", "max", "bid"}), MSG) and not table.contains(TABLE.MIN_MAX, data.creature)) then table.insert(TABLE.MIN_MAX, data.creature) Self.Say(Casino_InfoMessages(ADVANCED_MIN_MAX)) elseif (MSG == "profit" and not table.contains(TABLE.INFO, data.creature)) then table.insert(TABLE.INFO, data.creature) Casino_GetProfit(BET_OPTION.PROFIT) elseif (MSG == "games" and not table.contains(TABLE.GAMES, data.creature)) then table.insert(TABLE.GAMES, data.creature) Self.Say(Casino_InfoMessages(GAMES_MSG)) elseif (MSG == "counter" and not table.contains(TABLE.INFO, data.creature)) then COUNTER_MONEY = Casino_CountMoney(CONTAINERS.COUNTER_BROWSE_FIELD, "all") + Casino_GetValueOfItems(CONTAINERS.COUNTER_BROWSE_FIELD) if (COUNTER_MONEY) > 0 then table.insert(TABLE.INFO, data.creature) Self.Say("The value of items on counter is " .. Casino_FormatValue(COUNTER_MONEY) .. " GP.") end end if (table.contains(({GAMBLE_OPTION.ONE, GAMBLE_OPTION.TWO, GAMBLE_OPTION.THREE, GAMBLE_OPTION.FOUR, GAMBLE_OPTION.FIVE, GAMBLE_OPTION.SIX}), PLAYER.OPTION)) then BET_OPTION.PAYOUT = BETS.NUMBERS_PAYOUT BET_OPTION.MIN = BETS.NUMBERS_MIN BET_OPTION.MAX = BETS.NUMBERS_MAX elseif (PLAYER.OPTION == GAMBLE_OPTION.BJ) then BET_OPTION.PAYOUT = BETS.BJ_PAYOUT BET_OPTION.MIN = BETS.BJ_MIN BET_OPTION.MAX = BETS.BJ_MAX elseif (table.contains(({GAMBLE_OPTION.LOW, GAMBLE_OPTION.HIGH}), PLAYER.OPTION)) then BET_OPTION.PAYOUT = BETS.HL_PAYOUT BET_OPTION.MIN = BETS.HL_MIN BET_OPTION.MAX = BETS.HL_MAX elseif (table.contains(({GAMBLE_OPTION.ODD, GAMBLE_OPTION.EVEN}), PLAYER.OPTION)) then BET_OPTION.PAYOUT = BETS.OE_PAYOUT BET_OPTION.MIN = BETS.OE_MIN BET_OPTION.MAX = BETS.OE_MAX elseif (table.contains(({GAMBLE_OPTION.FIRST, GAMBLE_OPTION.SECOND, GAMBLE_OPTION.LAST}), PLAYER.OPTION)) then BET_OPTION.PAYOUT = BETS.FSL_PAYOUT BET_OPTION.MIN = BETS.FSL_MIN BET_OPTION.MAX = BETS.FSL_MAX end if (PLAYER.OPTION ~= GAMBLE_OPTION.NONE) then PLAYER.BALANCE = Casino_CountMoney(CONTAINERS.COUNTER_BROWSE_FIELD, "all") + Casino_GetValueOfItems(CONTAINERS.COUNTER_BROWSE_FIELD) if (PLAYER.BALANCE >= BET_OPTION.MIN and PLAYER.BALANCE <= BET_OPTION.MAX) then if (CONFIG.SAFE_BET) then if (Casino_SafeBet(data.creature)) then return false end end CZANEL:SendOrangeMessage("[BOT]", "" .. data.creature .. " chose: " .. string.upper(MSG) .. " option.") doWriteLog("" .. data.creature .. " chosen: " .. string.upper(MSG) .. " option.") Casino_MoveMoney(CONTAINERS.COUNTER_BROWSE_FIELD, CONTAINERS.CHECK_MONEY_BACKPACK) Casino_MoveItems(CONTAINERS.COUNTER_BROWSE_FIELD, CONTAINERS.CHECK_MONEY_BACKPACK) if (PLAYER.BALANCE == Casino_CountMoney(CONTAINERS.CHECK_MONEY_BACKPACK, "all") + Casino_GetValueOfItems(CONTAINERS.CHECK_MONEY_BACKPACK)) then CZANEL:SendOrangeMessage("[BOT]", "" .. data.creature .. "'s amount of MONEY: " .. Casino_CountMoney(CONTAINERS.CHECK_MONEY_BACKPACK, "all") / 1000 .. "K, ITEMS: " .. Casino_GetValueOfItems(CONTAINERS.CHECK_MONEY_BACKPACK) / 1000 .. "K.") doWriteLog("" .. data.creature .. "'s amount of MONEY: " .. Casino_CountMoney(CONTAINERS.CHECK_MONEY_BACKPACK, "all") / 1000 .. "K, ITEMS: " .. Casino_GetValueOfItems(CONTAINERS.CHECK_MONEY_BACKPACK) / 1000 .. "K.") Casino_SortMoney() Casino_MoveItems(CONTAINERS.CHECK_MONEY_BACKPACK, CONTAINERS.ITEMS_BACKPACK) BET_TIME = os.time() if (PLAYER.OPTION == GAMBLE_OPTION.BJ) then Casino_BlackJack(PLAYER.OPTION) elseif (table.contains(({GAMBLE_OPTION.FIRST, GAMBLE_OPTION.SECOND, GAMBLE_OPTION.LAST}), PLAYER.OPTION)) then Casino_FirstSecondLast(PLAYER.OPTION) else Casino_Normal(Casino_RollRandom(), PLAYER.OPTION) end else Casino_MoveItems(CONTAINERS.CHECK_MONEY_BACKPACK, CONTAINERS.COUNTER_BROWSE_FIELD) Casino_MoveMoney(CONTAINERS.CHECK_MONEY_BACKPACK, CONTAINERS.COUNTER_BROWSE_FIELD) Self.Say(CHEAT_MSG) doWriteLog("" .. data.creature .. " wants to cheat Casino") PLAYER.OPTION = GAMBLE_OPTION.NONE end else if (PLAYER.BALANCE > 0 and (PLAYER.BALANCE < BET_OPTION.MIN or PLAYER.BALANCE > BET_OPTION.MAX)) then if (not table.contains(TABLE.MIN_MAX, data.creature)) then table.insert(TABLE.MIN_MAX, data.creature) Self.Say(Casino_InfoMessages(MIN_MAX_MSG)) PLAYER.OPTION = GAMBLE_OPTION.NONE end end end end end end end) diceproxy.lua local SignalListener = Signal.New("SignalListener") LocalSpeechProxy.OnReceive("SignalListener", function(proxy, mtype, speaker, level, text) Signal.Send("SignalListener", {creature = speaker, message = text}) end) creditos nao sei o autor

eae leo auehuaeh quanto tempo nao vejo vc com essa acc :v local pokemon = getItemAttribute(item.uid, "nome") local maxh = pokes[pokemon].vida seria isso?

Sobre o erro da conecção failed, tentaram mudar o IP? Quanto ao problema da casa.. A casa é comprada? Se não, o erro está no map, e a house não está adicionar como "house". No caso, abra o remeres e adicione a house!

Só faltou um end pra fechar o loop, Anderson. local quest = { [90003] = {name = "Box+1", done = 1}, } function onUse(cid, item, fromPosition, itemEx, toPosition) local tabela = {} for a, b in pairs(quest) do table.insert(tabela, b.name.." "..(getPlayerStorageValue(cid, a) == b.done and "[Feito]" or "")) end doShowTextDialog(cid, item.itemid, "Quests disponíveis:\n\n"..table.concat(tabela, "\n")) return true end

local toPos = {x = 1596, y = 738, z = 7} --pos para onde o player vai ser teleportado local tempo = 3 --tempo q ele vai ficar la... em segs local cooldown = xxx --Tempo, em segundos, de exhaust. local function teleport(cid, pos) if isCreature(cid) then doSendMagicEffect(pos, 20) doTeleportThing(cid, pos, false) end end function onCastSpell(cid, var) if getPlayerStorageValue(cid, 2938) > os.time() then return doPlayerSendCancel(cid, "Wait "..getPlayerStorageValue(cid, 2938) - os.time().." second(s) to use this spell again.") end local pos = getPlayerPosition(cid) doTeleportThing(cid, toPos, false) setPlayerStorageValue(cid, 2938, os.time() + exhaust) doSendMagicEffect(pos, 20) addEvent(teleport, tempo*1000, cid, pos) return true end

talkaction.xml <talkaction log="yes" words="/mute;/desmute" access="2" event="script" value="mute.lua"/> mute.lua salve na pasta scripts: local v = {} for k = 1, 100 do table.insert(v, createConditionObject(CONDITION_MUTED)) setConditionParam(v[k], CONDITION_PARAM_TICKS, k*60*1000) end function onSay(cid, words, param) if (words == "/mute") then local t = string.explode(param, ",") local GMName = getPlayerName(cid) if param == '' then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") return true end local player,time,pid = getPlayerByName(t[1]),t[2],getPlayerByNameWildcard(t[1]) if(not pid or (isPlayerGhost(pid) and getPlayerGhostAccess(pid) > getPlayerGhostAccess(cid))) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player with this name doesn\'t exist or is offline.") return TRUE end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você silenciou o jogador "..t[1].." por "..time.." minuto(s).") doAddCondition(player, v[tonumber(time)]) setPlayerStorageValue(player, 90000, os.time()+time*60) doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você foi silenciado de todos canais por "..t[2].." minuto(s). Por: "..GMName..".") elseif (words == "/desmute") then if param == '' then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Invalid param specified.") return true end local player = getPlayerByNameWildcard(param) if(not player)then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Player not found.") return true end if getCreatureCondition(player, CONDITION_MUTED) == false then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "este jogador não está silenciado.") return true end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "O player "..param.." não está mais silenciado.") doRemoveCondition(player, CONDITION_MUTED) setPlayerStorageValue(player, 90000, -1) doPlayerSendTextMessage(player, MESSAGE_INFO_DESCR, "Você não está mais silenciado.") end return true end em creaturescripts.xml <event type="login" name="MutePlayer" event="script" value="Mutar_Check.lua"/> Mutar_Check.lua salve na pasta scripts local v = {} for k = 1, 100000 do table.insert(v, createConditionObject(CONDITION_MUTED)) setConditionParam(v[k], CONDITION_PARAM_TICKS, k*1000) end function onLogin(cid) if getPlayerStorageValue(cid, 90000) >= os.time() then doAddCondition(cid, v[tonumber(getPlayerStorageValue(cid, 90000) - os.time())]) end return TRUE end Esse script, ele muta o player de todos os canais públicos

Olá pessoal, venho mais uma vez trazer um tutorial simples, e tentar explicar tudo claramente, esse tutorial pode ficar grande dependendo do desenrolar dele, pois é um pack de tutoriais, então vou usar spoilers para ajudar na formatação do tópico. Nota: as informações usadas abaixo, podem ser tanto usadas com o nome, quanto com o número, e podem ser encontradas na pasta lib no arquivo 000-const Coordenadas: Tutorial feito e formatado por @Caronte. Combate: Tutorial feito e formatado por @Caronte. Slots: Tutorial feito e formatado por @Caronte Participação: @Night Wolf Const_ani e Const_me: Tutorial feito e formatado por @Caronte. [titulo][/titulo] Os assuntos do tópico poderão se diminuídos ou aumentados de acordo com o desenrolar do tempo, gostaria de apoio, e não me incomodaria se alguém se propusesse fazer algum tutorial, eles serão supervisionados por mim e formatados por mim, para serem postados neste tópico.

Boa cara! Adiciona um spoiler pro tópico não ficar tão pesado rsrs

Verdade!, eu nem sei onde está esse mapa, em meio a minha bagunça... Eu crio pasta pra colocar os arquivos do desktop, aí quando ele ta cheio eu movo para lá. já tenho uns 3 desktops...

Tá de parabéns :0 tem talento! kk Reparei que ta faltando um detalhe de borda na primeira imagem do lado da vara de pesca kkkk

Boa, evolui bastante =)

Ué atualizou para IOS ? parabéns...

Alterando PIC e Imagens do Client E ai galera, hoje vou ensinar pra vocês, como alterar o PIC e outras imagens do seu Client. Vamos lá! 1º - Faça o download do PIC Editor e extraia para uma pasta. Download PIC Editor 2º - Abra o PIC Editor, você verá esta tela. 3º - Em seguida, vá em Arquivo e clique em Abrir. 4º - Logo após, selecione o arquivo PIC do seu client. 4º - Agora, clique vá em Arquivo e clique em Importar e selecione a imagem que você quer que seja sua nova PIC. Lembre que esta imagem deve estar nas dimensões 640x480 e no formato BMP. 5º - Caso queira alterar outras imagens, basta clicar em uma das setas na parte inferior e selecionar o que deseja substituir. 6º - Por fim, clique em Compilar. 7º - Selecione a pasta do seu client e salve o novo arquivo .PIC la, substituindo o antigo. 8º - Abra seu Client e desfrute do novo Background. É isso galera, espero que tenha ajudado! Tutorial feito por mim. Abraços! Créditos: Roksas.

Olhando as scripts do lobo agente aprende muitas coisas. Espero um dia chegar ao nível em scripts igual ao dele. Mais cada vez que vejo uma script Nova dele agente se surpreende mais ainda.

Rabisco aleatório

Crie um arquivo chamado scrollvoc.lua em data/actions/scripts e coloque isso: function onUse(cid, item, fromPosition, toPosition) local voc = {1} --id da vocação local scroll = {} --id do item local efeito = {} -- efeito if item.uid == scroll then doPlayerSetVocation(cid, voc) doSendMagicEffect(cid, efeito) end return true end Agora em actions.xml adicione essa Tag: <action actionid="id da scroll" script="scrollvoc.lua"/> Fiz pelo celular, nada garantido. Mais pode fazer de vários modos. Até pra ter lvl para usar a scroll.

Eai galera, vim apresentar este projeto incrível que o xtibia está patrocinando! O servidor vem com base no atual 'PokeStorm Linux 3.20', e querendo bater de frente com o mesmo. Nosso servidor é cuidadosamente balanceado para manter a total diversão dos nossos jogadores, entre o nosso balanceamento,está: Pokémons Antigos, Pokémons Novos, Quests, Respawns, Força/Defesa/Poder dos Pokémons, etc. Sistemas: Sistemas Básicos: *Order - 100% *Fly - 100% *Ride - 100% *Surf - 100% *M1~M12 - 100% *Passivas - 100% *Caught - 100% *Evoluções - 100% *Go/Back - 100% *Limite de 6 Pokémons - 100* Sistemas 'Mais avançados': *1°, 2° Gerações Completas - 100% *3°, 4° Gerações Incompletas - 100% *Paint Pokeball - 100% *Fishing e Fishing Zone - 100% *Saffari Sistem - 100% *Duel - 100% *Nick em seu Pokémon - 100% *Cor diferenciada na fala Dos Admins GMs e Tutores - 100% *Muted com Motivo (Spam, Flood, Calunia, etc) Novos Sistemas e/ou estão sendo desenvolvidos: *Boost System - 100% *Clan System - 100% *GS Pokéball - 100% *Master League/Master Ball - 100% *Pinkan Pokémon - 100% *Spawn de Boss Aléatorio - 95% *Pokémon Extra no Inventário (7° Pokémon) - 100% *Daily Task - 75% Equipe A Nossa equipe consiste em 2 Admininstradores, 3 Gamemasters e 2 Tutores. @@ShiroNG, é o responsável pelo Mapping e Design do servidor, e administra em geral o mesmo. @Aksz é Responsável pelas Libs/Bibliotecas do Linux, para ligamento do servidor, E Também a parte de Web. Os Gamemasters são como uma ajuda para os Admins inGame, eles olham, respondem e resolvem os reports. Os Tutores são como Gamemasters menores, eles ajudam os players em suas dúvidas, e até em quests para os iniciantes. O Servidor já esteve online por volta de 5 meses, só que houve um aumento de memoria/custos requerida para o ligamento do servidor, então, decidimos fechar o servidor. Mas em meados de Maio/2015 Tivemos a idéia de voltar com o servidor, mas não como ele era, e sim "Novo", com sistemas novos, etc. E Então surgiu o 'Version II'. Então é isso, cadastre-se já no PokeSky! Site: www.pokesky.com Fórum: www.pokesky.com/forum Página no Facebook: www.facebook.com/PSkyOficial

Ajudando a reviver essa é a minha 1° Sprite Uma sword manchada de sangue (tentei)

Categoria: Download de SPRITES Créditos: PokeXGames - PXG Conteúdo: Cliente da PXG referente a data 22/03/2015 descompilado. OBSERVAÇÕES: O cliente deve ser aberto utilizando o OBJECT BUILDER, onde as opções EXTENDED e TRANSPARENCY devem estar marcadas. FOTOS: - DOWNLOAD: MediaFire SCAN: Virustotal

Bom conteúdo mais quando inicia o server os spawns buga quando estão sendo abertos( imagem abaixo )

Então, muitos já perguntaram onde acho meus recursos e acho que essa lista vai ser de extrema utilidade para todos que estejam interessados em Design. Trago uma pequena lista com alguns sites de recursos para vocês meus Designers favoritos. Fontes: 007 Fonts 1001 Fonts 1001 Free Fonts About.com - Free Adobe Photoshop Brushes Abstract Fonts Ace Free Fonts Acid Fonts Action Fonts All-free-fonts Better Fonts Dafont DDfont Die Gestalten Dingbat Depot Exljbris Fawnt FFontes Font Boutique Font Files Font Freak Font Garden Font Squirrel Font Sugar Font Village Fontasy Font Diner FontFace Fontreactor Fonts101 Fonts 500 Fonts For Flash Fontscape Fontz Free Fonts Get Free Fonts Grunge Fonts Image Plus Lotsa Fonts MisPrinted Type 3.0 Pimp My Fonts PsyOps Search Free Fonts Sharkshock ShowFont Simply The Best Smashing Magazine Smeltery SoFontes - Fontes True Type Grátis Para Download The Realm Me Type Different TypeNow Urban Fonts Brushes: Adam Woodhouse - Set 1 Adam Woodhouse - Set 2 Adam Woodhouse - Set 3 Hernan Davos - Photoshop Brushes - Master Collection ::exposed:: ::Imprints:: !BRUSH.A.HOLIC! 7 Days 23outlet.com 44suburbia - Hipster Brushes 84percent 500ml.org 1001 Tours - Your Business Partner Adobe Studio Exchange Aethereality.net - Photoshop Brushes AMNESIA Angelic-trust.net - Photoshop Brushes Appendixsquared Arte de Késsia Nina Aquired-Taste.net Bêtabloquants - Sets de Brushes Nostalgicos Brushes de Annika Von Holdt Brusheezy brushworX no4 Brushking Celestial Star Damned In Black - Brushes Gratuitos Darkwaif Darkwaif - Brushes para Photoshop 6 DeviantART Dragon Rust Dubtastic Design Labs echoica Encre - Brushes Gratuitos para Photoshop 7 FBrushes Free Photoshop Brushes Gabriele Magurno Get Brushes.com Glitter-Tramp.com Graffiti Fonts HOPEDRIVEN HYBRID GENESIS In Obscuro - Photoshop Brushes Just Lia - Blog Nacional Kiss My Pixels Lush Brushes Nymphae Brushes Obsidian Dawn: Brushes Pixelchick - Photoshop Brushes Photoshop Brushes by Sage Photoshop Laboratory Photoshop Mosaic Photoshop Ninja Burst Brushes Vol 1 Download Photoshop Tutorials.de PhotoshopBrushes.com PS Brushes - The Largest Photoshop Brush Resource on the Internet SecretLoft Seishido.biz - Photoshop Brushes Spoono Spy-Glass.net - Photoshop Brushes studio brushes Swirls & Flourishes Photoshop Brushes Templates By Marina The Photoshop RoadMap ToastSnatcher - Free Brushes Tom Ledin Photoshop Brushes Vbrush Vbrush (Buscador de Brushes na Internet) VOID Brushes youthless.net Patterns: BGPatterns Brusheezy DeviantART FBrushes Pattern 8 Squidfingers Plug-ins: About Adobe Photoshop Exchange Angelfire Filterz Filter Forge Free Photoshop - Site de Plug ins Harry's Filter Photo Freebies Photo-plugins Photoshop Mosaic Photoshop Plugins - PluginsWorld - Photoshop Plug-ins Directory Plug in Galaxy RedField Plugins Telegraphics The Photoshop RoadMap The Photoshop RoadMap - Plug-ins 3D para Photoshop The Plugin Site virtualPhotographer Actions: 124 Free Photoshop Actions About.com - Double to Single Page Layout Action para Digital Scrapbooking About.com - Free Photoshop Actions About.com - Remove Red Eye Action Central - Photoshop Actions & Tutorials Action FX - Photoshop Actions Site Addicted To Design Adobe Evangelists - Free Photoshop Actions PanosFX Texturas: 2D Valley Amazing Textures AppendixSquared CG Textures Citrus Moon DeviantART FBrushes Flickr Grunge Textures Image*After In Texture Infinite Fish Mayang - Backgrounds & Texturas Pixel Perfect Digital - Texturas Photoshop Mosaic Plaintextures Squidfingers TEXTURA - Textures by Vered Texture Archive Texture Warehouse - Texture Library TextureKing Your Daily Texture Bancos de Imagens Free: 9x13 A Digital Dreamer Aarin Free Photo AboutPixel.de AbsolutVision Acclaim Images Amazing Textures AMG Free Photos Animal Photo Album Baj Stock Bancoimagenes Barry’s Free Photos Big Foto Blue Vertigo Burnin Well Cepolina Corbis Cromavista Demmy.nl Design Packs DeviantArt DexHaus Digital Dreamer Digital Library System Diwiesign DNS Fotografia Digital Dreamstime Every Stock Photo - Buscador de Fotos Free Farm Photo Flickr Creative Commons FontPlay Free Photos Fotolia Free Digital Photos FreeFoto Free Images.co.uk FreeImages.com Free Digital Photos Free Media GOO Free Photo Station Free Photographs Network Free Photos Free Photos Bank Free Picture Click Free Pixels Free Range Stock Free Stock Photography Free Stock Photos FWS Pictures and Graphics Geek Philosopher Getty Images GIMP Savvy Graphic Maps Graphics Arena Great Images in NASA Image After Image Base Image Blowout Images of American Political History Images of the World Image Temple Index Stock Insect Images Insecta Intuitivmedia iStockPhoto Japanese Streets Jupiter Images Kave Wall Light Matter Liam’s Pictures from Old Books Lonely Planet Images Lorem Pixum Lucky Oliver Magnum Photos MasterFile Mayang’s Free Textures Micro Shots Morgue File NASA Images Nations Illustrated National Park Service Digital Images Index NWYH Stock Library NYPL Digital Gallery One Odd Dude Open Photo PDPhoto Photocase Photogen Photo Rack Photo Shocked PicStyle Picture Quest Piotrix Pixalia Pixelio Pixel Gallery Pixel Perfect Digital PlinkME Public Domain Stock Photos Public Health Images Library Pyed.net Robin Good RubberBall ShutterStock Star 29 Stock Exchange Stock Vault Stock XCHNG StockXpert Studio25 Terra Galleria Texture King Texture Warehouse Truly Free Stock Turbo Photo Twicepix UnProfound US Geological Survey Photographic Library USDA Image Gallery Vintage Pixels Wallpaper Stock Wikimedia Commons Woophy World of Stock Yellowstone Digital Slide File Yoto Photo Bancos de Imagens Comerciais: 123RF Big Stock Photo Can Stock Photo Corbis Dreamstime FotoSearch Fotolia FreeDigitalPhotos Pixmac - Free Pictures Shutterstock - Free Photo of the Week Free Digital Photos Getty Images Inmagine iStockphoto Jupiterimages Unlimited Matton Images Pixmac Photocase Photos.com PhotoSpin PunchStock Shutterstock Spffy Stockxpert Unprofound Veer VivoZoom