mage & heal sorunsali

[Eternity]

arkada$Lar,
ßenim mage ßüyüLeri iLe ßa$ım ßelada
oLay $u; ßandaj ßasarken ßüyü atiLsin istiyorum, ewet atiyorda daha onceden i_mageryfix iteminde attr sinde sadece deLay vardi. ßandaj üstü ßüyü yapinca delay kaLmiordu ßora ßen ßu attr donmasi icin ayarladim $imdi ßandaj ßasarken ßüyü atamior Stun oLuor kısacasi. ama hic ßir $ey yapamior Stun kALdıqı icin ve inLor ßüyüsü ßiLe i_mageryfix' deki timer yüzünden uzun sürüyor
aslinda istediqim ßandaj ßasarken ßüyü atilaßiLsin fakat deLay kaLdirmasin umarim yardimci oLursunuz $imdiden te$ekkürLer qerekLi scriptlerimi a$$aya koydum.

[spo]
--magery.scp



[FUNCTION Spellfreeze]
if (() || () || ())
if ()
findid.i_spdelay_man.remove
elseif ()
findid.i_spdelay_woman.remove
elseif ()
findid.i_spdelay_unisex.remove
endif
endif

if !(() || () || ())
if ( == c_man)
var.m
newitem i_spdelay_man
act.more1
act.equip
act
elseif ( == c_woman)
var.m
newitem i_spdelay_woman
act.more1
act.equip
act
else
var.m
newitem i_spdelay_unisex
act.more1
act.equip
act
endif
endif

[itemdef i_magerylvl]
name=magery gain
id=i_memory
type=t_eq_script
weight=0
layer=layer_special

On=@Create
attr attr_invis|attr_decay

On=@Equip
timer 6

On=@Timer
var.stats val ( + + )> // stat cap fix
if ( < 60) || (val > < 226)
if (rand(8) == 1)
cont.int ( + 1)
endif
elseif ( < 100) || (val > < 226)
if (rand(10) == 1)
cont.int ( + 1)
endif
elseif (val > > 225)
cont.statcapdex
endif

// Level 1
if ( == 1)
if (rand(1) == 1)
cont.magery ( + 1)
endif
// Level 2
elseif ( == 2)
if (rand(1) == 1)
cont.magery ( + 1)
endif
// Level 3
elseif ( == 3)
if (rand(1) == 1)
cont.magery ( + 1)
endif
// Level 4
elseif ( == 4)
if (rand(1) == 1)
cont.magery ( + 1)
endif
// Level 5
elseif ( == 5)
if (rand(1) == 1)
cont.magery ( + 1)
endif
// Level 6
elseif ( == 6)
if (rand(1) == 1)
cont.magery ( + 1)
endif

// Level 7
elseif ( == 7)
if (rand(1) == 1)
cont.magery ( + 1)
endif
// Level 8
elseif ( == 8)
if (rand(1) == 1)
cont.magery ( + 1)
endif
endif
attr attr_decay
remove
return 1

[itemdef i_evallvl]
name=eval intel gain
id=i_memory
type=t_eq_script
weight=0
layer=layer_special

On=@Create
attr attr_invis|attr_decay

On=@Equip
timer 6

