/////////////////////

///Furchtlos/////////

///19.12.20009///////

/////////////////////



[plevel 01]

reslen





[function reslen]

if (<src.hits> = 0)

	sdialog d_reslen

return 1

else

src.sysmessage @0845,,1 Sayin <src.name> Olu Degilsin

return 1

endif 



[dialog d_reslen]

0,0

nomove



resizepic 190 150 5120 310 120

resizepic 200 160 9300 290 100

dtext 265 170 47 <serv.name> Reslenme Menu

dtext 225 190 51 Sayin         nerde reslenmek istersin /// burayı özellikle böyle yaptım :)

dtext 265 190 67 <src.name>

dtext 240 220 44 Burda Reslen

dtext 380 220 44 Safede Reslen

button 220 223 5601 5605 1 0 1

button 360 223 5601 5605 1 0 2





[dialog d_reslen button]

on 0

src.sysmessage @07a1,,1 Kurtarici bekliyorsun sanirim :)

return 1



on 1

if (<src.findid.i_reslencem>)

src.sysmessage @0845,,1 Reslenmeyi bekliyorsunuz.

return 1

elseif (<src.hits> = 0)

SRC.NEWITEM i_reslencem

SRC.ACT.EQUIP

src.sysmessage @07a1,,1 15 Saniye sonra resleniceksin

return 1

else

src.sysmessage @0845,,1 Ölü değilsiniz.

return 1



on 2

if (<src.findid.i_reslencem>)

src.sysmessage @0845,,1 Reslenmeyi bekliyorsunuz.

return 1

elseif (<src.hits> = 0)

src.go 1958,2081

src.resurrect

return 1

else

src.sysmessage @0845,,1 Ölü değilsiniz.

return 1



[itemdef i_reslencem]

id i_memory

name reslencem

type t_eq_script





on=@create

attr attr_decay

more1=14



ON=@Equip

SRC.FLAGS=<SRC.FLAGS>|020004

TIMER=1



ON=@Timer

if !(<more1> == 0)

CONT.SYSMESSAGE @07a1,,1 <EVAL <more1>> saniye resleneceksiniz.

more1=<eval <more1>-1>

TIMER=1

return 1

else

cont.resurrect 

cont.flags <cont.flags>&~020004

serv.b @07a1,,1 <cont.name> hayata geri döndü

cont.hits 100

endif

remove

return 1