ne oldu ya

4.3

28
113.49 895 0

[function yell]
serv.allclients sysmessage @0481 [<serv.servname> Staff Duyuru] : 
serv.allclients sysmessage @07ed [Duyuru]: <args>

[events e_death_announce]
On=@Death
src.syshata Daha Once [<deaths>] Kere Olduruldun
if !(<isevent.e_fix>)
if (<fame> > 9900) && (<memoryfindtype.memory_harmedby>) && (<act.ischar>) && (<act.uid> != <uid>)
serv.allclients sysmessage @077a [<sex Lord/Lady>] [<name>], [<act.name>] tarafindan [<region.name>] civarlarinda olduruldu.
dialogclose d_runebook
findid.i_rune_incognito.remove
endif
endif

[function spell_say]
if (0<account.plevel> <2)
src.sayua 077a,0,0,eng, <args>
else
return 1
endif


[events e_fix]
On=@Attack
if (<npc> = brain_vendor)
if (<argo.npc> = brain_vendor)
if (<argo.isnpc>)
skii fail
endif
endif
return 1

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 1
elseif (<memoryfindtype.memory_guild.link.more1> == 2) && (<act.memoryfindtype.memory_guild.link.more1> == 2)
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 1
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=@Profile
src.sdialog d_profile

[DIALOG d_profile]
0, 0
PAGE 0
resizepic 1 0 9300 385 290
text 26 13 2010 0
text 25 55 2010 1
text 25 86 2010 2
text 26 119 2010 3
text 28 154 2010 4
text 28 191 2010 5
text 29 226 2010 6
button 336 253 2714 2715 1 0 1
text 27 255 2010 7

[DIALOG d_profile TEXT]
Sayin <src.name> Profil Bilgileri
Account <account>
Online Sureniz <eval (<account.totalconnecttime> / 60)> Saat.
Kayit Tarihi <account.firstconnectdate>
Str/Int/Dex <str> / <int> / <dex>
Fame/Karma/Kills/Food <fame> / <karma> / <kills> / <food>
Skilltotal <skilltotal>
Bulundugunuz Koordinatlar <p>


[DIALOG d_profile BUTTON]
on=1
src.syshata Iptal Edildi.
return 1



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

[function f_statloss] 
if (<isevent.e_spr>)
	events -e_spr
	sysmessage @48,,1 Stat'lariniz artik korunmuyor.
	tag0.ostr
	tag0.oint
	tag0.odex
endif

if (0<tag0.loss>)
	if (<kills> > <eval <tag0.loss>>)
		if (<str> > 26)
			str (<str> - 2)
		endif
		if (<dex> > 26)
			dex (<dex> - 2)
		endif
		if (<int> > 26)
			int (<int> - 2)
		endif
	endif
endif
tag0.loss <kills>

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

On=@EnvironChange
if !(<memoryfindtype.memory_guild.link.align>) || (<kills> > 5)
	if (<findlayer(2).baseid> == i_shield_chaos) || (<findlayer(2).baseid> == i_shield_order)
		//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>> > 300)
			statcapdex
		endif
	endif
endif


On=@SpellCast
dialogclose d_runebook

