Üye ol    Giriş
  1. UO Scriptleri
  2. Sphere Scripts
  3. Events
  4. Fix.scp
Massacre

Fix.scp

  • Massacre
  • 2008-10-27 17:04
  • 0
  • 2133 
// -----------------------------------------------

// -- Script Adı	   : Fix Eventi		--

// -- Scripti Yazan	   : yok oyle bisi	--

// -- Düzenleyen	   : Red Bull		--

// -- Güncelleme    :Comrade

Speller ile ilgili sonuclar dikkate alınarak güncellendi düzenlendi

// -----------------------------------------------



[function spell_say]

sayua 0835,6,0,enu <args>



[events fix]

on=@UserEXWalkLimit

if (<findlayer(25).type>==t_eq_horse)

if !((<findid.i_spdelay_man>) || (<findid.i_spdelay_woman>) || (<findid.i_spdelay_unisex>) || (<findid.i_mem_healing_2.more2> > 0))

//serv.allclients f_stpublish Dikkat: <name> = <uid>  Speed testine girdi. Takip ediniz.

if (<body> == c_man)

		newitem i_spdelay_man

		new.timer 1

		new.equip

	elseif (<body> == c_woman)

		newitem i_spdelay_woman

		new.timer 1

		new.equip

	else

		newitem i_spdelay_unisex

		new.timer 1

		new.equip

	endif

endif

endif

//On=@Profile

//if (<src.uid> == <uid>) || (0<src.account.plevel> > 2)

//	src.sysmessage Hesap: <ACCOUNT.CHAR.<VAR.CHARNR>.NAME>, <eval (<account.totalconnecttime> / 60)>s

//	src.sysmessage Kayit: <account.firstconnectdate>

//	src.sysmessage Karakter: <eval (<age> / 86400)> gun once dogmus.

//endif



On=@Death

src.findid.i_runebookacik.remove

src.findid.i_resurrection_timer.remove

//if !(<isevent.e_qchar>)

//	if (<fame> > 9900) && (<memoryfindtype.memory_harmedby>) && (<act.ischar>) && (<act.uid> != <uid>) && (0<act.npc> == 0)

//		serv.allclients sysmessage @2050 <sex Lord/Lady> <name>, <act.name> tarafindan olduruldu.

//	endif

//endif

if (<body> == c_man_nomove)

	body c_man

	obody c_man

elseif (<body> == c_woman_nomove)

	body c_woman

	obody c_woman

endif



if (<findid.i_magerylvl>)

	findid.i_magerylvl.remove

endif

if (<findid.i_evallvl>)

	findid.i_evallvl.remove

endif

if (<findid.i_poisonlvl>)

	findid.i_poisonlvl.remove

endif



if (<findid.i_spdelay_man>)

	findid.i_spdelay_man.remove

if (<flags>&04)

	flags <flags>&~04

endif

if (<flags> == 01002006)

	flags 01002002

endif

elseif (<findid.i_spdelay_woman>)

	findid.i_spdelay_woman.remove

if (<flags>&04)

	flags <flags>&~04

endif

if (<flags> == 01002006)

	flags 01002002

endif

elseif (<findid.i_spdelay_unisex>)

	findid.i_spdelay_unisex.remove

if (<flags>&04)

	flags <flags>&~04

endif

if (<flags> == 01002006)

	flags 01002002

endif

endif

if (<flags>&04)

	flags <flags>&~04

endif

if (<flags> == 01002006)

	flags 01002002

endif





On=@GetHit

if (<findtype.t_eq_trade_window>)

	findtype.t_eq_trade_window.remove

endif

if (<findid.i_rune_poison.timer>==0)

if (<findid.i_magerylvl>)

f_fizzle

endif

endif



//if !(<src.findid.i_sonsavas>)

//	src.newitem i_sonsavas

//	src.act.equip

//else

//	src.findid.i_sonsavas.remove

//	src.newitem i_sonsavas

