Subwat

vuxe precisa de um dixtro TFS 4.1 .

não creio :0

esse é o sistema que a equipe do heroserv usa para dar itens stars,no Hero ao atingir level 200 você é teleportado automaticamente há uma sala com as chests,ao dar use numa das chests você recebe o item e é teleportado para o templo. simples e útil. CREATURESCRIPTS/SCRIPTS/200.LUA function onAdvance(cid, skill, oldLevel, newLevel) if skill == SKILL__LEVEL then if newLevel >= 200 and oldLevel < 200 then pos = {x=10475, y=10807, z=7} doTeleportThing(cid,pos) pos = {x=10475, y=10807, z=7} doPlayerSendTextMessage(cid, 22, "parabéns você atingiu o level 200 você pode escolher um star item!") end end end TAG: <event type="advance" name="staritem" script="200.lua"/> em creaturescripts/scripts/login.lua cole está tag tmbm if getPlayerLevel(cid) < 200 then registerCreatureEvent(cid, "staritem") end ACTIONS: function onUse(cid, item, frompos, item2, topos) if item.uid == 2433 then queststatus = getPlayerStorageValue(cid,7407) if queststatus == -1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "you received your star item!.") doPlayerAddItem(cid,2433,1) pos = {x=10160, y=10054, z=7} doTeleportThing(cid,pos) pos = {x=10160, y=10054, z=7} setPlayerStorageValue(cid,7407,1) else doPlayerSendTextMessage(cid,22,"Você ja ganhou este bonus!") end else return 0 end return 1 end function onUse(cid, item, frompos, item2, topos) if item.uid == 7388 then queststatus = getPlayerStorageValue(cid,7407) if queststatus == -1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "you received your star item!.") doPlayerAddItem(cid,7388,1) pos = {x=10160, y=10054, z=7} doTeleportThing(cid,pos) pos = {x=10160, y=10054, z=7} setPlayerStorageValue(cid,7407,1) else doPlayerSendTextMessage(cid,22,"Você ja ganhou este bonus!") end else return 0 end return 1 end function onUse(cid, item, frompos, item2, topos) if item.uid == 7407 then queststatus = getPlayerStorageValue(cid,7407) if queststatus == -1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "you received your star item!.") doPlayerAddItem(cid,7407,1) pos = {x=10160, y=10054, z=7} doTeleportThing(cid,pos) pos = {x=10160, y=10054, z=7} setPlayerStorageValue(cid,7407,1) else doPlayerSendTextMessage(cid,22,"Você ja ganhou este bonus!") end else return 0 end return 1 end function onUse(cid, item, frompos, item2, topos) if item.uid == 7415 then queststatus = getPlayerStorageValue(cid,7407) if queststatus == -1 then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "you received your star item!.") doPlayerAddItem(cid,7415,1) pos = {x=10160, y=10054, z=7} doTeleportThing(cid,pos) pos = {x=10160, y=10054, z=7} setPlayerStorageValue(cid,7407,1) else doPlayerSendTextMessage(cid,22,"Você ja ganhou este bonus!") end else return 0 end return 1 end TAGS: <action uniqueid="2433" event="script" value="2433.lua"/> <action uniqueid="7415" event="script" value="7415.lua"/> <action uniqueid="7407" event="script" value="7407.lua"/> <action uniqueid="7388" event="script" value="7388.lua"/> No map editor crie a area com as chests com as respectivas Unique IDS,mude as POSITIONS q vai ser teleportado NOs scripts.

esse comando de guild não tem no servidor não. e o frags nao sei como ti ajudar

hehe da um rep mais ae irmão pra me ajudar.

créditos Por favor? quem criou o servidor fui eu só pra avisar. flw