if (<act.id> == c_pv)
	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 (<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
	spell_say Uus Jux
	mg1
elseif (<argn> == 2)	// Create food
	spell_say In Mani Ylem
	mg1
elseif (<argn> == 3)	// Feeblemind
	spell_say Rel Wis
	mg1
elseif (<argn> == 4)	// Heal
	spell_say In Mani
//	spellfreeze 1
	sd 1
	mg1
elseif (<argn> == 5)	// Magic Arrow
	spell_say In Por Ylem       
	mg1
elseif (<argn> == 6)	// Night Sight
	spell_say In Lor
	mg1
elseif (<argn> == 7)	// Reactive Armor
	if (<act.serial>==<targ.serial>)
	spell_say Flam Sanct
	sd 1
	mg8
	else
	skill fail
	sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
	return 1
	endif
elseif (<argn> == 8)	// Weaken
	spell_say Des Mani
	mg1
elseif (<argn> == 9)	// Agility
       if (<act.serial>==<targ.serial>)
	spell_say Ex Uus
	mg2
        else
        skill fail
        sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
        return 1
        endif
elseif (<argn> == 10)	// Cunning
        if (<act.serial>==<targ.serial>)
	spell_say Uus Wis
	mg2
        else
        skill fail
        sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
        return 1
        endif
elseif (<argn> == 11)	// Cure
	spell_say An Nox
//	spellfreeze 1
	sd 1
	if (<act.findid.i_rune_poison>)
		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
	mg2
elseif (<argn> == 12) // Harm
	if (<src.findid.i_spdelay_man>) || (<src.findid.i_spdelay_woman>) || (<src.findid.i_spdelay_unisex>)
	skill fail
	else
	spell_say An Mani
	sd 1
	mg2
	endif
elseif (<argn> == 13)	// Trap
	spell_say In Jux
	f_fizzle
	return 1
elseif (<argn> == 14)	// Untrap
	spell_say An Jux
	f_fizzle
	return 1
elseif (<argn> == 15)	// Protection
	if (<act.serial>==<targ.serial>)
	spell_say Uus Sanct
//	spellfreeze 1
	sd 1
	mg7
	else
	skill fail
	sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
	return 1
	endif
elseif (<argn> == 16)	// Strength
        if (<act.serial>==<targ.serial>)
	spell_say Uus Mani
//	spellfreeze 1
	sd 1
	mg2
        else
        skill fail
        sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
	return 1
	endif
elseif (<argn> == 17)	// Bless
	if (<act.serial>==<targ.serial>)
	spell_say Rel Sanct
//	spellfreeze 1
	sd 1
	mg3
	else
	skill fail
	sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
	return 1
	endif
elseif (<argn> == 18)	// Fireball
	spell_say Vas Flam
//	spellfreeze 1
	sd 1
	mg3
elseif (<argn> == 19)	// Lock
	spell_say An Por
	f_fizzle
	return 1
elseif (<argn> == 20)	// Poison
	if (<src.region.guarded> == 1)
	src.sysmessage @0481,,1 Bu buyuyu guarded zone icinde yapamazsiniz.
	f_fizzle
	return 1
	elseif (<act.hits> == 0)
	f_fizzle
	src.sysmessage @0481,,1 Olulere poison atamazsiniz.
	skill fail
	return 1
	elseif (<src.targ.findid.i_rune_summon_creature>
	f_fizzle
	src.sysmessage @0481,,1 Buyu ile yaratilmis cisimlere poison atamazsiniz.
	skill fail
	return 1
	elseif (<src.act.topobj.stone> == 1)
	src.sysmessage @0481,,1 Bu buyuyu stone haldeki ki$ilere atamazsiniz.
	f_fizzle
	return 1
        elseif (<act.uid> == <src.uid>)
        src.sysmessage @1100 Kendinize atamazsiniz!
        f_fizzle
        return 1
	else
	spell_say In Nox
//	spellfreeze 1
	psg
	sd 1
	endif
elseif (<argn> == 21)	// Telekinesis
        f_fizzle
	spell_say Ort Por Ylem
//	spellfreeze 1
	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        
	spell_say Rel Por
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 2
	mg3
elseif (<argn> == 23)	// Unlock
	spell_say Ex Por
	f_fizzle
	return 1
elseif (<argn> == 24)	// Wall
	spell_say In Sanct Ylem
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 1
	sd 1
	mg3
elseif (<argn> == 25)	// Arch Cure
	spell_say Vas An Nox
//	spellfreeze 2
	sd 2
	mg4
elseif (<argn> == 26)	// Arch Protection
	spell_say Vas Uus Sanct
//	spellfreeze 2
	sd 2
	mg4
elseif (<argn> == 27)	// Curse
	spell_say Des Sanct
//	spellfreeze 2
	sd 2
	mg4
elseif (<argn> == 28)	// Fire Field
	spell_say In Flam Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 1
	mg4
	sd 2
elseif (<argn> == 29)	// Greater Heal
	spell_say In Vas Mani
//	spellfreeze 1
	sd 2
	mg4
elseif (<argn> == 30)	// Lightning
	spell_say Por Ort Grav
//	spellfreeze 1
	sd 2
	mg4
elseif (<argn> == 31)	// Mana Drain
	spell_say Ort Rel
//	spellfreeze 1
	return 1
elseif (<argn> == 32)	// Recall
	spell_say Kal Ort Por
//	spellfreeze 2
	sd 2
	mg4
elseif (<argn> == 33)	// Blade Spirits
	spell_say In Jux Hur Ylem
//	spellfreeze 2
	sd 2
	mg5
elseif (<argn> == 34)	// Dispel Field
	spell_say An Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
	if (<act.ischar>)
		f_fizzle
		return 1
	endif
//	spellfreeze 2
	sd 2
	mg5
elseif (<argn> == 35)	// Incognito
	spell_say Kal In Ex
//	spellfreeze 2
	sd 2
	mg5
elseif (<argn> == 36)	// Magic Reflect
	if (<act.serial>==<targ.serial>)
	spell_say In Jux Sanct
//	spellfreeze 2
	sd 1
	mg8
	else
	skill fail
	ekranitemizle
	sysmessage @1153 Bu buyuyu sadece kendi uzerinizde kullanabilirsiniz...
	return 1
	endif
elseif (<argn> == 37)	// Mind Blast
	spell_say Por Corp Wis
//	spellfreeze 2
	sd 2
	mg5
elseif (<argn> == 38)	// Paralyze
	if (<src.findid.i_spdelay_man>) || (<src.findid.i_spdelay_woman>) || (<src.findid.i_spdelay_unisex>)
	skill fail
	else
	spell_say An Ex Por
	sd 2
	mg5
	endif
elseif (<argn> == 39)	// Poison Field
	spell_say In Nox Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
//	spellfreeze 2
	sd 2
	mg5
elseif (<argn> == 40)	// Summon Creature
	spell_say Kal Xen	
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 2
	mg5
	sd 2
elseif (<argn> == 41)	// Dispel
	spell_say An Ort
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 2
	sd 2
	mg6
elseif (<argn> == 42)	// Energy Bolt
	if (<src.findid.i_spdelay_man>) || (<src.findid.i_spdelay_woman>) || (<src.findid.i_spdelay_unisex>)
	skill fail
	else
	spell_say Corp Por
	sd 2
	mg6
	endif
elseif (<argn> == 43)	// Explosion
	spell_say Vas Ort Flam
//	spellfreeze 2
	sd 2
	mg6
elseif (<argn> == 44)	// Invisibility
	spell_say An Lor Xen
//	spellfreeze 2
	sd 2
	mg6
elseif (<argn> == 45)	// Mark
	spell_say Kal Por Ylem
//	spellfreeze 2
	sd 2
	mg6
elseif (<argn> == 46)	// Mass Curse
	spell_say Vas Des Sanct
//	spellfreeze 2
	sd 2
	mg6
elseif (<argn> == 47)	// Paralyze Field
	spell_say In Ex Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
//	spellfreeze 2
	sd 3
	mg6
elseif (<argn> == 48)	// Reveal
	spell_say Wis Quas
//	spellfreeze 2
	sd 2
	mg6
elseif (<argn> == 49)	// Chain Lightning
	spell_say Vas Ort Grav
	if (<act.uid> == <uid>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3
	mg7
elseif (<argn> == 50)	// Energy Field
	spell_say In Sanct Grav
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
	if (<act.topobj.ischar>)
		f_fizzle
		return 1
	endif
//	spellfreeze 3
	sd 3
	mg7
elseif (<argn> == 51)	// Flame strike
	if (<src.findid.i_spdelay_man>) || (<src.findid.i_spdelay_woman>) || (<src.findid.i_spdelay_unisex>)
	skill fail
	else
	spell_say Kal Vas Flam
	sd 3
	mg7
	endif
elseif (<argn> == 52)	// Gate Travel
	spell_say Vas Rel Por
//	spellfreeze 3
	sd 3
	mg7
elseif (<argn> == 53)	// Mana Vampire
	spell_say Ort Sanct
//	spellfreeze 3
	f_fizzle
	return 1
elseif (<argn> == 54)	// Mass Dispel
	spell_say Vas An Ort
	//if (<act.topobj.ischar>)
		//f_fizzle
		//return 1
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3	
	mg7
elseif (<argn> == 55)	// Meteor Swarm
	spell_say Flam Kal Des Ylem
	if (<act.uid> == <uid>)
		f_fizzle
		return 1
	elseif (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 2
	sd 3
	mg7
elseif (<argn> == 56)	// Polymorph
	f_fizzle
        src.skill fail
	sd 3
	mg3
elseif (<argn> == 57)	// Earthquake
	spell_say In Vas Por
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 58)	// Energy Vortex
	spell_say Vas Corp Por
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 59)	// Resurrect
	spell_say An Corp
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 60)	// Air Elemental
	spell_say Kal Vas Xen Hur
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 61)	// Summon Deamon
	spell_say Kal Vas Xen Corp
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 62)	// Earth Elemental
	spell_say Kal Vas Xen Ylem
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 63)	// Fire Elemental
	spell_say Kal Vas Xen Flam
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	sd 3
	mg8