//	src.act.equip

//endif



On=@EnvironChange

if (<findtype.t_eq_trade_window>)

	findtype.t_eq_trade_window.update

endif



if !(<memoryfindtype.memory_guild.link.align>) || (<kills> > 6)

	if (<findlayer(2).baseid> == i_shield_chaos) || (<findlayer(2).baseid> == i_shield_order)

		findlayer(2).unequip

	endif

endif



if ((<body> == c_man) || (<body> == c_woman)) // yimmeeah

	if !((<findid.i_jailcik>) || (<flags>&statf_stone))

		if (<food> == 2)

			sayua 045f,0,0,0 * acliktan basi doner *

		elseif (<food> == 1)

			sayua 045f,0,0,0 * acliktan olmek uzeredir *

		elseif (<food> == 0)

			sayua 045f,0,0,0 * acliktan olur 

			newitem i_starver

			act.equip

		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 (<act.ischar>)

if (<act.flags>&statf_stone) || (<act.region.safe>)

	act.action -1

	sysmessage @37 Safe zonedaki kisilere buyu atamazsiniz!

return 1

endif

endif



if (<findid.i_bandajvar>)

	f_fizzle

	src.sysmessage @38 Bandaj kullanirken buyu yapamazsiniz..

		if (<src.findid.i_mem_healing_2>)

	sayua 020,0,0,0 * bandajlari yirtilir *

			findid.i_mem_healing_2.morex 0

			findid.i_mem_healing_2.morey 0

			findid.i_mem_healing_2.timer 2

			events -e_healing_2

		endif

return 1

endif



if (<findid.i_mem_exp>)

	findid.i_bottle_purple.remove

	findid.i_potion_ExplosionGreat.remove

	findid.i_potion_ExplosionLess.remove

	f_fizzle

	return 1

