Ir para conteúdo

Elfen

Campones
  • Total de itens

    0
  • Registro em

  • Última visita

Tudo que Elfen postou

  1. Ae man agora funfo Te agradeço mas tarde pq limite xego vlws ;D a Proveitar me ajuda a fazer uma runa q sumona monster team se souber agradeço vlws
  2. Finalmente Um q Funfa ma tipo man o leader da guild consegue te atk se souber como colar todos mesmo da guild pra n atk agradeço Re´++
  3. Em qaul parte man eu colo o tag registerCreatureEvent(cid, "HitGuild") ------- KONFIGURACJA ---------- local antyMagebombEnabled = 1 -- czy wlaczyc AntyMagebomb? / 0 by zablokowac local maxClientsFromIp = 0 -- maksymalna liczba graczy z jednego ip / wpisz 0, by zablokowac local loginPeriodSeconds = 1 -- po co najmniej ilu sekundach dozwolone zalogowanie z tego samego ip local banAutoMagebombAccount = 1 -- automatyczna banicja KONTA Magebomb? / 0 by zablokowac local banAutoMagebombIp = 1 -- automatyczna banicja IP Magebomb? / 0 by zablokowac local banAccountPeriod = 2 * 60 * 60 -- w sekundach czas bana, domyslnie 2H local banIpPeriod = 2 * 60 * 60 -- w sekundach czas bana, domyslnie 2H ------- / KONFIGURACJA -------- local last_login = os.time(t) local last_ipaddr = 0 local magebomb_count = 0 local last_guid = 0 local last_account = 0 function onLogin(cid) if antyMagebombEnabled == 1 then local now = os.time(t) local ip = getPlayerIp(cid) local guid = getPlayerGUID(cid) local gracz = getCreatureName(cid) local playeracc = getAccountIdByName(gracz) if(ip==last_ipaddr and last_guid ~= guid and last_account ~= playeracc) then if(last_login+loginPeriodSeconds > now) then magebomb_count = magebomb_count + 1 if magebomb_count > 1 then if banAutoMagebombAccount == 1 then doAddBanishment(playeracc, banAccountPeriod, 11, 2, 'Banished by AntyMagebomb System by Infinity', 0) end if banAutoMagebombIp == 1 then doAddIpBanishment(ip, 4294967295, banIpPeriod, "Detected by AntyMagebomb System by Infinity") end end return FALSE -- wyrzuca z gry else magebomb_count = 0 end else magebomb_count = 0 end if maxClientsFromIp > 0 then local list = {} local ips = {} local players = getPlayersOnline() local i = 0 for i, pid in ipairs(players) do local ip = getPlayerIp(pid) local name = getCreatureName(pid) local tmp = table.find(ips, ip) if(tmp ~= nil) then if(table.countElements(list, ip) == 0) then list[players[tmp]] = ip end list[pid] = ip end table.insert(ips, ip) end if(table.maxn(list) > 0) then for pid, ip in pairs(list) do if getPlayerIp(cid) == ip then i=i+1 end end end if i > maxClientsFromIp and maxClientsFromIp > 0 then -- sprawdzanie ilosci graczy z tym samym IP doPlayerPopupFYI(cid,'Sorry, only 3 multi-clients allowed (from one IP), not more!') return FALSE end end end last_ipaddr = getPlayerIp(cid) last_login = os.time(t) last_guid = getPlayerGUID(cid) last_account = playeracc registerCreatureEvent(cid, "PlayerKill") if (InitArenaScript ~= 0) then InitArenaScript = 1 -- make arena rooms free for i = 42300, 42309 do setGlobalStorageValue(i, 0) setGlobalStorageValue(i+100, 0) end end -- if he did not make full arena 1 he must start from zero if getPlayerStorageValue(cid, 42309) < 1 then for i = 42300, 42309 do setPlayerStorageValue(cid, i, 0) end end -- if he did not make full arena 2 he must start from zero if getPlayerStorageValue(cid, 42319) < 1 then for i = 42310, 42319 do setPlayerStorageValue(cid, i, 0) end end -- if he did not make full arena 3 he must start from zero if getPlayerStorageValue(cid, 42329) < 1 then for i = 42320, 42329 do setPlayerStorageValue(cid, i, 0) end end if getPlayerStorageValue(cid, 42355) == -1 then setPlayerStorageValue(cid, 42355, 0) -- did not arena level end setPlayerStorageValue(cid, 42350, 0) -- time to kick 0 setPlayerStorageValue(cid, 42352, 0) -- is not in arena registerCreatureEvent(cid, "repKill") registerCreatureEvent(cid, "Frags") registerCreatureEvent(cid, "Look") registerCreatureEvent(cid, "LevelBroadcast") registerCreatureEvent(cid, "BountyHunter") registerCreatureEvent(cid, "pvparena") registerCreatureEvent(cid, "castelo1") registerCreatureEvent(cid, "castelo2") registerCreatureEvent(cid, "castelo3") registerCreatureEvent(cid, "castelo4") registerCreatureEvent(cid, "pxparena") registerCreatureEvent(cid, "repLook") registerCreatureEvent(cid, "repDeath") registerCreatureEvent(cid, "Reward") registerCreatureEvent(cid, "PlayerDeath") registerCreatureEvent(cid, "onPrepareDeath") --registerCreatureEvent(cid, "MEDALS") This is God's Medal System for killing someone, Dont add this unless you use it.-- registerCreatureEvent(cid, "KilledMonstersCounter") registerCreatureEvent(cid, "logout") registerCreatureEvent(cid, "playeradvance") registerCreatureEvent(cid, "ArenaKill") -- if he did not make full arena 1 he must start from zero if getPlayerStorageValue(cid, 42309) < 1 then for i = 42300, 42309 do setPlayerStorageValue(cid, i, 0) end end -- if he did not make full arena 2 he must start from zero if getPlayerStorageValue(cid, 42319) < 1 then for i = 42310, 42319 do setPlayerStorageValue(cid, i, 0) end end -- if he did not make full arena 3 he must start from zero if getPlayerStorageValue(cid, 42329) < 1 then for i = 42320, 42329 do setPlayerStorageValue(cid, i, 0) end end if getPlayerStorageValue(cid, 42355) == -1 then setPlayerStorageValue(cid, 42355, 0) -- did not arena level end setPlayerStorageValue(cid, 42350, 0) -- time to kick 0 setPlayerStorageValue(cid, 42352, 0) -- is not in arena registerCreatureEvent(cid, "AttributePoints") if getPlayerStorageValue(cid, 47061) < 0 then setPlayerStorageValue(cid,47061,0) end local auction = db.getResult("SELECT `auction_balance` FROM `players` WHERE `id` = " .. getPlayerGUID(cid) .. ";") if(auction:getDataInt("auction_balance") > 0) then doPlayerAddMoney(cid, auction:getDataInt("auction_balance")) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You sold item on auction, you get " .. auction:getDataInt("auction_balance") .. " gps.") db.executeQuery("UPDATE `players` SET `auction_balance` = 0 WHERE `id` = " .. getPlayerGUID(cid) .. ";") auction:free() end return TRUE end
  4. Elfen

    Erros Ajuda

    Funfo n man mas valeu a tentava
  5. Alguem ae Ajuda Como colcar Player N Pode Atk Player Da Guild Ja Vi alguns topicos mas nehum deles funfo e os cometarios tambe dizem q n so o unico a axar isso intao please ajuda Rep++
  6. Elfen

    Ajuda Fast

    Ae man Vlw Vc ajudp Muitp Mesmo so n dei rep ++ ainda pq xego no meu limite epor hj mas espere q o seu xegara ;D
  7. Elfen

    Erros Ajuda

    Tem Alguns Erros No Meu Ot Ajuda REp++ O 1° Erro =Error during getDataInt(auction_balance). >>isso ocorre qundo o player loga Ajuda O 2° Erro =Lua Script Error: [spell Interface] in a timer event called from: data/spells/scripts/attack/exkordium.lua:onCastSpell E Tem outra magia no meu ot tbm q da o mesmo erro axo q vcs ja ajuda a concertar esse ja posso concertar as outras: Dizem q e a criatura morre antes da magia ser executada totalmente pq ela e um combo intao ja tentei arruma mas n sei so piro ajuda? La Vai o Scripter Da Spell Exkordium local scom1 = createCombatObject() local scom2 = createCombatObject() local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 255) setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_WEAPONTYPE) setCombatFormula(combat1, COMBAT_FORMULA_SKILL, 3.1, -360, 4.6, -600) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat2, COMBAT_PARAM_EFFECT, 0) setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_WEAPONTYPE) setCombatFormula(combat2, COMBAT_FORMULA_SKILL, 3.2, -360, 4.9, -600) arr1 = { {0, 0, 0, 0, 1, 1, 1, 0, 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}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0}, {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, 0, 1, 1, 1, 0, 0, 0, 0} } arr2 = { {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 1}, {1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0}, {0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0} } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) setCombatArea(scom1, area1) setCombatArea(scom2, area2) function onTargetTile(cid, pos) doCombat(cid,combat1,positionToVariant(pos)) end function onTargetTile2(cid, pos) doCombat(cid,combat2,positionToVariant(pos)) end setCombatCallback(scom1, CALLBACK_PARAM_TARGETTILE, "onTargetTile") setCombatCallback(scom2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2") local function onCastSpell1(parameters) doCombat(parameters.cid, scom1, parameters.var) end local function onCastSpell2(parameters) doCombat(parameters.cid, scom2, parameters.var) end function onCastSpell(cid, var) local parameters = { cid = cid, var = var} addEvent(onCastSpell1, 100, parameters) addEvent(onCastSpell2, 200, parameters) return TRUE end
  8. Elfen

    Ajuda Fast

    Jhon funfo Aki sim pow mas tipo Da esse Erro aki [Error - GlobalEvents::onThink] Couldn't execute event: effectpos pow queria por tacando a sd se souber e tiver com tira a seta gradeço ;D so deixa sd nessa a seta uso em outr mesmo assim vlw Rep++
  9. Elfen

    Ajuda Fast

    Tbm axava manow mas tipow ae comos os outros fala q e globaleventos o meu ot e elfenwar (qundo vo la inde els falam globalevntos la so tem algumas parada de halth e save do meu ot mesmo manow) intao eu axo q n e pelo globalevnts seila mas valew pela tentativa e a seta sabe n?
  10. Elfen

    Ajuda Fast

    Pow Galera Eu N So Muito Bom Em Scripter N Por Isso Eu quero Saber Se Alguem sabe como Faz essa Parada Ae...Alguns Dizem q e Portais Falantes Mas Contz Neh n Olha a Foto Abaixo..N Sei o nome Se Alguem PUder ajuda Agradeço Rep++ e qual quer coisa tbm eu sei bastante de ot e so pergunta (mapper)
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...