elseif (<argn> == 64)	// Water Elemental
	spell_say Kal Vas Xen An Flam
	if (<src.region.guarded> == 1) && !(<isgm>)
	src.sysmessage @0481,,1 Bu buyuyu guard zone icinde yapamazsiniz
	f_fizzle
	return 1
	endif
//	spellfreeze 3
	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)) // eve disardan chain atsalar bile icerdeki yemez
	if !(<src.region.uid> == <region.uid>)
		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.syshata Faction uyelerini iyilestiremezsiniz.
		return 1
	elseif (<memoryfindtype.memory_guild.link.align> > 0) && !(<src.memoryfindtype.memory_guild.link.align>)
		src.syshata Order/Chaos uyelerini iyilestiremezsiniz.
		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 (<src.hiding> <80.0)
src.sysmessage @38,1,1 Stealth yapabilmek icin 80 hiding skilline ihtiyaciniz var.
skill fail
return 1
elseif (<eval (<ac> * 100)> > <eval (<stealth> + 200)>)
src.sysmessage @38,1,1 Zirhinizin verdigi agirlik gizlenmenizi engelliyor
skill fail
return 1
elseif (<flags>&statf_onhorse)
src.sysmessage @38,1,1 Binek uzerinde gizlenemezsiniz.
skill fail
return 1
endif
elseif (<action> == id(skill_hiding)) || (<action> == skill_hiding)
if (<eval (<ac> * 100)> > <eval (<hiding> + 200)>)
src.sysmessage @38,1,1 Zirhinizin verdigi agirlik gizlenmenizi engelliyor
skill fail
return 1
elseif (<flags>&statf_onhorse)
src.sysmessage @38,1,1 Binek uzerinde gizlenemezsiniz.
skill fail
return 1
endif

