[plevel 1]

stat



[plevel 2]

statfixle





[function stat]

stchk

if (<isevent.e_str>)

	src.sysmessage @1153 Su an str'niz dusus durumunda.

elseif (<isevent.e_dex>)

	src.sysmessage @1153 Su an dex'iniz dusus durumunda.

elseif (<isevent.e_int>)

	src.sysmessage @1153 Su an int'iniz dusus durumunda.

elseif (<isevent.e_spr>)

	src.sysmessage @1153 Su an statlariniz koruma altinda.

else

	src.sysmessage @1153 Henuz statlarinizla ilgili ayar yapmadiniz.

endif

dialog d_stat



[function stchk]

if (strmatch('<account>','motor'))

return 1

if !(<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

	if (<str> > 100)

		str 100

	elseif (<dex> > 100)

		dex 100

	elseif (<int> > 100)

		int 100

	endif

endif

endif



// Gump



[DIALOG d_statdusur]

100,100

100,100

resizepic 0 0 3600 300 160

dtext 20 20 1153 Dusurmek Istediginiz Statlari Seciniz

dtext 40 50 0455 Str(-1)

dtext 40 80 0455 Dex(-1)

dtext 40 110 0455 Int(-1)



button 20 50 2117 2118 1 0 1

button 20 80 2117 2118 1 0 2

button 20 110 2117 2118 1 0 3







[Dialog d_statdusur BUTTON]

onbutton=0

src.stat

ONBUTTON=1

if (<src.str> > 25)

SRC.STR=(<SRC.STR> -1)

SRC.sysmessage @1153 Strenghtiniz bir dusurulmustur.

src.dialog d_statdusur

else

src.dialog d_statdusur

src.src.sysmessage @1153 Daha fazla dusuremezsiniz...

return 1

endif



ONBUTTON=2

if (<src.dex> > 25)

SRC.DEX=(<SRC.DEX> -1)

SRC.sysmessage @1153 Dexterityniz bir dusurulmustur.

src.dialog d_statdusur

else

src.dialog d_statdusur

src.src.sysmessage @1153 Daha fazla dusuremezsiniz...

endif

ONBUTTON=3

if (<src.int> > 25)

SRC.INT=(<SRC.INT> -1)

SRC.sysmessage @1153 Intelligenceniz bir dusurulmustur.

src.dialog d_statdusur

else

src.dialog d_statdusur

src.src.sysmessage @1153 Daha fazla dusuremezsiniz...

endif



[DIALOG d_statyukselt]

100,100

resizepic 0 0 3600 300 160

dtext 20 20 1153 Arttirmak Istediginiz Statlari Seciniz

dtext 40 50 0455 Str(+1)

dtext 40 80 0455 Dex(+1)

dtext 40 110 0455 Int(+1)



button 20 50 2117 2118 1 0 1

button 20 80 2117 2118 1 0 2

button 20 110 2117 2118 1 0 3







[Dialog d_statyukselt BUTTON]

onbutton=0

src.stat

ONBUTTON=1

if !(<src.str> < 100) | 

var.smsgx 0497

src.sysmessage @080a Sizin Str niz zaten 100 Daha Fazla Yukseltemezsiniz.

dialog d_stat

elseIF !(<EVAL(<SRC.STR> + <SRC.DEX> + <SRC.INT>)> < 225)

var.smsgx 0497

src.sysmessage @080a Stat cap 225 Olmus.

dialog d_stat

else

src.str=<src.str>+1

dialog d_statyukselt

endif

ONBUTTON=2

if !(<src.dex> < 100) | 

var.smsgx 0497

src.sysmessage @080a Sizin Str niz zaten 100 Daha Fazla Yukseltemezsiniz.

dialog d_stat

elseIF !(<EVAL(<SRC.STR> + <SRC.DEX> + <SRC.INT>)> < 225)

var.smsgx 0497

src.sysmessage @080a Stat cap 225 Olmus.

dialog d_stat

else

src.dex=<src.dex>+1

dialog d_statyukselt

endif

ONBUTTON=3

if !(<src.int> < 100) | 

var.smsgx 0497

src.sysmessage @080a Sizin Str niz zaten 100 Daha Fazla Yukseltemezsiniz.

dialog d_stat

elseIF !(<EVAL(<SRC.STR> + <SRC.DEX> + <SRC.INT>)> < 225)

var.smsgx 0497

src.sysmessage @080a Stat cap 225 Olmus.

dialog d_stat

else

src.int=<src.int>+1

dialog d_statyukselt

endif













[dialog d_stat]

100,100

resizepic 0 0 3600 300 200

dtext 20 20 1153 <serv.name> Stat Ayarlari Menusu

dtext 40 50 0455 Statlarimi Arttir

dtext 40 80 0455 Statlarimi Dusur

dtext 40 110 0455 Statlarimi Koru

dtext 40 140 0455 Stat Korumasini Kaldir



button 20 50 2117 2118 1 0 1

button 20 80 2117 2118 1 0 2

button 20 110 2117 2118 1 0 3

button 20 140 2117 2118 1 0 4







[dialog d_stat button]

onbutton=1

dialog d_statyukselt



onbutton=2

dialog d_statdusur







Onbutton=3

if (<flags>&statf_dead)

	src.sysmessage @1153 Bu islemi olu iken yapamazsiniz.

	return 1

endif

if (<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

	src.sysmessage @1153 Statlarinizi etkileyen bir buyunun etkisi

	src.sysmessage @1153 altindayken bu secenegi kullanamazsiniz.

	return 1

endif

findlayer(1).bounce

findlayer(2).bounce

findlayer(3).bounce

findlayer(4).bounce

findlayer(5).bounce

findlayer(6).bounce

findlayer(7).bounce

findlayer(8).bounce

findlayer(10).bounce

findlayer(12).bounce

findlayer(13).bounce

findlayer(14).bounce

findlayer(17).bounce

findlayer(18).bounce

findlayer(19).bounce

findlayer(20).bounce

findlayer(22).bounce

findlayer(23).bounce

findlayer(24).bounce

var.stats <eval(<str>+<int>+<dex>)>

if (<eval <var.stats>> == 225)

	src.sysmessage @1153 Stat'lariniz korumaya alindi.

	tag.ostr <str>

	tag.odex <dex>

	tag.oint <int>

	events -e_str

	events -e_dex

	events -e_int

	events +e_spr





else if (strmatch('<account>','motor'))

src.sysmessage @1153 Stat'lariniz korumaya alindi.

	tag.ostr <str>

	tag.odex <dex>

	tag.oint <int>

	events -e_str

	events -e_dex

	events -e_int

	events +e_spr

else if

src.sysmessage @1153 Bu secenegi kullanabilmeniz icin stat toplaminizin 225 olmasi gerekiyor.

dialog d_stat

endif



on=4

src.events -e_spr

src.smg Koruma Kaldirildi...

// Eventz



[events e_spr]

On=@SkillStart

if (<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

	return 0

else

	str <tag.ostr>

	int <tag.oint>

	dex <tag.odex>

endif



On=@EnvironChange

var.stats <eval(<tag.ostr>+<tag.oint>+<tag.odex>)>

if !(<eval <var.stats>> == 225)

	events -e_spr

	src.sysmessage @1153 Stat'lariniz artik korunmuyor.

	tag.ostr

	tag.oint

	tag.odex

endif



[events e_str]

On=@SkillStart

if (<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

	return 0

endif



var.stats <eval (<str> + <int> + <dex>)>

if (<eval <var.stats>> > 225)

	statcapstr

endif



[events e_dex]

On=@SkillStart

if (<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

	return 0

endif



var.stats <eval (<str> + <int> + <dex>)>

if (<eval <var.stats>> > 225)

	statcapdex

endif



[events e_int]

On=@SkillStart

if (<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

	return 0

endif



var.stats <eval (<str> + <int> + <dex>)>

if (<eval <var.stats>> > 225)

	statcapint

endif



// Functionz



[function statcapstr]

if (<str> > 25)

	str (<str> - 1)

	var.stats <eval (<str>+<int>+<dex>)>

	if (<eval <var.stats>> > 225)

		statcapstr

	endif

endif



[function statcapdex]

if (<dex> > 25)

	dex (<dex> - 1)

	var.stats <eval (<str>+<int>+<dex>)>

	if (<eval <var.stats>> > 225)

		statcapdex

	endif

endif



[function statcapint]

if (<int> > 25)

	int (<int> - 1)

	var.stats <eval (<str>+<int>+<dex>)>

	if (<eval <var.stats>> > 225)

		statcapint

	endif

endif





[function statfixle]

src.consume 1000 i_statficleci

src.newitem i_statfixleci

src.act.equip

return 1



[itemdef i_statfixleci]

name=Statfixleci

id=i_memory

type=t_eq_script



on=@create

color=0455

attr=04



on=@equip

target @1153 Kimin Stat bugunu fixleyelim?

return 1





on=@targon_char

src.targ.moddex 0

src.targ.modstr 0

src.targ.modint 0

src.targ.smg Stat Bugunuz Fixlenmistir.Statlarinizi Ayarlayip Korumaya Aliniz.

return 1





[itemdef i_statcibube]

id=i_grave_stone

weight=999

type=t_eq_script

name=Stat Ayarlayicisi



on=@create

attr=04

color=080a



on=@timer

serv.allclients statdenetle

timer 10

return 1



on=@Dclick

timer 1

return 1



[function statdenetle]

if (<hits> == 0)

elseif !(<findlayer(32)> || <findlayer(44)> || <findlayer(47)>)

moddex 0

modstr 0

modint 0

return 1

endif



[EOF]