Darmowe skrypty LUA

rafaeru · 15 Października 2015

function getPlayerManaMax(cid)

manaNow = getPlayerMana(cid)

doPlayerAddMana(cid,1000000)

manaMax = getPlayerMana(cid)

doPlayerAddMana(cid,manaNow-manaMax)

return manaMax

end

function onUse(cid, item, frompos, item2, topos)

local config = {

ended = true,

effect_enable = true,

effect = 13,

text_enable = true,

text_colour = 191,

exh =

{

exh_enable = true,

exh_time = 1.4,

storage = 12345, -- liczba przechowujaca exhausted

}

local voctab =

{

{minn=5, maxx=750, lvmul=2, mlmul=35},

{minn=150, maxx=550, lvmul=12, mlmul=1},

{minn=50, maxx=550, lvmul=5, mlmul=45},

{minn=150, maxx=1550, lvmul=3, mlmul=15}

}

topos.stackpos = 253

player = getThingfromPos(topos)

playerpos = getPlayerPosition(player.uid)

cidpos = getPlayerPosition(cid)

used = false

canUse = true

maglv = getPlayerMagLevel(cid)

voc = getPlayerVocation(cid)

lv=getPlayerLevel(cid)

vocc=voctab[voc]

addminn=vocc.minn +(vocc.lvmul*lv)+(vocc.mlmul*maglv)

addmaxx=vocc.maxx +(vocc.lvmul*lv)+(vocc.mlmul*maglv)

add=math.random(addminn,addmaxx)

if player.uid > 0 then

if getPlayerMana(player.uid) == getPlayerManaMax(player.uid) then

doPlayerSendCancel(cid, "Mana "..getPlayerName(player.uid).." is full!")

return 1

end

else

if getPlayerMana(cid) == getPlayerManaMax(cid) then

doPlayerSendCancel(cid, "Your mana is full.")

return 1

end

if(os.time() < getPlayerStorageValue(cid, config.exh.storage)) then

doPlayerSendCancel(cid,"You are exhausted.")

canUse = false

end

if (canUse) then

if player.itemid > 0 then

if (config.effect_enable) then

doSendMagicEffect(playerpos, config.effect)

end

if (config.text_enable) then

doSendAnimatedText(playerpos, add, config.text_colour) -- tutaj to masz wiec ustaw w configu dobry kolor

end

doPlayerAddMana(player.uid,add)

used = true

else

if config.effect_enable then

doSendMagicEffect(cidpos, config.effect)

end

if (config.text_enable) then

doSendAnimatedText(cidpos, add, config.text_colour) -- i tutaj

end

doPlayerAddMana(cid,add)

used = true

end

if (used) and (canUse) then

if (config.exh.exh_enable) then

setPlayerStorageValue(cid, config.exh.storage, os.time() + config.exh.exh_time)

end

if (config.ended) then

if item.type > 1 then

doChangeTypeItem(item.uid,item.type-1)

else

doRemoveItem(item.uid,1)

end

return 1

end

KaszanaLubiZryć · 15 Października 2015

function getPlayerManaMax(cid)
manaNow = getPlayerMana(cid)
doPlayerAddMana(cid,1000000)
manaMax = getPlayerMana(cid)
doPlayerAddMana(cid,manaNow-manaMax)
return manaMax
end
function onUse(cid, item, frompos, item2, topos)
   local config = {
   ended = true,
   effect_enable = true,
   effect = 13,
   text_enable = true,
   text_colour = 191,
   exh = 
   {
      exh_enable = true,
      exh_time = 1.4,
      storage = 12345, -- liczba przechowujaca exhausted
   }
}
local voctab =
{
{minn=5, maxx=750, lvmul=2, mlmul=35},
{minn=150, maxx=550, lvmul=12, mlmul=1},
{minn=50, maxx=550, lvmul=5, mlmul=45},
{minn=150, maxx=1550, lvmul=3, mlmul=15}
}
topos.stackpos = 253
player = getThingfromPos(topos)
playerpos = getPlayerPosition(player.uid)
cidpos = getPlayerPosition(cid)
used = false
canUse = true
maglv = getPlayerMagLevel(cid)
voc = getPlayerVocation(cid)
lv=getPlayerLevel(cid)
vocc=voctab[voc]
addminn=vocc.minn +(vocc.lvmul*lv)+(vocc.mlmul*maglv)
addmaxx=vocc.maxx +(vocc.lvmul*lv)+(vocc.mlmul*maglv)
add=math.random(addminn,addmaxx)
if player.uid > 0 then
if getPlayerMana(player.uid) == getPlayerManaMax(player.uid) then
doPlayerSendCancel(cid, "Mana "..getPlayerName(player.uid).." is full!")
return 1
end
else
if getPlayerMana(cid) == getPlayerManaMax(cid) then
doPlayerSendCancel(cid, "Your mana is full.")
return 1
end
end
if(os.time() < getPlayerStorageValue(cid, config.exh.storage)) then
   doPlayerSendCancel(cid,"You are exhausted.")
   canUse = false
end
if (canUse) then
if player.itemid > 0 then
  if (config.effect_enable) then
    doSendMagicEffect(playerpos, config.effect)
    end
if (config.text_enable) then
   doSendAnimatedText(playerpos, add, config.text_colour) -- tutaj to masz wiec ustaw w configu dobry kolor
   end
   doPlayerAddMana(player.uid,add)
   used = true
    else
      if config.effect_enable then
         doSendMagicEffect(cidpos, config.effect)
      end
      if (config.text_enable) then
         doSendAnimatedText(cidpos, add, config.text_colour) -- i tutaj
      end
      doPlayerAddMana(cid,add)
      used = true
   end
end
if (used) and (canUse) then
   if (config.exh.exh_enable) then
      setPlayerStorageValue(cid, config.exh.storage, os.time() + config.exh.exh_time)
   end
   if (config.ended) then
      if item.type > 1 then
         doChangeTypeItem(item.uid,item.type-1)
      else
         doRemoveItem(item.uid,1)
      end
   end
end
return 1
end

tak ale na tfs 1.0 dosendanimatedtext nie dziala

rafaeru · 15 Października 2015

doCreatureSay(cid, add, TALKTYPE_ORANGE_1)

kolor sobie zmień

KaszanaLubiZryć · 15 Października 2015

doCreatureSay(cid, add, TALKTYPE_ORANGE_1) kolor sobie zmień

działa ale nie do końca nie ma tej animacji takiej

ze jak się ulecze manaruna to napisz idzie powoli w góre i znika tak jak hity

rafaeru · 15 Października 2015

doSendAnimatedText(cid, add, 191)

KaszanaLubiZryć · 15 Października 2015

doSendAnimatedText(cid, add, 191)

teraz wogole nie ma tego napisu ile mi odnowilo

rafaeru · 15 Października 2015

doSendAnimatedText(getCreaturePosition(cid), add, 191)

KaszanaLubiZryć · 15 Października 2015

doSendAnimatedText(getCreaturePosition(cid), add, 191)

czyli mam dać DoCreatureSay(getCreaturePosition(cid), add, 191)?

bo dosendanimatedtext nie działa

rafaeru · 15 Października 2015

czyli mam dać DoCreatureSay(getCreaturePosition(cid), add, 191)?

bo dosendanimatedtext nie działa

nie bo doCreatureSay dziala tylko na pomaranczowo (chyba)

~~sprawdz to:~~

doSendAnimatedText(getCreaturePosition(cid), add, 191)

czekaj przegladam spis funkcji pod tfs 1.0 i racja nie ma doSendAnimatedText

dowiedzialem sie ze ta funkcja została usunieta i jest tylko doCreatureSay

-------------------------------------------------------------------------------

dobra sprawdz tak: doCreatureSay(cid,add, 5)

KaszanaLubiZryć · 15 Października 2015

nie bo doCreatureSay dziala tylko na pomaranczowo (chyba)

~~sprawdz to:~~
doSendAnimatedText(getCreaturePosition(cid), add, 191)
czekaj przegladam spis funkcji pod tfs 1.0 i racja nie ma doSendAnimatedText

w spellu mam zrobiona leczącą rune i u niej pokazuje tak samo przy exura itp to ile uleczylo idze w gore i znika

rafaeru · 15 Października 2015

bo to jest w source wbudowane raczej

w config masz ustawione żeby pokazywało, chyba zeby nie robic na actionach tylko w spellsach jako rune i wtedy powinno pokazac

KaszanaLubiZryć · 15 Października 2015

bo to jest w source wbudowane raczej

w config masz ustawione żeby pokazywało, chyba zeby nie robic na actionach tylko w spellsach jako rune i wtedy powinno pokazac

tylko jak ja to teraz przerobie pod spela

hmm...

w spelu niema funkcji COMBAT_HEALING

COMBAT_HEALING_MANA

czy czegos takiego tylko jest pod zycie

rafaeru · 15 Października 2015

W sumie tak, ale jest chyba condition który zwiększa regenerację many

Wiec zrób 1 tik.

KaszanaLubiZryć · 16 Października 2015

proszę o skrpyt pod tfs 1.0

wand który bedzie miał najmniejsze obrażenia 500 a najwieksze 1000

więcej zadawał od większego lvla i magic lvla

rafaeru · 16 Października 2015

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_FIREAREA)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_BURSTARROW)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, 0, 1, 0)

