Kırım Kongolu Kene Scripti

///////////Kırım Kongo Virüsü Tasiyan Kene Scripti/////////////////////
/////////////////////Written By Nicole////////////////////////////////
[Itemdef i_kırımkongocu]
id i_gold
type t_eq_script

on=@create
attr attr_invis||attr_decay

on=@timer
if !(<cont.isevent.e_kene>)
cont.say @080f **Kene Sokar**
cont.sysmessage @25 Kene soktu hemen bi hastaneye git bence!
cont.event +e_kene
timer 900
return 1

[Events e_kene]
On=@EnvironChange
if (<src.tag0.kene> ==0)
src.heltye
src.say @80f **Ateslenir**
return 1
elseif (<src.tag0.kene> ==1)
src.heltye
src.say @80f **Atesten Kivranir**
return 1
elseif (<src.tag0.kene> ==2)
src.heltye
src.say @80f **Kırım Kongodan Olmek Uzeredir**
return 1
elseif (<src.tag0.kene> ==3)
src.heltye
src.say @80f **Kene tarafindan taklaya gelir**
return 1
endif

[Function heltye]
if (<src.tag0.kene> < 1)
src.hits +=-10
return 1
elseif (<src.tag0.kene> == 1)
src.hits +=-15
return 1
elseif (<src.tag0.kene> == 2)
src.hits +=-20
return 1
elseif (<src.tag0.kene> == 2)
src.hits 0
src.sysmessage @0481 Geberdiniz!
return 1
endif

[Chardef c_h_doktor]
ID=c_man 
CAN=MT_EQUIP
DAM=1,2
ARMOR=1
SOUND=snd_HUMAN_M_DIE_01
TSPEECH=doktooor

ON=@Click
message @0481 [Doktor Civan]
return 1

ON=@Create 
KARMA=&&#35123;5000 5000}
NPC=brain_npc
STR=10 
DEX=10
INT=10
src.invul 1
HITS=&&#35123;9997 9999}
ITEMNEWBIE=i_studded_tunic
COLOR=0810
ITEMNEWBIE=i_studded_gorget
COLOR=0810
ITEMNEWBIE=i_studded_gloves
COLOR=0810
ITEMNEWBIE=i_studded_sleeves
COLOR=0810
ITEMNEWBIE=i_leather_leggings
COLOR=0810
 
[SPEECH doktooor]
on=*Doktor Civanim*
SAY Genemi kene soktu dur bekle bi dk.
if (<src.events.e_kene>)
src.events -e_kene
src.hits 100
src.sysmessage Doktor Seni iyilestirdi hadi gene iyisin.
say Gecmis olsun daha dikkatli olmalisin.
else
say Sizi kene sokmamis sokunca ugrayiniz.