KillSeeker

Dezembro 12, 2013

cara essa versão do Xampp não carrega o Apache aqui mano, já fiz os bagulho no Skype, abri portas 80 e 8090, oque eu faço agora?

Novembro 17, 2013

não funciono esse script, ele não da skill, diz vc nao tem a voc necessaria ou vc ja fez esta quest

Fevereiro 3, 2013

Baixando aqui, aparentemente é um mapa ótimo!

Fevereiro 1, 2013

é só vc, tipow qnd for desliga o ot salvar antes

e evitar os laggs ;d

Dezembro 14, 2012

Nossa muito bom, mas eu queria saber se tem como comprar/vender o char com outro item, que nao seja crystal coin.

Muito bom script mesmo, maneira mais segura de fazer isso que eu já vi.

Que tal se quando você falasse "!character info, nome" mostrasse os skills, como o Vodkart sugeriu? Seria interessante, separado da lista pra não bagunçar tudo.

eu tenho um script que da pra ver os skill, por exemplo vc fala !club Lord Paulistinha:

Club Atual 100, por exemplo

Dezembro 13, 2012

Bom pessoal, estou com um problema muito grande e comum em mapa RadBR.

Basicamente os player falam !resetar e o server buga, dando muito lagg.

Bom...eu queria colocar um tempo de 10 segundos para usar o comando novamente!

eu nao sei colocar nada, nao sou scriptter, entao pesso a vcs que mandem o script do comando inteiro com o tempo de 10 segundos!

Esta aqui o script:

-[[ <(Advanced Reset System 2.0)>
	   Autor: Juniior Cwb ;*. Contato: (Juniior_Cwb@hotmail.com)
	   Versão: 2.0
	   Testado em: 8.50 e 8.60
	   TFS: 0.3.6 and 0.4.0
	   Atenção , Se Achar Esse Sistema em outro site ou forum favor comunicar Eu ( Juniior Cwb ) Juniior_Cwb@hotmail.com )
   -=[Características]=-
    ~( Versão 2.0 )~
   - Resets agora Armazenados na DataBase; (Sem Valor de Storage)
   - Instala o System e cria a Tabela de Resets com o comando "/installreset";
   - Resets no Look do jogador ex: 22:10 You see Marcello [Reset 2] (Level 8). He is an elder druid.;
   - [sTAGES] para "Premium Account" e "Free Account";  ]]
--=[Functions]=--
-- installReset()'				    [instala o Sistema.]
-- tableResetInstall()'			   [Verifica Se o Sistema ja foi instaladao.]
-- nowReseting()'					 [Verifica, retorna o erro ou reseta.]
-- getPlayerReset(cid)'			   [Pega numero de resets do player.]
-- checLevelStageReset(cid)'		  [Verifica o Level para Resetar.]
-- newReset(cid)'					 [Verifica todas as Condições de Reset.]
-- addValue(value)'				   [Adiciona numero de resets.]
--=[Comandos de Jogadores]=--
--  "/installreset"   -- Só será usado uma vez, para instalar o sistema.
--  "!resetar"	    -- Para Resetar.
function onSay(cid, words, param)
	    if words =="!resetar" then
--[ Condições de Reset ] --
local coNdConf = {
needPz = false,				  -- Precisa estar em Pz pra resetar?			   [true, false]
needPa = false,				 -- Precisa ser Premium Account Pra resetar?	   [true, false]
withe = false,				  -- Players com Pk Withe podem resetar?		    [true, false]
red = true,				    -- Players com Pk Red pode resetar?			   [true, false]
battle = false,				 -- Players precisão estar sem battle pra resetar? [true, false]
teleport = false,			    -- Teleportar Player para o templo após resetar?  [true, false]
look = true,				   -- Aparecer Resets no Look do Player?			 [true, false]
pid = getPlayerGUID(cid),	   -- Não Mexer.

--[ Configurações do Reset ] --
resetConf = {
Level = 350,				    -- Level Necessário para Resetar.						 [Valor]
backLvl = 8,				    -- Level que voltará após o Reset.					    [Valor]
time = 0,					   -- Tempo para o Player deslogar ao resetar, em segundos.  [Valor]
 },
}
	  --[[>> STAGES <<]]--
