////////////////UnnameD/////////////////
////////////////////////////////////////

[CHARDEF c_m_sparta]
DEFNAME c_m_sparta
NAME=UnnameD
CAN=MT_WALK|MT_USEHANDS|MT_EQUIP|MT_RUN
ID=C_MAN
DESIRES=i_gold,e_notoriety
AVERSIONS=t_TRAP,t_eerie_stuff

ON=@Create
KARMA={-5000 -6000}
FAME={800 900}
NPC=brain_monster
COLOR=1

Str={5000 10000}
Dex={5000 6000}
Int={500 1000}

SWORDSMANSHIP={7000 7000}
ITEMID={7000 7000}
TACTICS={7000 7000}
TAMING=9999.0


ON=@NPCRestock
ITEMNEWBIE=i_cape
COLOR=0799
ITEMNEWBIE=i_studded_sleeves
COLOR=0799
ITEmNEWBIE=i_katana
NAME=Sparta Mass
COLOR=0799
ITEMNEWBIE=i_shield_heater
COLOR=0799
ITEMNEWBIE=01541
COLOR=0799
ITEMNEWBIE=01c08
COLOR=0799
ITEMNEWBIE=5128
COLOR=07ad
ITEMNEWBIE =i_backpack
COLOR=0799
ITEM=i_key_sparta
ITEM=i_key_sparta
ITEM=i_key_sparta
ITEM=i_key_sparta
ITEM=i_key_sparta


On=@click
message @07a1,1,1 Sparta
return 1

ON=@Hit
SRC.Effect=3,I_FX_Explode,1,22,1
sayua 0481,2,0,eng,*This Is Sparta*

ON=@spelleffect
if (<argn> == 20)
sayua 0845,6,6,0 * Spartalilar Yemez *
spelleffect 29 {500 1000}
src.poison 9999
src.effect 3,i_fx_curse,6,16,0
src.sound snd_SPELL_POISON
return 1
elseif (<argn> == 20)
sayua 0845,6,6,0 * etkilenmez *
spelleffect 29 {500 1000}
return 1
endif

if (<hits> < 500)
sayua 150,2,0,eng,* Sparta Yaratigini Cagirir*
effect=3,i_fire_column,6,35,1
sound snd_spell_lightning
if !(<src.flags>&statf_insubstantial)
serv.newnpc=c_m_sparta2
new.p=<p>
new.fix
new.home=<new.p>
new.homedist 13
sound 0207
endif


if (<ARGN>=27)                              //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=30)                              //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=37)                              //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=57)                              //Des Sanct
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=1)                               //Uus Jux
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=3)                               //Rel Wis
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=5)                               //In Por Ylem
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=8)                               //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF

if (<ARGN>=39)                               //Des Mani
sayua 68,6,6,1 * Etkilenmez *
RETURN 1
ENDIF


on=@gethit
if (<act.baseid>=c_vortex)
sayua 0481,2,0,eng,* büyü etkisini kald?r?r *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_blade_spirit)
sayua 0481,2,0,eng,* büyü etkisini kald?r?r *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_daemon)
sayua 0481,2,0,eng,* büyü etkisini kald?r?r *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<act.baseid>=c_bear_polar)
sayua 0481,2,0,eng,* büyü etkisini kald?r?r *
effect=3,i_fx_heal_effect,6,35,1
sound snd_spell_greater_heal
src.remove
return 1
endif
if (<src.hits> < 500)
if (<flags> &statf_poisoned)
sayua 0481,2,0,eng,* zehiri iyile?tirir *
sound snd_spell_cure
findid.i_rune_poison.remove
return 1
endif

[CHARDEF c_m_sparta2]
DEFNAME=c_m_sparta2
NAME=Sparta Koruyucusu
CAN=MT_RUN|MT_WALK
ID=c_ORC
DAM=2,16
ARMOR=15
RESOURCES=8 i_ribs_raw
SHELTER=r_caves,r_dungeon,r_orc_camp
DESIRES=i_gold,spk_orc,t_corpse
TSPEECH=spk_orc
TEVENTS=e_orc,e_orc_ai
TEVENTS=e_dismount

CATEGORY=Monsters
SUBSECTION=Orcs
DESCRIPTION=Orc KOruma


On=@Click
message @0810 [Sparta Koruma]
return 1



On=@hit
src.effect=1,1
spell_say *Spartayi Korur*
src.poison 800
src.sysmessage @07ad Afalladiniz..
src.sayu Ahh
if (<hits> < 1)
remove 1
src.sysmessage @0805 Korumalar devre disi kaldi..

ON=@Create
NPC=BRAIN_ANIMAL
color=080a
STR={450 500}
DEX={250 300}
INT={96 140}

WRESTLING={5000 7000}
SWORDSMANSHIP={1000 2000}
TACTICS={5000 7000}
ANATOMY={3000 5000}
PARRYING={2000 4000}
FAME=100
KARMA=-999


[ITEMDEF i_key_sparta]
DEFNAME=Sparta Key
Name= Key Of Sparta
ID=i_key_copper

On=@Create
Color=080a

On=@Dclick
Src.go 2282,1138
Remove 1
endif