function onUseWeapon(cid, var)
	return doCombat(cid, combat, var)
end

poprzestawiaj sobie Formule pod taki dmg i powinno dzialac

KaszanaLubiZryć · 16 Października 2015

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_FIREAREA)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_BURSTARROW)
setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, 0, 1, 0)

function onUseWeapon(cid, var)
	return doCombat(cid, combat, var)
end

poprzestawiaj sobie Formule pod taki dmg i powinno dzialac

wrzuciłem do actiona i wywala to

rafaeru · 16 Października 2015

to nie action tylko weapon

KaszanaLubiZryć · 16 Października 2015

to nie action tylko weapon

0 damage zadaje

rafaeru · 16 Października 2015

a ustawiles to ?

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, 0, 1, 0)

KaszanaLubiZryć · 16 Października 2015

a ustawiles to ?

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 1, 0, 1, 0)

dałem po 100

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 100, 100, 100, 100)

rafaeru · 16 Października 2015

a sprawdz:

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -100, -100, -100, -100)

KaszanaLubiZryć · 16 Października 2015

a sprawdz:

setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -100, -100, -100, -100)

znaczy jest to samo bije co jakiś czas po 16:05 A trainer loses 1 hitpoint due to your attack.

rafaeru · 16 Października 2015

a wklej te cyfry z jakiegos spella, powinno dzialac

KaszanaLubiZryć · 16 Października 2015

a wklej te cyfry z jakiegos spella, powinno dzialac

spell to wyglada tak zmienilem tylko koniec na useweapon ale dalej po 1 co jakiś czas od ognia bije

local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ANI_BOLT)
setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_WEAPONTYPE)

function onGetFormulaValues(cid, level, maglevel)
	min = -(level * 2 + maglevel * 3) * 4.0
	max = -(level * 2 + maglevel * 3) * 6.2 
	return min, max
end



setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "onGetFormulaValues")

function onUseWeapon(cid, var)
	return doCombat(cid, combat, var)
end

rafaeru · 16 Października 2015

no to nie wiem, ten tfs 1.0 jest jakis zjebany.

tyko tam mi sie 1 funkcja podoba

Zaloguj się

👋 Witaj na MPCForum!

Darmowe skrypty LUA

Rekomendowane odpowiedzi

Zarchiwizowany