if (<action> == id(skill_archery)) || (<action> == skill_archery)
flags <flags>&~statf_archercanmove
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)
		skill fail
		return 1
	elseif !(<targ.topobj.ischar>)
		syshata 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('<tag0.ms>','<action>'))
	tag0.mn <eval (<tag0.mn> + 1)>
elseif ((strmatch('<tag0.ms>','Skill_Magery')) && (strmatch('Skill_Meditation','<action>')))
	tag0.mn <eval (<tag0.mn> + 1)>
elseif ((strmatch('<tag0.ms>','Skill_Meditation')) && (strmatch('Skill_Magery','<action>')))
	tag0.mn <eval (<tag0.mn> + 1)>
else
	tag0.mn 0
endif

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

on=@click

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

//on=@Click
//message @0790,,1 <name>
//return 1
//else
//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.type> == t_weapon_axe) || (<act.type> == t_weapon_mace_staff) || (<act.type> == t_weapon_fence) || (<act.type> == t_weapon_sword) || (<act.type> == t_weapon_mace_pick) || (<act.type> == t_weapon_mace_smith)|| (<act.type> == t_weapon_mace_sharp) || (<act.type> == t_weapon_bow) || (<act.type> == t_weapon_mace_staff)
if (<src.act.morez> > 0)
	src.sysmessage @54,1,1 Bu silah zehirli.
