Vodkart

function onStepIn(cid, item, position, fromPosition) if getPlayerLevel(cid) < 50 then doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "You need level 50, your level is "..getPlayerLevel(cid)..".") return true end function checkpos(cid) local from, to = {x=160, y=54, z=7}, {x=165, y=55, z=7} -- pos começo e final dos tiles que não poderá ficar parado if not isCreature(cid) then return LUA_ERROR end if isInRange(getCreaturePosition(cid), from, to) then doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) end end addEvent(checkpos, 10000, cid) return true end

function onStepIn(cid, item, position, fromPosition) if getPlayerLevel(cid) < 50 then doTeleportThing(cid, fromPosition) doPlayerSendCancel(cid, "You need level 50, your level is "..getPlayerLevel(cid)..".") return true end function checkpos(cid) local tile_pos = {x = 160, y = 48, z = 7} -- pos do tile que não poderá ficar parado if not isCreature(cid) then return LUA_ERROR end if getCreaturePosition(cid).x == tile_pos.x and getCreaturePosition(cid).y == tile_pos.y then doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) end end addEvent(checkpos, 10000, cid) return true end

function onSay(cid, words, param) local items = { ["lunar"] = {qnt = 20, ch = 7424}, ["carrow"] = {qnt = 30, ch = 2352}, ["gbow"] = {qnt = 50, ch = 7438}, ["wsword"] = {qnt = 80, ch = 2408}, } if not param or param == "" or not items[param] then doPlayerSendTextMessage(cid, 20, "Não encontramos este item no estoque, os items disponíveis são:") for a, b in pairs(items) do doPlayerSendTextMessage(cid, 20, ""..getItemNameById(b.ch).." - "..b.qnt.." gold nuggets.") end return true elseif not doPlayerRemoveItem(cid, 2157, items[param].qnt) then doPlayerSendTextMessage(cid, 20, "Para comprar um "..getItemNameById(items[param].ch).." você precisa de "..items[param].qnt.." gold nuggets.") return true end doSendMagicEffect(getThingPos(cid), 14) local x = doPlayerAddItem(cid, items[param].ch) doItemSetAttribute(x, "description", "Este item foi comprado Por " .. getCreatureName(cid)) doPlayerSendTextMessage(cid, 20, "Você comprou um "..getItemNameById(items[param].ch).." por "..items[param].qnt.." gold nuggets.") return true end

local config = { MaxPlayer = 20, fight_skills = { ['fist'] = 0, ['club'] = 1, ['sword'] = 2, ['axe'] = 3, ['distance'] = 4, ['shielding'] = 5, ['fishing'] = 6, ['dist'] = 4, ['shield'] = 5, ['fish'] = 6, }, other_skills = { [''] = "level", ['level'] = "level", ['magic'] = "maglevel", ['health'] = "healthmax", ['mana'] = "manamax" }, vocations = { ['sorcerer'] = {1,5}, ['druid'] = {2,6}, ['paladin'] = {3,7}, ['knight'] = {4,8} }, storages = { ['frags'] = 824544 } } function onSay(cid, words, param) local param,str = string.lower(param),"" if not config.fight_skills[param] and not config.other_skills[param] and not config.vocations[param] and not config.storages[param] then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "este rank não existe.") return true end str = "--[ RANK "..(param == "" and "LEVEL" or string.upper(param)).." ]--\n\n" query = config.fight_skills[param] and db.getResult("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = "..config.fight_skills[param].." ORDER BY `value` DESC;") or config.other_skills[param] and db.getResult("SELECT `name`, `"..config.other_skills[param].."` FROM `players` WHERE `id` > 6 AND `group_id` < 3 ORDER BY `"..config.other_skills[param].."` DESC, `name` ASC;") or config.storages[param] and db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = "..config.storages[param].." ORDER BY cast(value as INTEGER) DESC;") or db.getResult("SELECT `name`, `level` FROM `players` WHERE `group_id` <= 2 AND `vocation` = "..config.vocations[param][1].." or `vocation` = "..config.vocations[param][2].." ORDER BY `level` DESC;") if (query:getID() ~= -1) then k = 1 while true do str = str .. "\n " .. k .. ". "..(config.fight_skills[param] and getPlayerNameByGUID(query:getDataString("player_id")) or config.storages[param] and getPlayerNameByGUID(query:getDataString("player_id")) or query:getDataString("name")).." - [" .. query:getDataInt((config.fight_skills[param] and "value" or config.storages[param] and "value" or config.vocations[param] and "level" or config.other_skills[param])) .. "]" k = k + 1 if not(query:next()) or k > config.MaxPlayer then break end end query:free() end doShowTextDialog(cid,6500, str) return true end