On=@Timer
// Level 1
if ( == 1)
if (rand(3) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 2
elseif ( == 2)
if (rand(4) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 3
elseif ( == 3)
if (rand(6) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 4
elseif ( == 4)
if (rand(10) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 5
elseif ( == 5)
if (rand(15) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 6
elseif ( == 6)
if (rand(18) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 7
elseif ( == 7)
if (rand(20) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
// Level 8
elseif ( == 8)
if (rand(25) == 1)
cont.evaluatingintel (valuatingintel> + 1)
endif
endif
attr attr_decay
remove
return 1

[itemdef i_poisonlvl]
name=poison gain
id=i_memory
type=t_eq_script
weight=0
layer=layer_special

On=@Create
attr attr_invis|attr_decay

On=@Equip
timer 3

On=@Timer
if ( == 1)
cont.poisoning ( + 1)
elseif ( == 2)
cont.poisoning ( + 2)
elseif ( == 3)
cont.poisoning ( + 3)
elseif ( == 3)
cont.poisoning ( + 4)
elseif ( == 3)
cont.poisoning ( + 5)
elseif ( == 3)
cont.poisoning ( + 6)
elseif ( == 4)
cont.poisoning ( + 7)
elseif ( == 4)
cont.poisoning ( + 8)
endif
attr attr_decay
remove
return 1

[itemdef i_spdelay_woman] // bunnar adamda kaliodu (timer -1) fixlendi uzulmeyin
name=magery delay (woman)
id=i_gold
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
src.body c_woman_nomove
if ()
timer
endif

On=@UnEquip
if !(&statf_dead)
cont.body c_woman
cont.obody c_woman
endif

On=@Timer
remove
return 1

[itemdef i_spdelay_man]
name=magery delay (man)
id=i_gold
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
src.body c_man_nomove
if ()
timer
endif

On=@UnEquip
if !(&statf_dead)
cont.body c_man
cont.obody c_man
endif

On=@Timer
remove
return 1

[itemdef i_spdelay_man_brnx]
name=magery delay (brnx_man)
id=i_gold
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
src.body c_man_brnx_nomove
if ()
timer
endif

On=@UnEquip
if !(&statf_dead)
cont.body c_man_brnx
cont.obody c_man_brnx
endif

On=@Timer
remove
return 1

[itemdef i_spdelay_unisex] // unicornlarla seks anlaminda
name=magery delay (unisex)
id=i_gold
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
cont.flags |04 // paralarim lan adami uniseksmi$
if ()
timer
endif

On=@UnEquip
if !(&statf_dead)
cont.flags &~04
endif

On=@Timer
remove
return 1

//------------------
// freeze body's
//------------------

[chardef c_man_nomove]
id c_man
can mt_usehands // newly added
foodtype 15 t_food, t_fruit

On=@GetHit
body c_man
obody c_man

[chardef c_man_brnx_nomove]
id c_man
can mt_usehands // newly added
foodtype 15 t_food, t_fruit

On=@GetHit
body c_man_brnx
obody c_man_brnx

[chardef c_woman_nomove]
id c_woman
can mt_usehands|mt_female
foodtype 15 t_food, t_fruit

On=@GetHit
body c_woman
obody c_woman

//------------------
// freezetime control functionz
//------------------

[function sd]
if (() || () || ())
if ()
findid.i_spdelay_man.remove
elseif ()
findid.i_spdelay_woman.remove
elseif ()
findid.i_spdelay_unisex.remove
endif
endif

if !(() || () || ())
if (strmatch('','telef'))
var.m
newitem i_spdelay_man_brnx
act.more1
act.equip
act
elseif ( == c_man)
var.m
newitem i_spdelay_man
act.more1
act.equip
act
elseif ( == c_woman)
var.m
newitem i_spdelay_woman
act.more1
act.equip
act
else
var.m
newitem i_spdelay_unisex
act.more1
act.equip
act
endif
endif

//------------------
// magery control functionz
//------------------

// Level 1
[function mg1]
if ( < 30.0) && ((> == 0) && ( < 700.0))
findid.i_magerylvl.remove
var.m2
newitem i_magerylvl
act.more1 1
act.equip
act
endif

if (valuatingintel> < 30.0) && ((> == 0) && ( < 700.0))
findid.i_evallvl.remove
var.m2
newitem i_evallvl
act.more1 1
act.equip
act
endif

// Level 2
[function mg2]
if ( < 40.0) && ((> == 0) && ( < 700.0))
findid.i_magerylvl.remove
var.m2
newitem i_magerylvl
act.more1 2
act.equip
act
endif

if (valuatingintel> < 40.0) && ((> == 0) && ( < 700.0))
findid.i_evallvl.remove
var.m2
newitem i_evallvl
act.more1 2
act.equip
act
endif

// Level 3
[function mg3]
if ( < 50.0) && ((> == 0) && ( < 700.0))
findid.i_magerylvl.remove
var.m2
newitem i_magerylvl
act.more1 1
act.equip
act
endif

if (valuatingintel> < 50.0) && ((> == 0) && ( < 700.0))
findid.i_evallvl.remove
var.m2
newitem i_evallvl
act.more1 3
act.equip
act
endif

// Level 4
[function mg4]
if ( < 60.0) && ((> == 0) && ( < 700.0))
findid.i_magerylvl.remove
var.m2
newitem i_magerylvl
act.more1 4
act.equip
act
endif

if (valuatingintel> < 60.0) && ((> == 0) && ( < 700.0))
findid.i_evallvl.remove
var.m2
newitem i_evallvl
act.more1 4
act.equip
act
endif

// Level 5
[function mg5]
if ( < 70.0) && ((> == 0) && ( < 700.0))
findid.i_magerylvl.remove
var.m2
newitem i_magerylvl
act.more1 5
act.equip
act
endif

if (valuatingintel> < 70.0) && ((> == 0) && ( < 700.0))
findid.i_evallvl.remove
var.m2
newitem i_evallvl
act.more1 5
act.equip
act
endif

// Level 6
[function mg6]
if ( < 80.0) && ((> == 0) && ( < 700.0))
findid.i_magerylvl.remove
var.m2
newitem i_magerylvl
act.more1 6
act.equip
act
endif

if (valuatingintel> < 80.0) && ((> == 0) && ( < 700.0))
findid.i_evallvl.remo

[Eternity]

tamamdır ßunu hallettim :) cevap qerek kalmadi.

[ultrAslan]

yalniz ßen senin yazdiklarini okurken canim cikti

ß harfi bildigimiz B harfi degil "ss" anlamina gelir

Q harfi ise K harfi yerini alamaz

$ yerine Ş harfimiz var gercekten güzel

bu arada hallettigine sevindim

[Eternity]

aLı$kanLık, kusura ßakma ßenide ßöyLe kaßuL et:)

[ad3m]

O nasıl bi alışkanlıkmış be :P

extra zaman kaybı yazarken o karakterleri basmak :S