Trzy czary od dattlera:)

sputerkarol · Październik 15, 2009

1.

Kod:

--By Dattler--
local atk1 = createCombatObject()
local atk2 = createCombatObject()

local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 255)
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat1, COMBAT_FORMULA_SKILL, 1.5, 0, 1.8, 0)
 
local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 0)
setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 24)
setCombatFormula(combat2, COMBAT_FORMULA_SKILL, 0.8, -0, 0.9, -0)

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(atk1, area1)
setCombatArea(atk2, area2)

function onTargetTile(cid, pos)
    doCombat(cid,combat1,positionToVariant(pos))
end

function onTargetTile2(cid, pos)
    doCombat(cid,combat2,positionToVariant(pos))
end

setCombatCallback(atk1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
setCombatCallback(atk2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)
    doCombat(parameters.cid, atk1, parameters.var)
end
 
local function onCastSpell2(parameters)
    doCombat(parameters.cid, atk2, parameters.var)
end
 
function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
addEvent(onCastSpell1, 120, parameters)
addEvent(onCastSpell2, 220, parameters)

end

screen :

2.

Kod:

--By Dattler--
local atk1 = createCombatObject()
local atk2 = createCombatObject()

local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 255)
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 28)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -3.7, 0, -3.9, 0)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 41)
setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 28)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -0.4, 0, -0.5, 0)

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(atk1, area1)
setCombatArea(atk2, area2)

function onTargetTile(cid, pos)
    doCombat(cid,combat1,positionToVariant(pos))
end

function onTargetTile2(cid, pos)
    doCombat(cid,combat2,positionToVariant(pos))
end

setCombatCallback(atk1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
setCombatCallback(atk2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)
    doCombat(parameters.cid, atk1, parameters.var)
end
 
local function onCastSpell2(parameters)
    doCombat(parameters.cid, atk2, parameters.var)
end
 
function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
addEvent(onCastSpell1, 100, parameters)
addEvent(onCastSpell2, 200, parameters)

end

Screen :

3.

Kod:

--By Dattler--
local atk1 = createCombatObject()
local atk2 = createCombatObject()

local combat1 = createCombatObject()
setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat1, COMBAT_PARAM_EFFECT, 255)
setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 33)
setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -3.2, 0, -3.3, 0)

local combat2 = createCombatObject()
setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE)
setCombatParam(combat2, COMBAT_PARAM_EFFECT, 0)
setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 33)
setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -0.6, 0, -0.8, 0)

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(atk1, area1)
setCombatArea(atk2, area2)

function onTargetTile(cid, pos)
    doCombat(cid,combat1,positionToVariant(pos))
end

function onTargetTile2(cid, pos)
    doCombat(cid,combat2,positionToVariant(pos))
end

