[chardef c_dummy]
id=c_man
name #NAMES_HUMANMALE
can mt_equip
dam=0,1
armor=0

ON=@NPCRestock
ITEMNEWBIE=i_robe
color=0455
armor=0
name=
HITPOINTS=999
ITEMNEWBIE=i_hair_long
COLOR=0455


on=@create
str=1
dex=1
int=1
HITS={9997 9999}
color=0901
allskills=00
KARMA=-2000
FAME=0
NPC=brain_monster


ITEMNEWBIE=i_robe
attr=010
color=0901
HITPOINTS=999
ITEMNEWBIE=i_hair_long
COLOR=0901


on=@click
message @0901,1,1 [Kombat]
message @07a1,1,1 [Gelisim Alani Gorevlisi]
message @0785,1,1 <name>
return 1

on=@dclick
src.sysmessage @0810 Bana Saldirarak Kombat Yeteneklerini Gelistirebilirsin Acemi!
return 1

on=@gethit
dorand 6
say @0785,1,1 Kendini Nasil Hissediyorsun ?
say @0785,1,1 Aferim Acemi, Aferim...
say @0785,1,1 Senden Hic Birsey Olmaz !
say @0785,1,1 Elinden Gelenin En Iyisi Bu mu?
say @0785,1,1 Hahahaha!
say @0785,1,1 Gozlerini Hedefinden Ayirma Acemi !
enddo

HITS 9999
str 1
dex 1
if (<flags> &statf_poisoned)
findid.i_rune_poison.remove
sound snd_spell_cure
src.checkpoi
else
HITS 9999
STR 1
DEX 1


[function checkpoi]
if ((<skilllock[27]> == 0) && (<skilltotal> < 800.0)
if (rand(4) == 1)
poisoning (<poisoning> + 1)
endif
endif

on=@attack
return 1

IF ( <SRC.poisoning> >= 1000)
src.sysmessage @07a7,,1 Poisoning yeteneginiz 100 daha fazla gelistiremezsiniz...
return 1
else
src.poisoning=<src.poisoning>+1