[events e_tumnpcler]
on=@GetHit
if (<argn2> & dam_poison) && !(<argn2> & dam_magic)
local.strength = <findid(i_rune_poison).morey>
if (<local.strength> > 800)
// deathly
argn = 8
elif (<local.strength> > 400)
// extremly
argn = 6
elif (<local.strength> > 200)
// very ill
argn = 4
else
// sickly
argn = 2
endif
endif
[events e_npc_cure]
on=@gethit
if (<findid.i_rune_poison>)
spelleffect s_cure,1500
sayua 69,6,6,1 * Zehirden etkilenmez *
attack <src.uid>
endif
on=@spelleffect
if ((<argn> == 20) || (<argn> == 39))
spelleffect s_cure,1500
findid.i_rune_poison.remove
findid.i_rune_poison_field.remove
sayua 69,6,6,1 * Zehirden etkilenmez *
if (rand(2) == 1)
attack <src.uid>
endif
return 1
endif
IF (<argn> == 38) || (<argn> == 49) || (<argn> == 51) || (<argn> == 55) || (<argn> == 57)
sayua 69,6,6,1 * Etkilenmez *
attack <src.uid>
RETURN 1
ENDIF
[events e_npc_summondispel]
on=@itemstep // act.item , ben src.
//if (strmatch(&裟<act.baseid>&裟,&裟i_fx_field_paralyze&裟)) || (strmatch(&裟<act.baseid>&裟,&裟i_fx_field_fire&裟)) || (strmatch(&裟<act.baseid>&裟,&裟i_fx_poison_field&裟))
if (strmatch(&裟<act.type>&裟,&裟t_spell&裟)) // daha sexi yapdım / Noxier 
local.actuid=<act.link>
act.remove
attack <local.actuid>
sayua 69,6,6,1 * Etkilenmez *
return 1
endif
on=@gethit // src.vuran , [] hasar alan
if (<src.flags>&statf_conjured) || (<src.findid.i_rune_summon_creature>
src.spelleffect s_dispel,1000
spelleffect 29 1000
sayua 69,6,6,1 * Buyu etkisini kaldirir *
return 1
endif
[events e_npc_heal]
on=@spelleffect // src=atan , []=yiyen
if (<hits> < <eval <str>/10>)
if (rand(3) == 1)
hits +=<eval <str>/20>
sayua 69,6,6,1 * Kendini Tedavi Eder *
endif
endif
[EVENTS e_hitalma] /// e_Human_HearUnk // buraya ekledim aşada.
on=@damage
src.action -1
action -1
return 1
on=@gethit
src.criminal
action -1
return 1
on=@spelleffect
if !((<argn> == 6) || (<argn> == 25) || (<argn> == 26) || (<argn> == 46) || (<argn> == 48) || (<argn> == 49) || (<argn> == 54) || (<argn> == 55) || (<argn> == 57))
//src.say <src.argn>
src.newitem i_killer
src.act.equip
src.sysmessage @1153 Lanetlendiniz...
FLAGS=<FLAGS>&~statf_war
flags=<flags>&~statf_poisoned
endif
return 1
on=@hittry
src.action -1
action -1
return 1
on=@hit
src.hits 0
src.action -1
action -1
return 1
///////////////////////////
[events e_quest]
[events e_intelligent] // Auto-Dispel, Heal, Cure AI
on=@spelleffect
if ((<argn> == 20) || (<argn> == 39)) // poison, poison field
spelleffect s_cure 1000
if (<hits> < <str>)
hits <hits> + 10
else
hits <str>
endif
sayua 69,6,6,1 Zehirden etkilenmez
sayua 69,6,6,1 Tedavi olur
return 1
endif
else
return 0
endif
On=@NPCSeeNewPlayer
if (<src.findid.i_morpher>) && !(<src.findid.i_pre_morph>) && (<mana> > 20)
// &裟on sight plym dispel&裟 by mana
face
anim 17
sound snd_spell_dispel
src.spelleffect 41 1000
mana (<mana> - 20)
sayua 69,6,6,1 * buyu etkisini kaldirir *
endif
On=@EnvironChange
if (<hits> < <str>) && !(<memoryfindtype.memory_war_targ>)
// &裟heal self gradually when there&裟s no fight going on&裟 by %33 chance
if (rand(3) == 1)
anim 17
sound snd_spell_greater_heal
spelleffect 29 &褳500 1000}
sayua 69,6,6,1 * kendini iyilestirir *
endif
endif
On=@GetHit
if (<findid.i_rune_poison>) || (<findid.i_rune_poison_field>)
// &裟cure self when poisoned&裟 by %33 chance, no mana always cure
if (rand(3) == 1)
face
anim 17
effect 3,0376a,1,30,1
sound snd_spell_cure
findid.i_rune_poison.remove
findid.i_rune_poison_field.remove
sayua 69,6,6,1 * zehir etkisini kaldirir *
endif
elseif (<hits> <= (<str> / 3))
// &裟heal self when fighting&裟 by %33 chance and mana
if (<mana> > 30) && (<argn> < <hits>)
if (rand(3) == 1)
flee
anim 17
sound snd_spell_greater_heal
spelleffect 29 &褳900 1500}
mana (<mana> - 30)
sayua 69,6,6,1 * kendini iyilestirir *
return 1
endif
endif
elseif (<src.findid.i_rune_summon_creature>) && (<mana> > 20)
// &裟dispel summoned creatures&裟 by mana
face
anim 17
sound snd_spell_dispel
src.hits 0
mana (<mana> - 20)
sayu * buyu etkisini kaldirir *
elseif (<src.findid.i_morpher>) && !(<src.findid.i_pre_morph>) && (<mana> > 20)
// &裟dispel plyr if plym&裟ed&裟 by mana
face
anim 17
sound snd_spell_dispel
src.spelleffect 41 1000
mana (<mana> - 20)
sayu * buyu etkisini kaldirir *
endif
[events e_orc_ai]
On=@ItemStep
// &裟orcish looting madness&裟
if (<act.type> == t_corpse) && (<act.link> != 04fffffff) && (<act.amount> == 400) || (<act.amount> == 401))
if !(strmatch(&裟<tag.loot>&裟,&裟<act.uid>&裟))
tag.loot <act.uid>
if (<act.rescount> > 30)
tag.lootrescount 30
else
tag.lootrescount <act.rescount>
endif
leave 1
f_orcish_style
endif
endif
[function f_orcish_style]
if (<eval <tag.lootrescount>> > 0)
tag.lootrescount <eval (<tag.lootrescount> - 1)>
if (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_gold&裟)) || (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_reagent&裟)) (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_potion&裟)) || (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_bandage&裟)) || (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).baseid>&裟,&裟i_pouch_trapped&裟))(strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_armor&裟)) || (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_clothing&裟)) || (strmatch(&裟<act.findcont.(<eval <tag.lootrescount>>).type>&裟,&裟t_food&裟))
try tag.lootstone <act.findcont.(<eval <tag.lootrescount>>).weight>
f_orcish_style_loot <eval <tag.lootrescount>>
tag.lootrescount
else
f_orcish_style
endif
else
sayu * cesetteki esyalara goz atar *
tag.lootrescount
endif
[function f_orcish_style_loot]
if !(<eval (<tag.lootstone> + <weight>)> > <maxweight>)
sayu * cesetten bir esya alir *
try act.findcont.<args>.cont <findlayer.(21).uid>
tag.lootrescount
tag.lootstone
endif
[events e_intel_golem_tinker]
On=@GetHit
//if (<memoryfindtype.memory_ipet.link.canseelos>) && (<argn> > 5)
// if (<memoryfindtype.memory_ipet.link.mana> > 5)
// memoryfindtype.memory_ipet.link.mana (<memoryfindtype.memory_ipet.link.mana> - &褳3 5})
// elseif (<memoryfindtype.memory_ipet.link.hits> > 5)
// memoryfindtype.memory_ipet.link.damage &褳10 20}
// endif
//endif
//On=@SpellEffect
//if ((<argn> == 4) || (<argn> == 7) || (<argn> == 15) || (<argn> == 9) || (<argn> == 10) || (<argn> == 29) || (<argn> == 16) || (<argn> == 17))
// src.f_fizzle
// src.sysmessage @1153 Golemin derisi cok sert. Buyuden etkilenemedi... Biraz Gayret
// return 1
//endif
On=@EnvironChange
food 999
On=@Click
if (<memoryfindtype.memory_ipet>)
message @1153 [ <memoryfindtype.memory_ipet.link.name> ]
endif
[events e_pazar]
On=@GetHit
if (<src.memoryfindtype.memory_ipet>)
if !(<src.findid.i_stoner>)
src.newitem i_stoner
src.act.equip
endif
return 1
endif
if (<src.isevent.e_pazar>)
if !(<src.findid.i_stoner>)
src.newitem i_stoner
src.act.equip
endif
return 1
endif
On=@SpellCast
if !((<argn> == 32) || (<argn> == 45) || (<argn> == 52) || (<argn> == 6) || (<argn> == 2) || (<argn> == 4) || (<argn> == 7) || (<argn> == 9) || (<argn> == 10) || (<argn> == 11) || (<argn> == 15) || (<argn> == 16) || (<argn> == 17) || (<argn> == 36) || (<argn> == 59) || (<argn> == 41))
if !(<SRC.ISGM>)
f_fizzle
sysmessage @1153 Toplum onunde bole seyler yapma. Dislanirsin...
return 1
endif
endif
On=@SkillStart
if !(<src.findid.i_stoner>) && ((<src.action> == id(skill_snooping)) || (<src.action> == skill_snooping) || (<src.action> == id(skill_stealing)) || (<src.action> == skill_stealing))
src.newitem i_stoner
src.act.equip
return 1
endif
[events e_omnia]
On=@GetHit
if (<src.memoryfindtype.memory_ipet>)
if !(<src.findid.i_stoner>)
src.newitem i_stoner
src.act.equip
endif
return 1
endif
if (<kills> > 7) && (<src.isevent.e_delucia>)
if !(<src.findid.i_stoner>)
src.newitem i_stoner
src.act.equip
endif
return 1
endif
on=@attack
sysmessage basarisiz
return 1
On=@SpellCast
events +e_omnia
if !((<argn> == 32) || (<argn> == 45) || (<argn> == 52) || (<argn> == 6) || (<argn> == 2) || (<argn> == 4) || (<argn> == 7) || (<argn> == 9) || (<argn> == 10) || (<argn> == 11) || (<argn> == 15) || (<argn> == 16) || (<argn> == 17) || (<argn> == 36) || (<argn> == 59) || (<argn> == 41))
f_fizzle
return 1
endif
On=@SkillStart
if !(<src.findid.i_stoner>) && ((<src.action> == id(skill_snooping)) || (<src.action> == skill_snooping) || (<src.action> == id(skill_stealing)) || (<src.action> == skill_stealing))
src.newitem i_stoner
src.act.equip
return 1
endif
on=@environchange
if (<findid.i_rune_poison>)
findid.i_rune_poison.remove
message Zehir etkisinden kurtuldu...
return 1
endif
[events e_touch]
On=@GetHit
if ((<argn> > 15) && (<hits> <= <eval (<str> - 10)>))
hits (<hits> + 10)
endif
[events e_nopd]
On=@DClick
if (<uid> != <src.uid>)
return 1
endif
[events e_human_environ]
On=@GetHit
if (<memoryfindtype.memory_ispawned>) && (<npc> == brain_banker) || (<npc> == brain_vendor) || (<npc> == brain_vendor_offduty) || (<npc> == brain_animal_trainer) || (<npc> == brain_healer))
if (<src.npc>))
src.leave 20
else
src.newitem i_killer
src.act.equip
return 1
endif
endif
On=@DClick
if (<distance> < 4) && !(<src.flags>&statf_dead)
if ((<npc> == brain_vendor) || (<npc> == brain_animal_trainer) || (<npc> == brain_healer))
hear buy
return 1
endif
endif
On=@EnvironChange
if (<flags>&statf_war)
return 0
endif
if !(<sector.isdark>) || (<flags>&statf_nightsight)
if (<findlayer(layer_hand2)>)
if (<findlayer(layer_hand2).type> == t_light_lit)
findlayer(layer_hand2).bounce
endif
endif
return 0
endif
if (<findlayer(layer_hand2)>)
if (<findlayer(layer_hand2).type> == t_light_lit)
return 0
endif
endif
if (<findtype.t_light_out>)
findtype.t_light_out.equip
findtype.t_light_out.use
endif
return 0
[EVENTS e_Human_Greet]
on=@click
message @55 [<job>]
on=@gethit
if (<src.isplayer>)
src.sayua 025,6,6,1 * spazm gecirmeye baslar *
timerf 2, src.hits=0
else
src.leave 20
endif
return 1
on=@dclick
if (<distance><3)
hear buy
endif
ON=@NPCHearGreeting
DORAND 20
say Merhaba maceraci.
say Merhaba meceraci, Size nasil yardimci olabilirim?
say Selam!
say Hosgeldiniz!
say Merhaba, Ne istersiniz?
say Merhaba, Size nasil yardimci olabilirim?
say Hosgeldiniz, Hersey burda buyrun.
say Merhaba bayim Ne istersiniz?
say Size nasil yardimci olabilirim ?
say En guzel mallar burda, Buyrun!
say Harika mallarim var , Buyrun!
say En ucuz Mallar burda, Gelin!
say Buyrun
say Gelin En guzel mallar burda.
say Buralarda benden ucuz satan yoktur!
say <src.name> hosgeldin
say Kimleri goruyorum merhaba <src.name>
say <src.name> seni gordugume sevindim
say <src.name> harika mallarim var gormek istermisin
say <src.name> yeni mallarima bakmak istermisin
ENDDO
[EVENTS e_Human_HearUnk]
//ON=@NPCHearUnknown
//Say Uzgunum ama ne dediginizi anlamadim <src.name>
[EVENTS e_Human_ConvInit]
ON=@NPCSeeNewPlayer
// When a new person comes into range do something (attack them?)
if ( <DISTANCE> > 5 ) // too far away ?
return 1 // do nothing for now
ENDIF
FACE
DORAND 20
say Merhaba maceraci.
say Merhaba meceraci, Size nasil yardimci olabilirim?
say Selam!
say Hosgeldiniz!
say Merhaba, Ne istersiniz?
say Merhaba, Size nasil yardimci olabilirim?
say Hosgeldiniz, Hersey burda buyrun.
say Merhaba bayim Ne istersiniz?
say Size nasil yardimci olabilirim ?
say En guzel mallar burda, Buyrun!
say Harika mallarim var , Buyrun!
say En ucuz Mallar burda, Gelin!
say Buyrun
say Gelin En guzel mallar burda.
say Buralarda benden ucuz satan yoktur!
say <src.name> hosgeldin
say Kimleri goruyorum merhaba <src.name>
say <src.name> seni gordugume sevindim
say <src.name> harika mallarim var gormek istermisin
say <src.name> yeni mallarima bakmak istermisin
ENDDO
on=@damage
src.action -1
action -1
return 1
on=@gethit
src.criminal
action -1
return 1
on=@spelleffect
src.newitem i_killer
src.act.equip
src.sysmessage @1153 Lanetlendiniz...
FLAGS=<FLAGS>&~statf_war
flags=<flags>&~statf_poisoned
return 1
on=@hittry
src.action -1
action -1
return 1
on=@hit
src.action -1
action -1
return 1
[events e_human_convinit]
[events e_human_space]
[EVENTS e_Human_Needs]
// Notes: This is called whenever an item is given to an NPC
ON=@NPCAcceptItem
Say Cok tesekkur ederim hep aradigim bisiydi bu
ON=@NPCHearNeed
Say Eger <needname> i bana verirseniz cok sevinirim <src.name>
return 1
[EVENTS e_Human_Scavenge]
ON=@npcSeeWantItem
Say Onu Istiyorum Ver Onu Bana!!!
[EVENTS e_Human_Refuse]
ON=@NPCRefuseItem
if !(strmatch(&裟<argo.baseid>&裟,&裟i_bulk_order_deed&裟))
Say <argo.name> benim ne isime yaramaz <src.name>
endif
[events e_heal_recall]
[events e_heal]
[events e_recall_recall]
[events e_death_counter]
[events e_undead]
ON=@EnvironChange
Return 0
// Enter "//" before Return 0, if you want to make script working
// i like the dark
if (<sector.isdark>) || (<flags>& (statf_nightsight|statf_indoors))
if (!<tag0.lightstr>)
return 0
endif
anim 011
bark 4
str=<tag.lightstr> // restore me.
hits=<str>
tag.lightstr=
karma=<tag0.lightkarma>
tag.lightkarma=//just dispose of this.
fame=<tag0.lightfame>
tag.lightfame=
flags ^= statf_conjured // no loot if killed.
return 0
endif
// i can&裟t live in light areas. weaken me ? or destroy me ?
anim 014
bark 4
if (<tag0.lightstr>)
return 0
endif
if ( <flags>&statf_conjured)
remove
return 1
endif
flags |= statf_conjured // no loot if killed.
tag.lightstr=<str>
str=1
hits=1 // very weak.
tag.lightkarma=<karma> // killing it means nothing now.
karma=-2
tag.lightfame=<fame>
fame=10
return 0
[events e_orc]
[events e_carnivores]
[events e_carnivores2]
[events e_carnivores3]
[events e_terathan]
[events e_ophidian]
[events e_horses]
//on=@environchange
//if (<hits> < 1)
//remove
//return 1
on=@STATCHANGE
return 1
On=@SkillStart
if ((<src.action> == id(skill_wrestling)) || (<src.action> == skill_wrestling)
if (<act.dtag0.atbaglama>==1)
skill fail
endif
endif
on=@death
if (<flags>&statf_poisoned)
spelleffect s_cure,1000
findid.i_rune_poison.remove
findid.i_rune_poison_field.remove
remove
return 1
endif
on=@attack
if (<act.dtag0.atbaglama>=1)
skill fail
return 1
endif
on=@dclick
if (strmatch(&裟<tag0.atbaglama>&裟,&裟01&裟))
src.sysmessage Hayvan su an da bagli durumda...
return 1
endif
on=@gethit
if (strmatch(&裟<tag0.atbaglama>&裟,&裟01&裟))
say etkilenmez...
src.skill fail
return 1
endif
on=@click
if (<memoryfindtype.memory_ipet>)
message @03b2,,1, [<memoryfindtype.memory_ipet.link.name>]
endif
if (strmatch(&裟<name>&裟,&裟bank&裟))
say isim duzenlendi...
name isimfix
endif
if (<hits> < 1)
remove
return 1
if (<karma> < -799)
message @025 <name>
return 1
endif
if (<karma> > -800) && (<karma> < 101)
message @0 <name>
return 1
endif
if (<karma> > 100)
message @063 <name>
return 1
endif
[events e_ostardbunlar]
[events e_notoriety]
[events e_ostards]
on=@STATCHANGE
return 1
on=@dclick
if (strmatch(&裟<tag0.atbaglama>&裟,&裟01&裟))
src.sysmessage Hayvan su an da bagli durumda...
return 1
endif
on=@death
if (<flags>&statf_poisoned)
spelleffect s_cure,1000
findid.i_rune_poison.remove
findid.i_rune_poison_field.remove
remove
return 1
endif
on=@gethit
if (strmatch(&裟<tag0.atbaglama>&裟,&裟01&裟))
say etkilenmez...
src.skill fail
return 1
endif
on=@attack
if (<act.isevent.e_newbie>)
skill fail
say kiyamam sana <src.name>
return 1
endif
if (<act.dtag0.atbaglama>=1)
skill fail
return 1
endif
on=@click
if (<memoryfindtype.memory_ipet>)
message @1153,9 [<memoryfindtype.memory_ipet.link.name>]
endif
if (strmatch(&裟<name>&裟,&裟bank&裟))
say isim duzenlendi...
name isimfix
endif
if (<hits> < 1)
remove
return 1
if (<karma> < -799)
message @025,,1 <name>
return 1
endif
if (<karma> > -800) && (<karma> < 101)
message @0 <name>
return 1
endif
if (<karma> > 100)
message @061,,1 <name>
return 1
endif
[events ei2]
[events e_ai]
[events e_ai_s]
[events 00]
[events 01]
[EVENTS e_npcinvul]
ON=@GetHit
str=1000
dex=1000
hits=1000
attack
src.criminal
say Guards
ON=@Hit
return 1
[EOF]
spazm olayını 56b de yapamadım arkadaslar bir yardım edermisiniz rica etsem? şimdiden teşekkürler...