endif

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

	f_fizzle

	return 1

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 (<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

	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

	spell_say Rel Wis

	mg1

elseif (<argn> == 4)	// Heal

	spell_say In Mani

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

	spell_say In Por Ylem

	mg1

elseif (<argn> == 6)	// Night Sight

	spell_say In Lor

	mg1

elseif (<argn> == 7)	// Reactive Armor

	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 @49 Bu buyuyu sadece kendinize atabilirsiniz.

	f_fizzle

	return 1

	endif 

elseif (<argn> == 8)	// Weaken

	spell_say Des Mani

	mg1

elseif (<argn> == 9)	// Agility

	spell_say Ex Uus

	mg2

elseif (<argn> == 10)	// Cunning

	spell_say Uus Wis

	mg2

elseif (<argn> == 11)	// Cure

	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

	spell_say An Mani

	sd 1

	mg2

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

	spell_say Uus Sanct

	sd 1

	mg2

elseif (<argn> == 16)	// Strength

	spell_say Uus Mani

	sd 1

	mg2

elseif (<argn> == 17)	// Bless

	spell_say Rel Sanct

	sd 1

	mg3

elseif (<argn> == 18)	// Fireball

	IF (<SRC.ACT.ISCHAR>)

	IF !(<src.ACT.ISEVENT.e_evabonus>)

	src.ACT.EVENTS +e_evabonus

	endif

	endif

	spell_say Vas Flam

	sd 1

	mg3

elseif (<argn> == 19)	// Lock

	spell_say An Por

	f_fizzle

	return 1

elseif (<argn> == 20)	// Poison

		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 @50 Yok oyle bir sey!

	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

	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 (strmatch('<region.events>','r_house_public')) || (strmatch('<region.events>','r_house_private'))

	f_fizzle

	return 1

endif

	spell_say Rel Por

	mg3

elseif (<argn> == 23)	// Unlock

	spell_say Ex Por

	f_fizzle

	return 1

elseif (<argn> == 24)	// Wall

	spell_say In Sanct Ylem

	sd 1

	mg3

elseif (<argn> == 25)	// Arch Cure

	spell_say Vas An Nox

	sd 2

	mg4

elseif (<argn> == 26)	// Arch Protection

	spell_say Vas Uus Sanct

	sd 2

	mg4

elseif (<argn> == 27)	// Curse

	spell_say Des Sanct

	sd 2

	mg4

elseif (<argn> == 28)	// Fire Field

	spell_say In Flam Grav

	if (<act.topobj.ischar>)

		f_fizzle

		return 1

	endif

	sd 2

	mg4

elseif (<argn> == 29)	// Greater Heal

	spell_say In Vas Mani

	sd 2

	mg4

elseif (<argn> == 30)	// Lightning

	IF (<SRC.ACT.ISCHAR>)

	IF !(<src.ACT.ISEVENT.e_evabonus>)

	src.ACT.EVENTS +e_evabonus

	endif

	endif

	spell_say Por Ort Grav

	sd 2

	mg4

elseif (<argn> == 31)	// Mana Drain

	spell_say Ort Rel

	f_fizzle

	return 1

elseif (<argn> == 32)	// Recall

	spell_say Kal Ort Por

	sd 2

	mg4

	f_fizzle

	return 1

elseif (<argn> == 33)	// Blade Spirits

	spell_say In Jux Hur Ylem

	sd 2

	mg5

elseif (<argn> == 34)	// Dispel Field

	spell_say An Grav

	if (<act.ischar>)

		f_fizzle

		return 1

	endif

	sd 2

	mg5

elseif (<argn> == 35)	// Incognito

	spell_say Kal In Ex

	sd 2

	mg5

elseif (<argn> == 36)	// Magic Reflect

if (<act.uid> == <src.uid>)

	spell_say In Jux Sanct

	sd 2

	mg5

	else

	src.sysmessage @49 Bu buyuyu sadece kendinize atabilirsiniz.

	f_fizzle

	return 1

	endif 



elseif (<argn> == 37)	// Mind Blast

	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

	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

	spell_say In Nox Grav

	if (<act.topobj.ischar>)

		f_fizzle

		return 1

	endif

	sd 2

	mg5

elseif (<argn> == 40)	// Summon Creature

if (strmatch('<src.region.guarded>','1'))

	//if (<src.region.flags>==04180) 

	f_Fizzle

	sysmessage @39 Sehirde bu buyuyu kullanamazsiniz.

	return 1

	endif

	spell_say Kal Xen

	sd 2

	mg5

elseif (<argn> == 41)	// Dispel

	spell_say An Ort

	sd 2

	mg6

elseif (<argn> == 42)	// Energy Bolt	

	IF (<SRC.ACT.ISCHAR>)

	IF !(<src.ACT.ISEVENT.e_evabonus>)

	src.ACT.EVENTS +e_evabonus

	endif

	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.ACT.ISCHAR>)

	IF !(<src.ACT.ISEVENT.e_evabonus>)

	src.ACT.EVENTS +e_evabonus

	endif

	endif

	spell_say Vas Ort Flam

	sd 2

	mg6

elseif (<argn> == 44)	// Invisibility

if (strmatch('<act.region.events>','r_house_public')) || (strmatch('<act.region.events>','r_house_private'))

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

	spell_say Kal Por Ylem

	sd 2

	mg6

elseif (<argn> == 46)	// Mass Curse

	spell_say Vas Des Sanct

	sd 2

	mg6

elseif (<argn> == 47)	// Paralyze Field

	spell_say In Ex Grav

	if (<act.topobj.ischar>)

		f_fizzle

		return 1

	endif

	sd 3

	mg6

elseif (<argn> == 48)	// Reveal

	spell_say Wis Quas

	sd 2

	mg6

elseif (<argn> == 49)	// Chain Lightning

	spell_say Vas Ort Grav

	if (<act.uid> == <uid>)

		f_fizzle

		return 1

	endif

	sd 3

	mg7

