// By Robellious

[events pvpbag]
On=@ItemDropon_item
if (<argo.baseid> == i_pvpbag)
if (<act.type>==t_potion) || (<act.baseid>==i_bandage) || (<act.type>==t_reagent) || (<act.baseid>==i_pouch_trapped) || (<act.baseid>==i_fctn_silver) || (<act.baseid>==i_arrow) ||
src.sysmessage @11 olur!!
else
return 1
endif
endif

[itemdef i_pvpbag]
id=i_bag
name a pvp bag
weight=3

on=@create
color=0450
attr=attr_newbie

on=@dclick
src.sysmessage @084a,3,1 Bu posete sadece iksir, bandaj, Tp ve reg koyabilirsiniz.

//////////////////////////////////////////////////////////////////////////////////////

Ama Yinede İçine Herşey Atılıyor (:
veya type olarakda verebilirsin ?
Expert
34.0001



[itemdef i_bagkell]
defname i_bagkell
id i_bag
name Newbie Bag

On=@Create
color 0fb2
attr attr_newbie



on=@dclick
if (<more1> == 0)
	more1 <src.uid>
	src.sysmessage @70,1,1 Bu bagi artik sizden baska kimse kullanamaz!.
elseif (<more1> != <src.uid>)
	src.sysmessage @38,1,1 Bu bag sizin degil!
	return 1
elseif (<topobj.uid> != <src.uid>)
	src.sysmessage @38,1,1 Bagi kullanabilmek icin uzerinize almalisiniz.
 	return 1
else
src.sysmessage @07a1 Yanlizca Bandaj , Potion , Bilet , Reg , Tp , Recall Rune , Saman ve Animal deed koyabilirsiniz.
endif


On=@dropon_self
if (<more1> != <src.uid>)
	src.sysmessage @38,1,1 Sizin olmayan bag e item koyamazsiniz!.
	return 1
elseif (<argo.type> == t_reagent)
     return 0
elseif (<argo.type> == t_potion)
     return 0
elseif (<argo.baseid> == i_arrow)
     return 0
elseif (<argo.baseid> == i_pouch_trapped)
     return 0
elseif (<argo.baseid> == i_bilet)
     return 0
elseif (<argo.baseid> == i_rune_marker)
     return 0
elseif (<argo.baseid> == i_deed_animal)
     return 0
elseif (<argo.baseid> == i_hay_sheaf)
     return 0
elseif (<argo.baseid> == i_gold)
     return 0
elseif (<argo.baseid> == i_lockpick)
     return 0
elseif (<argo.baseid> == i_bandage)
     return 0
else
     src.sysmessage @07a1 Bunu Koyamazsiniz.Bu bagin icine yanlizca belirtilen itemler koyulabilir.
return 1
endif
@keLL

İyi Güzelde... O Bagı Kendine Ait Yapınca Stafflar Açamıyor (: Yinede Sağolunuz.
Novice
-14.8
if (<more1> == 0)
more1 <src.uid>
sil burayı
@KadhRaS

Yardımın İçin Sağolasın..Hatta Orda Değildi Düzeltim

//////////Güncellendi By Michaell///////////////////////////////////////////////////
/////////Ultima-Strikenin Katkilariyla.www.ultima-strike.com///////////////////////
/////////Scplerle İlgili Sorunlar icin [email protected]////////////////////
/////////////////////////Michaell////////////////////////////////////////////////
///////////////Noxier(Ozgur)'e Yardimlari ve Destegi icin Cok Tesekkur Ederim.//
///////////////////////////////////////////////////////////////////////////////



[function f_fizzle]
effect 3,i_fx_smoke_small,3,40,1
sound 92
if (<src.mana> > 8)
if (<meditation> < 100.0)
mana (<src.mana> - {5 8})
endif
endif
if (<src.mana> < 8)
if (<meditation> < 100.0)
mana 1
endif
endif
if (<src.findid.i_magerylvl>)
	src.findid.i_magerylvl.remove
endif
if (<src.findid.i_evallvl>)
	src.findid.i_evallvl.remove
endif
if (<src.findid.i_poisonlvl>)
	src.findid.i_poisonlvl.remove
endif
if (<src.findid.i_spdelay_man>)
	src.findid.i_spdelay_man.remove
elseif (<src.findid.i_spdelay_woman>)
	src.findid.i_spdelay_woman.remove
elseif (<src.findid.i_spdelay_unisex>)
	src.findid.i_spdelay_unisex.remove
endif
elseif (<src.findid.i_pre_morph>)
	src.findid.i_pre_morph.remove
endif
elseif (<src.findid.i_morpher>)
	src.findid.i_morpher
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
// Level 1
if (<more1> == 1)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
// Level 2
elseif (<more1> == 2)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
// Level 3
elseif (<more1> == 3)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
// Level 4
elseif (<more1> == 4)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
// Level 5
elseif (<more1> == 5)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
// Level 6
elseif (<more1> == 6)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
	
// Level 7
elseif (<more1> == 7)
	if (rand(2) == 1)
		cont.magery (<cont.magery> + 1)
	endif
// Level 8
elseif (<more1> == 8)
	if (rand(3) == 1)
		cont.magery (<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 (<more1> == 1)
	if (rand(2) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 2
elseif (<more1> == 2)
	if (rand(2) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 3
elseif (<more1> == 3)
	if (rand(2) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 4
elseif (<more1> == 4)
	if (rand(2) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 5
elseif (<more1> == 5)
	if (rand(2) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 6
elseif (<more1> == 6)
	if (rand(2) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 7
elseif (<more1> == 7)
	if (rand(3) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 1)
	endif
// Level 8
elseif (<more1> == 8)
	if (rand(3) == 1)
		cont.evaluatingintel (<cont.evaluatingintel> + 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
if (<src.poisoning> == 1000)
remove
else
timer 3
endif
	
On=@Timer
if (<more1> == 1)
	cont.poisoning (<cont.poisoning> + 1)
elseif (<more1> == 2)
	cont.poisoning (<cont.poisoning> + 2)
elseif (<more1> == 3)
	cont.poisoning (<cont.poisoning> + 3)
elseif (<more1> == 4)
	cont.poisoning (<cont.poisoning> + 4)
elseif (<more1> == 5)
	cont.poisoning (<cont.poisoning> + 5)
elseif (<more1> == 6)
	cont.poisoning (<cont.poisoning> + 6)
elseif (<more1> == 7)
	cont.poisoning (<cont.poisoning> + 7)
elseif (<more1> == 8)
	cont.poisoning (<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 (<more1>)
	timer <more1>
endif

On=@UnEquip
if !(<cont.flags>&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 (<more1>)
	timer <more1>
endif

On=@UnEquip
if !(<cont.flags>&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 (<more1>)
	timer <more1>
endif

On=@UnEquip
if !(<cont.flags>&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 <cont.flags>|04 // paralarim lan adami uniseksmi$
if (<more1>)
	timer <more1>
endif

On=@UnEquip
if !(<cont.flags>&statf_dead)
	cont.flags <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 !((<src.findid.i_spdelay_man>) || (<src.findid.i_spdelay_woman>) || (<src.findid.i_spdelay_unisex>))
	if (strmatch('<src.account>','Blaxoul'))
		var.m <src.act.uid>
		newitem i_spdelay_man_brnx
		act.more1 <args>
		act.equip
		act <var.m>
	elseif (<src.body> == c_man)
		var.m <act.uid>
		newitem i_spdelay_man
		act.more1 <args>
		act.equip
		act <var.m>
	elseif (<src.body> == c_woman)
		var.m <src.act.uid>
		newitem i_spdelay_woman
		act.more1 <args>
		act.equip
		act <var.m>
	else
		var.m <src.act.uid>
		newitem i_spdelay_unisex
		act.more1 <args>
		act.equip
		act <var.m>
	endif
endif

[function sd_mico]
if !((<findid.i_spdelay_man>) || (<findid.i_spdelay_woman>) || (<findid.i_spdelay_unisex>))
	if (strmatch('<account>','Blaxoul'))
		var.m <act.uid>
		newitem i_spdelay_man_brnx
		act.more1 <args>
		act.equip
		act <var.m>
	elseif (<body> == c_man)
		var.m <act.uid>
		newitem i_spdelay_man
		act.more1 <args>
		act.equip
		act <var.m>
	elseif (<body> == c_woman)
		var.m <act.uid>
		newitem i_spdelay_woman
		act.more1 <args>
		act.equip
		act <var.m>
	else
		var.m <act.uid>
		newitem i_spdelay_unisex
		act.more1 <args>
		act.equip
		act <var.m>
	endif
endif


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

// Level 1
[function mg1]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 1
	act.equip
	act.timer 4
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 1
	act.equip
	act.timer 4
	act <var.m2>
endif

// Level 2
[function mg2]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 1
	act.timer 1
	act.equip
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 2
	act.equip
	act <var.m2>
endif

// Level 3
[function mg3]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 3
	act.equip
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 3
	act.equip
	act <var.m2>
endif

// Level 4
[function mg4]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 4
	act.equip
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 4
	act.equip
	act <var.m2>
endif

// Level 5
[function mg5]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 5
	act.equip
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 5
	act.equip
	act <var.m2>
endif

// Level 6
[function mg6]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 6
	act.equip
	act.timer 5
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 6
	act.equip
	act.timer 5
	act <var.m2>
endif

// Level 7
[function mg7]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 7
	act.equip
	act.timer 3
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 7
	act.equip
	act.timer 5
	act <var.m2>
endif

// Level 8
[function mg8]
if (<magery> < 100.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 8
	act.equip
	act.timer 1
	act <var.m2>
endif

if (<evaluatingintel> < 100.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 8
	act.equip
	act <var.m2>
endif



//------------------
// poison functionz
//------------------

[function psg]
if (<magery> < 50.0) && ((<skilllock[25]> == 0) && (<skilltotal> < 800.0))
	findid.i_magerylvl.remove
	var.m2 <act.uid>	
	newitem i_magerylvl
	act.more1 1
	act.equip
	act <var.m2>
endif

if (<evaluatingintel> < 50.0) && ((<skilllock[16]> == 0) && (<skilltotal> < 800.0))
	findid.i_evallvl.remove
	var.m2 <act.uid>	
	newitem i_evallvl
	act.more1 1
	act <var.m2>
endif

if (<skilltotal> >= 800.0))
src.findid.i_poisonlvl.remove

elseif (<poisoning> < 10.0) || ((<skilllock[10]> == 0) || (<skilltotal> < 800.0))
	findid.i_poisonlvl.remove
	var.m2 <act.uid>
	newitem i_poisonlvl
		
	
        if (<src.poisoning> < 10.0) && (<skilltotal> < 799.3)
        act.more1 8
	elseif (<src.poisoning> > 10.0) && (<src.poisoning> < 30.0) && (<skilltotal> < 799.7)
		if (rand(2) == 1)
			act.more1 4
		endif
	elseif (<src.poisoning> >= 30.0) && (<src.poisoning> < 50.0) && (<skilltotal> < 799.8)
		if (rand(2) == 1) && (<skilltotal> < 799.7)
			act.more1 3
		endif
	elseif (<src.poisoning> > 49.9) && (<src.poisoning> < 60.0) && (<skilltotal> < 799.9)
		if (rand(2) == 1)
			act.more1 2
		endif
	elseif (<src.poisoning> > 59.9) && (<src.poisoning> < 70.0)
		if (rand(2) == 1)
			act.more1 1
		endif
	elseif (<src.poisoning> > 69.9) && (<src.poisoning> < 90.0)
		if (rand(3) == 1)
			act.more1 1
		endif
	elseif (<src.poisoning> > 89.9)
		if (rand(3) == 1)
			act.more1 1
		endif
	elseif (<src.poisoning> = 100.0) 
		return 1
	endif
	act.equip
	act <var.m2>
endif

//------------------
// breakspell functionz
//------------------

// Circle 1
[function breakspell1]
f_fizzle

// Circle 2
[function breakspell2]
f_fizzle
if (<src.mana> > 8)
if (<meditation> < 100.0)
	mana (<src.mana> - {8 10})
endif
endif
if (<src.mana> < 8)
if (<meditation> < 100.0)
        mana 0
endif
endif


// Circle 3
[function breakspell3]
f_fizzle
if (<src.mana> > 20)
if (<meditation> < 100.0)
	mana (<src.mana> - {10 15})
endif
endif
if (<src.mana> < 20)
if (<meditation> < 100.0)
        mana 0
endif
endif


// Circle 4
[function breakspell4]
f_fizzle
if (<src.mana> > 25)
if (<meditation> < 100.0)
	mana (<src.mana> - {15 20})
endif
endif
if (<src.mana> < 25)
if (<meditation> < 100.0)
        mana 0
endif
endif


// Circle 5
[function breakspell5]
f_fizzle
if (<src.mana> > 30)
if (<meditation> < 100.0)
	mana (<src.mana> - {20 25})
endif
endif
if (<src.mana> < 30)
if (<meditation> < 100.0)
        mana 0
endif
endif

// Circle 6
[function breakspell6]
f_fizzle
if (<src.mana> > 35)
if (<meditation> < 100.0)
	mana (<src.mana> - {25 30})
endif
endif
if (<src.mana> < 35)
if (<meditation> < 100.0)
        mana 0
endif
endif

// Circle 7
[function breakspell7]
f_fizzle
if (<src.mana> > 40)
if (<meditation> < 100.0)
	mana (<src.mana> - {30 35})
endif
endif
if (<src.mana> < 40)
if (<meditation> < 100.0)
        mana 0
endif
endif

// Circle 8
[function breakspell8]
f_fizzle
if (<src.mana> > 45)
if (<meditation> < 100.0)
	mana (<src.mana> - {35 40})
endif
endif
if (<src.mana> < 45)
if (<meditation> < 100.0)
        mana 0
endif
endif

//------------------
// spell: explosion
//------------------

[itemdef i_spelleffect_explosion]
name=[explosion spelleffect]
id=i_gold
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
cont.sayu explosion
timer 2

On=@Timer
cont.effect 3,i_fx_explode,6,15,1
cont.sfx snd_spell_explosion

if (<cont.hitpoints> > 32)
	cont.hits=(<cont.hits> - {20 25})
	cont.damage 1
else
	cont.hits=0
endif

attr attr_decay
remove
return 1

//------------------
// spell: polymorph
//------------------

[function plym]
if (<findid.i_pre_morph>)
	findid.i_pre_morph.remove
	f_fizzle
endif

if !(<findid.i_morpher>)
	newitem i_pre_morph
	act.more <args>
	act.equip
	newitem i_morpher
	act.more <body>
	act.equip
else
	findid.i_morpher.timer {285 320}
	newitem i_pre_morph
	act.more <args>
	act.equip
endif

[itemdef i_pre_morph]
name=[casting polymorph]
id=i_gold
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
timer 4
cont.spell_say Vas Ylem Rel
cont.anim 17
cont.sd 3
cont.events +e_breakpoly

On=@UnEquip
cont.events -e_breakpoly
cont.consume 1 i_reag_spider_silk
cont.consume 1 i_reag_blood_moss
cont.consume 1 i_reag_mandrake_root
cont.consume 1 i_reag_sulfur_ash

On=@Timer
attr attr_decay
if (<cont.mana> < 40)
	cont.f_fizzle
else
	cont.mana (<cont.mana> - 40)
	cont.sfx snd_spell_polymorph
	cont.body <more>
	cont.update
endif
remove
return 1

[itemdef i_morpher]
name=Polymorph
id=i_rune_polymorph
type=t_eq_script
weight=0
layer=layer_special

On=@Equip
timer {285 320}
cont.events +e_poly

On=@UnEquip
cont.events -e_poly
cont.body <more>
cont.update

On=@Timer
attr attr_decay
remove
return 1

[events e_poly]
On=@Death
findid.i_morpher.remove

[events e_breakpoly]
On=@SpellCast
findid.i_pre_morph.remove
findid.i_morpher.remove
f_fizzle

On=@GetHit
findid.i_pre_morph.remove
findid.i_morpher.remove
f_fizzle

On=@Hit
findid.i_pre_morph.remove
findid.i_morpher.remove
f_fizzle

On=@Death
findid.i_pre_morph.remove
findid.i_morpher.remove

On=@SkillStart
findid.i_pre_morph.remove
findid.i_morpher.remove
f_fizzle

[EOF]

Mageryde Büyüler Gözükmüyor
Yaaa Off NE biçim Forum Yok mu bi Cvp Veren Ne zamndan Beridir Burdayım Topici Açtım ama hala Bekliom Msn Sertifika Off Topicine Cvp Verebilcek Yokmu
Login olanlara fix eventi verdirdin mi ?
Ne gibi bir fix?
e_fix veya fix diye geciyor events olarak genelde sphere/events/fix.scp veya sphere/fix.scp olur bi bak o scriptin yoksa ekle loginin altınada src.events +e_Fix veya +fix
[function spell_say]
if (0< <src.account.plevel> < 2)
sayua 0482,0,0,1 <args>
else
return 1
endif

[events e_death_announce]
On=@Death
src.dialogclose d_runebook
if !(<isevent.e_qchar>)
	if (<fame> > 9000) && (<memoryfindtype.memory_harmedby>) && (<act.ischar>) && (<act.uid> != <uid>) && (0<act.npc> == 0)
		serv.allclients sysmessage @07a1 <sex Lord/Lady> <name>, <act.name> tarafindan <region.name> civarlarinda olduruldu.
	endif
endif

[events fix]
Off=@Attack
if (<memoryfindtype.memory_guild.link.more1> == 1) && (<src.memoryfindtype.memory_guild.link.more1> == 1)
sysmessage @54,,1 Yandaslariniza zarar veremezsiniz.
return 0
elseif (<memoryfindtype.memory_guild.link.more1> == 2) && (<src.memoryfindtype.memory_guild.link.more1> == 2)
sysmessage @54,,1 Yandaslariniza zarar veremezsiniz.
return 0
endif
If (<src.id> == c_pv)
sysmessage @54 Player vendorlarina zarar veremezsiniz.
return 0
endif


On=@HitTry
if (<memoryfindtype.memory_guild.link.more1> == 1) && (<act.memoryfindtype.memory_guild.link.more1> == 1)
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 0
elseif (<memoryfindtype.memory_guild.link.more1> == 2) && (<act.memoryfindtype.memory_guild.link.more1> == 2)
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 0
endif
If (<src.npc> == brain_vendor) || (<src.npc> == brain_banker) || (<src.npc> == brain_animal_trainer) || (<src.npc> == brain_healer)
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 1
Elseif (<Src.Uid> == <Uid>)
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 1
Elseif (<Src.Flags>&(statf_stone|statf_invul|statf_hidden|statf_invisible))
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 1
Endif

On=@Logout
src.action -1
return 1

On=@Death
src.dialogclose d_runebook
if (<kills> > 99999999999)
	f_statloss
endif

On=@GetHit
if (<findtype.t_eq_trade_window>)
	findtype.t_eq_trade_window.remove
endif

On=@EnvironChange
if !(<memoryfindtype.memory_guild.link.align>) || (<kills> > 5000)
	if (<findlayer(2).baseid> == i_shield_order) || (<findlayer(2).baseid> == i_shield_chaos)
		findlayer(2).unequip
	endif
	endif
endif


if !((<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)) // active stat-effecting spell?
	stchk
	if ((<findlayer(10).baseid> == i_platemail_gorget) && (<findlayer(6).baseid> == i_platemail_helm) && (<findlayer(7).baseid> == i_platemail_gloves) && (<findlayer(13).baseid> == i_platemail_chest) && (<findlayer(19).baseid> == i_platemail_arms) && (<findlayer(24).baseid> == i_platemail_leggings))
		if (<dex> > 80)
			dex 80
		endif
	elseif ((<findlayer(6).baseid> == i_bone_helmet) && (<findlayer(13).baseid> == i_bone_chest) && (<findlayer(19).baseid> == i_bone_arms) && (<findlayer(7).baseid> == i_bone_gloves) && (<findlayer(4).baseid> == i_bone_leggings))
		if (<dex> > 85)
			dex 85
		endif
	endif
	if !((<isevent.e_str>) || (<isevent.e_dex>) || (<isevent.e_int>) || (<isevent.e_spr>))
		var.stats <eval (<str> + <int> + <dex>)> // stat cap fix
		if (<eval <var.stats>> > 225)
			statcapdex
		endif
	endif
endif


On=@SpellCast
if (<src.findid.i_rb_delay>) || (<src.findid.i_rb_delay2>)
src.sysmessage @049 Runebook kullanirken buyu atamazsiniz.
return 1
endif 

if !(<act.uid> == <uid>) && (<act.region.guarded> == 1) && (<region.guarded> == 1)
	if (<memoryfindtype.memory_guild.link.align> == 1) // order
		if (<act.memoryfindtype.memory_guild.link.align> == 1)
			f_fizzle
			return 1 //vurmayi engelle
		endif
	endif
	if (<memoryfindtype.memory_guild.link.align> == 2)
		if (<act.memoryfindtype.memory_guild.link.align> == 2)
			f_fizzle
			return 1
		endif
	endif
	endif

if (<argn> == 24) // wall of stone 
if (<src.region.flags>&region_flag_ship) 
src.message gemi icerisinde duvar atamazsiniz. 
return 1 
endif 
endif 

if (<findlayer(1).type> == t_spellbook)
	findlayer(2).unequip
elseif !(<findlayer(2).type> == t_weapon_mace_staff)
	findlayer(1).unequip
	findlayer(2).unequip
endif

if ((<flags>&statf_freeze) || (<flags>&statf_stone) || (<findtype.t_armor.cont.uid> == <uid>)) // dur bakim nolyo
	f_fizzle
	return 1
endif

if (<act.ischar>)
	if !(<act.flags>&statf_insubstantial) && (0<act.account.plevel> > 0<account.plevel>)
		f_fizzle
		return 1
	elseif ((<argn> == 7) || (<argn> == 15)) // no prot. & reac. arm. over armor
		if (<act.findtype.t_armor.cont.uid> == <act.uid>)
			f_fizzle
			return 1
		endif
	elseif (<argn> == 59) && !(<act.flags>&statf_dead)
		f_fizzle
		return 1
	endif
endif

if (<act.id> == c_pv)
	if !((<argn> == 25) || (<argn> == 26) || (<argn> == 46) || (<argn> == 48) || (<argn> == 49) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))
		f_fizzle
		return 1
	endif
endif



if (<argn> == 1)	// Clumsy
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say  Uus Jux
	mg1
elseif (<argn> == 2)	// Create food
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Mani Ylem
	newitem {09e9 1 i_bread_loaf 1 i_bread_french 1} 
	act.bounce
	CONSUME=1 i_reag_garlic
	CONSUME=1 i_reag_ginseng
	CONSUME=1 i_reag_mandrake_root
	mg1
elseif (<argn> == 3)	// Feeblemind
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Rel Wis
	mg1
elseif (<argn> == 4)	// Heal
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
		return 1
        endif
	spell_say In Mani
	if (<src.findid.i_rune_poison>)
		f_fizzle
		return 1
	endif
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 1
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 1
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 1
	else
		sd 1
	endif
	mg1
elseif (<argn> == 5)	// Magic Arrow
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Por Ylem
	mg1
elseif (<argn> == 6)	// Night Sight
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Lor
	mg1
elseif (<argn> == 7)	// Reactive Armor
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
		return 1
        endif
	if (<act.uid> == <src.uid>)
	spell_say Flam Sanct
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 1
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 1
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 1
	else
		sd 1
	endif
	mg1
	else
		src.sysmessage @025,,1 Bu buyuyu sadece kendinize atabilirsiniz.
		f_fizzle
		return 1
	endif 
elseif (<argn> == 8)	// Weaken
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Des Mani
	mg1
elseif (<argn> == 9)	// Agility
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
        if (<act.serial>==<targ.serial>)
	spell_say Ex Uus
	mg2
        else
        skill fail
	ekranitemizle
	sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
	return 1
	endif
elseif (<argn> == 10)	// Cunning
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Uus Wis
	mg2
elseif (<argn> == 11)	// Cure
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
		return 1
        endif
	spell_say An Nox
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 1
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 1
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 1
	else
		sd 1
	endif
	if (<act.findid.i_rune_poison>)
		if (<act.findid.i_rune_poison.morey> > 790
			if (rand(2) == 1)
				act.effect 3,0374a,1,15,1
				act.sound snd_spell_poison
				f_fizzle
				return 1
			endif
		endif
		if (<act.findid.i_rune_poison.morey> > <eval ((<magery> + 400) / 2)>)
			if !(rand(8) == 1)
				act.effect 3,0374a,1,15,1
				act.sound snd_spell_poison
				f_fizzle
				return 1
			endif
		endif
	endif
	mg3
elseif (<argn> == 12)	// Harm
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say An Mani
	sd 1
	mg2
elseif (<argn> == 13)	// Trap
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Jux
	f_fizzle
	return 1
elseif (<argn> == 14)	// Untrap
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say An Jux
	f_fizzle
	return 1
elseif (<argn> == 15)	// Protection
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
	endif
	if (<act.uid> == <src.uid>)
		spell_say Uus Sanct
		sd 1
		mg2
	else
		src.sysmessage @25,,1 Bu buyuyu sadece kendinize atabilirsiniz.
		f_fizzle
		return 1
	endif 
elseif (<argn> == 16)	// Strength
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Uus Mani
	sd 1
	mg2
elseif (<argn> == 17)	// Bless
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
	endif	
	if (<act.uid> == <src.uid>)
		spell_say Rel Sanct
		sd 1
		mg3
	else
		src.sysmessage @25,,1 Bu buyuyu sadece kendinize atabilirsiniz.
		f_fizzle
		return 1
	endif 
elseif (<argn> == 18)	// Fireball
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Flam
	sd 1
	mg3
elseif (<argn> == 19)	// Lock
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say An Por
	f_fizzle
	return 1
elseif (<argn> == 20)	// Poison
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	if !(<act.uid> == <src.uid>)
		if (<act.ischar>)
			if (<act.hits> < 1) || (<act.findid.i_rune_summon_creature>) || (<act.id>==c_h_darkelf_archer) || (<act.id>==c_h_darkelf_wizard) || (<src.region.safe>)
				f_fizzle
				src.sysmessage @38,,1 Boyle bir sey yok!
				findid.i_poisonlvl.remove
				return 1
			endif
		endif
	spell_say In Nox
	psg
	sd 1
	else
		f_fizzle
		findid.i_poisonlvl.remove
		return 1
	endif
elseif (<argn> == 21)	// Telekinesis
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Ort Por Ylem
	sd 1
	if (<act.isitem>)
		if (<act.cont.isitem>)
			if ((<act.cont.type> == t_corpse) || (<act.topobj.id> == c_pv))
				f_fizzle
				return 1
			endif
		endif
	else
		f_fizzle
		return 1
	endif
	mg3
elseif (<argn> == 22)	// Teleport
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	if (strmatch('<src.region.guarded>','1'))
		f_fizzle
		sysmessage @0 Sehir icinde teleport olamazsiniz..
		return 1
                endif
        if (<hits> <= (<str> - 40))
        SRC.SYSMESSAGE Fazla yaraliyken teleport olmazsiniz.
        return 1
        endif
	spell_say Rel Por
	mg3  
elseif (<argn> == 23)	// Unlock
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ....
	return 1
        endif
	spell_say Ex Por
	f_fizzle
	return 1
elseif (<argn> == 24)	// Wall
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Sanct Ylem
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
	sd 1
	mg3
elseif (<argn> == 25)	// Arch Cure
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas An Nox
	sd 2
	mg4
elseif (<argn> == 26)	// Arch Protection
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Uus Sanct
	sd 2
	mg4
elseif (<argn> == 27)	// Curse
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Des Sanct
	sd 2
	mg4
elseif (<argn> == 28)	// Fire Field
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Flam Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
	sd 2
	mg4
elseif (<argn> == 29)	// Greater Heal
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	if (<src.findid.i_rune_poison>)
		f_fizzle
		return 1
	endif
	spell_say In Vas Mani
	sd 2
	mg4
elseif (<argn> == 30)	// Lightning
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Por Ort Grav
	sd 2
	mg4
elseif (<argn> == 31)	// Mana Drain
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Ort Rel
	f_fizzle
	return 1
elseif (<argn> == 32)	// Recall
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Ort Por
	sd 2
	mg4
elseif (<argn> == 33)	// Blade Spirits
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Jux Hur Ylem
	sd 2
	mg5
elseif (<argn> == 34)	// Dispel Field
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say An Grav
	if (<act.ischar>)
		f_fizzle
		return 1
	endif
	sd 2
	mg5
elseif (<argn> == 35)	// Incognito
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal In Ex
	sd 2
	mg5
elseif (<argn> == 36)	// Magic Reflect
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
	endif
	if (<act.uid> == <src.uid>)
		spell_say In Jux Sanct
		sd 2
		mg5
	else
		src.sysmessage @25,,1 Bu buyuyu sadece kendinize atabilirsiniz.
		f_fizzle
		return 1
	endif 
elseif (<argn> == 37)	// Mind Blast
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
		return 1
        endif
	spell_say Por Corp Wis
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 2
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 2
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 2
	else
		sd 2
	endif
	mg5
elseif (<argn> == 38)	// Paralyze
        if (<src.findid.i_mem_spellheal>)
			src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
			return 1
        endif
	spell_say An Ex Por
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 2
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 2
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 2
	else
		sd 2
	endif
	mg5
elseif (<argn> == 39)	// Poison Field
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Nox Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
	sd 2
	mg5
elseif (<argn> == 40)	// Summon Creature
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	if (strmatch('<src.region.guarded>','1'))
		f_Fizzle
		sysmessage @0 Sehir icinde bu buyuyu kullanamazsiniz.
		return 1
	endif
	spell_say Kal Xen
	sd 2
	mg5
elseif (<argn> == 41)	// Dispel
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say An Ort
	sd 2
	mg6
elseif (<argn> == 42)	// Energy Bolt
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
		return 1
        endif
	spell_say Corp Por
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 2
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 2
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 2
	else
		sd 2
	endif
	mg6
elseif (<argn> == 43)	// Explosion
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Ort Flam
	sd 2
	mg6
elseif (<argn> == 44)	// Invisibility
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
	endif
	if (strmatch('<act.region.events>','r_house_public')) || (strmatch('<act.region.events>','r_house_private'))
		if (0<act.npc> == 1)
			sysmessage @25,,1 Ev icinde npc'gizliemezsiniz..
			f_fizzle
			return 1
		endif
	endif
	spell_say An Lor Xen
	sd 2
	mg6
elseif (<argn> == 45)	// Mark
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Por Ylem
	sd 2
	mg6
elseif (<argn> == 46)	// Mass Curse
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Des Sanct
	sd 2
	mg6
elseif (<argn> == 47)	// Paralyze Field
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Ex Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
	sd 3
	mg6
elseif (<argn> == 48)	// Reveal
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Wis Quas
	sd 2
	mg6
elseif (<argn> == 49)	// Chain Lightning
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Ort Grav
	if (<act.uid> == <uid>)
		f_fizzle
		return 1
	endif
	sd 3
	mg7
elseif (<argn> == 50)	// Energy Field
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Sanct Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
	sd 3
	mg7
elseif (<argn> == 51)	// Flame strike
        if (<src.findid.i_mem_spellheal>)
		src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
		return 1
        endif
	spell_say Kal Vas Flam
	if ((<findid.i_spdelay_man>)
		findid.i_spdelay_man.timer 3
	elseif ((<findid.i_spdelay_woman>)
		findid.i_spdelay_woman.timer 3
	elseif ((<findid.i_spdelay_unisex>)
		findid.i_spdelay_unisex.timer 3
	else
		sd 3
	endif
	mg7
elseif (<argn> == 52)	// Gate Travel
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Rel Por
	sd 3
	mg7
elseif (<argn> == 53)	// Mana Vampire
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Ort Sanct
	f_fizzle
	return 1
elseif (<argn> == 54)	// Mass Dispel
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas An Ort
	sd 3	
	mg7
elseif (<argn> == 55)	// Meteor Swarm
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Flam Kal Des Ylem
	if (<act.uid> == <uid>)
		f_fizzle
		return 1
	endif
	sd 3
	mg7
elseif (<argn> == 56)	// Polymorph
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	if (0<tag.donus>) 
		spell_say Vas Ylem Rel 
		sd 3 
		mg3 
		tag.donus 
	else 
		skillmenu sm_polymorph 
	return 1 
	endif
elseif (<argn> == 57)	// Earthquake
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say In Vas Por
	sd 3
	mg8
elseif (<argn> == 58)	// Energy Vortex
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Vas Corp Por
	sd 3
	mg8
elseif (<argn> == 59)	// Resurrect
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say An Corp
	psg
	sd 3
	mg8
elseif (<argn> == 60)	// Air Elemental
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Vas Xen Hur
	if (<region.guarded>)
		criminal 1
	endif
	sd 3
	mg8
elseif (<argn> == 61)	// Summon Deamon
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Vas Xen Corp
	if (<region.guarded>)
		criminal 1
	endif
	sd 3
	mg8
elseif (<argn> == 62)	// Earth Elemental
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Vas Xen Ylem
	if (<region.guarded>)
		criminal 1
	endif
	sd 3
	mg8
elseif (<argn> == 63)	// Fire Elemental
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Vas Xen Flam
	if (<region.guarded>)
		criminal 1
	endif
	sd 3
	mg8
elseif (<argn> == 64)	// Water Elemental
        if (<src.findid.i_mem_spellheal>)
	src.sysmessage @025 Bandaj basarken buyu atamazsiniz ...
	return 1
        endif
	spell_say Kal Vas Xen An Flam
	if (<region.guarded>)
		criminal 1
	endif
	sd 3
	mg8
endif


On=@SpellEffect
if (<flags>&statf_dead) // oluye dokunulmaz, ayiptir
	if (<argn> == 59)
		sfx snd_spell_resurrection
		//findlayer(22).remove
		color <oskin>
		update
		effect 3,0376a,2,20,1
	else
		return 1
	endif
elseif ((<argn> == 9) || (<argn> == 10) || (<argn> == 16) || (<argn> == 17)) // stat fix
	findlayer(32).remove // spell
	findlayer(44).remove // potion
elseif ((<argn> == 49) || (<argn> == 55))
	if !(<src.region.type> == <region.type>)
		return 1
	endif
elseif (<argn> == 37) // mindblast
	if (<src.int> > <int>)
		var.mb (<src.int> - <int>)
		var.mb <eval (<var.mb> / 2)>
		if (<eval <var.mb>> > 40)
			var.mb 40
		endif
		damage <eval (<var.mb> + {-5 5)>
	else
		damage {5 10}
	endif
	sfx snd_spell_mind_blast
	effect 3,0374a,1,15,1
elseif ((<argn> == 41) || (<argn> == 54)) // dispel & mass dispel
	if (<findid.i_morpher>)
		if !(<findid.i_pre_morph>)	
			findid.i_morpher.remove
		endif
	endif
elseif ((<argn> == 20) || (<argn> == 39)) // poison, poison field
	if !(<findid.i_rune_poison>) && (<flags>&statf_poisoned)
		flags <flags>&~statf_poisoned
	endif
	if !(<src.uid> == <uid>)
		skill fail
	endif
	if (<eval (<src.poisoning> + 100)> > <eval <findid.i_rune_poison.morey>>)
		findid.i_rune_paralyze.remove
		findid.i_rune_paralyze_field.remove
		findid.i_rune_poison.remove
		if (<distance> > 3) && (<eval (<src.poisoning> + 100)> > 700)
			poison (600 + {-100 100})
		else
			poison (<src.poisoning> + {-100 100})
		endif
	endif
	sfx snd_spell_poison
	effect 3,0374a,1,15,1
	return 1
elseif ((<argn> == 38) || (<argn> == 47)) // paralyze & paralyze field
	if (<findid.i_pouch_trapped>)
		effect 3,i_fx_explode,3,25,1
		sound snd_spell_explosion
		damage 20
		findid.i_pouch_trapped.remove
		return 1
	elseif !(<src.uid> == <uid>)
		findid.i_rune_poison.remove
	endif
elseif (<argn> == 26) // no arch prot. over armor
	if (<findtype.t_armor.cont.uid> == <uid>)
		return 1
	endif
elseif (<argn> == 25) // arch cure
	if (<memoryfindtype.memory_town>) && !(<src.memoryfindtype.memory_town>)
		return 1
	elseif (<memoryfindtype.memory_guild.link.align> > 0) && !(<src.memoryfindtype.memory_guild.link.align>)
		return 1
	endif
	if (<findid.i_rune_poison>)
		if (<findid.i_rune_poison.morey> > <eval ((<src.magery> + 400) / 2)>)
			if !(rand(8) == 1)
				effect 3,0374a,1,15,1
				sound snd_spell_poison
				return 1
			endif
		endif
	endif
elseif (<argn> == 4) || (<argn> == 29) || (<argn> == 11)
	if (<memoryfindtype.memory_town>) && !(<src.memoryfindtype.memory_town>)
		src.sysmessage @25,,1 Faction uyelerini iyilestiremezsiniz..
		return 1
	elseif (<memoryfindtype.memory_guild.link.align> > 0) && !(<src.memoryfindtype.memory_guild.link.align>)
		src.sysmessage @049 Order / Chaos uyelerini iyilestiremezsiniz <name> ..
		return 1
	endif
	if (<argn> == 4) || (<argn> == 29)
		if (<findid.i_rune_poison>)
			effect 3,0374a,1,15,1
			sound snd_spell_poison
			return 1
		endif
	endif
endif

On=@SkillStart
if (<action> == id(skill_stealth)) || (<action> == skill_stealth)
	if (<hiding> < 80.0)
		sysmessage @0481,,1 Stealth yapabilmek icin 80 hiding skilline ihtiyaciniz var.
		skill fail
		return 1
	elseif (<eval (<ac> * 100)> > <eval (<stealth> + 200)>)
		sms Zirhinizin verdigi agirlik gizlenmenizi engelliyor
		skill fail
		return 1
	elseif (<flags>&statf_onhorse)
		sms Binek uzerinde gizlenemezsiniz.
		skill fail
		return 1
	endif
elseif (<action> == id(skill_hiding)) || (<action> == skill_hiding)
	if (<eval (<ac> * 100)> > <eval (<hiding> + 200)>)
		sms Zirhinizin verdigi agirlik gizlenmenizi engelliyor
		skill fail
		return 1
	elseif (<flags>&statf_onhorse)
		sms Binek uzerinde gizlenemezsiniz.
		skill fail
		return 1
	endif
elseif ((<action> == id(skill_herding)) || (<action> == skill_herding))
	if (<targ.id> == c_pv)
		skill fail
		return 1
	endif

elseif ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) // stealing fiks
	if ((<targ.topobj.id> == c_pv) || (<act.id> == c_man) || (<act.id> == c_m_kraken) || (<act.id> == c_ogre) || (<act.id> == c_ettin) || (<act.id> == c_zombie) || (<act.id> == c_gargoyle) || (<act.id> == c_eagle) || (<act.id> == c_orc_lord) || (<act.id> == c_corpser) || (<act.id> == c_daemon) || (<act.id> == c_daemon_w_sword) || (<act.id> == c_dragon_green) || (<act.id> == c_elem_air) || (<act.id> == c_elem_earth) || (<act.id> == c_elem_fire) || (<act.id> == c_elem_water) || (<act.id> == c_orc) || (<act.id> == c_ettin_w_axe) || (<act.id> == c_snake_giant) || (<act.id> == c_gazer) || (<act.id> == c_liche) || (<act.id> == c_spectre) || (<act.id> == c_spider_giant) || (<act.id> == c_harpy) || (<act.id> == c_headless) || (<act.id> == c_lizardman) || (<act.id> == c_lizardman_spear) || (<act.id> == c_lizardman_mace) || (<act.id> == c_mongbat) || (<act.id> == c_orc_w_club) || (<act.id> == c_ratman) || (<act.id> == c_ratman_w_mace) || (<act.id> == c_ratman_w_sword)) 
skill fail
return 1

elseif !(<targ.topobj.ischar>)
sms Sadece canli varliklardan calabilirsiniz.
skill fail
return 1

elseif (<targ.isitem>)
if (<targ.cont>)
if (<targ.cont.type> == t_eq_trade_window)
skill fail
return 1
endif
endif
endif
endif

if (strmatch('<tag.ms>','<action>'))
	tag.mn <eval (<tag.mn> + 1)>
elseif ((strmatch('<tag.ms>','Skill_Magery')) && (strmatch('Skill_Meditation','<action>')))
	tag.mn <eval (<tag.mn> + 1)>
elseif ((strmatch('<tag.ms>','Skill_Meditation')) && (strmatch('Skill_Magery','<action>')))
	tag.mn <eval (<tag.mn> + 1)>
else
	tag.mn 0
endif

if (<eval <tag.mn>> > 2500) // bu sayi ile oynamayin, sicar.
	var.act <act>
	newitem i_macro_detect
	tag.mt <act.uid>
	act.link <uid>
	act.name <act.link.name> [<serv.time>]
	act.more1 <serv.time>
	if (strmatch('<serv.name>','Locus'))
		act.cont 040004353
		try var.mts <uid.04018c20d.rescount>
	elseif (strmatch('<serv.name>','Quann'))
		act.cont 040004353
		try var.mts <uid.040132e0c.rescount>
	endif
	var.smsgx 0251
	serv.allclients macrodetect <eval <var.mts>>: <name>
	act <var.act>
	tag.mn 0
else
	tag.ms <action>
endif

On=@Click
if  !(<findid.i_rune_incognito>) && (<memoryfindtype.memory_guild>)
	if (strmatch('<tag.gs_title>','')
		message [<memoryfindtype.memory_guild.link.name>]
	else
		message [<tag.gs_title>, <memoryfindtype.memory_guild.link.abbrev>]
	endif
endif

On=@ItemSpell
if !((<argn> == 2) || (<argn> == 13) || (<argn> == 14) || (<argn> == 19)|| (<argn> == 21) || (<argn> == 23) || (<argn> == 24) || (<argn> == 28) || (<argn> == 32) || (<argn> == 34) || (<argn> == 39) || (<argn> == 45) || (<argn> == 46) || (<argn> == 47) || (<argn> == 48) || (<argn> == 50) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))  // no enchant
	f_fizzle
	return 1
endif

On=@ItemEquip
if (<act.attr>&attr_magic) && !(<act.type> == t_armor) && !(<act.type> == t_shield) && !(<act.type> == t_armor_leather)
//if (<act.color> == 02bc) || (<act.color> == 0373) || (<act.color> == 070d) || (<act.color> == 075f) || (<act.color> == 0454)
//act.color 0
act.name
endif
endif

On=@ItemUnEquip
if (<act.type> == t_weapon_axe)
	events -e_axer
endif

On=@ItemDClick
if (<targ.topobj.id> == c_pv)
	if (<targ.type> == t_container)
		targ.open
	endif
	return 1
endif

On=@ItemClick
if (<act.topobj.id> == c_pv)
	if (strmatch('<act.price>',''))
		act.message [satilamaz]
	elseif (<act.price> <= 0)
		act.message [satilik degil]
	else
		if ((<act.type> == t_armor) || (<act.type> == t_armor_leather) || (<act.type> == t_shield) || (<act.type> == t_clothing) || (<act.type> == t_weapon_sword) || (<act.type> == t_weapon_fence) || (<act.type> == t_weapon_mace_staff) || (<act.type> == t_weapon_mace_smith) || (<act.type> == t_weapon_mace_pick) || (<act.type> == t_weapon_bow) || (<act.type> == t_weapon_xbow))
			if !(<eval ((<act.more1l> * 100) / <act.more1h>)> == 100)
					act.message [<act.price> gp] [%<eval (100 - ((<act.more1l> * 100) / <act.more1h>))> eski]
			else
				act.message [<act.price> gp]
			endif
		else
			act.message [<act.price> gp]
		endif
	endif
endif

if (<act.layer> == 21) && (<act.cont.ischar>)
	act.message Inventory
	return 1
else
	if ((<act.attr>&attr_newbie)) // blessed itemlari belirt
		act.message [newbified]
	endif
	if (<act.type> == t_container)
		if !(<act.baseid> == i_strong_box)
			if (<act.attr>&attr_move_never) && !(strmatch('<act.region.tag.owner>,'')) && (<act.region.type> == <region.type>)
				act.message [sabit]
			endif
			if (<act.baseid> == i_bones)
				act.message [loot: <act.rescount> esya]
				act.message <act.name>
			elseif (<act.rescount> > 0)
				act.message <act.typedef.name> [<act.rescount>,<eval ((<act.weight> / 10) - <act.typedef.weight>)>]
			else
				act.message <act.typedef.name>
			endif
			return 1
		endif
	endif
endif

if ((<act.topobj.uid> == <uid>)
	if (<act.type> == t_weapon_xbow)
		act.message [bolts: <eval <rescount <act.tdata3>>>]
	elseif (<act.type> == t_weapon_bow)
		act.message [arrows: <eval <rescount <act.tdata3>>>]
	endif
endif

On=@ItemPickUp_Pack
if (<act.topobj.id> == c_pv)
	if !(<uid> == <act.topobj.tag.owner>)
		return 1
	endif
endif

On=@ItemTargOn_Item
if ((<targ.topobj.id> == c_pv) && (<act.cont.uid> != <targ.topobj.uid>))
	return 1
elseif (<targ.baseid> == i_corpse)
	if (<targ.link.body>==c_man) && (0<src.region.guarded> == 1) // human cesetleri bicememe
	return 1
	elseif (<targ.link.body>==c_woman) && (0<src.region.guarded> == 1)
	return 1
	endif
endif
On=@ItemDropOn_Ground
if (<act.attr> == 04008)
	act.attr 0
endif

if !((<weight> + <act.weight>) > <weightmax>)
	if ((<action> == id(skill_fishing)) || (<action> == skill_fishing))
		if (<act.type> == t_fish) // tutulan baliklari
 			act.bounce // at cantaya
		endif
 	elseif ((<action> == id(skill_magery)) || (<action> == skill_magery))
		if (<act.type> == t_food) // yapilan yemekleri
			act.bounce // at cantaya
		endif
	endif
endif

// end of main fixes

[events e_qchar]
On=@Death
hits 5
fame 10000
return 1

On=@GetHit
hits (<hits> + 15)
if (<hits> > <str>)
	hits <str>
endif

On=@EnvironChange
if (<npc>)
	food 999
endif



[events e_fixhayvan] 
ON=@SpellCast
src.events +e_e_fixhayvan
If (<src.TARG.npc>=s_bless) 
elseif (<src.act.npc>=s_protection) 
elseif (<src.act.npc>=s_reactive_armor) 
elseif(<src.act.npc>=s_magic_reflection) 
elseif (<src.act.npc>=brain_animal) 
src.sysmessage @60 Bu buyuyu hayvanlar üzerinde kullanamazsiniz. 
endif 
endif 
endif
endif
endif

[function sysmesua]
sysmessageua 0835,6,0,eng <args>


[EOF]

Fix Scp

[RESOURCES]
c:\sphere\scripts\defs.scp
c:\sphere\scripts\items\itemb1.scp
c:\sphere\scripts\items\itemb2.scp
c:\sphere\scripts\items\itemb3.scp
c:\sphere\scripts\items\itemb4.scp
c:\sphere\scripts\items\itemb5.scp
c:\sphere\scripts\items\itemb6.scp
c:\sphere\scripts\items\itemb7.scp
c:\sphere\scripts\items\resources.scp
c:\sphere\scripts\items\
c:\sphere\scripts\chars\char.scp
c:\sphere\scripts\chars\char_anim.scp
c:\sphere\scripts\chars\char_evil.scp
c:\sphere\scripts\chars\char_human.scp
c:\sphere\scripts\chars\char_orc.scp
c:\sphere\scripts\chars\char_ore.scp
c:\sphere\scripts\chars\char_x.scp
c:\sphere\scripts\chars\char_hvendor.scp
c:\sphere\scripts\chars\
c:\sphere\scripts\table_x.scp
c:\sphere\scripts\
c:\sphere\scripts\events\
C:\sphere/events/fix.scp 
c:\sphere\scripts\gumps\
c:\sphere\scripts\speech\
c:\sphere\scripts\sistemler\
c:\sphere\scripts\bonuslar\
c:\sphere\scripts\sistemler\aile.scp

[MAP 0]
SIZE=6144,4096
WRAPX=5120

[OBSCENE]
asdasd
asddfsfsd

[NOTOTITLES]
Trustworthy
Estimable
Great
Glorious
Glorious

Honest
Commendable
Famed
Illustrious
Illustrious

Good
Honorable
Admirable
Noble
Noble

Kind
Respectable
Proper
Eminent
Eminent

Fair
Upstanding
Reputable
Distinguished
Distinguished

<none>
Notable
Prominent
Renowned
Renowned

Rude
Disreputable
Notorious
Imfamous
Dishonored

Unsavory
Dishonorable
Ignoble
Sinister
Sinister

Scoundrel
Malicious
Vile
Villainous
Dark

Despicable
Dastardly
Wicked
Evil
Evil

Outcast
Wretched
Nefarious
Dread
Dread

[ADVANCE]
STR=10000,3500,250
INT=10000,3500,250
DEX=10000,3500,250

[STARTS]
Yew
The Sturdy Bow
1861,2075
Minoc
The Barnacle Tavern
1861,2075
Britain
Sweet Dreams Inn
1861,2075
Moonglow
The Scholars Inn
1861,2075
Trinsic
The Traveller's Inn
1861,2075
Magincia
The Great Horns Tavern
1861,2075
Jhelom
The Morning Star Inn
1861,2075
Skara Brae
The Falconers Inn
1861,2075
Vesper
The Ironwood Inn
1861,2075

[RUNES]
An
Bet
Corp
Des
Ex
Flam
Grav
Hur
In
Jux
Kal
Lor
Mani
Nox
Ort
Por
Quas
Rel
Sanct
Tym
Uus
Vas
Wis
Xen
Ylem
Zan

[Skill 0]
DEFNAME=Skill_Alchemy
KEY=Alchemy
TITLE=Alchemist
EFFECT=0.0,125.0
DELAY=0.2,1.0
VALUES=1,20,100
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.sysmessage Iksiriniz heba oldu.

[Skill 1]
DEFNAME=Skill_Anatomy
KEY=Anatomy
TITLE=Scholar
PROMPT_MSG=Kimi inceleyeceksiniz??
DELAY=1.0,3.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.sysmessage Bu yaratik hakkinda pek fikriniz yok.
	return 1

[Skill 2]
DEFNAME=Skill_Animal_Lore
KEY=AnimalLore
TITLE=Scholar
PROMPT_MSG=Hangi hayvani inceleyeceksiniz?
DELAY=1.0,3.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.sysmessage Bu hayvan hakkinda pek fikriniz yok.
	return 1

[Skill 3]
DEFNAME=Skill_Appraise
KEY=ItemID
TITLE=Merchant
PROMPT_MSG=Neyi inceleyecegiz?
DELAY=1.0,3.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.sysmessage Bu esya hakkinda bir fikriniz yok.
	return 1

[Skill 4]
DEFNAME=Skill_Armslore
KEY=ArmsLore
TITLE=Arms%s
PROMPT_MSG=Neyi inceleyeceksiniz?
DELAY=1.0,3.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.sysmessage Bu esya hakkinda bir fikriniz yok.
	return 1

[Skill 5]
DEFNAME=Skill_Parrying
KEY=Parrying
TITLE=Shieldfighter
EFFECT=70.0,110.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=100
STAT_DEX=100
STAT_INT=0
BONUS_STR=50
BONUS_DEX=50
BONUS_INT=0
BONUS_STATS=60

[Skill 6]
DEFNAME=Skill_Begging
KEY=Begging
TITLE=Beggar
PROMPT_MSG=To whom do you wish to grovel?
DELAY=1.0,3.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=80

[Skill 7]
DEFNAME=Skill_Blacksmith
KEY=Blacksmithing
TITLE=Blacksmith
VALUES=1,20,100
DELAY=1.5
ADV_RATE=10.0,10.0,10.0

STAT_STR=100
STAT_DEX=25
STAT_INT=0
BONUS_STR=90
BONUS_DEX=10
BONUS_INT=0
BONUS_STATS=60

ON=@Fail
	src.sysmessage Malzemeniz eriyip gitti.

[Skill 8]
DEFNAME=Skill_Bowcraft
KEY=Bowcraft
TITLE=Bowyer
DELAY=1.0
VALUES=1,30,200
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_INT=0
STAT_DEX=100
BONUS_STR=0
BONUS_DEX=100
BONUS_INT=0
BONUS_STATS=60

ON=@Fail
	src.sysmessage Malzemeniz heba oldu.

[Skill 9]
DEFNAME=Skill_Peacemaking
KEY=Peacemaking
TITLE=Bard
DELAY=2.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=0
STAT_INT=100
STAT_DEX=50
BONUS_STR=0
BONUS_DEX=10
BONUS_INT=90
BONUS_STATS=60

ON=@Fail
	src.sysmessage Kimseyi sakinlestiremediniz.
	return 1

[Skill 10]
DEFNAME=Skill_Camping
KEY=Camping
TITLE=Camper
DELAY=5.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=30
STAT_INT=20
STAT_DEX=30
BONUS_STR=33
BONUS_DEX=33
BONUS_INT=34
BONUS_STATS=70

ON=@Fail
	src.sysmessage Atesiniz ruzgarla sondu.

[Skill 11]
DEFNAME=Skill_Carpentry
KEY=Carpentry
TITLE=Carpenter
PROMPT_MSG=
DELAY=1.5
STAT_STR=60
STAT_INT=40
STAT_DEX=30
BONUS_STR=50
BONUS_DEX=30
BONUS_INT=20
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,70

ON=@Fail
	src.sysmessage Malzemeniz heba oldu.
	
[Skill 12]
DEFNAME=Skill_CARTOGRAPHY
KEY=Cartography
TITLE=Cartographer
PROMPT_MSG=
DELAY=2.0
STAT_STR=15
STAT_INT=70
STAT_DEX=20
BONUS_STR=0
BONUS_DEX=20
BONUS_INT=80
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,80

ON=@Fail
	src.sysmessage Haritaniz gercek disi oldu.
	src.consume 1 i_map_blank

[Skill 13]
DEFNAME=Skill_Cooking
KEY=Cooking
TITLE=Chef
PROMPT_MSG=What would you like to cook?
DELAY=0
STAT_STR=25
STAT_INT=45
STAT_DEX=20
BONUS_STR=0
BONUS_DEX=40
BONUS_INT=60
BONUS_STATS=50
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,80

ON=@Fail
	src.sysmessage Yemegi yaktiniz.

[Skill 14]
DEFNAME=Skill_DetectHidden
KEY=DetectingHidden
TITLE=Detective
PROMPT_MSG=
DELAY=3.0,2.0
STAT_STR=15
STAT_INT=60
STAT_DEX=20
BONUS_STR=0
BONUS_DEX=20
BONUS_INT=80
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Saklanmis birsey goremiyorsunuz.
	return 1

[Skill 15]
DEFNAME=Skill_Enticement
KEY=Enticement
TITLE=Bard
PROMPT_MSG=Whom do you wish to entice?
DELAY=2.0
STAT_STR=15
STAT_INT=70
STAT_DEX=50
BONUS_STR=0
BONUS_DEX=50
BONUS_INT=50
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Sizi umursayan olmadi.
	return 1

[Skill 16]
DEFNAME=Skill_EvalInt
KEY=EvaluatingIntel
TITLE=Scholar
PROMPT_MSG=Incelemek istediginiz seyi secin.
DELAY=4.0
STAT_STR=5
STAT_INT=60
STAT_DEX=10
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=50
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	message Bu sey sizden daha akilli cikti. Hakkinda pek birsey ogrenemediniz.
	return 1

[Skill 17]
DEFNAME=Skill_Healing
KEY=Healing
TITLE=Healer
PROMPT_MSG=Who will you use the bandages on?

DELAY=3.0,1.0
EFFECT=2.0,20.0
ADV_RATE=10.0,10.0,10.0

STAT_STR=10
STAT_INT=90
STAT_DEX=10

BONUS_STATS=70
BONUS_STR=0
BONUS_DEX=30
BONUS_INT=70

ON=@Fail
	src.sysmessage Bandajlariniz ise yaramadi.
	return 1

[Skill 18]
DEFNAME=Skill_Fishing
KEY=Fishing
TITLE=Fisher%s
PROMPT_MSG=What water do you want to fish in?
DELAY=2.0
STAT_STR=40
STAT_INT=20
STAT_DEX=40
BONUS_STR=10
BONUS_DEX=90
BONUS_INT=0
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,30,200

ON=@Fail
	src.sysmessage Herhangi bir balik tutmayi basaramadiniz.
	return 1

[Skill 19]
DEFNAME=Skill_Forensics
KEY=Forensics
TITLE=Scholar
PROMPT_MSG=What corpse would you lke to examine?
DELAY=1.0
STAT_STR=10
STAT_INT=60
STAT_DEX=25
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Cesetten pek bilgi cikaramadiniz.
	return 1

[Skill 20]
DEFNAME=Skill_Herding
KEY=Herding
TITLE=Shepherd
PROMPT_MSG=
DELAY=2.0
STAT_STR=50
STAT_INT=50
STAT_DEX=50
BONUS_STR=25
BONUS_DEX=45
BONUS_INT=30
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Yaratik sizi pek umursamiyor.

[Skill 21]
DEFNAME=Skill_Hiding
KEY=Hiding
TITLE=Rogue
PROMPT_MSG=
DELAY=2.0
STAT_STR=0
STAT_INT=0
STAT_DEX=100
BONUS_STR=0
BONUS_DEX=100
BONUS_INT=0
BONUS_STATS=60
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Burada gizlenemezsiniz.
	return 1

[Skill 22]
DEFNAME=Skill_PROVOCATION
KEY=Provocation
TITLE=Bard
PROMPT_MSG=
DELAY=10000.0
STAT_STR=20
STAT_INT=60
STAT_DEX=70
BONUS_STR=0
BONUS_DEX=90
BONUS_INT=10
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Kimseyi galeyana getiremediniz.
	return 1

[Skill 23]
DEFNAME=Skill_Inscription
KEY=Inscription
TITLE=Scribe
PROMPT_MSG
DELAY=0.5
STAT_STR=15
STAT_INT=100
STAT_DEX=15
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,30,200

ON=@Fail
	src.sysmessage Malzemeniz heba oldu.
	src.consume 1 i_scroll_blank
	if (<src.mana> > 5
		src.mana (<src.mana> - 5)
	else
		src.mana 1
	endif
	return 1
	
[Skill 24]
DEFNAME=Skill_LockPick
KEY=LockPicking
TITLE=Locksmith
PROMPT_MSG=What do you want to pick?
DELAY=3.0
STAT_STR=20
STAT_INT=60
STAT_DEX=90
BONUS_STR=0
BONUS_DEX=80
BONUS_INT=20
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Kilit sizden zeki gibi.

[Skill 25]
DEFNAME=Skill_Magery
KEY=Magery
TITLE=Mage
PROMPT_MSG=
STAT_STR=0
STAT_INT=100
STAT_DEX=0
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=80
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,80

ON=@Fail
src.f_fizzle
src.findid.i_konusma_gucco.remove
return 1

On=@Success
src.findid.i_konusma_gucco.remove

On=@Start
serv.newitem i_konusma_gucco
new.equip

On=@Cancel
src.findid.i_konusma_gucco.remove

On=@Abort
src.f_fizzle
src.findid.i_konusma_gucco.remove
return 1

[Skill 26]
DEFNAME=Skill_MagicResist
KEY=MagicResistance
TITLE=Resistor
PROMPT_MSG=
EFFECT=0.0,10.0
STAT_STR=40
STAT_INT=100
STAT_DEX=40
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=30
BONUS_STATS=50
ADV_RATE=10.0,10.0,10.0

[Skill 27]
DEFNAME=Skill_Tactics
KEY=Tactics
TITLE=Warrior
STAT_STR=60
STAT_INT=20
STAT_DEX=70
BONUS_STR=50
BONUS_DEX=50
BONUS_INT=0
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

[Skill 28]
DEFNAME=Skill_Snooping
KEY=Snooping
TITLE=Pickpocket
PROMPT_MSG=
DELAY=2.0
STAT_STR=30
STAT_INT=50
STAT_DEX=60
BONUS_STR=0
BONUS_DEX=100
BONUS_INT=0
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Cantaya ulasamadiniz.
	return 1

[Skill 29]
DEFNAME=Skill_Musicianship
KEY=Musicianship
TITLE=Bard
PROMPT_MSG=
DELAY=2.0
STAT_STR=0
STAT_INT=20
STAT_DEX=60
BONUS_STR=0
BONUS_DEX=80
BONUS_INT=20
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@FAIL
	src.sysmessage Berbat caldiginiz icin pek umursayan olmadi.
	return 1

[Skill 30]
DEFNAME=Skill_POISONING
KEY=Poisoning
TITLE=Assassin
PROMPT_MSG=To what do you wish to apply the poison?
DELAY=2.0
STAT_STR=15
STAT_INT=40
STAT_DEX=40
BONUS_STR=0
BONUS_DEX=20
BONUS_INT=80
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,30,200

ON=@Fail
	src.sysmessage Zehir heba oldu.
	
[Skill 31]
DEFNAME=Skill_Archery
KEY=Archery
TITLE=Archer
PROMPT_MSG=
DELAY=2.0,0.1
STAT_STR=40
STAT_INT=20
STAT_DEX=70
BONUS_STR=0
BONUS_DEX=95
BONUS_INT=5
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

[Skill 32]
DEFNAME=Skill_SPIRITSPEAK
KEY=SpiritSpeak
TITLE=Medium
PROMPT_MSG=
DELAY=1.0
STAT_STR=20
STAT_INT=70
STAT_DEX=30
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Ruhani dunya ile baglanti kuramadiniz.
	return 1

[Skill 33]
DEFNAME=Skill_Stealing
On=@Start
src.sysmessage @38,,1 Calamazsiniz..
return 1
endif

ON=@Fail
	src.sysmessage Calamazsiniz..

[Skill 34]
DEFNAME=Skill_Tailoring
KEY=Tailoring
TITLE=Tailor
PROMPT_MSG=
DELAY=2.0
STAT_STR=30
STAT_INT=20
STAT_DEX=60
BONUS_STR=5
BONUS_DEX=75
BONUS_INT=20
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,80

ON=@Fail
	src.sysmessage Kumas falan hep heba oldu.

[Skill 35]
DEFNAME=Skill_Taming
KEY=Taming
TITLE=Animal Tamer
PROMPT_MSG=Please use taming staff for taming.
DELAY=9991.0
STAT_STR=0
STAT_INT=0
STAT_DEX=0
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=0
BONUS_STATS=0
ADV_RATE=10.0,10.0,10.0

[Skill 36]
DEFNAME=Skill_tasteid
KEY=TasteID
TITLE=Food Taster
PROMPT_MSG=What would you like to taste?
DELAY=1.0
STAT_STR=25
STAT_INT=50
STAT_DEX=15
BONUS_STR=20
BONUS_DEX=0
BONUS_INT=80
BONUS_STATS=50
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Hmm.. tavuk gibi.

[Skill 37]
DEFNAME=Skill_Tinkering
KEY=Tinkering
TITLE=Tinker
PROMPT_MSG=
DELAY=3.0
STAT_STR=30
STAT_INT=100
STAT_DEX=50
BONUS_STR=20
BONUS_DEX=20
BONUS_INT=60
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,80

ON=@Fail
	src.sysmessage Malzemeniz heba oldu.

[Skill 38]
DEFNAME=Skill_Tracking
KEY=Tracking
TITLE=Ranger
PROMPT_MSG=
DELAY=4.0
STAT_STR=25
STAT_INT=50
STAT_DEX=50
BONUS_STR=0
BONUS_DEX=50
BONUS_INT=50
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Iz surmeyi basaramadiniz.

[Skill 39]
DEFNAME=Skill_Vet
KEY=Veterinary
TITLE=Veterinarian
PROMPT_MSG=What animal would you like to heal?
DELAY=2.0
STAT_STR=30
STAT_INT=50
STAT_DEX=40
BONUS_STR=20
BONUS_DEX=20
BONUS_INT=60
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Bandajlariniz yetersiz geldi.

[Skill 40]
DEFNAME=Skill_Swordsmanship
KEY=Swordsmanship
TITLE=Swords%s
PROMPT_MSG=
STAT_STR=100
STAT_INT=0
STAT_DEX=100
BONUS_STR=50
BONUS_DEX=50
BONUS_INT=0
BONUS_STATS=80
ADV_RATE=10.0,10.0,10.0

[Skill 41]
DEFNAME=Skill_Macefighting
KEY=Macefighting
TITLE=Macefighter
PROMPT_MSG=
STAT_STR=100
STAT_INT=10
STAT_DEX=100
BONUS_STR=50
BONUS_DEX=50
BONUS_INT=0
BONUS_STATS=80
ADV_RATE=10.0,10.0,10.0

[Skill 42]
DEFNAME=Skill_Fencing
KEY=Fencing
TITLE=Fencer
PROMPT_MSG=
STAT_STR=100
STAT_INT=0
STAT_DEX=100
BONUS_STR=50
BONUS_DEX=50
BONUS_INT=0
BONUS_STATS=80
ADV_RATE=10.0,10.0,10.0

[Skill 43]
DEFNAME=Skill_Wrestling
KEY=Wrestling
TITLE=Wrestler
PROMPT_MSG=
STAT_STR=100
STAT_INT=0
STAT_DEX=100
BONUS_STR=50
BONUS_DEX=50
BONUS_INT=0
BONUS_STATS=80
ADV_RATE=10.0,10.0,10.0

[Skill 44]
DEFNAME=Skill_LUMBERJACK
KEY=Lumberjacking
TITLE=Lumberjack
PROMPT_MSG=
DELAY=1.0
STAT_STR=85
STAT_INT=20
STAT_DEX=45
BONUS_STR=90
BONUS_DEX=10
BONUS_INT=0
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,10,50

ON=@Fail
	src.sysmessage Ise yarar odun cikaramadiniz.
	return 1

[Skill 45]
DEFNAME=Skill_MINING
KEY=Mining
TITLE=Miner
PROMPT_MSG=
DELAY=0.2
STAT_STR=85
STAT_INT=20
STAT_DEX=45
BONUS_STR=70
BONUS_DEX=30
BONUS_INT=0
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,10,80

ON=@Fail
	src.sysmessage Ise yarar bir maden bulamadiniz.
	return 1

[Skill 46]
DEFNAME=Skill_Meditation
KEY=Meditation
TITLE=Stoic
DELAY=0.1,0.2
STAT_STR=10
STAT_INT=100
STAT_DEX=10
BONUS_STR=5
BONUS_DEX=90
BONUS_INT=5
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,20,80

ON=@Fail
	src.sysmessage Konsantrasyonunuzu kaybettiniz.
	return 1

[Skill 47]
DEFNAME=Skill_STEALTH
KEY=Stealth
TITLE=Rogue
PROMPT_MSG=
DELAY=2.0
STAT_STR=20
STAT_INT=60
STAT_DEX=90
BONUS_STR=0
BONUS_DEX=80
BONUS_INT=20
BONUS_STATS=70
ADV_RATE=15.0,20.0,30.0

ON=@Fail
	src.sysmessage Kendinizi gizleyemediniz.
	return 1

[Skill 48]
DEFNAME=Skill_REMOVE_TRAP
KEY=RemoveTrap
TITLE=Disarmer
PROMPT_MSG=Select the trap to disarm
DELAY=7.0,3.0,2.0
STAT_STR=20
STAT_INT=60
STAT_DEX=90
BONUS_STR=0
BONUS_DEX=80
BONUS_INT=20
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0

ON=@Fail
	src.sysmessage Tuzak etkisiz hale gelmedi.

[Skill 49]
DEFNAME=Skill_Necromancy
KEY=Necromancy
TITLE=Necromancer
STAT_STR=20
STAT_INT=100
STAT_DEX=40
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=70
ADV_RATE=10.0,10.0,10.0
VALUES=1,10,80

On=@Fail
	src.sysmessage @7ac,,1 Konsantrasyonunuz Bozuldu...!

[skillclass 0] // player class
str 100
int 100
dex 100
statsum 300
skillsum 800.0

On=@EnvironChange
if !(<isevent.fix>)
	src.events +Fix 
        src.events +e_dropfix
        events +fix
	src.events +e_dropfix
        src.events +e_teot_fix
        src.events +e_death_announce
endif

On=@Login
f_player_login
src.events +e_death_announce
src.events +e_Fix 
src.events +Fix 
src.events +e_dropfix

On=@Logout
f_player_logout
if (0<account.plevel> < 2) 
serv.newitem i_dusuruyorum 
return 1 
endif

[skillclass 1] // staff class
str 900
int 900
dex 900
statsum 900
skillsum 150000.0

On=@Login
events +e_plevelz
go star
invul 1
gm 1
nightsight 1



On=@Logout
go star


[ITEMDEF i_konusma_gucco]
Name=Konusma Gucco
Id=i_memory
Type=t_eq_script
layer 99
weight 0

ON=@Create
Attr=attr_newbie

On=@Timer
remove
return 1


[eof]

Tables.Scp

Rexox Nedemek İstedini Anladım Ama Yapamadım Bir Yardım Etsen?
Novice
-14.8
55r kullanıyorsan

skills.scp

56b kullanıyorsan

sphere_Skills.scp

bu scriptlerin içine gir ctrl + f login diye arat.orada şöyle vardır

if (0<account.plevel> < 2 ) plevel 1 yani plevel 2 den düşük yada <>>> eyer böyleyse direk altına src.events +e_fix ekle bitti :)

{f_player_login
player_login
src._fplayer_login}>>>> böyle ise>>> bu function player_logini bul oraya src.events +e_fix ekle eyer
www.deadlyuo.com
Wopplayer i 0 yapman gerek büyülerin görünmesi için::P
\\By Robellious
[itemdef i_pvpbag]
id=i_bag
name a pvp bag
weight=3

on=@create
color=0450
attr=attr_newbie

on=@dclick
src.sysmessage @084a,3,1 Bu posete sadece iksir, bandaj, Tp ve reg koyabilirsiniz.

On=@ItemDropon_item
if (<argo.baseid> == i_pvpbag)
if (<act.type>==t_potion) || (<act.baseid>==i_bandage) || (<act.type>==t_reagent) || (<act.baseid>==i_pouch_trapped) || (<act.baseid>==i_fctn_silver) || (<act.baseid>==i_arrow) ||
src.sysmessage @11 olur!!
else
return 1
endif
endif
Kardesim Böyle yap olur :)

Bu konu Üye tarafından düzenlendi(2009-07-12 12:44, 14 yıl önce)



Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.