function onKill(cid, target, lastHit) local pkDeathPoints = 5 -- pontos que vai ganhar por matar pk. local deathPlayer = 2 -- pontos que vai ganhar por matar sem pk. local vetMonster = { {nome="Apocalypse", quant=3}, -- nome do monstro e quantidade de rep que ira ganhar. {nome="Morgaroth", quant=4}, {nome="Ghazbaran", quant=4}, } if (isPlayer(target) == true) then local points = getCreatureSkullType(target) > 2 and pkDeathPoints or deathPlayer setPlayerStorageValue(cid, 102086, getPlayerStorageValue(cid, 102086)+points) doSendAnimatedText(getThingPos(cid), 'Rep+', 30) doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"You won "..(points).." point(s) reputation for killing "..getCreatureName(target)..".") return true end for i=1, #vetMonster do if (getCreatureName(target) == vetMonster[i].nome) then setPlayerStorageValue(cid, 102086, getPlayerStorageValue(cid, 102086)+vetMonster[i].quant) doSendAnimatedText(getThingPos(cid), 'Rep+', 30) doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"You won ".. (vetMonster[i].quant) .." point(s) reputation for killing ".. (vetMonster[i].nome) ..".") end end return true end

tenta function onUse(cid, item, fromPosition, itemEx, toPosition) local function Voltar(pos) return doTransformItem(getTileItemById(pos, 2255).uid, 1724) end if itemEx.uid == 4012 then if getPlayerStorageValue(cid, 8999) >= 1 then doPlayerSendTextMessage(cid, 22, "Você já fez essa quest.") return true end doSendMagicEffect(toPosition, 2) doTransformItem(itemEx.uid, 2255) doCreateItem(2553, 1, fromPosition) setPlayerStorageValue(cid, 8999, 1) addEvent(Voltar, 180000, toPosition) end return true end

n é creaturesript?? tem certeza?? deve ser globalevents

é o nego preto do xtibia

atualizei o meu aqui, vou checar esse bug da garagem é agr e ja posto atualizações

por isso q n saiu pra pc ainda né? é pra vc n colocar suas patas de macaco no jogo

ATUALIZAÇÃO SAIU HJ?? NEM ATUALIZEI O MEU AINDA TO PUTO COM ESSE BUG DA GARAGEM E DO CARRO SUMINDO

sua pele ta bem lisinha, antes vc tinha acne '-' ta parecendo um gayzão de qualidade friboi agr bjs

já enviei por PM o novo código! testei aqui e funcionou perfeitamente.. eu tinha esquecido de trocar o nome de query:next() por guild:next()

massa era recrutar as gangue e ir dominando a área kkk

chegando m casa eu vejo, ai te envio uma pm

não joguei o online ainda, o online é só para brincar? se matar e talz?

comprei um carro de 1 milhão e tunei ele ao máximo sim mas eu nem fechei o GTA ainda, estou bugando meus milhões com a maletinha de 25 MIL cada, ueheuehueheueuee