elseif (<argn> == 50)	// Energy Field

	spell_say In Sanct Grav

	if (<act.topobj.ischar>)

		f_fizzle

		return 1

	endif

	sd 3

	mg7

elseif (<argn> == 51)	// Flame strike

	IF (<SRC.ACT.ISCHAR>)

	IF !(<src.ACT.ISEVENT.e_evabonus>)

	src.ACT.EVENTS +e_evabonus

	endif

	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

	spell_say Vas Rel Por

	sd 3

	mg7

	f_fizzle

	return 1

elseif (<argn> == 53)	// Mana Vampire

	spell_say Ort Sanct

	f_fizzle

	return 1

elseif (<argn> == 54)	// Mass Dispel

	spell_say Vas An Ort

	sd 3	

	mg7

elseif (<argn> == 55)	// Meteor Swarm

	spell_say Flam Kal Des Ylem

	if (<act.uid> == <uid>)

		f_fizzle

		return 1

	endif

	sd 3

	mg7

elseif (<argn> == 56)	// Polymorph

	f_fizzle

	sysmessage @38 Bir sureligine kapali

	return 1

	//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

	spell_say In Vas Por

	sd 3

	mg8

elseif (<argn> == 58)	// Energy Vortex

	spell_say Vas Corp Por

	if (<region.guarded>)

		criminal 1

	endif

	sd 3

	mg8

elseif (<argn> == 59)	// Resurrect

	spell_say An Corp

	sd 3

	mg8

elseif (<argn> == 60)	// Air Elemental

	spell_say Kal Vas Xen Hur

	if (<region.guarded>)

		criminal 1

	endif

	sd 3

	mg8

elseif (<argn> == 61)	// Summon Deamon

	spell_say Kal Vas Xen Corp

	if (<region.guarded>)

		criminal 1

	endif

	sd 3

	mg8

elseif (<argn> == 62)	// Earth Elemental

	spell_say Kal Vas Xen Ylem

	if (<region.guarded>)

		criminal 1

	endif

	sd 3

	mg8

elseif (<argn> == 63)	// Fire Elemental

	spell_say Kal Vas Xen Flam

	if (<region.guarded>)

		criminal 1

	endif

	sd 3

	mg8

elseif (<argn> == 64)	// Water Elemental

	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)) // eve disardan chain atsalar bile icerdeki yemez

	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 {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)) // 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>)

	sysmessage @50 Trapped pouch ile kurtulmak icin .TP yaziniz.

	sysmessage @50 Trapped pouch ile kurtulmak icin .TP yaziniz.

	

		//effect 3,i_fx_smoke,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 Faction uyelerini iyilestiremezsiniz.

		//return 1

	if (<memoryfindtype.memory_guild.link.align> > 0) && !(<src.memoryfindtype.memory_guild.link.align>)

		src.sysmessage 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=@hittry

if (<act.id>==c_pv)

	f_fizzle

	return 1

endif

//if (<act.flags>&statf_stone) || (<act.region.safe>)

//sysmessage @39 Bu sekilde zarar veremezsiniz. Durumu yetkililere bildirin.

//action -1

//return 1

//endif



On=@skillStart

if <kills>>10000

serv.allclients f_stpublish Dikkat: <name> kill toplami 6000'i gecmis.

endif

if (<src.flags>&statf_stone) || (<src.region.safe>)

src.action -1

src.sysmessage @39 Bunun yeri burasi degil..

return 1

endif



if (<action> == id(skill_stealth)) || (<action> == skill_stealth) //zirh olayini sildim bayyaa bişey sildim

	if (<hiding> < 80.0)

		sysmessage @38 Hiding yeterli degil.

		skill fail

		return 1

	elseif (<flags>&statf_onhorse)

		sysmessage @38 Binek uzerindesiniz.

		skill fail

		return 1

	endif

