Ir para conteúdo

Khost

Campones
  • Total de itens

    23
  • Registro em

  • Última visita

Tudo que Khost postou

  1. lucas se pode bota o sc ript modificado pq eu n sei aonde eu boto isso =S vlw!
  2. Khost

    [dúvida] Actions...

    ae como eu boto esse script pra só mostrar as pessoas que morrer pra player , e não mostrar as que morrem pra monstros... tipo: Khost killed by adidas.... dofile("./config.lua") function onDeath(cid, corpse, killer) vitima = getCreatureName(cid) assassino = getCreatureName(killer) doPlayerSendTextMessage(cid, MESSAGE_EVENT_ADVANCE, "You are dead.") if deathListEnabled == "yes" then if sqlType == "mysql" then env = assert(luasql.mysql()) con = assert(env:connect(mysqlDatabase, mysqlUser, mysqlPass, mysqlHost, mysqlPort)) else -- sqlite env = assert(luasql.sqlite3()) con = assert(env:connect(sqliteDatabase)) end local byPlayer = FALSE if killer == FALSE then killerName = "field item" else if isPlayer(killer) == TRUE then byPlayer = TRUE end killerName = getCreatureName(killer) end assert(con:execute("INSERT INTO `player_deaths` (`player_id`, `time`, `level`, `killed_by`, `is_player`) VALUES (" .. getPlayerGUID(cid) .. ", " .. os.time() .. ", " .. getPlayerLevel(cid) .. ", '" .. escapeString(killerName) .. "', " .. byPlayer .. ");")) local cursor = assert(con:execute("SELECT `player_id` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. ";")) local deathRecords = numRows(cursor) if sqlType == "mysql" then while deathRecords > maxDeathRecords do delete = assert(con:execute("DELETE FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1;")) deathRecords = deathRecords - 1 end else while deathRecords > maxDeathRecords do delete = assert(con:execute("DELETE FROM `player_deaths` WHERE `rowid` = (SELECT `rowid` FROM `player_deaths` WHERE `player_id` = " .. getPlayerGUID(cid) .. " ORDER BY `time` LIMIT 1);")) deathRecords = deathRecords - 1 end end con:close() env:close() broadcastMessage("" .. assassino .. " Matou " .. vitima .."!", MESSAGE_STATUS_CONSOLE_ORANGE) end end Obrigado!
  3. Khost

    [ Resolvido ]

    Sir'Falcon obrigado + uma vez funciono as spells tbm!! Obrigado!
  4. Khost

    [resolvido]

    vlw Sir Falcon Funciono!!! o problema era msm pq eu tava botando " " vlw! Obrigado!
  5. Khost

    [ Resolvido ]

    no meu ot ta dando um bug que quando eu vo fala a magia ela não aparece e não tem exausted , eu ja vi tudo: local combat1 = createCombatObject() local combat2 = createCombatObject() local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_GREEN) setCombatParam(combat1, COMBAT_PARAM_AGGRESSIVE, 0) local condition1 = createConditionObject(CONDITION_HASTE) setConditionParam(condition1, CONDITION_PARAM_TICKS, 10000) --setConditionParam(condition1, CONDITION_PARAM_SPEED, 500) setConditionFormula(condition1, 1.8, -10, 2.1, -12) setCombatCondition(combat1, condition1) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_GREEN) setCombatParam(combat2, COMBAT_PARAM_AGGRESSIVE, 0) local condition2 = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition2, CONDITION_PARAM_TICKS, 10000) setConditionParam(condition2, CONDITION_PARAM_SKILL_DISTANCE, -200) setConditionParam(condition2, CONDITION_PARAM_SKILL_SHIELD, 100) setConditionParam(condition2, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat2, condition2) local function onCastSpell1(parameters) return doCombat(parameters.cid, parameters.combat1, parameters.var) end local function onCastSpell2(parameters) return doCombat(parameters.cid, parameters.combat2, parameters.var) end local combat1 = createCombatObject() local combat2 = createCombatObject() local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_GREEN) setCombatParam(combat1, COMBAT_PARAM_AGGRESSIVE, 0) local condition1 = createConditionObject(CONDITION_PARALYZE) setConditionParam(condition1, CONDITION_PARAM_TICKS, 10000) --setConditionParam(condition1, CONDITION_PARAM_SPEED, -500) setConditionFormula(condition1, -1.3, -5, -1.5, -10) setCombatCondition(combat1, condition1) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_GREEN) setCombatParam(combat2, COMBAT_PARAM_AGGRESSIVE, 0) local condition2 = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition2, CONDITION_PARAM_TICKS, 10000) setConditionParam(condition2, CONDITION_PARAM_SKILL_DISTANCE, 65) setConditionParam(condition2, CONDITION_PARAM_SKILL_SHIELD, -200) setConditionParam(condition2, CONDITION_PARAM_BUFF, TRUE) setCombatCondition(combat2, condition2) local function onCastSpell1(parameters) return doCombat(parameters.cid, parameters.combat1, parameters.var) end local function onCastSpell2(parameters) return doCombat(parameters.cid, parameters.combat2, parameters.var) end function onCastSpell(cid, var) local parameters = { cid = cid, var = var, combat1 = combat1, combat2 = combat2 } addEvent(onCastSpell1, 1, parameters) addEvent(onCastSpell2, 2, parameters) end as duas magias n dao exausted e quando eu vo fala n aparece, só aparece o efeito, dela no char......... obrigado
  6. Khost

    [resolvido]

    sim ! olhe:
  7. Khost

    [resolvido]

    No meu ot 8.50 tem um bug que eu acho que não acontece só nele , o utani hur fica sem exausted e não aparece a magia só o efeito ... ta ae o script delele: <instant name="Haste" words="utani hur" lvl="14" mana="60" prem="0" aggressive="0" selftarget="1" exhaustion="2000" needlearn="0" script="support/haste.lua"> <vocation name="Sorcerer" /> <vocation name="Druid" /> <vocation name="Paladin" /> <vocation name="Knight" /> <vocation name="Master Sorcerer" /> <vocation name="Elder Druid" /> <vocation name="Royal Paladin" /> <vocation name="Elite Knight" /> local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0) local condition = createConditionObject(CONDITION_HASTE) setConditionParam(condition, CONDITION_PARAM_TICKS, 30000) setConditionFormula(condition, 0.3, -24, 0.3, -24) setCombatCondition(combat, condition) function onCastSpell(cid, var) doCombat(cid, combat, var) end Oq eu posso fazer?? Obrigado!
  8. Marcryzius oq eu fiz de errado no script???
  9. Khost

    [resolvido]

    Vlw Marcryzius e vlw Lucasjockey seu script ajudo muito ,funciono... Obrigado a todos que ajudaram... Daniel Pode fexar!!! Resolvido :button_cancel:
  10. Khost

    [resolvido]

    Realmente tem algo bugando o distro pq eu fui ver a acc tava la vocation id = 1,ae quando eu entro no só que ta promovido... tipo la na configuração das acc ta sorcerer quando eu entro no ot ta master sorcerer ,ta tudo certo só o nome que ta errado =O não sei oq fazer... obrigado!
  11. Khost

    [resolvido]

    o script que vc boto ae ta todo certo , mas quando eu vo tenta entra no ot em qualquer char não entra... no EXE do ot aparece que vc entro ae vc tenta entra denovo fala que vc logo e vc não entra.... mas obrigado...
  12. tente achar no seu ot qualquer book que eu acho que eles adcionam ml . mas pra add ml ta ae só addcionar em qualuer book no item.xml.. <attribute key="magiclevelpoints" value="10"/> value="quanto de ml vc quer que seja adcionado ao player enquanto ele usa o book"/> taae !!
  13. Khost

    [resolvido]

    è o Alissow OTs 3.7 o 8.5... oq eu fasso??? obrigado!
  14. Khost

    [resolvido]

    por comandos.. vlw ae!
  15. oi o voodo , por trade n da pra fazer só por falando msm ... esse script eu ja havia pedido a séculos ,n conseguiram fazer.... eu até hj não sei.. realmente tem que intender um pouco de linguagem de scripts eu vo tenta fazer aqui: no meu ot eu tinha feito por coins, if msgcontains(msg, 'holy sceptre') then if getPlayerPremiumDays(cid) >= 40 then selfSay('Voce quer compra holy sceptre por 40 dias de premium account ?') talk_state = 1 else selfSay('Desculpe voce nao dias necessarios volte quando os tiver.') talk_state = 0 end elseif msgcontains(msg, 'yes') and talk_state == 1 then talk_state = 0 if getPlayerPremiumDays(cid) >= 40 then doPlayerRemovePremiumDays(cid, 40) doPlayerAddItem(cid, 2641, 1) selfSay('Here u are.') end else selfSay(havent_item) end isso ae é a parte principal o resto se sabe fazer né??? flws eu acho que ta certo eu não testei , qualquer dúvida posta ae....
  16. Khost

    [resolvido]

    sempre que eu vo criar uma guild fala que o nome é não é válido , oq pode ser... Obrigado!
  17. Khost

    [resolvido]

    Quando acaba a premmy do char ele n volta a vocação free continua na vocação premium... sai tudo as roupas, tudo até as magias saiem menos a promotion... oque eu posso fazer??? ajudem... Obrigado!
  18. ta ae kra ... function onUse(cid, item, frompos, item2, topos) reqvoc = getPlayerVocation(cid) if item.uid == 8200 then if reqvoc == 3 or reqvoc == 7 then pos = getPlayerPosition(cid) if pos.x == topos.x then if pos.y < topos.y then pos.y = topos.y + 1 else pos.y = topos.y - 1 end elseif pos.y == topos.y then if pos.x < topos.x then pos.x = topos.x + 1 else pos.x = topos.x - 1 end else doPlayerSendTextMessage(cid,22,'Stand in front of the door.') return 1 end doTeleportThing(cid,pos) doSendMagicEffect(topos,12) else doPlayerSendTextMessage(cid,22,'Somente Paladins e Royal Paladins entram aqui.') end return 1 else return 0 end end function onUse(cid, item, frompos, item2, topos) reqvoc = getPlayerVocation(cid) if item.uid == 8203 then if reqvoc == 4 or reqvoc == 8 then pos = getPlayerPosition(cid) if pos.x == topos.x then if pos.y < topos.y then pos.y = topos.y + 1 else pos.y = topos.y - 1 end elseif pos.y == topos.y then if pos.x < topos.x then pos.x = topos.x + 1 else pos.x = topos.x - 1 end else doPlayerSendTextMessage(cid,22,'Stand in front of the door.') return 1 end doTeleportThing(cid,pos) doSendMagicEffect(topos,12) else doPlayerSendTextMessage(cid,22,'Somente Knights e Elite Knights entram aqui.') end return 1 else return 0 end end vê se funciona , ja modifiquei testa, eu n pude testa esse script , mas qualquer dúvida manda pm..
  19. Khost

    [resolvido]

    vlw ae lucasjockey dps da uma olhada no meu outro tópico por favor... Obrigado!
  20. ADM_Forever Dê seu topico como dúvida sanada! avise ao moderador! Obrigado...
  21. dúvida Sanada?? Avise o Moderador.... Vlw..
  22. se for versão 8.40 é assim : vá na pasta RAIDS ,indo lá terá um arquivo lua escrito raids.xml ,abra-o cadastre seu raid assim : <raid name="RatRaid" file="Ratraid.xml" chance="10" interval2="60" margin="0" /> Each 60 minutes there is a 10% chance that the raid is executed... /> agora hora de criar a pasta de seu raid : <raid> <announce delay="0" type="event" message="Bager is having trouble in hes food shop with a few rats! Help him get rid of them!" /> <singlespawn delay="1000" name="Rat" x="113" y="56" z="7" /> <---a posição e o bixo que vc quer que invada! <singlespawn delay="2000" name="Rat" x="112" y="56" z="7" /> <--- msm coisa <singlespawn delay="3000" name="Rat" x="111" y="56" z="7" /> <singlespawn delay="4000" name="Rat" x="110" y="56" z="7" /> <singlespawn delay="5000" name="Rat" x="113" y="57" z="7" /> <singlespawn delay="6000" name="Rat" x="113" y="58" z="7" /> </raid> qualquer dúvida me manda uma pm
  23. Khost

    [ Resolvido ]

    Dúvida Sanada
  24. Dúvida Sanada??? bota ae para o Moderador poder fexar...
  25. Khost

    [resolvido]

    po eu queria saber se da pra fazer quando a pessoa falasse !comands aparecesse os comandos pra free acc e os comandos pra premmium acc. tipo que eu pudesse configurar uma lista com eles dizendo oq que cada um faz e talz quantos dias de premium account gastão ,enfim que eu pudesse edita-los. obrigado
  • Quem Está Navegando   0 membros estão online

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