BUG NOJENTO ESSA DA GARAGEM O CARA COMPRA OS VEÍCULOS, SE VC MORRER OU DEIXAR ELES NA RUA, ELES NÃO VOLTAM PRA DEVIDA GARAGEM! A ROCKSTAR DISSE QUE ESTÁ TRABALHANDO PARA FIXAR O BUG E QUE EM BREVE FARÁ UMA ATUALIZAÇÃO DE GRAÇA. VSF, PERDI 1 MILHÃO E MEIO NESSA PORRA

eu gosto... mas são bem poucas as opções de cortes e estilos que tem

░░░░░░░░░░░▒▒▒░░░░░░░░░░░░░░░░░░░░░░░░░░░░ ░░░░░░░░░▓█████▓░░░░░░░░░░░░░░░░░░░░░░░░░░ ░░░░░░░░░██▓▓▓███▓███▓▒░░░░░░░░░░░░░░░░░░░ ░░░░░░░░░█▓▓▓▓▓▓████████▓███▓▒░░░░░░░░░░░░ ░░░░░░░░░█▓▓▓▓▓▓▓▓▓▓▓▓▓███████▓░░░░░░░░░░░ ░░░░░░░▓▓█▓▓▓▓▓▓▓▓▓▓▓▓▓▓█▒░░░▓█▓░░░░░░░░░░ ░░░░░░▒██▓▓▓▓▓▓▓▓▓▓▓▓▓▓█▓░░████▓░░░░░░░░░░ ░░░░░▓██▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓█▓▒▓█▓███▒░░░░░░░░░ ░░░░▒██▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓░░▓█▒▓▓▓▒░░░░░░░░░ ░░░░▒█▓▓████▓▓▓▓▓▓▓▓▓▓▓█▒░░███▓▓▒░░░░░░░░░ ░░░░█▓▓██▒▓██▓▓▓▓▓▓▓▓▓▓█▓▒░░░▒██▒░░░░░░░░░ ░░░░███▓░░░▒██▓▓▓▓▓▓▓▓███▓▓▓███▓██▒░░░░░░░ ░░░▒██▓░▒█▓▒▒█▓█▓▓▓▓▓▓▓████████▓██▓░░░░░░░ ░░░▓██▒▓████░▓██▓▓▓▓▓▓▓▓███████▓████▓░░░░░ ░░░▓█▓░▓██▓█▒▒██▓▓▓▓▓▓▓▓▓▓██▓████▓▓▓█▓░░░░ ░░▒█▓▓░▓█▓▓█▒▒██▓▓▓▓▓▓▓██▓▓███▓▓▓▓██▓█▒░░░ ░░▓█▓█▒░▓██▒▓████▓▓▓█▓▓▓▓▓██▓▓████████▓░░░ ░░▓█▓██▒░░░▒█████▓▓██▓▓▓▓▓▓▓██████████▓░░░ ░░█▓▓▓████████▓█▓██▓▓▓▓▓▓█████████████▓░░░ ▒███▓▓▓██████▓▓▓▓▓▓▓▓▓████████████████▓░░░ ▓█▓▓▓▓▓█████▓▓▓▓▓▓▓███████████████▓░▓█▒░░░ █▓█▓▓▓▓▓▓█▓▓▓▓▓▓██████████████▓▓██▓▒▒█▓░░░ █▓█▓▓▓▓▓▓▓▓█▓▓▓██████████████▒░░▓██▓▒▓█▒░░ █▓██▓▓▓▓▓▓▓█▓▓██████████████▓░▒▓▒▓█▓░▒█▒░░ █▓▓▓█▓▓▓▓▓█▓▓██████████▓████▓▒▒▓▓▓██▒▓█▒░░ ▓█▓▓█▓▓▓▓█▓▓█████████▒░░▓███▓▒▒▒▒▒▓███▓░░░ ░▓██▓▓▓▓▓█▓▓████████▒░▒▒▒████▒▒▒▒░▒██▒░░░░ ░░▒█▓▓▓▓█▓▓████▓░░▓█▓▒▒▒▒████▓▒▒░▒█▓░░░░░░ ░░░▓▓▓▓▓█▒▓██▓█▓▒▒▒█▓▓▓▒▒▓████░░▓█▓░░░░░░░ ░░░▓▓▓▓█▓▓███▓▓▓▒▒▒██▒▒▒▒▒███████▓▒░░░░░░░ ░░░▓█▓▓█▓▓███▓▓█░░▒██▓░░░▒▓██████▓░░░░░░░░ ░░░▓█▓▓█▓▓██████▒▓▓███▓▓█████████▓░░░░░░░░ ░░░▓█▓▓█▓▓███████████████████████▓░░░░░░░░ ▒████▓██▓▓████████████████████████▒░▒▒░░░░ ██▓██▓█▓▓██████████████████████████▓████▒░ ▓▒▓▓█▓█▓▓███████████████████████████████▓░ ▓██▓█▓█▓▓███████████████████████▒▓██▓█▓▒▓▒ ██▓▓█▓▓▓▓███████████████████████▒░▓█▒▒█▓█▒ ▓▓▓▓█▓▓▓▓█████████████████████▓█▓░▒█▓░▓██▓ ▓▓▓▓█▓▓▓▓███████████████▓▒░█▓░░▓██▓███████ ▓▓▓▓█▓▓▓▓▓████▓▓███████▓░▒░▓█▒▓▒█████████▒ ▓▓▓▓█▓▓▓▓▓▓█████▓▒█▓▒▒██▓▓▓██▓▓█████████▒░ ▓▓▓█▓█▓▓▓▓▓█████▓▒▓█▒▒█████████████████▒░░ ▓▓██▓██▓▓▓▓▓█████████████████████████▓░░░░ ▓██▓▓▓██▓▓▓▓▓██████████████████████▓▒░░░░░ ██▓▓▓████▓▓▓▓▓▓▓▓█████████████████▒░░░░░░░ ▓▓▓███▒░▓██▓▓▓▓▓▓▓▓▓▓███████████▓░░░░░░░░░ ▓▓██▒░░░░▒███▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓███▒░░░░░░░░░░ ▓██▒░░░░░░░▒████████████████▒░░░░░░░░░░░░░