endif
if !(<eval ((<act.more1l> * 100) / <act.more1h>)> == 100)
src.sysmessage @38,1,1 Bu silah %<eval (100 - ((<act.more1l> * 100) / <act.more1h>))> hasar almi$.
//return 0
else
src.sysmessage @68,1,1 Bu silah saglam.
endif
endif

if (<act.cont.isitem>) 
if (strmatch('<act.cont.type>','t_eq_trade_window')) 
act.message @0810 [guvenli] 
endif 
endif 

//on=@ItemClick
if (<act.topobj.id> == c_pv)
	if (strmatch('<act.price>',''))
		act.message @0810 [satilamaz]
	elseif (<act.price> <= 0)
		act.message @0810 [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 @48,,1 backpack [e$ya: <act.rescount>]
	return 1
else
	if ((<act.attr>&attr_newbie) && (<act.topobj.ischar>)) 
	act.message @048,,1 [ Newbified ]  
endif
	if (<act.type> == t_container)
		if !(<act.baseid> == i_strong_box)
			if (<act.attr>&attr_move_never) && !(strmatch('<act.region.tag0.owner>,'')) && (<act.region.uid> == <region.uid>)
				act.message @48,,1 [sabit]
			endif
			if (<act.baseid> == i_bones)
				act.message @048,,1 [Loot: <act.rescount> e$ya]
				act.message @048,,1 <act.name>
			else
				act.message @48,,1 <act.typedef.name>
			endif
			return 1
		endif
	endif
endif

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

IF (<act.layer>=1) || (<act.layer>=2)
IF !( <act.type> == t_shield ) && !( <act.type> == t_light_lit ) && !( <act.type> == t_light_out ) && !( <act.type> == t_fish_pole ) && !( <act.type> == t_spellbook ) && !( <act.baseid> == i_runebook )
if (<act.morey>=0)
act.message @048,,1 [dmg: <act.dam>] [speed: <act.speed>]
else
act.message @048,,1 [speed: <act.speed>]
endif
ENDIF
ENDIF

On=@ItemPickUp_Pack
if !(0<act.value> == 0) 
if !(0<act.price>) 
return 0 
endif 
if (<act.topobj.id> == c_pv) 
if !(<uid> == <act.topobj.tag0.owner>) 
return 1 
endif 
elseif !(strmatch('<act.price>','')) 
act.price 0 
endif 
endif 

On=@ItemTargOn_Item
if ((<targ.topobj.id> == c_pv) && (<act.cont.uid> != <targ.topobj.uid>))
	return 1
endif

On=@ItemDropOn_Ground
if (<act.attr> == 04008)
	act.attr 0
endi

[speech spk_player]
ON=*
if (<src.action> == skill_magery)
src.sysmessage @066d,,1 Buyu Atarken Yazi Yazamazsiniz.
return 1
endif

if (<findid.i_mem_healing>)
f_fizzle
src.sysmessage @0481,,1 Bandaj kullanirken buyu yapamazsiniz...
return 1
endif


[EOF]

çalışmıyor anlamadım gitti ya

berkancık

Expert

4.6

33 Britain , Türkiye
219.00 1776 0

eventi vermemişsindir on=@logini altına events +fix yaz r r çek olur

Aldarson

Apprentice

4.3

28
113.49 895 0

yaptımki onu

berkancık

Expert

4.6

33 Britain , Türkiye
219.00 1776 0

al bunu kullan ozaman bu daha geniş kapsamlı

[function spell_say]
if (0< <src.account.plevel> < 2)
sayua 0bb2,6,6,eng, <args>
else
return 1
endif

[events e_death_announce]
On=@Death
if !(<isevent.e_qchar>)
if (<fame> > 9900) && (<memoryfindtype.memory_harmedby>) && (<act.ischar>) && (<act.uid> != <uid>)
serv.allclients sysmessage @077a <sex Lord/Lady> <name>, <act.name> tarafindan <region.name> civarlarinda olduruldu.
endif
endif

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

if (strmatch(&&#35039;<src.id>&&#35039;,&&#35039;c_hakem&&#35039;))
smg Buna saldiramazsin...
return 1
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 1
elseif (<memoryfindtype.memory_guild.link.more1> == 2) && (<act.memoryfindtype.memory_guild.link.more1> == 2)
Src.Action = -1
Src.Flags = <SRC.FLAGS> & ~statf_war
Return 1
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=@Profile
if (<src.uid> == <uid>) || (0<src.account.plevel> > 2)
src.sysmessage @0481,,1 Kullanici Adi: <account>,
src.sysmessage @0481,,1 Online Sureniz: <eval (<account.totalconnecttime> / 60)>s
src.sysmessage @0481,,1 Kayit Tarihi: <account.firstconnectdate>
if (strmatch(&&#35039;<src.uid.04009a3fa.tag.<account>_vet>&&#35039;,&&#35039;01&&#35039;))
src.sysmessage Veteran: odul verilmis.
endif
src.sysmessage @0481,,1 Karakter: <eval (<age> / 86400)> gun once dogmus.
endif

On=@Death
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> > 5)
if (<findlayer(2).baseid> == i_shield_chaos) || (<findlayer(2).baseid> == i_shield_order)
//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

dialogclose d_runebook

if (<act.id> == c_hakem)
f_fizzle
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> == 47) // para field of stone town fix
if (<src.region.DEFNAME>&a_townBritain) 
src.sysmessage @38 burada bu buyuyu 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 (<findid.i_bandajvar>)
f_fizzle
src.sysmessage @0481,,1 Bandaj kullanirken buyu yapamazsiniz...
return 1
endif


if (<argn> == 1) // Clumsy
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Uus Jux
mg1
elseif (<argn> == 2) // Create food
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say In Mani Ylem
newitem &&#35123;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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Rel Wis
mg1
elseif (<argn> == 4) // Heal
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say In Por Ylem
mg1
elseif (<argn> == 6) // Night Sight
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say In Lor
mg1
elseif (<argn> == 7) // Reactive Armor
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bu buyuyu sadece kendinize atabilirsiniz.
f_fizzle
return 1
endif 
elseif (<argn> == 8) // Weaken
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Des Mani
mg1
elseif (<argn> == 9) // Agility
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Ex Uus
mg2
elseif (<argn> == 10) // Cunning
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Uus Wis
mg2
elseif (<argn> == 11) // Cure
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say An Mani
sd 1
mg2
elseif (<argn> == 13) // Trap
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Uus Sanct
sd 1
mg2
elseif (<argn> == 16) // Strength
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Uus Mani
sd 1
mg2
elseif (<argn> == 17) // Bless
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Rel Sanct
sd 1
mg3
elseif (<argn> == 18) // Fireball
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Vas Flam
sd 1
mg3
elseif (<argn> == 19) // Lock
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 Boyle bir sey yok!
findid.i_poisonlvl.remove
return 1
endif
endif
spell_say In Nox
psg
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
else
f_fizzle
findid.i_poisonlvl.remove
return 1
endif
elseif (<argn> == 21) // Telekinesis
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Ort Por Ylem
sd 1
if ((<src.targ.type> == t_corpse) || (<src.targ.type> == c_pv))
f_fizzle
return 1
else
f_fizzle
return 1
endif
mg3
elseif (<argn> == 22) // Teleport
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
if (strmatch(&&#35039;<region.events>&&#35039;,&&#35039;r_house_public&&#35039;)) || (strmatch(&&#35039;<region.events>&&#35039;,&&#35039;r_house_private&&#35039;))
f_fizzle
return 1
endif
if (<act.topobj.ischar>)
f_fizzle
return 1
endif
spell_say Rel Por
mg3
elseif (<argn> == 23) // Unlock
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say In Sanct Ylem
sd 1
mg3
elseif (<argn> == 25) // Arch Cure
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Kal Ort Por
sd 2
mg4
f_fizzle
return 1
elseif (<argn> == 33) // Blade Spirits
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
if (<act.uid> == <src.uid>)
spell_say In Jux Sanct
sd 2
mg5
else
src.sysmessage @39 Bu buyuyu sadece kendinize atabilirsiniz.
f_fizzle
return 1
endif
elseif (<argn> == 37) // Mind Blast
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
if (strmatch(&&#35039;<src.region.guarded>&&#35039;,&&#35039;1&&#35039;))
f_Fizzle
sysmessage @39 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
if (strmatch(&&#35039;<act.region.events>&&#35039;,&&#35039;r_house_public&&#35039;)) || (strmatch(&&#35039;<act.region.events>&&#35039;,&&#35039;r_house_private&&#35039;))
if (0<act.npc> == 1)
sysmessage @39 Ev icinde NPC gizleyemezsiniz.
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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Vas Rel Por
sd 3
mg7
f_fizzle
return 1
elseif (<argn> == 53) // Mana Vampire
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say Vas Corp Por
if (<region.guarded>)
criminal 1
endif
sd 3
mg8
elseif (<argn> == 59) // Resurrect
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken buyu atamazsiniz.
return 1
        endif
spell_say An Corp
sd 3
mg8
elseif (<argn> == 60) // Air Elemental
        if (<src.findid.i_mem_spellheal>)
src.sysmessage @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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 @39 Bandaj yaparken 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)
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>> > 45)
var.mb 45
endif
hits <eval (<hits> - <var.mb>)>
damage 2
return 1
else
damage &&#35123;1 2}
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))
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 + &&#35123;-100 100})
else
poison (<src.poisoning> + &&#35123;-100 100})
endif
endif
sfx snd_spell_poison
effect 3,0374a,1,15,1
return 1
elseif ((<argn> == 38) || (<argn> == 47))
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 @38 Faction uyelerini iyilestiremezsiniz.
return 1
if (<memoryfindtype.memory_guild.link.align> > 0) && !(<src.memoryfindtype.memory_guild.link.align>)
src.sysmessage @38 Order / Chaos uyelerini iyilestiremezsiniz.
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_snooping)) || (<action> == skill_snooping))
if (<src.region.safe> == 1)
src.sysmessage @0800 Burada Snooping kullanamazsiniz.
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)
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(&&#35039;<tag.ms>&&#35039;,&&#35039;<action>&&#35039;))
tag.mn <eval (<tag.mn> + 1)>
elseif ((strmatch(&&#35039;<tag.ms>&&#35039;,&&#35039;Skill_Magery&&#35039;)) && (strmatch(&&#35039;Skill_Meditation&&#35039;,&&#35039;<action>&&#35039;)))
tag.mn <eval (<tag.mn> + 1)>
elseif ((strmatch(&&#35039;<tag.ms>&&#35039;,&&#35039;Skill_Meditation&&#35039;)) && (strmatch(&&#35039;Skill_Magery&&#35039;,&&#35039;<action>&&#35039;)))
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(&&#35039;<serv.name>&&#35039;,&&#35039;Locus&&#35039;))
act.cont 040004353
try var.mts <uid.04018c20d.rescount>
elseif (strmatch(&&#35039;<serv.name>&&#35039;,&&#35039;Quann&&#35039;))
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(&&#35039;<tag.gs_title>&&#35039;,&&#35039;&&#35039;)
message [<memoryfindtype.memory_guild.link.name>]
else
message [<tag.gs_title>, <memoryfindtype.memory_guild.link.abbrev>]
endif

//on=@Click
//message @0790,,1 <name>
//return 1
//else
//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(&&#35039;<act.price>&&#35039;,&&#35039;&&#35039;))
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 @65 [<act.price> gp] [%<eval (100 - ((<act.more1l> * 100) / <act.more1h>))> eski]
else
act.message @65 [<act.price> gp]
endif
else
act.message @65 [<act.price> gp]
endif
endif
endif

if (<act.layer> == 21) && (<act.cont.ischar>)
act.message @85 Inventory
return 1
else
if ((<act.attr>&attr_newbie)) // blessed itemlari belirt
src.sysmessage @70 Su anda goruntulediginiz item [newbified]
endif
if (<act.type> == t_container)
if !(<act.baseid> == i_strong_box)
if (<act.attr>&attr_move_never) && !(strmatch(&&#35039;<act.region.tag.owner>,&&#35039;&&#35039;)) && (<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_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))
act.message @0805 a <act.name>
act.message @38 Hasar: <act.dam>
act.message @38 Durability: <eval <act.hitpoints>*4>/100
return 1
endif
endif

if ((<act.topobj.uid> == <uid>)
if ((<act.type> == t_armor) || (<act.type> == t_armor_leather) || (<act.type> == t_shield) || (<act.type> == t_clothing))
act.message @0805 a <act.name>
act.message @38 Armor: <eval <act.armor>>
act.message @38 Durability: <eval <act.hitpoints>>
return 1
endif
endif

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))
sysmessage @0805 Elinizde veya cantanizda iken detayli bilgi alabilirsiniz.

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) // human cesetleri bicememe
if ((<targ.amount> == 400) || (<targ.amount> == 401))
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_fixhayvan
If (<argn>=s_bless) 
If (<argn>=s_protection) 
If (<argn>=s_reactive_armor) 
If (<argn>=s_magic_reflection) 
If (<src.act.npc>=brain_animal) 
src.sysmessage Bu buyuyu hayvanlar uzerinde kullanamazsiniz. 
endif 
endif 
endif
endif
endif

[events gmfix]

On=@Click
IF (<FLAGS> & statf_insubstantial)
TAG.TEPE = [Invissible]
else
tag.tepe
endif

IF (<ACCOUNT.PLEVEL> = 2)
message @1153 <TAG.TEPE>
message @07a1 [ Gozlemci ]
message @077a <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 3)
message @1153 <TAG.TEPE>
message @07a1 [ Server Copcusu ]
message @077a <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 4)
message @1153 <TAG.TEPE>
message @07a1 [ Gamemaster ]
message @077a <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 5)
message @1153 <TAG.TEPE>
message @07a1 [ Scripter ]
message @077a <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 6)
message @1153 <TAG.TEPE>
message @07a1 [ Administrator ]
message @077a <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 7)
message @1153 <TAG.TEPE>
message @07a1 [ World Builder-Coder] 
message @077a <name>
return 1
elseif (strmatch(&&#35039;<account>&&#35039;,&&#35039;syko&&#35039;))
message @0819,0  [Staff]
message @0a15,0 Owner <name>
return 1
endif

On=@DClick
if (<privshow>)
title <serv.name> Yetkili Kadrosu
elseif strmatch(&&#35039;<title>&&#35039;,&&#35039;<serv.name> Yetkili Kadrosu&&#35039;))
title
endif

[EOF]

Üye Ol veya Giriş Yap

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