xTibia

.com
SU

[Oficial] Refugia (8.60) 26/08/2012 0.0.8

Por Subwat, 20 de ago. de 2011 em OTServ Comum

8.6
otserv
tibia
5.0 (2)
432
127.7k
SubwatS
23 de agosto de 2011 às 14:48

obrigado sangbao,é bom ver que meu trabalho ta sendo reconhecido ae pela galera hehe

ldemonteiroL
24 de agosto de 2011 às 16:10

Pow kra o ot ta mt maneiro quase perfect so que tem um bug mt loko, tipo quando vc ta matando player ele nao morre

vc tira todo hp dele e ele fica no preto e nao morre nao sai do preto tem como alguem me ajudar pfv !

 

Ot Mt Maneiro Rep + PARA VC LEK ! :p

 

 

se puder me ajudar adc meu msn aew leo.pi@hotmail.com

GuidorefugiaG
24 de agosto de 2011 às 16:51

Subwat em geral o mapa e bom,mas n sei se tu ja foi vip no refugia (de verdade) mas a area vip n tem nd a ver,ali sao mto poucas coisas parecidas,tentarei mandar fotos de como eh area vip

 

Mas msm assim o mapa e ate razuavel

reportar pro xonai.bmp

SubwatS
24 de agosto de 2011 às 17:02

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.

ldemonteiroL
24 de agosto de 2011 às 17:08

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.

Aonde fica essa parada do rep system aonde fica para eu excluir ? Obg pela atençao !

SubwatS
24 de agosto de 2011 às 17:26

na pasta do ot tem um arkivo chamado rep system

só deletar ele.

na pasta onde liga o oT

ldemonteiroL
24 de agosto de 2011 às 18:00

na pasta do ot tem um arkivo chamado rep system

só deletar ele.

na pasta onde liga o oT

Pow eu ja apaguei mais o problema nao acaba !

quando fica no preto as pessoas fica aprecendo -rep e nao mata a pessoa a pessoa fica com 0 de

life e nao morre. :S ta tenso esse bug

SubwatS
24 de agosto de 2011 às 18:11

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

ldemonteiroL
24 de agosto de 2011 às 18:12

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

Obg estarei aguardando a solução ! ^^)

SubwatS
24 de agosto de 2011 às 23:40

vai em creaturescripts.xml

e deleta tudo q tiver escrito rep la

ldemonteiroL
25 de agosto de 2011 às 10:50

Aew kra eu denovo aki o bug de ontem eu ja arrumei so que achei mais dois !

um deles é que ninguem vem com os itens quando criar acc fica nu tem como vc me ajudar nisso ?

e o outro é que nao ta aparecendo o rank.. !rank nem !rank magic , !rank skill em fim nao esta aparecendo =/

PFV ALGUEM ME AJUDAAAAAAAAA

Editado Agosto 25 por ldemonteiro

SubwatS
25 de agosto de 2011 às 11:15

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

ldemonteiroL
25 de agosto de 2011 às 14:01

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

 

 

aew consegui arrumar os dois tipo tava me ajudando esse aew dos item so que quando eu colocava esse que vc me mando tipo ageitava a parada dos itens do inicio so que ficava com o bug de nao matar entao eu juntei os dois scripts e foi ! kra tu é mt foda ! REP+ denovo pra vc =D

 

Não vejo a hora de sair a att do server xD

Editado Agosto 25 por ldemonteiro

SubwatS
25 de agosto de 2011 às 16:23

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

ldemonteiroL
25 de agosto de 2011 às 23:21

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

Rep+ denovo xD

tipo man eu to com dois problemas aki sei que sou chato mais fazer oq se vc crio o mapa kkkk

tipo nao ta aparecendo os frags quando eu falo !frags e tbm na guild nao ta aparecendo quando eu quero

falar para todos da guild ex: /guild ALL TEMPLO.

se puder me ajudar ficarei mt masi mt grato ! ^^ e ganha rep+ amanha denovo kkk