x=true;X=true -- Não Mexer.
local stage = {Abilitar = {x}, Desabilitar = {},	 --<< Abilitar Stages?? >>--		    [{x};{}]
--	  [RESETS]    |  [PREMMY]  |   [FREE]
stage1= {resets= 4,  premmy= 350, free= 350},
stage2= {resets= 9,  premmy= 360, free= 360},	 -- EXPLICANDO e Configurando stages. (Se estiver Abilitado [Abilitar = {x}])
stage3= {resets= 14, premmy= 370, free= 370},	 -- resets = Número de resets para o Stage;
stage4= {resets= 19, premmy= 380, free= 380},	 -- premmy = Level necessário para Premium Accounts;
stage5= {resets= 24, premmy= 390, free= 390},	 -- free    = Level necessário para Free Accounts;
stage6= {resets= 29, premmy= 400, free= 400},	   -- Coloque em Ordem...
stage7= {resets= 34, premmy= 420, free= 420},	 -- [OBS: MARQUE UM "X" PARA ABILITAR OU DESABILITAR OS STAGES]
stage8= {resets= 39, premmy= 440, free= 440},	 -- EX: para desabilitar mude: Abilitar = {}, Desabilitar = {x}
stage9= {resets= 44, premmy= 460, free= 460},
stage10={resets= 49, premmy= 480, free= 480},
stage11={resets= 54, premmy= 500, free= 500},
stage12={resets= 59, premmy= 525, free= 525},
stage13={resets= 64, premmy= 550, free= 550},
stage14={resets= 69, premmy= 575, free= 575},
stage15={resets= 74, premmy= 600, free= 600},
stage16={resets= 79, premmy= 650, free= 650},
stage17={resets= 84, premmy= 700, free= 700},
stage18={resets= 89, premmy= 750, free= 750},
stage19={resets= 94, premmy= 800, free= 800},
stage20={resets= 99, premmy= 1000, free= 1000},
}
    --[[>> FIM STAGES <<]]--
--=[Pega Valor de Resets]=--
function getPlayerReset(cid)
local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..coNdConf.pid..";")
rss = qr:getDataInt("reset", coNdConf.pid)
if rss < 0 then
rss = 0
end
return rss
end
local success = "				   ~~ Sucesso! ~~ \nVocê tem agora "..(getPlayerReset(cid)+1).." resets. \nVocê será deslogado em "..coNdConf.resetConf.time.." segundos." ;err = doPlayerSendTextMessage
local qrt = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..coNdConf.pid..";");rss_db = qrt:getDataInt("reset", coNdConf.pid)
local lvl_query = "UPDATE `players` SET `level` = "..(coNdConf.resetConf.backLvl)..", `experience` = 0 WHERE `id`= " .. coNdConf.pid .. ";"
local reset_query = "UPDATE `players` SET `reset` = "..(getPlayerReset(cid)+(1)).." WHERE `id`= " .. coNdConf.pid .. ";"
local nolook_query = "UPDATE `players` SET `description` = '' WHERE `players`.`id`= " .. coNdConf.pid .. ";"
local look_query = "UPDATE `players` SET `description` = ' [Reset "..(getPlayerReset(cid)+(1)).."]' WHERE `players`.`id`= " .. coNdConf.pid .. ";"
--=[Reseta]=--
function addValue(value)
if coNdConf.look == false then
 doRemoveCreature(cid)
db.executeQuery(lvl_query);db.executeQuery(reset_query);db.executeQuery(nolook_query)
else
 doRemoveCreature(cid)
  db.executeQuery(lvl_query);db.executeQuery(reset_query);db.executeQuery(look_query)
 return LUA_NO_ERROR
end
end
function nowReseting()
if (getPlayerLevel(cid) < coNdConf.resetConf.Level) then
 doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "- Level Necessário Para o Reset ["..coNdConf.resetConf.Level.."]. Faltam "..coNdConf.resetConf.Level-getPlayerLevel(cid).." level's para você Resetar. -")
 return true
end
if getPlayerLevel(cid) >= coNdConf.resetConf.Level and (coNdConf.teleport == false) then
  doPlayerPopupFYI(cid, success)
  addEvent(addValue, coNdConf.resetConf.time*1000, value)
   else
  doPlayerPopupFYI(cid, success)
  addEvent(doTeleportThing, coNdConf.resetConf.time*900, cid, getTownTemplePosition(getPlayerTown(cid)))
  addEvent(addValue, coNdConf.resetConf.time*1000, value)
 return true