aki todos nascem com itens LOOL, vai em creaturescripts deleta tudo e coloca isso. <?xml version="1.0" encoding="UTF-8"?> <creaturescripts> <event type="login" name="PlayerLogin" event="script" value="login.lua"/> <event type="login" name="PlayerLogin" event="script" value="login2.lua"/> <event type="login" name="FirstItems" script="firstitems.lua"/> <event type="kill" name="ArenaKill" event="script" value="arenakill.lua"/> <event type="joinchannel" name="GuildMotd" event="script" value="guildmotd.lua"/> <event type="receivemail" name="Mail" event="script" value="mail.lua"/> <event type="reportbug" name="SaveReportBug" script="reportbug.lua"/> <event type="death" name="DeathBroadcast" event="script" value="deathBroadcast.lua"/> <event type="kill" name="KillingInTheNameOf" script="kill_counter.lua"/> <event type="think" name="Idle" event="script" value="idle.lua"/> <event type="think" name="SkullCheck" event="script" value="skullcheck.lua"/> </creaturescripts> Os ranks vai em talkactions/scripts/ranks.lua e deleta tudo e cola isso function getPlayerNameByGUID2(n) local c = db.getResult("SELECT `name` FROM `players` WHERE `id` = "..n..";") if c:getID() == -1 then return "SQL_ERROR["..n.."]" end return c:getDataString("name") end function onSay(cid, words, param) local max = 100 local letters_to_next = 20 local skills = { ['fist'] = 0, ['club'] = 1, ['sword'] = 2, ['axe'] = 3, ['distance'] = 4, ['shielding'] = 5, ['fishing'] = 6, ['dist'] = 4, ['shield'] = 5, ['fish'] = 6, } local name_now local name = "Highscore for level\n" local rkn = 0 local no_break = 0 param = string.lower(param) dofile('config.lua') if param == "" or param == "level" and ( param ~= "magic" and param == "ml") and skills[param] == nil then name = name.."\n" name = name.."Rank Level - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `experience` FROM `players` WHERE `group_id` <= 2 ORDER BY `experience` DESC LIMIT 0,"..(max)..";") repeat no_break = no_break +1 if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("level") .." - "..name_now..space.." ".."\n" if no_break >= 20 then break end until v:next() == false elseif param == "magic" or param == "ml" then name = name.."\n" name = name.."Rank Magic - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `maglevel` FROM `players` WHERE `group_id` <= 2 ORDER BY `maglevel` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("maglevel").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "mana" or param == "mp" then name = name.."\n" name = name.."Rank Mana - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `manamax` FROM `players` WHERE `group_id` <= 2 ORDER BY `manamax` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("manamax").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "health" or param == "hp" then name = name.."\n" name = name.."Rank Health - Nome do Jogador\n" local v = db.getResult("SELECT `name`, `level`, `healthmax` FROM `players` WHERE `group_id` <= 2 ORDER BY `healthmax` DESC LIMIT 0,"..(max)..";") repeat if v:getID() == -1 then break end rkn = rkn+1 name_now, l = v:getDataString("name"), string.len(v:getDataString("name")) space = "" for i=1, letters_to_next-l do space = space.." " end name = name..rkn..". "..v:getDataInt("healthmax").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "resets" then name = name.."Rank Resets - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 1020 ORDER BY `value` DESC LIMIT 0,"..(max)..";") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("player_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif param == "rep" then name = name.."Rank reputation - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 6001 ORDER BY `value` DESC LIMIT 0,"..(max)..";") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("player_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." ".." ".."".."\n" until v:next() == false elseif skills[param] ~= nil then name = name.."\n" name = name.."Rank "..param.." fighting - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_skills` WHERE `skillid` = "..skills[param].." ORDER BY `value` DESC;") local kk = 0 repeat if kk == max or v:getID() == -1 then break end kk = kk+1 name_now, l = getPlayerNameByGUID2(v:getDataInt("player_id")), string.len(getPlayerNameByGUID2(v:getDataInt("player_id"))) space = "" for i=1, letters_to_next-l do space = space.." " end if name_now == nil then name_now = 'sql error['..v:getDataInt("player_id")..']' end name = name..kk..". "..v:getDataInt("value").." - "..name_now..space.." \n" until v:next() == false end if name ~= "Highscore\n" then doShowTextDialog(cid, 6500, name) doPlayerSendTextMessage(cid,MESSAGE_STATUS_CONSOLE_ORANGE, "!rank rep;!rank distance ;!rank sword;!rank hp;!rank mp.") end return true end e agora clika no mais aki da tela pra eu ficar feliz

vai em creaturescripts.xml e deleta tudo q tiver escrito rep la

script muito util.

pera ae vo ver aki como deleta o sistema por completo.

k

na pasta do ot tem um arkivo chamado rep system só deletar ele. na pasta onde liga o oT

fera hehe

o problema é no rep sistem,delete todos os arquivos do sistema de rep q isso passa . o ot nao está rasoavel,está otimo,pois nao é facil copiar um mapa Nao.

bom script hein manolo REPzinho