Ir para conteúdo

Vodkart

Herói
  • Total de itens

    3406
  • Registro em

  • Última visita

  • Dias Ganhos

    113

Tudo que Vodkart postou

  1. Vodkart

    [Fechado]

    lick and eat my pussy
  2. Vodkart

    [Fechado]

    spam removido.
  3. Vodkart

    [Fechado]

    gostei foi do avatar:
  4. Spam Removido.
  5. function onSay(cid, words, param) local config = { s = 11548, -- n mexa exhau = 30, -- tempo em seeundos para usar o comando denovo pz = "no", -- players precisam estar em protection zone para usar? ("yes" or "no"). battle = "no", -- players deve estar sem battle ("yes" or "no") custo = "no", -- se os teleport irão custa ("yes" or "no") premium = "no" -- se precisa ser premium account ("yes" or "no") } -------------Config Lugares---------------- local lugar = { ["sul"] = {{x=2461, y=2419, z=7}, 1, 2000}, ["west"] = {{x=2269, y=2264, z=7}, 10, 1000}, ["east"] = {{x=2997, y=2163, z=7}, 1, 2000}, ["nort"] = {{x=2577, y=2086, z=7}, 1, 2000} } -------------/Config Checkar não mecha---------------- local lugar = lugar[param] if (param == "check") then for name, pos in pairs(lugar) do text = "Destino: "..name..", Level necessario: "..pos[2].."," if(config.battle == "yes") then text = text.." Voce pode usar estando battler: SIM" else text = text.." Voce pode usar estando battler: Não" end if(config.pz == "yes") then text = text.." Voce DeVe Usar estando PZ: SIM" else text = text.." Voce DeVe Usar estando PZ: Não" end if (pos[3] == TRUE) then text = text..", Cost: "..pos[4]..";" end doPlayerSendTextMessage(cid, 20, ""..text.."") end return TRUE end if(config.pz == "yes") and (getTilePzInfo(getCreaturePosition(cid)) == FALSE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"você precisa estar em protection zone pra poder teleportar.") return TRUE end if(config.premium == "yes") and (not isPremium(cid)) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "apenas players com premium account podem teleportar.") return TRUE end if(config.battle == "yes") and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você precisa estar sem battler pra poder teleportar.") return TRUE end if (getPlayerStorageValue(cid, config.s) >= os.time()) then doPlayerSendCancel(cid, "Você tem que esperar " .. getPlayerStorageValue(cid, config.s) - os.time() .. " segundos para usar o comando novamente.") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE end if not(lugar) then doPlayerSendTextMessage(cid, 22, "desculpe,este lugar não existe") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE end if (getPlayerLevel(cid) <= lugar[2]) then doPlayerSendTextMessage(cid, 22, "Desculpe,Voce não tem level. voce precisa "..lugar[2].." level ou mais para ser teleportado.") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE end if(config.custo == "yes") and (doPlayerRemoveMoney(cid, lugar[3]) == FALSE) then doPlayerSendTextMessage(cid, 22, "Desculpe,voce nao tem dinheiro suficiente. Voce precisa "..lugar[3].." gp para ser teleportado.") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE end doTeleportThing(cid, lugar[1]) doSendMagicEffect(lugar[1], 46) doPlayerSendTextMessage(cid, 22, "" .. getPlayerName(cid) .. " foi teleportado para: " .. param .. ".") setPlayerStorageValue(cid,config.s,os.time()+config.exhau) return TRUE end
  6. VOU FAZER UM TÓPICO SOBRE ISSO JÁ VOLTO
  7. CTRL+C & CTRL+V
  8. DA UM MASS BAN ENTÃO E ACABA COM ISSO TD ACONTECE QUE UM ENTRA E NÃO SABE BRINCA AÍ FICA OFENDIDO E VAI CHORAR...AH VEIO SEM NOÇÃO --' MAIS OK VOU MANERAR UM POUCO,TODO NEWFAG QUE PASSAR POR AQUI VAI SAIR MAIS RAPIDO QUE ENTRO
  9. ISSO É UMA BIBLIOGRAFIA OU UMA ENTREVISTA? NEM CONSEGUI LER TUDO :x MAS FEZZIN EH PARCEIRO BOA MALANDRO (:
  10. OS INCOMODADOS QUE SE RETIREM
  11. o bar sempre foi uma putaria velho,quem entra no fórum sabe... e não é por causa de um tópico ou de outro que as coisas vão mudar,falta atitude,e atitude é uma coisa que deixa a desejar aqui (:
  12. memes do lord xd
  13. Vodkart

    Ieuu!

    OLOCO CINEMA PORNO EM CASA ADOGO
  14. fazer pelo banco de dados é mais fácil mas exige saber lua sql (:
  15. Belo sistema lobão (: está de parabéns,obrigado por trazer ao xistebea abraços
  16. Vodkart

    Ieuu!

    JOGA ALGUM JOGO DE TIRO ONLINE?
  17. Vodkart

    Ieuu!

    moral hein coloca no orkut que vai bomba
  18. é só ... e dps ... pronto! fácil
  19. já vai ser o 316325361532 tópico religioso que vão criar,depois de tanta discussão ele morre.
  20. Vodkart

    Foox Com Novas Fotos

    lenda é meu salame que entra e sai do seu feijão
  21. http://www.xtibia.com/forum/topic/160177-comando-para-ver-quantidade-de-skills/
  22. só completando ^^ function onCombat(cid, target) local storage = 59000 if (isPlayer(cid) and isPlayer(target)) then if getPlayerStorageValue(cid, storage) >= 1 and getPlayerStorageValue(target, storage) >= 1 then doPlayerSendDefaultCancel(cid, RETURNVALUE_YOUMAYNOTATTACKTHISPLAYER) return FALSE else return TRUE end else return TRUE end return TRUE end
  23. function onSay(cid, words, param) local max,days,price = 360,30,10000 if getPlayerPremiumDays(cid) >= max then return doPlayerSendCancel(cid, "Você não Pode comprar mais que "..max.." dias de p.a.") elseif doPlayerRemoveMoney(cid, price) == FALSE then return doPlayerSendCancel(cid, "Você não tem "..price.." gps para comprar "..days.." dias de p.a.") end doPlayerAddPremiumDays(cid, days) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Você comprou "..days.." dias de premmium.") return true end
  24. Vodkart

    Foox Com Novas Fotos

    ou não!
  25. Vodkart

    Mophus

    LORDZ MALANDRÃO DA BALADA HEIN!
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...