setCombatCallback(atk1, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
setCombatCallback(atk2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2")

local function onCastSpell1(parameters)
    doCombat(parameters.cid, atk1, parameters.var)
end
 
local function onCastSpell2(parameters)
    doCombat(parameters.cid, atk2, parameters.var)
end
 
function onCastSpell(cid, var)
local parameters = { cid = cid, var = var}
addEvent(onCastSpell1, 100, parameters)
addEvent(onCastSpell2, 200, parameters)

end

Screen :

Wiem, ?e czary nie r??ni? si? od siebi? du?o bo maj? tylko pozmieniane efekty ale nie kt?rzy na tym forum nie umiej? nawet tworzy? czar?w wi?c ode mnie maj? ju? nowe czary dla ka?dej profesji

.
Prosz? o oceny :>.
Pozdrawiam,
Dattler.

sebus944 · Październik 15, 2009

Odp: Trzy czary od dattlera

Thx Za czary napewno si? przydadz? , ale je ?atwo zrobi? ...

Leaserth · Październik 15, 2009

Odp: Trzy czary od dattlera

wszystkie trzy czary sa przer?bka jednego kt?ry pojawia si? na wielu ots'ach ;/
Ale i tak s? fajne

sputerkarol · Październik 15, 2009

@up
Przer?bk?? mo?esz mi poda? jakiego ?

~~Refresh~~ Prosz? o oceny

.

Marcinoos66 · Październik 16, 2009

Odp: Trzy czary od dattlera

1 i 2 Bardzo mi si? podobaj? , 3 za bardzo podchodzi do ots?w x999
Dobry pomys?

8/10

Maximuss · Październik 16, 2009

Odp: Trzy czary od dattlera

HaHa Dattler Thx ...
Przydadz? mi si? na nowe profesie ...
Reucik leci ..:d

Poufny · Październik 16, 2009

Odp: Trzy czary od dattlera

sputerkarol napisał:
@up
Przer?bk?? mo?esz mi poda? jakiego ?

[New]Evolution, nowsze evo pod 8.5, sword of fury, sie ten czar nazywa. O to mu chyba chodzilo, tak to sa kopie ;s

sputerkarol · Październik 16, 2009

Odp: Trzy czary od dattlera

Udowodnij mi to, ?e jest to plagiat. Sam to pisa?em a je?li znajdziesz gdzie? co? takiego to Ci pogratuluje.

Leaserth · Październik 19, 2009

Odp: Trzy czary od dattlera

Sorry, ale jak sam to pisa?e? to si? troch? sp??ni?e?... bo wystarczy?o zrypa? z neta ;]
Osobi?cie podobny czar sam mia?em na otsie, ale go usun??em, bo niestety przy takich czarach nie mam exhausta (nie by?a to wina skryptu)

Gustavo · Październik 25, 2009

Odp: Trzy czary od dattlera

W?a?nie, dlaczego nie da si? tam ustawi? exhaustion?? albo jak go ustawic?

Gamemaster Noob · Październik 26, 2009

Odp: Trzy czary od dattlera

thx Dettler gram na twoim ots i widze nie raz te czary i wtedy najczensciej padam xD
za czary oczywi?cie 999999999999999999999999/10 wstawie se te czary na swoj ots thx

Ziomkov here xD

sputerkarol · Październik 27, 2009

Odp: Trzy czary od dattlera

<Refresh> Zapraszam do komentowania.

sputerkarol · Listopad 7, 2009

Odp: Trzy czary od dattlera

<Refresh> Komentowa?

Sk1ba · Listopad 8, 2009

Odp: Trzy czary od dattlera

Dobree : P:thx:

Czerlunek · Listopad 24, 2009

Odp: Trzy czary od dattlera

Jak dodac te czary do otsa??

Unnamed · Listopad 24, 2009

Odp: Trzy czary od dattlera

bardzo je ?atwo zrobi? , lecz postara?e? si? na otsy 4fun napewno si? przyda , daj? Ci reputa poniewa? m?j znajomy czego? takiego szuka? prostego na 4funa

Czerlunek · Listopad 26, 2009

Odp: Trzy czary od dattlera

Jak zrobic do nich exhausted?

Sazeza · Listopad 26, 2009

Odp: Trzy czary od dattlera

sputerkarol napisał:
nie kt?rzy na tym forum nie umiej? nawet tworzy? czar?w wi?c ode mnie maj? ju? nowe czary dla ka?dej profesji .
Prosz? o oceny :>.
Pozdrawiam,
Dattler.

i pewnie nie wiedza gdzie maja te skrypty powklejac itd ; < mogles napisac xd

czary fajne, tylko pvp na otsie bedzie chujowe bo wala na 10 kratek bijac kazdego po drodze.

Gm Manio · Grudzień 8, 2009

Odp: Trzy czary od dattlera

Witam mam pytanie, dodalem te czary do TFS 0.3.5, ale problem mam niemaja exausted. Jak mozna to naprawidz?

sputerkarol · Grudzień 8, 2009

Odp: Trzy czary od dattlera

@up

Po prostu na ko?cu musisz doda? return true i powinien by? exhaused. Je?li nie wiesz dok?adnie gdzie (sam dobrze nie pami?tam bo nie bawie si? z 0.3.5, 0.3.4 itd.) to Ci nie powiem. Napisz na googlach np. "tfs 0.3.5 czary nie maj? exh~).
Pozdrawiam,
Dattler.

Trzy czary od dattlera:)

Advanced User

User

Active User

Advanced User

Senior User

Advanced User

Senior User

Advanced User

Active User

Active User

Advanced User

Advanced User

Advanced User

Active User

User

Advanced User

User

Advanced User

Active User

Advanced User