arkadaşlar bende bi level scpsi var onlan biraz oynamınızı istiyorum 
simdi level arttırmak için bir oyuncu birini kestigi zaman puan gelsin ona göre level artsın birde playerın isminin üstünde level kaç oldugunu yazmasını istiyorum örneğin [ Level : X ] Gibi
Scp;
********************************************
// LEVEL.SCP - LEVEL SYSTEM &จ
// PROJE BASLANGIC TARIHI:13 Haziran 2004 &จ
////// ----------------------------&จ&จ
////// ------------Lyn-------------&จ&จ
////// ----------------------------&จ&จ
VERSION=0.55
[plevel 1]
level
[DIALOG d_leveling_system]
50,100
page 0
resizepic 50 10 5054 450 310
//resizepic 50 10 3000 450 310
//resizepic 50 10 9270 450 310 // dis lacivert bg
//resizepic 60 20 9350 430 290
//resizepic 60 20 3500 430 290 // ust beyaz bg
htmlgump 200 30 400 20 0 0 0 // baslik seysi
resizepic 325 70 9350 150 72 // STAT CERCEVESI
htmlgump 423 280 25 20 9 0 0 // cikis seysi
button 389 277 4018 4019 1 0 0 // cikis butonu
resizepic 75 225 9350 400 40 // exp kısmı
button 80 79 2224 2118 1 0 1 // title
button 80 99 2224 2118 2 0 2 // level
button 80 119 2224 2118 3 0 3 // trivia
button 80 139 2224 2118 4 0 4 // quest
button 80 159 2224 2118 5 0 5 // tier
htmlgump 103 77 100 20 3 0 0 // title
htmlgump 180 77 100 20 14 0 0 // tag.title
//text 103 77 1123 3
//text 180 77 1123 14
htmlgump 103 97 100 20 4 0 0 // level
htmlgump 185 97 100 20 15 0 0 // level
htmlgump 103 117 100 20 5 0 0 // trivia
htmlgump 195 117 100 20 16 0 0 // trivia
htmlgump 103 137 100 20 6 0 0 // quest
htmlgump 195 137 100 20 17 0 0 // quest
htmlgump 103 157 100 20 7 0 0 // tier
htmlgump 178 157 100 20 18 0 0 // tier
htmlgump 103 225 100 20 10 0 0 // gerekli
htmlgump 190 225 100 20 11 0 0 // exp
htmlgump 290 225 100 20 12 0 0 // exp
htmlgump 355 225 100 20 19 0 0 // exp
htmlgump 103 245 100 20 13 0 0 // exp
htmlgump 200 245 100 20 20 0 0 // exp
htmlgump 335 77 100 20 21 0 0 // STR / HITS
htmlgump 400 77 100 20 22 0 0 // STR / HITS
htmlgump 335 97 100 20 23 0 0 // <MANA>/<INT>
htmlgump 410 97 100 20 24 0 0 // <MANA>/<INT>
htmlgump 335 117 100 20 25 0 0 // <STAM>/<DEX>
htmlgump 405 117 100 20 26 0 0 // <STAM>/<DEX>
htmlgump 370 205 100 20 27 0 0 // REqlam (:
[DIALOG d_leveling_system text]
<var.pg_font1>><serv.name> Level System //1
<var.pg_font1>><tag.title>
<var.pg_font1>>Tekrar Yap
<var.pg_font1>>New Title :
<var.pg_font1>>New Level :
<var.pg_font1>>Trivia Points :
<var.pg_font1>>Quest Points :
<var.pg_font1>>Tier Level :
<var.pg_font1>>Weapons
<var.pg_font1>>Cikis
<var.pg_font1>>Level atlamak // 10
<var.pg_font1>>icin gerekli olan
<var.pg_font1>>experience:
<var.pg_font1>>Kendi experince:
<var.pg_font1>><TAG.tITLE>
<var.pg_font1>><EVAL <TAG.TITLED>>
<var.pg_font1>><EVAL <tag.TRIVIAS>>
<var.pg_font1>><EVAL <tag.questpoints>>
<var.pg_font1>><EVAL <TAG.TIER>>
<var.pg_font1>><EVAL <SRC.TAG.TNL>>
<var.pg_font1>><eval <tag.experience>> // 20
<var.pg_font1>>Strength :
<var.pg_font1>><HITS>/<STR>
<var.pg_font1>>Intelligence :
<var.pg_font1>><MANA>/<INT>
<var.pg_font1>>Dexterity :
<var.pg_font1>><STAM>/<DEX>
<var.pg_font1>><serv.name>
[DIALOG d_leveling_system BUTTON]
ON=0
sysmessage @1153 Level menusu kapatildi....
ON=1
IF <EVAL <tag.EXPERIENCE>> > 999999
tag.TITLE=Gladiator
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> > 499999
tag.TITLE=Exhaulter
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> > 299999
tag.TITLE=Warrior
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> > 199999
tag.TITLE=Nightblade
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> > 9999
tag.TITLE=Expert
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> > 6999
tag.TITLE=Crew Worker
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> > 3999
tag.TILE=Beginner
SOUND 512
RETURN 0
ELSE
IF <EVAL <tag.EXPERIENCE>> < 3998
tag.TITLE=Newbie
SOUND 512
RETURN 0
ON=2
CHECKSTATS
ON=3
SRC.MENU m_trivia
ON=4
SRC.MENU m_questitems
ON=5
IF <EVAL <TAG.TITLED>>=25
MENU m_remort
RETURN 0
ELSE
message @54 Henuz tier atlayacak seviyeye gelememissiniz...
RETURN 0
//**********************************************************
//** EVENTS **
//**********************************************************
[EVENTS e_tier1]
ON=@CLICK
IF (<SRC.BODY>=c_man)
message @1153 Tier <EVAL <TAG.TIER>>, Level <EVAL <TAG.TITLED>>
RETURN 0
IF (<FLAGS>&statf_criminal)
RETURN 0
ELSEIF (<KILLS>>=4)
RETURN 0
ELSE
TAG.SPEECHCOLOR <SPEECHCOLOR>
SPEECHCOLOR 00bd
SPEAK <NAME>
SPEECHCOLOR <TAG.SPEECHCOLOR>
RETURN 1
ENDIF
RETURN 0
ENDIF
RETURN 0
[EVENTS e_woman]
ON=@CLICK
IF (<SRC.BODY>=c_woman
message @1153 Tier <EVAL <TAG.TIER>> Level <EVAL <TAG.TITLED>>
RETURN 0
IF (<FLAGS>&statf_criminal)
RETURN 0
ELSEIF (<KILLS>>=4)
RETURN 0
ELSE
TAG.SPEECHCOLOR <SPEECHCOLOR>
SPEECHCOLOR 00bd
SPEAK <NAME>
SPEECHCOLOR <TAG.SPEECHCOLOR>
RETURN 1
ENDIF
RETURN 0
ENDIF
RETURN 0
ON=@HIT
IF (<FINDLAYER(2).UID>)
VAR.X=RAND(20)
IF X=0
SYSMESSAGE @1153 SHIELD PUNCH!
SRC.HITS=<SRC.HITS> + (-25)
ANIM 14
RETURN 0
ELSE
RETURN 0
ENDIF
ON=@DEATH
SRC.NEWITEM=i_yesnon
SRC.ACT.EQUIP
ON=@GetHit
[ITEMDEF i_yesnon]
DEFNAME=i_yesnon
ID=i_handr_1
NAME=RES YES NO
TYPE=t_EQ_script
LAYER=layer_special
ON=@CREATE
ATTR=attr_decay
ON=@EQUIP
TIMER=5
ON=@TIMER
CONT.MENU m_res_yesno
REMOVE
[TYPEDEF t_res_yesno]
ON=@DCLICK
IF (<SRC.UID>=<LINK>)
MENU m_res_yesno
RETURN 0
ELSE
SRC.SYSMESSAGE This is not your corpse!
RETURN 0
[MENU m_res_yesno]
Do you wish to resurrect? You will loose experience if you do!
ON=0 Evet!
IF (<EVAL <SRC.TAG.EXPERIENCE>><250)
SRC.SYSMESSAGE @54 Canlanabilmek icin yeterli experience&裟e sahip degilsiniz!
RETURN 0
ELSE
SRC.RESURRECT
SRC.NEWITEM=i_temp_safe
SRC.ACT.ATTR=attr_decay
SRC.ACT.EQUIP
IF (<EVAL <SRC.TAG.TITLED>>>20)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-5000)
SRC.SYSMESSAGE You have lost alot of experience.
RETURN 0
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>15)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-2500)
SRC.SYSMESSAGE You have quite a bit of experience.
RETURN 0
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>10)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-1000)
SRC.SYSMESSAGE You have lost a bit of experience.
RETURN 0
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>5)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-500)
SRC.SYSMESSAGE You have lost alot of experience.
RETURN 0
ELSE
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-250)
SRC.SYSMESSAGE You have lost some experience.
RETURN 0
ON=0 Hayir!
SRC.SYSMESSAGE You have chosen not to resurrect.
RETURN 0
[ITEMDEF i_temp_safe]
DEFNAME=i_temp_safe
ID=i_handr_1
NAME=TEMP SAFE
LAYER=layer_special
TYPE=t_EQ_script
ON=@CREATE
ATTR=ATTR_DECAY
ON=@EQUIP
CONT.INVUL
CONT.SYSMESSAGE @54 5 Saniye olumsuz kalacaksiniz.
TIMER=5
ON=@TIMER
CONT.SYSMESSAGE @54 Uzerinizdeki korumalar kalkti.
CONT.INVUL
REMOVE
[EVENTS e_exp1]
ON=@DEATH
SRC.NEWITEM=i_expgainlow
SRC.ACT.MOREX=&褳10 1 11 1 12 1 13 1 14 1 15 1 16 1 17 1 18 1 19 1 20 1}
SRC.ACT.MOREY=1
SRC.ACT.ATTR=0002
IF (<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>)
SRC.ACT.CONT=<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>
RETURN 0
ELSE
IF (<SRC.MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>)
SRC.ACT.CONT=<MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>
RETURN 0
ELSE
RETURN 0
[ITEMDEF i_expgainlow]
DEFNAME=i_expgainlow
NAME=EXP GAIN
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
TIMER=1
ON=@TIMER
IF !(<CONT.ACCOUNT.PLEVEL>)
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.NOEXPE>>=1)
CONT.SYSMESSAGE Your cannot gain experience. [NOEXP] option is on.
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=5)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE @1153 Bonus buldunuz.
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu.
RETURN 0
ENDIF
REMOVE
ELSE
CONT.SYSMESSAGE @54 Experience alamadiniz.
REMOVE
//////////////////////////////////////////////////////////////////////
[ITEMDEF i_expg]
DEFNAME=i_expg
NAME=EXP GAIN
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
ATTR=02
ON=@DCLICK
DIALOG d_leveling_system
CHECKSTATS
REMOVE
[EVENTS e_exp2]
ON=@DEATH
SRC.NEWITEM=i_expgainmiddle
SRC.ACT.MOREX=&褳20 1 21 1 22 1 23 1 24 1 25 1 26 1 27 1 28 1 29 1 30 1 31 1 32 1 33 1 34 1 35 1}
SRC.ACT.MOREY=1
SRC.ACT.ATTR=0002
IF (<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>)
SRC.ACT.CONT=<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>
RETURN 0
ELSE
IF (<SRC.MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>)
SRC.ACT.CONT=<MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>
RETURN 0
ELSE
RETURN 0
[ITEMDEF i_expgainmiddle]
DEFNAME=i_expgainmiddle
NAME=EXP GAIN
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
TIMER=1
ON=@TIMER
IF !(<CONT.ACCOUNT.PLEVEL>)
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.NOEXPE>>=1)
CONT.SYSMESSAGE Your cannot gain experience. [NOEXP] option is on.
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=10)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience aldiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE @54 TRIVA POINT BULDUNUZ...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
CONT.SYSMESSAGE @54 Experience alamadiniz.
REMOVE
//////////////////////////////////////////////////////////////////////
[EVENTS e_exp3]
ON=@DEATH
SRC.NEWITEM=i_expgainhigh
SRC.ACT.MOREX=&褳30 1 31 1 32 1 33 1 34 1 35 1 36 1 37 1 38 1 39 1 40 1 41 1 42 1 43 1 44 1 45 1 46 1 47 1 48 1 49 1 50 1}
SRC.ACT.MOREY=1
SRC.ACT.ATTR=0002
IF (<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>)
SRC.ACT.CONT=<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>
RETURN 0
ELSE
IF (<SRC.MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>)
SRC.ACT.CONT=<MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>
RETURN 0
ELSE
RETURN 0
[ITEMDEF i_expgainhigh]
DEFNAME=i_expgainhigh
NAME=EXP GAIN
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
TIMER=1
ON=@TIMER
IF !(<CONT.ACCOUNT.PLEVEL>)
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.NOEXPE>>=1)
CONT.SYSMESSAGE Your cannot gain experience. [NOEXP] option is on.
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=3)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(25)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu.
RETURN 0
ENDIF
REMOVE
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=15)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
CONT.SYSMESSAGE @54 Experience alamadiniz.
REMOVE
//////////////////////////////////////////////////////////////////////
[EVENTS e_exp4]
ON=@DEATH
SRC.NEWITEM=i_expgainveryhigh
SRC.ACT.MOREX=&褳40 1 41 1 42 1 43 1 44 1 45 1 46 1 47 1 48 1 49 1 50 1 51 1 52 1 53 1 54 1 55 1 56 1 57 1 58 1 59 1 60 1}
SRC.ACT.MOREY=1
SRC.ACT.ATTR=0002
IF (<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>)
SRC.ACT.CONT=<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>
RETURN 0
ELSE
IF (<SRC.MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>)
SRC.ACT.CONT=<MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>
RETURN 0
ELSE
RETURN 0
[ITEMDEF i_expgainveryhigh]
DEFNAME=i_expgainveryhigh
NAME=EXP GAIN
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
TIMER=1
ON=@TIMER
IF !(<CONT.ACCOUNT.PLEVEL>)
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.NOEXPE>>=1)
CONT.SYSMESSAGE Your cannot gain experience. [NOEXP] option is on.
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=3)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(12)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=8)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(25)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=20)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
CONT.SYSMESSAGE @54 Experience kazanamadiniz.
REMOVE
//////////////////////////////////////////////////////////////////////
[EVENTS e_exp5]
ON=@DEATH
SRC.NEWITEM=i_expgainhighest
SRC.ACT.MOREX=&褳40 1 41 1 42 1 43 1 44 1 45 1 46 1 47 1 48 1 49 1 50 1 51 1 52 1 53 1 54 1 55 1 56 1 57 1 58 1 59 1 60 1 61 1 62 1 63 1 64 1 65 1 66 1 67 1 68 1 69 1 70 1 71 1 72 1 73 1 74 1 75 1 76 1 77 1 78 1 79 1 80 1 81 1 82 1 83 1 84 1 85 1 86 1 87 1 88 1 89 1 90 1 91 1 92 1 93 1 94 95 1 96 1 97 1 98 1 99 1 100 1 }
SRC.ACT.ATTR=0002
SRC.ACT.MOREY=1
IF (<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>)
SRC.ACT.CONT=<SRC.MEMORYFINDTYPE.MEMORY_HARMEDBY.LINK>
RETURN 0
ELSE
IF (<SRC.MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>)
SRC.ACT.CONT=<MEMORYFINDTYPE.MEMORY_IAGGRESSOR.LINK>
RETURN 0
ELSE
RETURN 0
[ITEMDEF i_expgainhighest]
DEFNAME=i_expgainhighest
NAME=EXP GAIN
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
TIMER=1
ON=@TIMER
IF !(<CONT.ACCOUNT.PLEVEL>)
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.NOEXPE>>=1)
CONT.SYSMESSAGE Your cannot gain experience. [NOEXP] option is on.
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=3)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(6)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=8)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(12)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu..
RETURN 0
ENDIF
REMOVE
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=20)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(25)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
IF (<EVAL <CONT.TAG.TITLED>><=26)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @54 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE Trivia Point Buldunuz...
CONT.TAG.TRIVIAS=<EVAL <CONT.TAG.TRIVIAS>> + <MOREY>
SERV.ALLCLIENTS SYSMESSAGE @1153 <CONT.NAME> bonus buldu...
RETURN 0
ENDIF
REMOVE
ELSE
CONT.SYSMESSAGE Experience kazanamadiniz.
REMOVE
//**********************************************************
//** FUNCTIONS **
//**********************************************************
[FUNCTION checkstats]
IF (<EVAL <TAG.EXPERIENCE>><99)
IF (<EVAL <TAG.TITLED>>=1)
STR=100
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=2)
RETURN 1
ENDIF
STR=100
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
TAG.TITLED=1
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 1 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>><999)
IF (<EVAL <TAG.TITLED>>=2)
STR=110
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=3)
RETURN 1
ENDIF
TAG.TITLED=2
STR=110
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 2 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>999999)
IF (<EVAL <TAG.TITLED>>=25)
STR=1600
RETURN 1
ENDIF
TAG.TITLED=25
STR=1600
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 25 oldu. TEBRIKLER...
SERV.ALLCLIENTS SOUND 045
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>499999)
IF (<EVAL <TAG.TITLED>>=24)
STR=1500
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=25)
RETURN 1
ENDIF
TAG.TITLED=24
STR=1500
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 24 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>299999)
IF (<EVAL <TAG.TITLED>>=23)
STR=1400
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=24)
RETURN 1
ENDIF
TAG.TITLED=23
STR=1400
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 23 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>199999)
IF (<EVAL <TAG.TITLED>>=22)
STR=1300
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=23)
RETURN 1
ENDIF
TAG.TITLED=22
STR=1300
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 22 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>149999)
IF (<EVAL <TAG.TITLED>>=21)
STR=1200
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=22)
RETURN 1
ENDIF
TAG.TITLED=21
STR=1200
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 21 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>99999)
IF (<EVAL <TAG.TITLED>>=20)
STR=1100
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=21)
RETURN 1
ENDIF
TAG.TITLED=20
STR=1100
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 20 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>89999)
IF (<EVAL <TAG.TITLED>>=19)
STR=1000
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=20)
RETURN 1
ENDIF
TAG.TITLED=19
STR=1000
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 19 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>79999)
IF (<EVAL <TAG.TITLED>>=18)
STR=900
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=19)
RETURN 1
ENDIF
TAG.TITLED=18
STR=900
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 18 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>69999)
IF (<EVAL <TAG.TITLED>>=17)
STR=800
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=18)
RETURN 1
ENDIF
TAG.TITLED=17
STR=800
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 17 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>59999)
IF (<EVAL <TAG.TITLED>>=16)
STR=700
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=17)
RETURN 1
ENDIF
TAG.TITLED=16
STR=700
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 16 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>49999)
IF (<EVAL <TAG.TITLED>>=15)
STR=600
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=16)
RETURN 1
ENDIF
TAG.TITLED=15
STR=600
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 15 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>39999)
IF (<EVAL <TAG.TITLED>>=14)
STR=500
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=15)
RETURN 1
ENDIF
TAG.TITLED=14
STR=500
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 14 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>29999)
IF (<EVAL <TAG.TITLED>>=13)
STR=450
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=14)
RETURN 1
ENDIF
TAG.TITLED=13
STR=450
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 13 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>19999)
IF (<EVAL <TAG.TITLED>>=12)
STR=400
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=13)
RETURN 1
ENDIF
TAG.TITLED=12
STR=400
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 12 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>14999)
IF (<EVAL <TAG.TITLED>>=11)
STR=350
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=12)
RETURN 1
ENDIF
TAG.TITLED=11
STR=350
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 11 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>9999)
IF (<EVAL <TAG.TITLED>>=10)
STR=300
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=11)
RETURN 1
ENDIF
TAG.TITLED=10
STR=300
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 10 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>8999)
IF (<EVAL <TAG.TITLED>>=9)
STR=275
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=10)
RETURN 1
ENDIF
TAG.TITLED=9
STR=275
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 9 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>7999)
IF (<EVAL <TAG.TITLED>>=8)
STR=250
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=9)
RETURN 1
ENDIF
TAG.TITLED=8
STR=250
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 8 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>6999)
IF (<EVAL <TAG.TITLED>>=7)
STR=225
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=8)
RETURN 1
ENDIF
TAG.TITLED=7
STR=225
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 7 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>5999)
IF (<EVAL <TAG.TITLED>>=6)
STR=200
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=7)
RETURN 1
ENDIF
TAG.TITLED=6
STR=200
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 6 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>4999)
IF (<EVAL <TAG.TITLED>>=5)
STR=175
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=6)
RETURN 1
ENDIF
TAG.TITLED=5
STR=175
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 5 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>3999)
IF (<EVAL <TAG.TITLED>>=4)
STR=150
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=5)
RETURN 1
ENDIF
TAG.TITLED=4
STR=150
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 4 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>1999)
IF (<EVAL <TAG.TITLED>>=3),
STR=125
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=4)
RETURN 1
ENDIF
TAG.TITLED=3
STR=125
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 3 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>1000)
IF (<EVAL <TAG.TITLED>>=2)
STR=110
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=3)
RETURN 1
ENDIF
TAG.TITLED=2
STR=110
DEX=<DEX> + &褳3 10}
INT=<INT> + &褳1 5}
SERV.ALLCLIENTS SYSMESSAGE @54 <NAME> level 2 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
[FUNCTION level]
SRC.EVENTS=e_tier1
SRC.EVENTS=e_woman
IF (<EVAL <SRC.TAG.TITLED>>=1)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=100
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=2)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=2000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=3)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=4000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=4)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=5000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=5)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=6000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=6)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=7000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=7)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=8000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=8)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=9000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=9)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=10000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=10)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=15000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=11)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=20000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=12)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=30000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=13)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=40000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=14)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=50000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=15)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=60000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=16)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=70000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=17)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=80000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=18)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=90000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=19)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=100000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=20)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=150000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=21)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=200000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=22)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=300000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=23)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=500000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=24)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=1000000
DIALOG d_leveling_system
RETURN 0
ELSEIF (<EVAL <SRC.TAG.TITLED>>=25)
IF (<SRC.DEX>>100)
SRC.SYSMESSAGE @54 Dexterity&裟niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=REMORT
DIALOG d_leveling_system
RETURN 0
ELSE
DIALOG d_leveling_system
[FUNCTION con]
SRC.NEWITEM=i_con_mon
SRC.ACT.EQUIP
SRC.ACT.USE
SRC.SYSMESSAGE What monster shalt I consider attacking?
[FUNCTION sac]
SRC.NEWITEM=i_sacri_corpse
SRC.ACT.MOREX=&褳1 1 2 1 3 1 4 1 5 1 6 1 7 1 8 1 9 1 10 1 11 1 12 1 13 1 14 1 15 1}
SRC.ACT.EQUIP
SRC.ACT.USE
SRC.SYSMESSAGE Select what corpse ye wishes to sacrifice to the Gods.
//**********************************************************
//** MENUS **
//**********************************************************
[MENU m_remort]
You have chosen to remort your character. PLEASE READ OUR WEBPAGE FOR INFORMATION REGARDING HOW THE TIER SYSTEM WORKS. Do you wish to continue?
ON=0 NO WAY!
SRC.SYSMESSAGE You have chosen not to remort your character.
ON=0 YES, I dub myself!
IF !<SRC.RESTEST 5000 i_gold>
SRC.SYSMESSAGE You do not have the required attributes to remort. You must have 5000 gold pieces, 1000 quest points and 10 trivia points.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.QUESTPOINTS>><1000)
SRC.SYSMESSAGE You do not have the required attributes to remort. You must have 5000 gold pieces, 1000 quest points and 10 trivia points.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TRIVIAS>><10)
SRC.SYSMESSAGE You do not have the required attributes to remort. You must have 5000 gold pieces, 1000 quest points and 10 trivia points.
RETURN 1
ELSE
SRC.SYSMESSAGE Your character is being remorted...
SRC.STR=100
SRC.DEX=100
SRC.INT=100
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-1000)
SRC.TAG.TRIVIAS=<EVAL <SRC.TAG.TRIVIAS>> + (-10)
SRC.TAG.TITLED=01
SRC.TAG.EXPERIENCE=0
SRC.TAG.TITLE=Newbie
SRC.CONSUME=5000 i_gold
SERV.ALLCLIENTS SYSMESSAGE <NAME> has been reborn.
IF (<EVAL <SRC.TAG.TIER>>=8)
SRC.SYSMESSAGE @54 Daha ilerisimi? Bence yeter
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=7)
SKILLCLASS Class_Tier8
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=6)
SKILLCLASS Class_Tier7
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=5)
SKILLCLASS Class_Tier6
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=4)
SKILLCLASS Class_Tier5
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=3)
SKILLCLASS Class_Tier4
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=2)
SKILLCLASS Class_Tier3
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TIER>>=1)
SKILLCLASS Class_Tier2
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ELSE
SKILLCLASS Class_Tier1
SRC.TAG.TIER=<EVAL <SRC.TAG.TIER>>+1
RETURN 1
ON=0 View Webpage On How Tiering Works.
SRC.WEBLINK=http:&จuolegends.ath.cxtier.html
[MENU m_trivia]
Hangi yonde kullanmak istiyorsunuz..
ON=0 Intelligence + 10 [1 tp]
IF (<EVAL <SRC.TAG.TRIVIAS>><1)
SRC.SYSMESSAGE @54 Yeterli trivia point sahibi degilsiniz.
RETURN 0
ELSE
SRC.INT=<SRC.INT> + 10
SRC.TAG.TRIVIAS=<EVAL <SRC.TAG.TRIVIAS>> + (-1)
RETURN 0
ON=0 Dexterity + 10 [1 tp]
IF (<EVAL <SRC.TAG.TRIVIAS>><1)
SRC.SYSMESSAGE @54 Yeterli trivia point sahibi degilsiniz.
RETURN 0
ELSE
SRC.DEX=<SRC.DEX> + 10
SRC.TAG.TRIVIAS=<EVAL <SRC.TAG.TRIVIAS>> + (-1)
RETURN 0
ON=0 Quest Point +10 [1 tp]
IF (<EVAL <SRC.TAG.TRIVIAS>><1)
SRC.SYSMESSAGE @54 Yeterli trivia point sahibi degilsiniz.
RETURN 0
ELSE
SRC.TAG.TRIVIAS=<EVAL <SRC.TAG.TRIVIAS>> + (-1)
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>>+10
[MENU m_questitems]
Almak istediginzi Quest Item&裟i seciniz.
ON=0 Sleeves of Regeneration [1800 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><1800)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_sleeves
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-1800)
RETURN 0
ON=0 Gloves of Strength [2200 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><2200)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_gloves
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-2200)
RETURN 0
ON=0 Gorget of Intelligence [1500 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><1500)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_gorget
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-1500)
RETURN 0
ON=0 Leggings of Agility [2500 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><2500)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_leggings
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-2500)
RETURN 0
ON=0 Tunic of Magic Resistance [3000 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><3000)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_tunic
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-3000)
RETURN 0
ON=0 Cap of True Sight [1200 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><1200)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_cap
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-1200)
RETURN 0
ON=0 Shield of Power [3600 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><3600)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_shield
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-3600)
RETURN 0
ON=0 Ring of Intellect Regeneration [1900 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><1900)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_ring
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-1900)
RETURN 0
ON=0 Potion of Virtue [500 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><500)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_potion_virtue
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-500)
RETURN 0
ON=0 Cloak of Reflection [900 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><900)
SRC.SYSMESSAGE @54 Yeterli quest point&裟e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_cloak_reflection
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-900)
RETURN 0
//**********************************************************
//** ITEMS **
//**********************************************************
[ITEMDEF i_cloak_reflection]
DEFNAME=i_cloak_reflection
ID=i_cape
NAME=Cloak of Reflection
WEIGHT=8
ON=@CREATE
ATTR=04
COLOR=0481
HITPOINTS=&褳5000 10000}
ON=@EQUIP
IF (<SRC.UID>=<LINK>)
CONT.SYSMESSAGE You feel reflective towards magic.
CONT.SPELLEFFECT s_magic_reflection,1000
src.newitem i_werb_rcfix
src.act.equip
src.act.timer 15
src.act.attr 00006
RETURN 0
ELSE
SRC.SYSMESSAGE @54 Bu size ait degil kullandiginiz icin cezalandirilacaksiniz.
CONT.GO JAIL
SRC.MESSAGE @54 Yetkililere page atiniz aksi takdirde bu item silinecektir.
ON=@UNEQUIP
TIMER -1
CONT.SYSMESSAGE You no longer feel reflective towards magic.
CONT.FINDID.i_rune_magic_reflection.REMOVE
RETURN 0
ON=@CLICK
message @1153 <name>
return 1
[itemdef i_werb_rcfix]
ID=i_handr_1
NAME=RC FIX
TYPE=t_EQ_script
WEIGHT=0
LAYER=30
on=@equip
src.findlayer.(20).attr 00014
timer 15
on=@unequip
src.findlayer.(20).attr 00004
CONT.SPELLEFFECT s_magic_reflection,1000
CONT.SYSMESSAGE You feel reflective towards magic.
on=@timer
attr attr_decay
remove 1
[ITEMDEF i_con_mon]
DEFNAME=i_con_mon
ID=i_handr_1
NAME=Con Monster Timer
TYPE=t_EQ_script
LAYER=30
ON=@CREATE
ATTR=attr_decay
ON=@DCLICK
TARGET
RETURN 1
ON=@EQUIP
TIMER=10
ON=@TARGON_ITEM
CONT.SYSMESSAGE You cannot consider that!
RETURN 1
ON=@TARGON_CHAR
IF (<SRC.TARG.BODY>=c_man)
CONT.SYSMESSAGE You cannot consider humans.
RETURN 1
ELSE
IF (<SRC.TARG.BODY>=c_woman)
CONT.SYSMESSAGE You cannot consider humans.
RETURN 1
ELSE
IF (<SRC.TARG.STR>>1500)
CONT.SYSMESSAGE That monster would walk all over you!
RETURN 1
ELSE
IF (<SRC.TARG.STR>>1000)
CONT.SYSMESSAGE That monster would be a challenge!
RETURN 1
ELSE
IF (<SRC.TARG.STR>>500)
CONT.SYSMESSAGE That monster is very powerful!
RETURN 1
ELSE
IF (<SRC.TARG.STR>>250)
CONT.SYSMESSAGE That monster would be a definate fight!
RETURN 1
ELSE
IF (<SRC.TARG.STR>>100)
CONT.SYSMESSAGE That monster is not so tough!
RETURN 1
ELSE
CONT.SYSMESSAGE That monster looks fairly weak!
RETURN 1
ON=@TIMER
REMOVE
[ITEMDEF i_sacri_corpse]
DEFNAME=i_sacri_corpse
ID=i_handr_1
NAME=Sacrificial Corpse Timer
TYPE=t_EQ_script
LAYER=30
ON=@CREATE
ATTR=attr_decay
ON=@DCLICK
TARGET
RETURN 1
ON=@EQUIP
TIMER=10
ON=@TARGON_ITEM
IF !(<SRC.TARG.LINK>=04fffffff)
CONT.SYSMESSAGE You cannot sacrifice a human corpse.
RETURN 1
ELSE
IF !(<SRC.TARG.BASEID>=i_corpse)
CONT.SYSMESSAGE That is not a corpse, thine Gods are angered.
RETURN 1
ELSE
SRC.TARG.REMOVE
CONT.SYSMESSAGE Thine Gods are happy for the sacrifice, you are being rewarded.
SRC.NEWITEM=i_gold
SRC.ACT.AMOUNT=&褳1 10}
SRC.ACT.CONT=<CONT.UID>
VAR.X=RAND(35)
IF X=0
CONT.SYSMESSAGE That was a virtued corpse, you are being rewarded quest points.
CONT.TAG.QUESTPOINTS=<EVAL <CONT.TAG.QUESTPOINTS>> + <MOREX>
CONT.SOUND 0102
REMOVE
RETURN 1
ELSE
REMOVE
RETURN 1
ON=@TIMER
REMOVE
RETURN 1
[ITEMDEF i_qrequest]
DEFNAME=i_qrequest
ID=i_gravestone
NAME=Quest Request [double click]
WEIGHT=5000
TYPE=t_script
ON=@CREATE
COLOR=079d
ON=@DCLICK
IF (<SRC.ACCOUNT.PLEVEL>>=2)
SRC.GOUID <TAG.UID>
SRC.SAY HAIL! I am <SRC.NAME>! Your quest will begin.
RETURN 1
ELSE
IF <EVAL <TAG.QR>>=1>
SRC.SYSMESSAGE A character is currently being quested, please try again shortly.
SRC.GO <SRC.TAG.LASTPOS>
RETURN 1
ELSE
SRC.SYSMESSAGE You have been queued to begin a quest, if a seer is online, your quest will begin shortly.
TAG.QR=1
TAG.UID=<SRC.UID>
SRC.GO <SRC.TAG.LASTPOS>
RETURN 1
[ITEMDEF i_dbl_exp]
DEFNAME=i_dbl_exp
ID=i_handr_1
NAME=DBL EXP
TYPE=t_EQ_script
WEIGHT=0
LAYER=layer_special
ON=@CREATE
TIMER=3600
ON=@TIMER
CONT.SYSMESSAGE Your double experience time is over.
CONT.TAG.DEXP 0
REMOVE
[ITEMDEF i_potion_virtue]
DEFNAME=i_potion_virtue
NAME=Potion of Virtue
ID=i_bottle_empty
WEIGHT=1
TYPE=t_script
ON=@CREATE
COLOR=079e
ON=@CLICK
message @1153 Potion of Virtue
return 1
ON=@DCLICK
IF (<SRC.FINDID.i_pot_wait>)
SRC.SYSMESSAGE @1153 Saatte bir kere kullanabilirsiniz...
RETURN 1
ELSEIF (<SRC.UID>=<LINK>)
SRC.HITS=<SRC.STR>
SRC.STAM=<SRC.DEX>
SRC.MANA=<SRC.INT>
SRC.SYSMESSAGE @1153 Daha cevik bir hale geldiniz..
SRC.NEWITEM=i_pot_wait
SRC.ACT.ATTR=04
SRC.ACT.EQUIP
RETURN 1
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
[ITEMDEF i_pot_wait]
DEFNAME=i_pot_wait
NAME=POT WAIT
ID=i_handr_1
WEIGHT=0
LAYER=30
TYPE=T_EQ_SCRIPT
ON=@CREATE
TIMER=3600
ON=@TIMER
CONT.SYSMESSAGE @1153 Potion of Virtue artık kullanabilirsiniz..
REMOVE
RETURN 0
[ITEMDEF i_aardwolf_sleeves]
DEFNAME=i_aardwolf_sleeves
Name=Aardwolf Sleeves of Regeneration
ID=i_platemail_arms
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=55
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Sleeves
ON=@Create
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@CLICK
message @1153 Sleeves of Regeneration
return 1
ON=@EQUIP
CONT.SYSMESSAGE @1153 Sleeves of Regeneration
IF (<SRC.UID>=<LINK>)
TIMER=1
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@TIMER
IF (<CONT.HITS>>=<CONT.STR>)
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=0)
CONT.HITS=<CONT.HITS>+1
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=1)
CONT.HITS=<CONT.HITS>+2
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=2)
CONT.HITS=<CONT.HITS>+3
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=3)
CONT.HITS=<CONT.HITS>+4
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=4)
CONT.HITS=<CONT.HITS>+5
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=5)
CONT.HITS=<CONT.HITS>+6
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=6)
CONT.HITS=<CONT.HITS>+7
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=7)
CONT.HITS=<CONT.HITS>+8
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=8)
CONT.HITS=<CONT.HITS>+10
TIMER 1
RETURN 1
ENDIF
ON=@UNEQUIP
TIMER -1
CONT.SYSMESSAGE @1153 Sleeves of Regeneration
RETURN 0
[ITEMDEF i_aardwolf_gloves]
DEFNAME=i_aardwolf_gloves
Name=Aardwolf Gloves of Strength
ID=i_platemail_gloves
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=55
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Gloves
ON=@Create
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@CLICK
message @1153 Gloves of Strength
return 1
ON=@EQUIP
CONT.SYSMESSAGE @1153 Strength [+100]
IF (<SRC.UID>=<LINK>)
SRC.STR=<SRC.STR> + 100
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@UNEQUIP
CONT.SYSMESSAGE @1153 Strength [-100]
SRC.STR=<SRC.STR> + (-100)
RETURN 0
[ITEMDEF i_aardwolf_shield]
DEFNAME=i_aardwolf_shield
Name=Aardwolf Shield of Power
ID=i_shield_heater
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=80
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Shield
ON=@CREATE
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@CLICK
message @1153 Shield of Power
return 1
ON=@EQUIP
IF (<SRC.UID>=<LINK>)
CONT.SYSMESSAGE @1153 Kendinizi cok daha guclu hissediyorsunuz...
CONT.SPELLEFFECT s_protection,1000
CONT.FINDID.i_rune_protection.TIMER 99999999
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@UNEQUIP
CONT.SYSMESSAGE @1153 Artik kendinizi daha zayif hissediyorsunuz...
CONT.FINDID.i_rune_protection.REMOVE
[ITEMDEF i_aardwolf_gorget]
DEFNAME=i_aardwolf_gorget
Name=Aardwolf Gorget of Intelligence
ID=i_platemail_gorget
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=55
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Gorget
ON=@Create
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@CLICK
message @1153 Gorget of Intelligence
return 1
ON=@EQUIP
CONT.SYSMESSAGE @1153 Intelligence [+100]
IF (<SRC.UID>=<LINK>)
SRC.INT=<SRC.INT> + 100
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@UNEQUIP
CONT.SYSMESSAGE @1153 Intelligence [-100]
SRC.INT=<SRC.INT> + (-100)
RETURN 0
[ITEMDEF i_aardwolf_leggings]
DEFNAME=i_aardwolf_leggings
Name=Aardwolf Leggings of Agility
ID=i_platemail_leggings
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=55
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Leggings
ON=@Create
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@EQUIP
src.tag.azfreeze 1
CONT.SYSMESSAGE @1153 Kadim buyulerin gucune eristiniz...
IF (<SRC.UID>=<LINK>)
TIMER=1
CONT.SYSMESSAGE You begin to feel super dexterous.
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@CLICK
message @1153 Leggings of Agility
return 1
ON=@TIMER
IF (<CONT.STAM>>=<CONT.STR>)
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=0)
CONT.STAM=<CONT.STAM>+1
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=1)
CONT.STAM=<CONT.STAM>+2
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=2)
CONT.STAM=<CONT.STAM>+3
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=3)
CONT.STAM=<CONT.STAM>+4
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=4)
CONT.STAM=<CONT.STAM>+5
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=5)
CONT.STAM=<CONT.STAM>+6
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=6)
CONT.STAM=<CONT.STAM>+7
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=7)
CONT.STAM=<CONT.STAM>+8
TIMER 1
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=8)
CONT.STAM=<CONT.STAM>+10
TIMER 1
RETURN 1
ENDIF
ON=@UNEQUIP
src.tag.azfreeze 0
TIMER -1
CONT.SYSMESSAGE @1153 Kadim buyulerin gucu uzerinizden kayboldu...
RETURN 0
[ITEMDEF i_aardwolf_tunic]
DEFNAME=i_aardwolf_tunic
Name=Aardwolf Tunic of Magic Resistance
ID=i_platemail_chest
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=55
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Tunic
ON=@Create
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@CLICK
message @1153 Tunic of Magic Resistance
return 1
ON=@EQUIP
IF (<SRC.UID>=<LINK>)
SRC.MAGICRESISTANCE=<SRC.MAGICRESISTANCE> + 150
SRC.SYSMESSAGE @1153 Buyulere karsi direnciniz artti...
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@UNEQUIP
SRC.MAGICRESISTANCE=<SRC.MAGICRESISTANCE> + (-150)
SRC.SYSMESSAGE @1153 Buyulere karsi olan direncinizi kaybettiniz...
RETURN 0
[ITEMDEF i_aardwolf_cap]
DEFNAME=i_aardwolf_cap
Name=Aardwolf Cap of True Sight
ID=i_platemail_helm
TYPE=t_armor_leather
WEIGHT=6
FLIP=1
ARMOR=55
REQSTR=65
CATEGORY=ITEMTYPES
SUBSECTION=Aardwolf Armor
DESCRIPTION=Aardwolf Cap
ON=@Create
HITPOINTS=&褳5000 10000}
COLOR=079c
ON=@CLICK
message @1153 Cap of True Sight
return 1
ON=@EQUIP
IF (<SRC.UID>=<LINK>)
IF (<SRC.NIGHTSIGHT>=1)
RETURN 0
ELSE
SRC.NIGHTSIGHT
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@UNEQUIP
IF (<SRC.NIGHTSIGHT>=1)
SRC.NIGHTSIGHT
RETURN 0
ELSE
RETURN 0
[ITEMDEF i_aardwolf_ring]
DEFNAME=i_aardwolf_ring
Name=Aardwolf Ring of Intellect Regeneration
ID=i_ring_silver
WEIGHT=6
FLIP=1
REQSTR=65
ON=@CREATE
COLOR=0480
HITPOINTS=&褳4000 6000}
ON=@CLICK
message @1153 Ring of Intellect Regeneration
return 1
ON=@EQUIP
IF (<SRC.UID>=<LINK>)
TIMER=2
CONT.SYSMESSAGE @1153 Ring of Intellect Regeneration
RETURN 0
ELSE
SRC.SYSMESSAGE @1153 Bu size ait degil.
CONT.GO JAIL
SRC.MESSAGE Page atiniz. Baskasina ait bir itemi kullanmaya calistiniz..
ON=@TIMER
IF (<CONT.MANA>>=<CONT.STR>)
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=0)
CONT.MANA=<CONT.MANA>+1
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=1)
CONT.MANA=<CONT.MANA>+2
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=2)
CONT.MANA=<CONT.MANA>+3
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=3)
CONT.MANA=<CONT.MANA>+4
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=4)
CONT.MANA=<CONT.MANA>+5
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=5)
CONT.MANA=<CONT.MANA>+6
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=6)
CONT.MANA=<CONT.MANA>+7
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=7)
CONT.MANA=<CONT.MANA>+8
TIMER 2
RETURN 1
ELSE
IF (<EVAL <CONT.TAG.TIER>>=8)
CONT.MANA=<CONT.MANA>+10
TIMER 2
RETURN 1
ENDIF
ON=@UNEQUIP
TIMER -1
CONT.SYSMESSAGE @1153 Ring of Intellect Regeneration
RETURN 0
[ITEMDEF i_qpoints] //15 min
DEFNAME=i_qpoints
NAME=Red Hide Quest
ID=i_handr_1
TYPE=t_EQ_script
WEIGHT=0
LAYER=LAYER_SPECIAL
ON=@CREATE
TIMER=3
ON=@TIMER
CONT.SYSMESSAGE You have earned <MOREX> quest points.
CONT.TAG.QUESTPOINTS=<EVAL <CONT.TAG.QUESTPOINTS>> + <MOREX>
REMOVE
[ITEMDEF i_qtower]
DEFNAME=i_qtower
ID=i_deed
WEIGHT=5000
NAME=[double click]
TYPE=t_script
ON=@CREATE
COLOR=078d
ON=@DCLICK
MOREX=&褳1 35}
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> quest points kazandiniz...
RETURN 1
//**********************************************************
//** SKILLCLASSES **
//**********************************************************
[SKILLCLASS Class_Tier1]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier1
NAME=Tier 1
//EVENTS=e_tier1
STATSUM=3300
SKILLSUM=800.0
STR=1600
INT=1600
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier2]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier2
NAME=Tier 2
//EVENTS=e_tier1
STATSUM=3500
SKILLSUM=900.0
STR=1700
INT=1700
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier4]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier3
NAME=Tier 3
//EVENTS=e_tier1
STATSUM=3700
SKILLSUM=1000.0
STR=1800
INT=1800
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier4]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier4
//NAME=Tier 4
//EVENTS=e_tier1
STATSUM=3900
SKILLSUM=1100.0
STR=1900
INT=1900
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier5]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier5
NAME=Tier 5
//EVENTS=e_tier1
STATSUM=4100
SKILLSUM=1200.0
STR=2000
INT=2000
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier6]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier6
NAME=Tier 6
//EVENTS=e_tier1
STATSUM=4300
SKILLSUM=1300.0
STR=2100
INT=2100
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier7]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier7
NAME=Tier 7
//EVENTS=e_tier1
STATSUM=4500
SKILLSUM=1400.0
STR=2200
INT=2200
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
[SKILLCLASS Class_Tier8]
// undeclared class.
// max skills for players of this skill class.
// might want this to be all 50.0 to make people declare a class?
DEFNAME=Class_Tier8
NAME=Tier 8
//EVENTS=e_tier1
STATSUM=5100
SKILLSUM=1500.0
STR=2500
INT=2500
DEX=100
Anatomy=100.0
ItemID=100.0
ArmsLore=100.0
Parrying=100.0
Begging=100.0
Blacksmithing=100.0
Bowcraft=100.0
Peacemaking=100.0
Camping=100.0
Carpentry=100.0
Cartography=100.0
Cooking=100.0
DetectingHidden=100.0
Enticement=100.0
EvaluatingIntel=100.0
Healing=100.0
Fishing=100.0
Forensics=100.0
Herding=100.0
Hiding=100.0
Provocation=100.0
Inscription=100.0
LockPicking=100.0
Magery=100.0
MagicResistance=100.0
Tactics=100.0
Snooping=100.0
Musicianship=100.0
Poisoning=100.0
Archery=100.0
SpiritSpeak=100.0
Stealing=100.0
Tailoring=100.0
Taming=100.0
TasteID=100.0
Tinkering=100.0
Tracking=100.0
Veterinary=100.0
Swordsmanship=100.0
Macefighting=100.0
Fencing=100.0
Wrestling=100.0
Lumberjacking=100.0
Mining=100.0
Meditation=100.0
Stealth=100.0
RemoveTrap=100.0
Necromancy=100.0
//**********************************************************
//** NEWBIE CHANN **
//**********************************************************
[FUNCTION newbiechan]
IF (<EVAL <SRC.TAG.HEARNEWBIE>>==2)
SRC.SYSMESSAGE You are banned from using this channel.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.HEARNEWBIE>>==1)
SRC.FINDID.i_hear_newbie.REMOVE
SRC.TAG.HEARNEWBIE 0
SRC.SYSMESSAGE Newbie channel has been turned off.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.HEARNEWBIE>>==2)
SRC.SYSMESSAGE You are banned from using this channel.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.HEARNEWBIE>>=0)
SRC.NEWITEM i_hear_newbie
SRC.ACT.CONT <SRC.UID>
SRC.TAG.HEARNEWBIE 1
SRC.SYSMESSAGE Newbie channel is now on.
SRC.SYSMESSAGE Use .newbie [text] to talk on this channel.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>9)
SRC.SYSMESSAGE You are no longer a newbie, this is not possible.
RETURN 1
ELSE
RETURN 1
ENDIF
[FUNCTION newbieban]
SRC.NEWITEM=i_newbieba
SRC.ACT.EQUIP
SRC.ACT.USE
SRC.SYSMESSAGE Whom do you wish to ban from newbie channel?
[ITEMDEF i_newbieba]
DEFNAME=i_newbieba
ID=i_handr_1
TYPE=t_EQ_script
LAYER=30
ON=@CREATE
ATTR=02
ON=@DCLICK
TARGET
RETURN 1
ON=@EQUIP
TIMER=10
ON=@TARGON_CHAR
SRC.TARG.FINDID.i_hear_newbie.REMOVE
SRC.TARG.TAG.HEARNEWBIE 2
SRC.TARG.SYSMESSAGE You have been banned from the newbie channel.
RETURN 1
ON=@TIMER
REMOVE
[FUNCTION newbieunban]
SRC.NEWITEM=i_newbieunba
SRC.ACT.EQUIP
SRC.ACT.USE
SRC.SYSMESSAGE Whom do you wish to unban from newbie channel?
[ITEMDEF i_newbieunba]
DEFNAME=i_newbieunba
ID=i_handr_1
TYPE=t_EQ_script
LAYER=30
ON=@CREATE
ATTR=02
ON=@DCLICK
TARGET
RETURN 1
ON=@EQUIP
TIMER=10
ON=@TARGON_CHAR
SRC.TARG.TAG.HEARNEWBIE 0
SRC.TARG.SYSMESSAGE You have been unbanned from the newbie channel.
RETURN 1
ON=@TIMER
REMOVE
[FUNCTION newbie]
MSGMEMBERS <ARGS>
RETURN 1
[FUNCTION msgmembers]
IF (<EVAL <SRC.TAG.HEARNEWBIE>>==2)
SRC.SYSMESSAGE You are banned from using this channel.
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.HEARNEWBIE>>==0)
SRC.SYSMESSAGE @54 Sistem devre dI&補I.
RETURN 1
ELSEIF (<EVAL <SRC.TAG.TITLED>><10)
SERV.ALLCLIENTS FINDID.i_hear_newbie.CONT.SYSMESSAGE <SRC.NAME> [Level <EVAL <SRC.TAG.TITLED>>]: <ARGS>
RETURN 1
ELSEIF (<EVAL <SRC.TAG.NEWBIEHELPER>>=1)
SERV.ALLCLIENTS FINDID.i_hear_newbie.CONT.SYSMESSAGE <SRC.NAME> [Newbie-Helper]: <ARGS>
RETURN 1
ELSEIF (<EVAL <SRC.TAG.TITLED>>>9)
SRC.SYSMESSAGE You are no longer a newbie! You cannot talk on this channel any longer.
RETURN 1
ENDIF
[ITEMDEF i_hear_newbie]
DEFNAME i_hear_newbie
NAME=Hearing NEWBIE Memory [DO NOT REMOVE]
ID=i_memory
TYPE=T_EQ_SCRIPT
LAYER=30
[EOF]
ŞİMDİDEN tESEKKURLER..
version 56b
arkadaslar bide safede yere atılan itemlerin silinmesiniz istiyorum 10 sn içinde silinsin mesela..