terminei, vou mandar por pm...

aho qu não tem nada a ver com esse script, porque esse só deleta o char que já possui na conta e só

que erro do account manager? ele ta deletando o account manager? vou sim, quando eu chegar em casa hoje de noite

não, ese de aparecer somente 4 é eu q fiz besteira kkkk mas deleta as demais conta... tenta assim pra ve se vai aparecer só 4 de novo: function onStartup() function getDBPlayersCount() local result = db.getResult("SELECT COUNT(`id`) as `count` FROM `players`;") local tmp = result:getDataInt("count") result:free() return tmp end local DB_BEFORE = getDBPlayersCount() local cleanup = { {level = 11, time = 5 * 24 * 60 * 60}, {level = 50, time = 15 * 24 * 60 * 60}, {level = 100, time = 30 * 24 * 60 * 60}, {level = 200, time = 60 * 24 * 60 * 60}, {level = 300, time = 90 * 24 * 60 * 60} } for i = 1, #cleanup do db.executeQuery("DELETE FROM `players` WHERE `level` < ".. cleanup[i].level .." AND `id` > 6 AND `group_id` < 2 AND `lastlogin` < "..os.time() - cleanup[i].time) end local DB_NOW = DB_BEFORE - getDBPlayersCount() if DB_NOW > 0 then local text = ">> [DBCLEANUP] "..DB_NOW.." inactive players have been deleted from database." print("" .. text .. "") local file = io.open("data/logs/db_cleanup.txt", "a") file:write("\n[".. os.date("%d %B %Y %X ", os.time()) .."] "..text.."") file:close() end return true end

é porque tem jogadores que são donos de guild, ai teria que deletar a guild antes para depois deletar o player... quando eu tiver um tempinho eu faço esse script para deletar guild, house e o player