[typedef t_yereatildi]
ON=@timer
remove
[function spell_say]
if (<src.account.plevel> < 2)
sayua 0481,6,0,enu <args>
endif
[events fix]
ON=@UserQuestButton
openquestlog
ON=@UserguildButton
guildonline
On=@Profile
if (<src.uid> == <uid>) || (0<src.account.plevel> > 2)
src.sysmessage @0481,,1 Hesap : <ACCOUNT>,online süresi <eval (<account.totalconnecttime> / 60)> saat.
src.sysmessage @0481,,1 Kayıt : <account.firstconnectdate>
src.sysmessage @0481,,1 Karakter : <eval (<age> / 86400)> gün önce doğmuş.
endif
On=@mount
targ.findid.i_rune_poison.remove
targ.findid.i_rune_poison_field.remove
targ.findid.i_bleeding.remove
On=@Death
if !(<isevent.e_qchar>)
if (<fame> > 9900) && (<memoryfindtype.memory_harmedby>) && (<act.ischar>) && (<act.uid> != <uid>)
serv.allclients sysmessage @0481,,1 <sex Lord/Lady> <name>, <act.name> tarafindan <region.name> civarlarında öldürüldü.
endif
endif
if (<src.findid.i_bleeding>)
findid.i_bleeding.remove
findid.i_bleeding2.remove
return 1
endif
if (<kills> > 5)
f_statloss
findid.i_mem_healing.remove
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
return 1
On=@GetHit
IF ( <FLAGS> & statf_reactive )
FLAGS=<FLAGS> & ~statf_reactive
SRC.FLAGS=<SRC.FLAGS> & ~statf_reactive
DAMAGE=<ARGN1> 01 <SRC.UID>
IF (<FINDID.i_rune_reactive_armor>)
FLAGS=<FLAGS> | statf_reactive
ENDIF
IF (<SRC.FINDID.i_rune_reactive_armor>)
SRC.FLAGS=<SRC.FLAGS> | statf_reactive
ENDIF
RETURN 1
ENDIF
if (<findtype.t_eq_trade_window>)
findtype.t_eq_trade_window.remove
endif
On=@EnvironChange
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
if !(<memoryfindtype.memory_guild.link.align>)
if (<findlayer(2).baseid> == i_shield_chaos) || (<findlayer(2).baseid> == i_shield_order)
findlayer(2).unequip
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
endif
endif
if ((<body> == c_man) || (<body> == c_woman)) // yimmeeah
if !((<isevent.e_jail>) || (<flags>&statf_stone) || (<isevent.e_qchar>))
if (<food> == 3)
say * acliktan basi doner *
elseif (<food> == 2)
say * acliktan basi doner *
elseif (<food> == 1)
say * acliktan olmek uzeredir *
elseif (<food> == 0)
//sayua 045f * acliktan olur *
newitem i_aclikcim
act.equip
endif
endif
endif
On=@SpellCast
if !((<findlayer(2).type> == t_weapon_mace_staff) || (<findlayer(1).baseid> == i_sosyal_pick))
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 (<kills> < 8) && (strmatch('<targ.region.name>','Calimport'))
sysmessage @066d,,1 Calimport'un güçlü büyü duvarları sebebiyle büyünüz etki göstermedi.
go 5249 3918 28
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_steacher)
if !((<argn> == 25) || (<argn> == 26) || (<argn> == 46) || (<argn> == 48) || (<argn> == 49) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))
f_fizzle
return 1
endif
endif
if (<act.id> == c_tuccar)
if !((<argn> == 25) || (<argn> == 26) || (<argn> == 46) || (<argn> == 48) || (<argn> == 49) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))
f_fizzle
return 1
endif
endif
if (<act.id> == c_player_v)
if !((<argn> == 25) || (<argn> == 26) || (<argn> == 46) || (<argn> == 48) || (<argn> == 49) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))
f_fizzle
return 1
endif
endif
if (<src.findid.i_mem_spellheall>)
sayua 020,6,6,0 * bandajlari yirtilir *
findid.i_mem_healing.remove
endif
// spell freeze time
if (<argn> == 1)// Clumsy
//spell_say Uus Jux
mg1
elseif (<argn> == 2)
//spell_say In Mani Ylem // Create food
foodverici
mg1
elseif (<argn> == 3) // Feeblemind
//spell_say Rel Wis
mg1
elseif (<argn> == 4) // Heal
//spell_say In Mani
sd 1
if (<src.findid.i_bleeding> || (<src.findid.i_bleeding2>)
sysmessage @066d,,1 Yaranızı iyileştirmelisiniz.
f_fizzle
return 1
return 1
endif
mg2
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
mg1
else
skill fail
sysmessage @066d,,1 Bu büyüyü sadece kendinizde kullanabilirsiniz.
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
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
//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
if (<act.serial>==<targ.serial>)
//spell_say Uus Sanct
sd 1
mg2
else
skill fail
sysmessage @066d,,1 Bu büyüyü sadece kendinizde kullanabilirsiniz.
return 1
endif
elseif (<argn> == 16) // Strength
//spell_say Uus Mani
sd 1
mg2
elseif (<argn> == 17) // Bless
if (<act.serial>==<targ.serial>)
//spell_say Rel Sanct
sd 1
mg3
else
skill fail
sysmessage @066d,,1 Bu büyüyü sadece kendinizde kullanabilirsiniz.
return 1
endif
elseif (<argn> == 18) // Fireball
//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.serial>==<targ.serial>)
//spell_say In Nox
psg
sd 1
else
skill fail
sysmessage @066d,,1 Bu büyüyü kendinize atamazsınız.
return 1
endif
elseif (<argn> == 21) // Telekinesis
//spell_say Ort Por Ylem
src.sysmessage @066d,,1 Bu büyünün kullanımı kapatılmıştır.
f_fizzle
return 1
elseif (<argn> == 22) // Teleport
//spell_say Rel Por
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg3
sd 2
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)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg3
sd 2
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
elseif (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg4
sd 2
elseif (<argn> == 29) // Greater Heal
//spell_say In Vas Mani
sd 2
if (<src.findid.i_bleeding> || (<src.findid.i_bleeding2>
sysmessage @066d,,1 Yaranizi iyilestirmelisiniz.
f_fizzle
return 1
return 1
endif
mg4
elseif (<argn> == 30) // Lightning
//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
if (0<src.tag.ticaret>==01)
if !(0<src.tag.ticaretk>==0<uid>
src.sysmessage @066d,,1 Ticaret yaparken bunu kullanamazsınız.
f_fizzle
return 1
endif
endif
elseif (<argn> == 33) // Blade Spirits
//spell_say In Jux Hur Ylem
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg5
sd 2
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
f_fizzle
return 1
elseif (<argn> == 36) // Magic Reflect
//spell_say In Jux Sanct
sd 2
mg5
elseif (<argn> == 37) // Mind Blast
//spell_say Por Corp Wis
sd 2
mg5
elseif (<argn> == 38) // Paralyze
//spell_say An Ex Por
sd 2
mg5
elseif (<argn> == 39) // Poison Field
//spell_say In Nox Grav
if (<act.topobj.ischar>)
f_fizzle
return 1
elseif (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
sd 2
mg5
elseif (<argn> == 40) // Summon Creature
//spell_say Kal Xen
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg5
sd 2
elseif (<argn> == 41) // Dispel
//spell_say An Ort
sd 2
mg6
elseif (<argn> == 42) // Energy Bolt
//spell_say Corp Por
sd 2
mg6
elseif (<argn> == 43) // Explosion
//spell_say Vas Ort Flam
sd 2
mg6
elseif (<argn> == 44) // Invisibility
//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
elseif (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg6
sd 2
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
if (<src.region.guarded> == 1)
f_fizzle
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
return 1
endif
elseif (<argn> == 50) // Energy Field
//spell_say In Sanct Grav
if (<act.topobj.ischar>)
f_fizzle
return 1
elseif (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg7
sd 2
elseif (<argn> == 51) // Flame strike
//spell_say Kal Vas Flam
sd 3
mg7
elseif (<argn> == 52) // Gate Travel
//spell_say Vas Rel Por
sd 3
mg7
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 (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg7
sd 3
elseif (<argn> == 56) // Polymorph
//spell_say Vas Ylem Rel
sd 7
mg3
elseif (<argn> == 57) // Earthquake
//spell_say In Vas Por
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 4
elseif (<argn> == 58) // Energy Vortex
//spell_say Vas Corp Por
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 3
elseif (<argn> == 59) // Resurrect
//spell_say An Corp
sd 3
mg8
elseif (<argn> == 60) // Air Elemental
//spell_say Kal Vas Xen Hur
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 3
elseif (<argn> == 61) // Summon Deamon
//spell_say Kal Vas Xen Corp
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 3
elseif (<argn> == 62) // Earth Elemental
//spell_say Kal Vas Xen Ylem
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 3
elseif (<argn> == 63) // Fire Elemental
//spell_say Kal Vas Xen Flam
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 3
elseif (<argn> == 64) // Water Elemental
//spell_say Kal Vas Xen An Flam
if (<src.region.guarded> == 1)
src.sysmessage @066d,,1 Bu büyüyü korunaklı bir şehirde yapamazsınız.
f_fizzle
return 1
endif
mg8
sd 3
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> == 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 {10 15}
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.poisoning> == 120.0)
findid.i_rune_poison.morey += 50.0
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 3
if (<findid.i_pouch_trapped.more2> > 1)
findid.i_pouch_trapped.more2 <eval <findid.i_pouch_trapped.more2>-1>
return 1
else
findid.i_pouch_trapped.remove
return 1
endif
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 @03b2,,1, Faction uyelerini iyilestiremezsiniz.
return 1
elseif (<memoryfindtype.memory_guild.link.align> > 0) && !(<src.memoryfindtype.memory_guild.link.align>)
src.sysmessage @03b2,,1, 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
if (<flags>&statf_onhorse)
On=@Click
if !(<findid.i_rune_incognito>) && (<memoryfindtype.memory_guild>)
if (strmatch('<tag.gs_title>','')
message @0481,,1 [<memoryfindtype.memory_guild.link.name>]
else
message @0481,,1 [<tag.gs_title>, <memoryfindtype.memory_guild.link.abbrev>]
endif
endif
On=@SkillStart
if (<action> == id(skill_poisoning)) || (<action> == skill_poisoning)
if (<src.targ.uid> == <src.findlayer(1).uid>) || (<src.targ.uid> == <src.findlayer(2).uid>) || (<targ.layer> == 2) || !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @066d,,1 Bunu zehirleyemezsiniz.Çantanızda ve tek elli bir silah olmalı.
skill fail
return 1
endif
endif
if (<action> == id(skill_stealth)) || (<action> == skill_stealth)
if (<hiding> < 80.0)
sysmessage @066d,,1 Yetersiz hiding.
skill fail
return 1
elseif (<eval (<ac> * 100)> > <eval (<stealth> + 200)>)
sysmessage @066d,,1 Asiri zirhlisiniz.
skill fail
return 1
elseif (<flags>&statf_onhorse)
sysmessage @066d,,1 Binek üzerindesiniz.
skill fail
return 1
endif
endif
if (<action> == id(skill_hiding)) || (<action> == skill_hiding)
if (<flags>&statf_onhorse)
sysmessage @066d,,1 At üzerinde gizlenemezsiniz.
skill fail
return 1
elseif (<eval (<ac> * 100)> > <eval (<stealth> + 200)>)
sysmessage @066d,,1 Asiri zirhlisiniz.
skill fail
return 1
endif
endif
if ((<action> == id(skill_herding)) || (<action> == skill_herding))
if (<targ.id> == c_player_v)
skill fail
return 1
endif
endif
if ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) // stealing fiks
if (<targ.topobj.id> == c_player_v)
return 1
elseif !(<targ.topobj.ischar>)
sysmessage @066d,,1 Sadece çantaların içlerinden çalabilirsiniz.
return 1
elseif !(<targ.isitem>)
sysmessage @066d,,1 Sadece çantaların içlerinden çalabilirsiniz.
return 1
// elseif (<targ.layer> == layer_hand1) || (<targ.layer> == layer_hand2)
// sysmessage @066d,,1 Adamın elinden calamazsiniz.
// skill fail
// return 1
// elseif (0<uid.<targ.uid>.cont>)
elseif (<uid.<uid.<targ.uid>.cont.uid>.ischar>)
sysmessage @066d,,1 Sadece çantaların içlerinden çalabilirsiniz.
return 1
//endif
if !(<uid.<uid.<targ.uid>.cont.uid>.type> == t_container)
sysmessage @066d,,1 Sadece cantalarin icinden calabilirsiniz.
return 1
endif
elseif (<targ.isitem>)
if (<targ.cont>)
if (<targ.cont.type> == t_eq_trade_window)
src.sysmessage @066d,,1 Bunu calamazsiniz.
return 1
endif
endif
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 (<action> == id(skill_fishing)) || (<action> == skill_fishing)
if !(<targ.type> == t_fish_pole)
src.sysmessage @066d,,1 Oltanızı düşürdüğünüz için balık tutamadınız.
skill fail
action -1
return 1
endif
endif
if (<action> == id(skill_lumberjack)) || (<action> == skill_lumberjack)
if !(<targ.type> == t_weapon_axe)
src.sysmessage @066d,,1 Baltanızı düşürdüğünüz için odun kesemediniz.
skill fail
action -1
return 1
endif
endif
if (<action> == id(skill_mining)) || (<action> == skill_mining)
if !(<targ.id> == i_pickaxe)
src.sysmessage @066d,,1 Kazmanızı düşürdüğünüz için maden çıkartamadınız.
skill fail
action -1
return 1
endif
endif
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_mace_staff) || (<act.type> == t_weapon_bow)
if (<src.act.morez> > 0)
if (<src.magery> > 400)
src.sysmessage @066d,,1 Zehirli silahı magery skilliniz 40 üstünde iken kullanamazsınız.Lütfen oil cloth ile zehri temizleyiniz.
src.act.unequip
endif
endif
endif
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=@itemdropon_ground
if !((<weight> + <act.weight>) > <maxweight>)
if ((<action> == id(skill_fishing)) || (<action> == skill_fishing))
if (<act.type> == t_fish) // tutulan baliklari
src.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
elseif ((<action> == id(skill_magery)) || (<action> == skill_magery))
if (<act.type> == t_food)
act.bounce
endif
endif
endif
On=@ItemUnEquip
//if (<act.type> == t_weapon_axe)
//events -e_axer
//endif
On=@ItemDClick
if (<targ.topobj.id> == c_player_v)
if (<targ.type> == t_container)
targ.open
endif
return 1
endif
On=@ItemClick
if ((<act.topobj.uid> == <uid>)
if (<act.type> == t_weapon_xbow)
act.message @150,,1 [bolts: <eval <rescount <act.tdata3>>>]
elseif (<act.type> == t_weapon_bow)
act.message @150,,1 [arrows: <eval <rescount <act.tdata3>>>]
endif
endif
IF (<act.attr>&04)
act.tag.attr_04 = 1
else
act.tag.attr_04 = 0
ENDIF
if (strmatch('','t_eq_trade_window'))
act.message @066d,,1 [ secure ]
endif
if (<act.topobj.id> == c_player_v)
if (strmatch('<act.price>',''))
act.message @066d,,1 [ satilamaz ]
elseif (<act.price> <= 0)
act.message @066d,,1 [ 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 @0790,,1 [<act.price> gp] [%<eval (100 - ((<act.more1l> * 100) / <act.more1h>))> eski]
else
act.message @0790,,1 [<act.price> gp]
endif
else
act.message @0790,,1 [<act.price> gp]
endif
endif
endif
if (<act.layer> == 21) && (<act.cont.ischar>)
act.message @0790,,1,,1 Inventory
return 1
else
if (<act.attr>&attr_newbie)
act.message @0481,,1 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.uid> == <region.uid>)
act.message @150,,1 [ sabit ]
endif
if (<act.baseid> == i_bones)
act.message @0809 [loot: <act.rescount> esya]
act.message <act.name>
elseif (<src.act.rescount> > 0)
act.message @0 <act.typedef.name> [<act.rescount>,<eval ((<act.weight> / 10) - <act.typedef.weight>)>]
else
act.message @0 <act.typedef.name>
endif
return 1
endif
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
[events e_atmalen]
On=@ItemPickUp_Pack
if (<act.topobj.id> == c_player_v)
if !(<uid> == <act.topobj.tag.owner>)
return 1
endif
//elseif !(strmatch('<act.price>',''))
//if (<act.price> > 0)
//act.price 0
//endif
//endif
On=@ItemTargOn_Item
if ((<targ.topobj.id> == c_player_v) && (<act.cont.uid> != <targ.topobj.uid>))
return 1
[events gmfix]
On=@Death
hits <str>
fame 0
return 1
On=@EnvironChange
food 999
karma 0
fame 0
ON=@UserQuestButton
src.sysmessage Quest sistemi askıdadır.İstendiği takdirde eklenecektir.
ON=@UserguildButton
guildonline
On=@mount
if !((<argo.id> == c_staff) || (<argo.id> == c_staff2) || (<argo.id> == c_staff3) || (<argo.id> == c_staff6) || (<argo.id> == c_staff4) || (<argo.id> == c_staff5))
src.sysmessage @066d,,1 Stafflar kendilerine özel binekten başka bineğe binemez.
return 1
endif
on=@itemcreate
if (<src.account.plevel> > 1)
try uid.<argo.uid>.tag.tarihisoylebab <serv.rtime>
try uid.<argo.uid>.tag.cikarankim <eval <src.uid>>
endif
On=@SpellCast
if ((<flags>&statf_freeze) || (<flags>&statf_stone))
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_player_v)
if !((<argn> == 25) || (<argn> == 26) || (<argn> == 46) || (<argn> == 48) || (<argn> == 49) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))
f_fizzle
return 1
endif
endif
if (<src.findid.i_mem_spellheal>)
f_fizzle
src.sysmessage @066d,,1 Bandaj kullanırken büyü yapamazsınız.
return 1
endif
On=@Click
IF (<ACCOUNT.PLEVEL> = 2)
message @07a1 [ Counselor ]
message @07a1 <name>
return 1
elseif (strmatch('<account.name>','qweqwewqewqeqwew'))
message @07a1 Player Master
message @07a1 <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 3)
message @07a1 [ Seer ]
message @07a1 <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 4)
message @07a1 [ Game Master ]
message @07a1 <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 5)
message @07a1 [ Senior GM ]
message @07a1 <name>
return 1
elseIF (<ACCOUNT.PLEVEL> = 6)
message @07a1 [ Administrator ]
message @07a1 <name>
return 1
elseIF (<ACCOUNT.PLEVEL> > 6 )
message @07a1 [ Owner ]
message @07a1 <name>
return 1
endif
On=@DClick
if (<account.plevel> <8)
title <SERV.NAME> Yetkili Uyesi
endif
on=@ITEMPICKUP_PACK
if (<act.topobj.npc> == brain_monster) || (<act.topobj.npc> == brain_dragon)
return 1
endif
On=@GetHit
return 1
On=@ItemDClick
if (<act.type>=t_corpse)
if (<src.account.plevel><6)
src.sysmessage @066d,,1 Hata : Cesetleri açamazsınız.
return 1
endif
endif
if (<targ.baseid>=i_worldgem_bit)
if (<src.account.plevel><6)
src.sysmessage @066d,,1 Hata : Spawn taşları yenilenemez.
return 1
endif
endif
endif
On=@ItemEquip
if (<action> == id(skill_fishing)) || (<action> == skill_fishing)
if !(<targ.type> == t_fish_pole)
src.sysmessage @066d,,1 Oltanızı düşürdüğünüz için balık tutamadınız.
skill fail
action -1
return 1
endif
endif
if (<action> == id(skill_lumberjack)) || (<action> == skill_lumberjack)
if !(<targ.type> == t_weapon_axe)
src.sysmessage @066d,,1 Baltanızı düşürdüğünüz için odun kesemediniz.
skill fail
action -1
return 1
endif
endif
if (<action> == id(skill_mining)) || (<action> == skill_mining)
if !(<targ.id> == i_pickaxe)
src.sysmessage @066d,,1 Kazmanızı düşürdüğünüz için maden çıkartamadınız.
skill fail
action -1
return 1
endif
endif
if (<act.type> == t_weapon_bow) || (<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_mace_staff)
if (<src.act.morez> > 0)
if (<src.magery> > 400)
src.sysmessage @066d,,1 Zehirli silahı magery skilliniz 40 üstünde iken kullanamazsınız.Lütfen oil cloth ile zehri temizleyiniz.
src.act.unequip
endif
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=@itemdropon_ground
if !((<weight> + <act.weight>) > <maxweight>)
if ((<action> == id(skill_fishing)) || (<action> == skill_fishing))
if (<act.type> == t_fish) // tutulan baliklari
src.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
elseif ((<action> == id(skill_magery)) || (<action> == skill_magery))
if (<act.type> == t_food)
act.bounce
endif
endif
endif
On=@ItemClick
IF (<act.attr>&04)
act.tag.attr_04 = 1
else
act.tag.attr_04 = 0
ENDIF
if (strmatch('','t_eq_trade_window'))
act.message @066d,,1 [ secure ]
endif
if (<act.topobj.id> == c_player_v)
if (strmatch('<act.price>',''))
act.message @066d,,1 [ satilamaz ]
elseif (<act.price> <= 0)
act.message @066d,,1 [ 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 @0790,,1 [<act.price> gp] [%<eval (100 - ((<act.more1l> * 100) / <act.more1h>))> eski]
else
act.message @0790,,1 [<act.price> gp]
endif
else
act.message @0790,,1 [<act.price> gp]
endif
endif
endif
if (<act.layer> == 21) && (<act.cont.ischar>)
act.message @0790,,1,,1 Inventory
return 1
else
if (<act.attr>&attr_newbie)
act.message @0481,,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 @150,,1 [ sabit ]
endif
if (<act.baseid> == i_bones)
act.message @0809 [loot: <act.rescount> esya]
act.message <act.name>
elseif (<src.act.rescount> > 0)
act.message @0 <act.typedef.name> [<act.rescount>,<eval ((<act.weight> / 10) - <act.typedef.weight>)>]
else
act.message @0 <act.typedef.name>
endif
return 1
endif
endif
endif
if ((<act.topobj.uid> == <uid>)
if (<act.type> == t_weapon_xbow)
act.message @150,,1 [bolts: <eval <rescount <act.tdata3>>>]
elseif (<act.type> == t_weapon_bow)
act.message @150,,1 [arrows: <eval <rescount <act.tdata3>>>]
endif
endif
//if (<src.account.plevel> > 5)
//if !(<act.tag0.cikarankim>==0)
//act.message @0799,1,1 [Staff tarafından yapıldı]
//act.message @0783,,1 Çıkaran isim & Acc : [<serv.uid.<act.tag0.cikarankim>.name>] - [<serv.uid.<act.tag0.cikarankim>.account.name>]
//act.message @0783,,1 Tarih : [<act.tag0.tarihisoylebab>] | Eşya ismi : [<act.name>]
//return 1
//endif
On=@SkillStart
if (<action> == id(skill_poisoning)) || (<action> == skill_poisoning)
if (<src.targ.uid> == <src.findlayer(1).uid>) || (<src.targ.uid> == <src.findlayer(2).uid>) || (<targ.layer> == 2) || !(<src.targ.topobj.uid> == <src.uid>)
src.sysmessage @066d,,1 Bunu zehirleyemezsiniz.Çantanızda ve tek elli bir silah olmalı.
skill fail
return 1
endif
endif
if (<action> == id(skill_stealth)) || (<action> == skill_stealth)
if (<hiding> < 80.0)
sysmessage @066d,,1 Yetersiz hiding.
skill fail
return 1
elseif (<eval (<ac> * 100)> > <eval (<stealth> + 200)>)
sysmessage @066d,,1 Asiri zirhlisiniz.
skill fail
return 1
elseif (<flags>&statf_onhorse)
sysmessage @066d,,1 Binek üzerindesiniz.
skill fail
return 1
endif
endif
if (<action> == id(skill_hiding)) || (<action> == skill_hiding)
if (<flags>&statf_onhorse)
sysmessage @066d,,1 At üzerinde gizlenemezsiniz.
skill fail
return 1
elseif (<eval (<ac> * 100)> > <eval (<stealth> + 200)>)
sysmessage @066d,,1 Asiri zirhlisiniz.
skill fail
return 1
endif
endif
if ((<action> == id(skill_herding)) || (<action> == skill_herding))
if (<targ.id> == c_player_v)
skill fail
return 1
endif
endif
if ((<action> == id(skill_stealing)) || (<action> == skill_stealing)) // stealing fiks
if (<targ.topobj.id> == c_player_v)
return 1
elseif !(<targ.topobj.ischar>)
sysmessage @066d,,1 Sadece çantaların içlerinden çalabilirsiniz.
return 1
elseif !(<targ.isitem>)
sysmessage @066d,,1 Sadece çantaların içlerinden çalabilirsiniz.
return 1
// elseif (<targ.layer> == layer_hand1) || (<targ.layer> == layer_hand2)
// sysmessage @066d,,1 Adamın elinden calamazsiniz.
// skill fail
// return 1
// elseif (0<uid.<targ.uid>.cont>)
elseif (<uid.<uid.<targ.uid>.cont.uid>.ischar>)
sysmessage @066d,,1 Sadece çantaların içlerinden çalabilirsiniz.
return 1
//endif
if !(<uid.<uid.<targ.uid>.cont.uid>.type> == t_container)
sysmessage @066d,,1 Sadece cantalarin icinden calabilirsiniz.
return 1
endif
elseif (<targ.isitem>)
if (<targ.cont>)
if (<targ.cont.type> == t_eq_trade_window)
src.sysmessage @066d,,1 Bunu calamazsiniz.
return 1
endif
endif
endif
endif
[function foodverici]
IF (<magery> < 10.0) || !(<src.restest 1 i_reag_garlic>) || !(<src.restest 1 i_reag_ginseng>) || !(<src.restest 1 i_reag_mandrake_root>)
sysmessage @066d,,1 Malzeme eksik veya yetersiz yetenek.
return 1
elseif (<mana> < 4)
sysmessage @066d,,1 Yetersiz mana
return 1
else
mana <mana> + (-4)
foodver
endif
[function foodver]
dorand 5
tag.yemekci 1
tag.yemekci 2
tag.yemekci 3
tag.yemekci 4
tag.yemekci 5
enddo
if (<tag.yemekci> ==1)
newitem i_cake
act.bounce
elseif (<tag.yemekci> == 2)
newitem i_fish_cut_cooked
act.bounce
elseif (<tag.yemekci> == 3)
newitem i_bread_loaf
act.bounce
elseif (<tag.yemekci> == 4)
newitem i_bread_french
act.bounce
elseif (<tag.yemekci> == 5)
newitem i_ribs_cooked
act.bounce
endif
On=@ItemPickUp_Pack
if (<act.topobj.id> == c_player_v)
if !(<uid> == <act.topobj.tag.owner>)
return 1
endif
elseif !(strmatch('<act.price>',''))
if (<act.price> > 0)
act.price 0
endif
endif
[EOF]
) Düzelmezse fix.scp'ini değiştir olmazsa table_x değiştir.