elseif (<action> == id(skill_hiding)) || (<action> == skill_hiding)

	if (<flags>&statf_onhorse)

		sysmessage @38 Binek uzerindesiniz.

		skill fail

		return 1

	endif

elseif ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) // stealing fiks

	if (<targ.topobj.id> == c_pv) || (<targ.topobj.id> == c_horse_pack) || (<targ.topobj.id> == c_llama_pack)

		sysmessage @38 Bu yeteneginizi bu yaratiklarda kullanamazsiniz.

		skill fail

		return 1

	elseif (<targ.ischar>)

		sysmessage Char o

		skill fail

		return 1

	elseif !(<targ.topobj.ischar>)

		sysmessage @38 Sadece canli varliklardan calabilirsiniz.

		skill fail

		return 1

	elseif (<targ.isitem>)

		if (<targ.cont>)

			if (<findid.i_bulletin_board>) || (<targ.baseid>==i_rune_marker)

			//if (<targ.cont.type> == t_eq_trade_window) // bu hata veriyodu

				skill fail

				return 1

			endif

			if (<targ.cont.baseid>==c_man) || (<targ.cont.baseid>==c_woman)

				sysmessage @38 Uzerindeki seyi nasil calacaksin?

				return 1

			endif

		endif

	endif

elseif ((<action> == id(skill_herding)) || (<action> == skill_herding))

	if (<targ.id> == c_pv)

		sysmessage @38 Player vendor uzerinde bu yeteneginizi kullanamazsiniz.

		skill fail

		return 1

	endif

elseif ((<action> == id(skill_provocation)) || (<action> == skill_provocation))

	if (<targ.body> == c_man)

		sysmessage @38 Duzenleme icin kapatilmistir.

		targ.action -1

		targ.flags <flags>&~statf_war

		action -1

		skill fail

		return 1

	endif

elseif ((<action> == id(skill_enticement)) || (<action> == skill_enticement))

		sysmessage @38 Duzenleme icin kapatilmistir.

		skill fail

		return 1

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=@ItemDClick

if (<targ.topobj.id> == c_pv)

	if (<targ.type> == t_container)

		targ.open

	endif

	return 1

endif



On=@Click