end
end
--[sTAGES Nao mexer em nada.]--
function checkLevelStageReset(cid)
local stages = {
   {resets= stage.stage1.resets, premmy= stage.stage1.premmy, free= stage.stage1.free},
   {resets= stage.stage2.resets, premmy= stage.stage2.premmy, free= stage.stage2.free},
   {resets= stage.stage3.resets, premmy= stage.stage3.premmy, free= stage.stage3.free},
   {resets= stage.stage4.resets, premmy= stage.stage4.premmy, free= stage.stage4.free},
   {resets= stage.stage5.resets, premmy= stage.stage5.premmy, free= stage.stage5.free},
   {resets= stage.stage6.resets, premmy= stage.stage6.premmy, free= stage.stage6.free},
   {resets= stage.stage7.resets, premmy= stage.stage7.premmy, free= stage.stage7.free},
   {resets= stage.stage8.resets, premmy= stage.stage8.premmy, free= stage.stage8.free},
   {resets= stage.stage9.resets, premmy= stage.stage9.premmy, free= stage.stage9.free},
   {resets=stage.stage10.resets, premmy=stage.stage10.premmy, free=stage.stage10.free},
   {resets=stage.stage11.resets, premmy=stage.stage11.premmy, free=stage.stage11.free},
   {resets=stage.stage12.resets, premmy=stage.stage12.premmy, free=stage.stage12.free},
   {resets=stage.stage13.resets, premmy=stage.stage13.premmy, free=stage.stage13.free},
   {resets=stage.stage14.resets, premmy=stage.stage14.premmy, free=stage.stage14.free},
   {resets=stage.stage15.resets, premmy=stage.stage15.premmy, free=stage.stage15.free},
   {resets=stage.stage16.resets, premmy=stage.stage16.premmy, free=stage.stage16.free},
   {resets=stage.stage17.resets, premmy=stage.stage17.premmy, free=stage.stage17.free},
   {resets=stage.stage18.resets, premmy=stage.stage18.premmy, free=stage.stage18.free},
   {resets=stage.stage19.resets, premmy=stage.stage19.premmy, free=stage.stage19.free},
   {resets=stage.stage20.resets, premmy=stage.stage20.premmy, free=stage.stage20.free},
}
   local resets = getPlayerReset(cid)
    for i, tab in ipairs(stages) do
	    if resets <= tab.resets then
		    coNdConf.resetConf.Level = isPremium(cid) and tab.premmy or tab.free
		    break
	    end
    end
if (getPlayerLevel(cid) < coNdConf.resetConf.Level) then
err(cid, MESSAGE_STATUS_CONSOLE_BLUE, "- Level Necessário Para o Reset ["..coNdConf.resetConf.Level.."]. Faltam "..coNdConf.resetConf.Level-getPlayerLevel(cid).." level's para você Resetar. -")
return TRUE
end
 if getPlayerLevel(cid) >= coNdConf.resetConf.Level and (coNdConf.teleport == false) then
 doPlayerPopupFYI(cid, success)
 addEvent(addValue, coNdConf.resetConf.time*1000, value)
  else
  doPlayerPopupFYI(cid, success)
  addEvent(addValue, coNdConf.resetConf.time*1000, value)
  addEvent(doTeleportThing, coNdConf.resetConf.time*900, cid, getTownTemplePosition(getPlayerTown(cid)))
   return true
 end
end
   function newReset(cid)
   if(coNdConf.needPz == true) and (getTilePzInfo(getCreaturePosition(cid)) == LUA_ERROR) then
 err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você Precisa estar em Protection Zone Para Resetar. -") return TRUE end
   if(coNdConf.needPa == true) and not isPremium(cid) then
 err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você Precisa ser Premium Account para Resetar. -") return TRUE end
   if(coNdConf.withe == false) and (getCreatureSkullType(cid) == 3) then
 err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você não pode resetar em condições de PK Withe. -") return TRUE end
   if(coNdConf.red == false) and (getCreatureSkullType(cid) == 4) then
 err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você não pode resetar em condições de PK Red. -") return TRUE end
   if(coNdConf.battle == true) and (getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE) then
 err(cid,MESSAGE_STATUS_CONSOLE_BLUE,"- Você Precisa estar sem Battle para Resetar. -") return TRUE end
local xy = {true,false}
table.insert(stage.Abilitar, false)
table.insert(stage.Desabilitar, false)
if stage.Abilitar[1] == xy[1] and stage.Desabilitar[1] == xy[2] then
checkLevelStageReset(cid)
elseif stage.Abilitar[1] == xy[2] and stage.Desabilitar[1] == xy[1] then
nowReseting()
else
doPlayerPopupFYI(cid, "LUA_ERROR; Configure corretamente o Sistema de STAGES!")
end
return true
end
   function tableResetInstall()
 print(not rss_db  and LUA_ERROR or "Tabela de Resets: Instalada ... [success] ")
 addEvent(newReset, 1000, cid)
 return false
 end
   if tableResetInstall() then
 end
