-
Total de itens
71 -
Registro em
-
Última visita
Tudo que Samuel2011 postou
-
Setcreaturename, 8.50+, Muda O Nome Da Criature In-Game
tópico respondeu ao glugluguga de Samuel2011 em Linguagens de Programação
muito bom gostei parabens obrigado pelo tutorial explicando exatamente com otem q faze :button_ok: -
talkaction Talkaction De Rank Inovadora!
tópico respondeu ao MatheusGlad de Samuel2011 em Actions e Talkactions
entao usa esse... talk/script crie arquivo.lua talk/script renomeie para rankinng 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 = 10 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 == "reset" or param == "resets" then name = name.."\n" name = name.."Rank Reset - Nome do Jogador\n" local v = db.getResult("SELECT `player_id`, `value` FROM `player_storage` WHERE `key` = 1020 ORDER BY cast(value as INTEGER) 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 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 doPlayerPopupFYI(cid, name) end return TRUE end crie arquivo.lua talk/script renomeie para "reset" -- Script By Pauliin Carvalho function onSay(cid, words, param) local level = 717217 --level pra ser resetado local RemainingLvl = 8 --lvl que ele ficara depois do reset local pid = getPlayerGUID(cid) function addReset(cid) resets = getResets(cid) setPlayerStorageValue(cid,1020,resets+1) return true end function getResets(cid) resets = getPlayerStorageValue(cid,1020) if resets < 0 then resets = 0 end return resets end if getPlayerLevel(cid) >= level then addReset(cid) doTeleportThing(cid, getTownTemplePosition(getPlayerTown(cid))) doPlayerPopupFYI(cid,"you now was reset, you have "..getResets(cid).." reset.") doRemoveCreature(cid) db.executeQuery("UPDATE `players` SET `level` = "..RemainingLvl..", `experience` = 0 WHERE `id` = "..pid) else doPlayerSendCancel(cid, "You need to have level "..level.." or more you may be reset.") doSendMagicEffect(getPlayerPosition(cid), CONST_ME_POFF) end return TRUE end talk.xml adione na coluna player isso... <talkaction words="!reset" script="reset.lua"/> <talkaction words="!rank" script="rank.lua"/> -
[Encerrado] Preocuro O Script Do Spell Utevo Mort
tópico respondeu ao exorcist de Samuel2011 em Tópicos Sem Resposta
na pasta data/spells/scripts/attack crie aquivo.lua adione isso local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_DEATHDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MORTAREA) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -1.3, -30, -1.7, 0) local arr = { {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, } local area = createCombatArea(arr) setCombatArea(combat, area) function onCastSpell(cid, var) return doCombat(cid, combat, var) end em spells.xml adisione isso tag debaixo do exori. edepois coloque as vocaçao q vc quer q use esse spell... <instant name="Magic of Death" words="exevo gran mas mort" lvl="100" mana="1600" prem="1" exhaustion="1200" selftarget="1" needlearn="0" script="attack/magic of death.lua" -
LGV Host
-
Sistema De Owner Para Equips.
tópico respondeu ao MatheusGlad de Samuel2011 em Mods, funções e outros
muito bom matheus parabens gostei :button_ok: Bye -
tente diminui os player ex: se sua net 1 mega max 10 2 mega max 20 e assim vai 10 em 10 se for 100 bytes aumente ligue para provador e pessa uma net de 2 mega ou pode ser tbm q maxMessageBuffer esteja elevado se tive mais q 4 bote no "4" ou pode ser exaustin das spells ai se arruma no spells.xml
-
talves seja pasta data ou *exe. tente troca executavel e a seguinte pasta action/lib/xml abaixa ot da sua versao e troque pela sua
-
muito bom otimo servidor de war parabens :button_ok:
-
pedido [Pedido] Função Para Aumentar Attack Speed
pergunta respondeu ao gazinho129 de Samuel2011 em Resolvidos
só ir na pasta data/xml vocation.xml procura por attackspeed e coloca ao seu favor Bye -
abaixa ot war rookgaard pega pasta creaturescript do war rookgaard subestitua pra sua
-
servidor muito bom gostei parabens o scan site demora de entra ou nao entra nao sei pq mais ta otimo :button_ok:
-
muito obrigado pela contribuiçao :button_ok:
-
tire ss do problema isso pode ter acontecido q vc nao ligo xamp ou nao modificou config.php correto Bye
-
[Função] Doplayersetextraattackspeed(Cid, Speed)
tópico respondeu ao netflat de Samuel2011 em Linguagens de Programação
muito bom cykotitan gostei vai ser muito util :button_ok: -
muito bom henrique moura belo tutorial rep + :button_ok:
-
muito bom henrique moura belo tutorial rep + :button_ok:
-
gostei bom layout muito bom :button_ok:
-
[Encerrado] Não Consigo Entrar No Meu Narutibia
tópico respondeu ao admleo de Samuel2011 em Tópicos Sem Resposta
alem das versoes antigas serem alvo de hacker podendo duplica itens podendo fecha server pelo npc o executavel foi modificado quando ligado podendo ser um keylooger quando se entra msn senha fica gravada pelo exe. e o teceiro rouba sua senha msn e desconfigura seu msn recomendo sempre baixa servidor q seja limpo podendo ter virus só nos arquivos inofencivos ja as versoes antigas as dlls nao funcionam corretamente pq gameserver open porta quando entra player pode lag todo servidor e tbm podendo hackea acc dos player... conselho: sempre tente abaixa versoes mais nova sempre passa scan pra ve se a algo de errado nunca abri nenhum arquivo q seu amigo te passa pelo msn sobre otserv nem nada. tente evitar isso ou sinao pode ser ireversivel. Bye -
Criando Um Bom Sistema Vip Para Narutibia
tópico respondeu ao vulcanus de Samuel2011 em Lixeira Pública
@xXxSeRGiOxXx reason: varios erros no mapa sertas area dando dbug erro na programaçao deltha quando se attack player da erro ou target fica nele e nao some quando xega perto nao attack emfim cara modifico sourcer e fez isso acontece... -
pensa bem se compra de boa mais i se tem q fica pagando por mes isso equivale 13% perdido recoendo 60 player ne só pedi pro dono da casa assina um provedor de 2 mega e ta bom tem q ter computador bom minimo 2.0 ghz 2 gb ram hard disck elevado acima 80 pronto só isso ta bom bye
-
script bom mais porem perigoso podendo causar varios dbugs ou ate mesmo erro detabase. Bye
-
dando dbug em aguns lugares player podendo fexa server por npc max xp dando dbug nos skills e player nao entra mais no server devido sequencia de dbugs... #De Bom mapa muito bom client ta otimo sprite edited gostei abastante. Bye
-
@PiabetaMan01 esse script ae tem alguns nip errado ele tbm deveria fala versao suported do gesior dele se nao vo pode ajduar... recomendo arruma outro gesior agora se vc segui script do piabeta vai ocasionar dbug no site ou ate mesmo no servidor
-
Nome: Samuel Galdino De Araujo Idade: 18 Trabalho: trabalho com tudo horas disponivel: 6:30 feriados tempo todo a num ser se ouve incoviniente pq quer entra nesse projeto: para vira um grande servidor com dedicado e tal att Developed data mode[on] Bye
-
Quem Está Navegando 0 membros estão online
- Nenhum usuário registrado visualizando esta página.