if !(<findid.i_rune_incognito>) && (<memoryfindtype.memory_guild>)

	if (strmatch('<tag.gs_title>','')

		message @0 [<memoryfindtype.memory_guild.link.name>]

	else

		message @0 [<tag.gs_title>, <memoryfindtype.memory_guild.link.abbrev>]

	endif

endif



On=@ItemClick

if (<act.topobj.id> == c_pv)

if !(<act.value> == 0)

	if (strmatch('<act.price>',''))

		act.message @38 [satilamaz]

	elseif (<act.price> <= 0)

		act.message @38 [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

endif



if (<act.layer> == 21) && (<act.cont.ischar>)

	act.message Inventory

	return 1

else

	if (<act.attr>&attr_newbie)

		act.message @2010 [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 @38 [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 @100 [bolts: <eval <rescount <act.tdata3>>>]

	elseif (<act.type> == t_weapon_bow)

		act.message @100 [arrows: <eval <rescount <act.tdata3>>>]

	endif

endif



On=@ItemPickUp_ground



if (<act.topobj.id> == c_pv)

	if !(<uid> == <act.topobj.tag.owner>)

		return 1

	else

		if !(strmatch('<act.price>',''))

			if (<act.price> > 0)

			act.price 0

		endif

endif

if (<act.baseid>== i_sign_brass) || (<act.baseid>== i_door_wood)

	return 1

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 gmfix]

On=@Click

FLAGS = <FLAGS>|statf_nightsight

IF (<FLAGS> & statf_insubstantial)

	   SRC.TAG.TEPE [Invis]

ENDIF

IF (0<tag.awayacik> == 1)

	   SRC.TAG.TEPE2 [Away, <tag.away>]

ENDIF

IF (<src.isevent.e_whist>)

	   SRC.TAG.TEPE3 [Away, <tag.away>]

ENDIF

IF (strmatch('<ACCOUNT.PLEVEL>','2')) || (strmatch('<ACCOUNT.PLEVEL>','3')) || (strmatch('<ACCOUNT.PLEVEL>','4')) || (strmatch('<ACCOUNT.PLEVEL>','5') || (strmatch('<ACCOUNT.PLEVEL>','6') || (strmatch('<ACCOUNT.PLEVEL>','7'))

	MESSAGE @38 <SRC.TAG.TEPE2>

	MESSAGE @38 <SRC.TAG.TEPE>

	SRC.TAG.TEPE 

	SRC.TAG.TEPE2

ENDIF

	message @100 Moneta Staff

	message @2050 <name>

	findid.i_rune_incognito.remove

	karma 0

	fame 0

	kills 0

	flags <flags>&~statf_criminal

return 1



On=@DClick

if (<account.plevel><7)

title Moneta Staff Member

elseif (<account.plevel> == 7)

title Owner

endif



On=@GetHit

return 1



On=@ItemClick

if !(<isevent.fix>)

	if (<act.attr>&04) // blessed itemlari belirt

		act.message [newbified]

	endif



	if (<act.topobj.baseid> == 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

		if (<act.type> == t_container)

			act.message <act.typedef.name> [<act.rescount>,<eval ((<act.weight> / 10) - <act.typedef.weight>)>]

			return 1

		endif

	endif

endif



On=@Death

hits 50 // kiymayin gm'e

return 1



On=@environchange

//src.nightsgiht

if (<src.findlayer(25)>)

if !(<src.findlayer(25).more>==c_staff_horse)

	if (<src.account.plevel><6)

		src.findlayer(25).remove

		src.message @50 Staff horse neyine yetmiyo aloo?

	endif

endif

endif





if (<src.findid.i_robe_gm>)

if (<src.account.plevel> == 7)

return 1

elseif !(<src.findid.i_robe_gm.color> == 0796)

		src.findid.i_robe_gm.color 0796

		src.message @60 Robelerimizin rengini degismeyelim lutfen.

endif

endif



On=@ItemPickUp_Pack

if (<act.topobj.id> == c_pv)

	if !(<uid> == <act.topobj.tag.owner>)

		return 1

	endif

elseif (<act.topobj.ischar>) && (<act.topobj.uid> != <uid>)

	if !(<act.topobj.npc>)

		return 1

	endif

endif



On=@ItemPickUp_ground

if (<targ.baseid>=i_worldgem_bit) || (strmatch('<targ.type>','t_corpse'))

if (<src.account.plevel><5)

src.sysmessage @39 bisey olmuyor?

return 1

endif

endif



On=@ItemDClick

if (<targ.type>=t_corpse)

if (<src.account.plevel><6)

serv.allclients stafftrig CESET ACIYOR

endif

endif

if !(strmatch('<src.account>','hakan'))

if (<targ.baseid>=i_worldgem_bit)

if (<src.account.plevel><6)

src.sysmessage @39 bisey olmuyor?

return 1

endif

endif

endif

if (<targ.topobj.baseid> == c_pv)

	if (<targ.type> == t_container)

		targ.open

	endif

	return 1

endif



On=@skillStart

if ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) // stealing fiks

	if (<targ.topobj.baseid> == c_pv)

		skill fail

		return 1

	endif

endif



[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



[EOF]

Değerlendirmeler

0 0

Total votes: 0

Üye Ol veya Giriş Yap

Bu içeriğe yorum atmak istiyorsanız hemen üye olun veya giriş yapın.

Discord ile Bağlan
Twitch ile Bağlan
Steam ile Bağlan
Google ile Bağlan

Yorumlar (0)

Henüz yorum yapılmamış
Sadece kayıtlı kullanıcılar yeni yorum yapabilir.


Ultima-Strike Discord
Benzer Sayfalar

Bulunamadı.