end
   --=[install System]=--
   function installReset()
    if db.executeQuery("ALTER TABLE `players` ADD reset INT(11) NOT NULL DEFAULT 0;") then
		    print("[MarcelloMkez] -= Advanced Reset System 2.0 por DataBase =- Instalado com sucesso!")
		    return TRUE
    end
    print('[Advanced Reset System/MarcelloMkez] Não foi possível instalar o Sistema.')
    return FALSE
 end
    local tt = {
	   "Preparando Instalação...",
	   "Instalando: TableReset Db...",
	   "Instalando: getPlayerReset()...",
	   "Instalando: addValue()...",
	   "Instalando: checkLevelStageReset()...",
	   "Instalando: newReset() and nowReseting()...",
	   "Finalizando Instalação...",
	   "...",
	   success = {
	   "Iniciando...",
	   "function: TableReset Db...    [success]",
	   "function: getPlayerReset()...    [success]",
	   "function: addValue(value)...	   [success]",
	   "function: checkLevelStageReset()... [success]",
	   "function: newReset() and nowReseting()...	 [success]",
	   "Fim da Instalação.  ",
	   "by: ~~ MarcelloMkez ~~			  \nContato: marcello_dirt@hotmail.com",
	   inst = {"MarcelloMkez","Advanced Reset System 2.0 por DataBase"
	   },
	 },
    }
 if words == "/installreset" and getPlayerAccess(cid) >= 3 then
	    function install()
	    if installReset() then
		    print(""..tt.success[7].."")
			   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,""..tt.success[8].."")
		    doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "["..tt.success.inst[1].."] -="..tt.success.inst[2].."=- Instalado com sucesso!")
	   else
		    print("["..tt.success.inst[1].."]  FALHA NA INSTALAÇÃO! [O sistema ja foi instalado].")
			  doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "["..tt.success.inst[1].."] FALHA NA INSTALAÇÃO! [O sistema ja foi instalado].")
	    end
	    return 1
    end
	  function concl(cid)
	    local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[7].."")
			 print(""..tt[8].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[7].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt[8].."")
		    addEvent(install, 1000,cid)
	    end
	    function finall(cid)
		    local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[6].."")
		    print(""..tt[7].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[6].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt[7].."")
		    addEvent(concl, 3000,cid)
	    end
		 function installDd(cid)
		   local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[5].."")
		    print(""..tt[6].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[5].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt[6].."")
		    addEvent(finall, 1000,cid)
	    end
	    function installCc(cid)
		   local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[4].."")
		    print(""..tt[5].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[4].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt[5].."")
		  addEvent(installDd, 1000,cid)
	    end
	    function installBb(cid)
		   local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[3].."")
		    print(""..tt[4].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[3].."")
		  doPlayerSendTextMessage(cid, typetx,""..tt[4].."")
	    addEvent(installCc, 1000,cid)
	    end
	    function installAa(cid)
		  local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[2].."")
		    print(""..tt[3].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[2].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt[3].."")
		    addEvent(installBb, 1000,cid)
	    end
	    function toInstall()
		  local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		    print(""..tt.success[1].."")
		    print(""..tt[2].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt.success[1].."")
		    doPlayerSendTextMessage(cid, typetx,""..tt[2].."")
		   addEvent(installAa, 1000,cid)
		  end
	    function preparation()
		  local typetx = MESSAGE_STATUS_CONSOLE_BLUE
		   print(""..tt[1].."")
		 doPlayerSendTextMessage(cid, typetx,""..tt[1].."")
	    addEvent(toInstall, 3000,cid)
    end
	    if preparation() then
	    end
    end
return 1
end

Obrigado!!!

Dou Rep+

Entrar

KillSeeker

Total de itens

Registro em

Última visita

Tipo de Conteúdo

Perfis

Fóruns

Posts postados por KillSeeker

[Tutorial] Corrigindo O Erro Na Istalação Gesior

Script Quest Que Dê Skill

New-Rad V3 (8.60)

[Encerrado] [Ajuda] Clone Items

Characters Market System (In Game)

[RadBR] Talkaction de !resetar

Quem Está Navegando 0 membros estão online

Fóruns

Tutoriais

Suporte