********************************************
// LEVEL.SCP - LEVEL SYSTEM \
// PROJE BASLANGIC TARIHI:13 Ocak 2007 \
////// Son Guncelleyen Architecth
////// Alıntı Olan Yer www.Ultima-strike.com
////// Guncelleme Tarihi:09,04,2007
////// Bug vs Hiç Bir Sey Kalmaı Error Lar Silindi
////// ve ozel itemleri satın alan kısıden baska bır kısı gıyerse
////// ıtemler giyen kişide ilev yapmaz ve allclients yell gecer
////// sadece itemi quest point le satın alan kısı giyebilir...
////// ayrıca Experince Deed ve Ques point Deed scp sını kendım yazım :D
VERSION=0.55
[plevel 0]
level
[DIALOG d_leveling_system]
150,100
page 0
resizepic 50 10 3500 450 310
//resizepic 50 10 3000 450 200
//resizepic 50 10 9999 500 400 // dis lacivert bg
//resizepic 60 20 9350 430 290
//resizepic 60 20 3500 430 290 // ust beyaz bg
htmlgump 100 30 500 50 0 0 0 // baslik seysi
resizepic 320 70 3500 170 72 // STAT CERCEVESI
htmlgump 423 280 25 20 9 0 0 // cikis seysi
button 389 277 4018 4019 1 0 0 // cikis butonu
resizepic 80 215 3500 400 60 // 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 200 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>>Titleniz.. :
<var.pg_font1>>Leveliniz.. :
<var.pg_font1>>Trivia Point :
<var.pg_font1>>Quest Point :
<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 @1153 Henuz Tier Level 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 @77a,4 Cavus
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
[PLEVEL 1]
resle
[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? Experience Niz Gitmesini Istıormusunuz.
ON=0 Evet!
IF (<EVAL <SRC.TAG.EXPERIENCE>><250)
SRC.SYSMESSAGE @1153 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 @1153 5000 Experienceniz Dusmustur..
RETURN 0
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>15)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-2500)
SRC.SYSMESSAGE @1153 2500 Experienceniz Dusmustur.
RETURN 0
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>10)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-1000)
SRC.SYSMESSAGE @1153 1000 Experienceniz Dusmustur.
RETURN 0
ELSE
IF (<EVAL <SRC.TAG.TITLED>>>5)
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + (-500)
SRC.SYSMESSAGE @1153 500 Experienceniz Dusmustur.
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 @1153 Reslenemediniz.
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 buldunuz.
RETURN 0
ENDIF
REMOVE
ELSE
CONT.SYSMESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience aldiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE @1153 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 @1153 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 @1153 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @1153 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(25)
IF X=0
CONT.MESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE @1153 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 @1153 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 @1153 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @1153 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(12)
IF X=0
CONT.MESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @1153 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(25)
IF X=0
CONT.MESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE @1153 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 @1153 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 @1153 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @1153 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(6)
IF X=0
CONT.MESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @1153 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(12)
IF X=0
CONT.MESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
CONT.SYSMESSAGE @1153 Kazanilan experience ikiye katlandi.
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(25)
IF X=0
CONT.MESSAGE @1153 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 @1153 Kazanilan experience: <MOREX>
IF (<EVAL <CONT.TAG.DEXP>>=1)
CONT.TAG.EXPERIENCE=<EVAL <CONT.TAG.EXPERIENCE>> + <MOREX>
CONT.SYSMESSAGE @1153 Double experience kazandiniz.
RETURN 0
ENDIF
VAR.X=RAND(50)
IF X=0
CONT.MESSAGE @1153 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 @1153 Experience kazanamadiniz.
REMOVE
//**********************************************************
//** FUNCTIONS **
//**********************************************************
[PLEVEL 0]
[FUNCTION checkstats]
IF (<EVAL <TAG.EXPERIENCE>><99)
IF (<EVAL <TAG.TITLED>>=1)
STR=150
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=2)
RETURN 1
ENDIF
STR=150
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=200
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=3)
RETURN 1
ENDIF
TAG.TITLED=2
STR=200
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <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 @1153 <NAME> level 25 oldu. Kutlariz...
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 @1153 <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 @1153 <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 @1153 <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 @1153 <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 @1153 <NAME> level 20 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>89999)
IF (<EVAL <TAG.TITLED>>=19)
STR=1050
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=20)
RETURN 1
ENDIF
TAG.TITLED=19
STR=1050
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 19 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>79999)
IF (<EVAL <TAG.TITLED>>=18)
STR=1000
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=19)
RETURN 1
ENDIF
TAG.TITLED=18
STR=1000
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 18 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>69999)
IF (<EVAL <TAG.TITLED>>=17)
STR=950
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=18)
RETURN 1
ENDIF
TAG.TITLED=17
STR=950
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 17 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>59999)
IF (<EVAL <TAG.TITLED>>=16)
STR=900
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=17)
RETURN 1
ENDIF
TAG.TITLED=16
STR=900
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 16 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>49999)
IF (<EVAL <TAG.TITLED>>=15)
STR=850
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=16)
RETURN 1
ENDIF
TAG.TITLED=15
STR=850
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 15 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>39999)
IF (<EVAL <TAG.TITLED>>=14)
STR=800
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=15)
RETURN 1
ENDIF
TAG.TITLED=14
STR=800
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 14 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>29999)
IF (<EVAL <TAG.TITLED>>=13)
STR=750
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=14)
RETURN 1
ENDIF
TAG.TITLED=13
STR=750
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 13 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>19999)
IF (<EVAL <TAG.TITLED>>=12)
STR=700
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=13)
RETURN 1
ENDIF
TAG.TITLED=12
STR=700
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 12 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>14999)
IF (<EVAL <TAG.TITLED>>=11)
STR=650
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=12)
RETURN 1
ENDIF
TAG.TITLED=11
STR=650
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 11 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>9999)
IF (<EVAL <TAG.TITLED>>=10)
STR=600
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=11)
RETURN 1
ENDIF
TAG.TITLED=10
STR=600
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 10 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>8999)
IF (<EVAL <TAG.TITLED>>=9)
STR=550
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=10)
RETURN 1
ENDIF
TAG.TITLED=9
STR=550
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 9 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>7999)
IF (<EVAL <TAG.TITLED>>=8)
STR=500
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=9)
RETURN 1
ENDIF
TAG.TITLED=8
STR=500
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 8 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>6999)
IF (<EVAL <TAG.TITLED>>=7)
STR=450
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=8)
RETURN 1
ENDIF
TAG.TITLED=7
STR=450
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 7 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>5999)
IF (<EVAL <TAG.TITLED>>=6)
STR=400
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=7)
RETURN 1
ENDIF
TAG.TITLED=6
STR=400
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 6 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>4999)
IF (<EVAL <TAG.TITLED>>=5)
STR=350
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=6)
RETURN 1
ENDIF
TAG.TITLED=5
STR=350
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 5 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>3999)
IF (<EVAL <TAG.TITLED>>=4)
STR=300
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=5)
RETURN 1
ENDIF
TAG.TITLED=4
STR=300
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 4 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>1999)
IF (<EVAL <TAG.TITLED>>=3),
STR=250
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=4)
RETURN 1
ENDIF
TAG.TITLED=3
STR=250
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <NAME> level 3 oldu.
MESSAGE @1153 Level atladiniz..
RETURN 1
ENDIF
IF (<EVAL <SRC.TAG.EXPERIENCE>>>1000)
IF (<EVAL <TAG.TITLED>>=2)
STR=200
RETURN 1
ENDIF
IF (<EVAL <TAG.TITLED>>=3)
RETURN 1
ENDIF
TAG.TITLED=2
STR=200
DEX=<DEX> + {3 10}
INT=<INT> + {1 5}
SERV.ALLCLIENTS SYSMESSAGE @1153 <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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 Dexterity'niz en fazla 100 olabilir!
SRC.DEX=100
RETURN 0
ENDIF
SRC.TAG.TNL=
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 @1153 Kime Atack Ettireceksiniz.
[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 @1153 Experience Ye Cevireceginiz Ceset'i Seciniz.
//**********************************************************
//** MENUS **
//**********************************************************
[MENU m_remort]
Bir Sonraki Tier Level'e Gecerseniz Sizden Dusuk Durumdaki Kisilere Yardim Edecekmisiniz.Unutmayin Ki Tier Level'i En Yuksek Olan Staff Lardan Sonra World Egemeni Dir..
ON=0 Hayir Kabul Etmiyorum..
SRC.SYSMESSAGE @1153 Kosullari Kabul Etmediniz Zaten Sizden De Bu Beklenirdi...
ON=0 Evet Kabul Ediyorum..
IF !<SRC.RESTEST 150000 i_gold>
SRC.SYSMESSAGE @1153 Bir Sonraki Tier Level'e Gecmek Icin 150 K. 500 Quest Point's Ve 10 Trivia Points Gereklidir..
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.QUESTPOINTS>><1000)
SRC.SYSMESSAGE @1153 Bir Sonraki Tier Level'e Gecmek Icin 150 K. 1000 Quest Point's Ve 10 Trivia Points Gereklidir..
RETURN 1
ELSE
IF (<EVAL <SRC.TAG.TRIVIAS>><10)
SRC.SYSMESSAGE @1153 Bir Sonraki Tier Level'e Gecmek Icin 150 K. 500 Quest Point's Ve 10 Trivia Points Gereklidir..
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 @1153 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 Daha Fazla Bilgi Icin Buyrun..
SRC.WEBLINK=www.<serv.name>.com
[MENU m_trivia]
Hangi yonde kullanmak istiyorsunuz..
ON=0 Intelligence + 10 [1 tp]
IF (<EVAL <SRC.TAG.TRIVIAS>><1)
SRC.SYSMESSAGE @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 @1153 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 [500qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><)
SRC.SYSMESSAGE @1153 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 @1153 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
ON=0 Blade Of King's Aftermoon [2500 qps]
IF (<EVAL <SRC.TAG.QUESTPOINTS>><2500)
SRC.SYSMESSAGE @1153 Yeterli quest point'e sahip degilsiniz.
RETURN 0
ELSE
SRC.NEWITEM=i_aardwolf_swords
SRC.ACT.LINK=<SRC.UID>
SRC.ACT.ATTR=04
SRC.ACT.BOUNCE
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + (-2500)
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=0484
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
serv.allclients sysmessage @1153 <src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
ON=@UNEQUIP
TIMER -1
CONT.SYSMESSAGE @1153 Kendinizi Kutsanmis Hissediyorsunuz
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
[PLEVEL 0]
sac
[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 @1153 Bu Bir Player Ceset'i Dir.
RETURN 1
ELSE
IF !(<SRC.TARG.BASEID>=i_corpse)
CONT.SYSMESSAGE @1153 Bu Islemi Bir Ceset'e Uygulayiniz.
RETURN 1
ELSE
SRC.TARG.REMOVE
CONT.SYSMESSAGE @1153 Kazandiginiz Experience.
src.tag.lastexperience=<eval <src.tag.experience>>
src.tag.experience=<eval <src.tag.experience> + {20 50}>
src.sysmessage @026 Bu cesetten <eval <src.tag.experience> - <src.tag.lastexperience>> experience kazandiniz.
VAR.X=RAND(35)
IF X=0
CONT.SYSMESSAGE @1153 Bu Ceset Sagyesinde Quest Points Kazandiniz.
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 Point's Stone's
WEIGHT=5000
TYPE=t_script
ON=@CREATE
COLOR=079d
on=@click
message @077a,,4 Playerlerin Quest Point's Kazanmalari Kolaylastirilmasi Icin Konulmustur Elleyeni Cizerim (Architecth)
ON=@DCLICK
IF (<SRC.ACCOUNT.PLEVEL>>=0)
SRC.GOUID <TAG.UID>
SRC.SAY @026 Kendini Cok Akilli Mi Sandin <SRC.NAME>!
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 @1153 Double Exp Kazandiniz.. Tebrikler..
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
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
[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=150
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
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
if !(<more1>)
more1 <src.uid>
src.sysmessage @69,1,1 asd
ELSE
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=1150
ARMOR=100
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
IF (<SRC.UID>=<LINK>)
CONT.SYSMESSAGE @1153 Strength [+100]
SRC.STR=<SRC.STR> + 100
RETURN 0
ELSE
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
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=150
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
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
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=150
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
IF (<SRC.UID>=<LINK>)
CONT.SYSMESSAGE @1153 Intelligence [+100]
SRC.INT=<SRC.INT> + 100
RETURN 0
ELSE
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
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=150
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
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
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=150
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
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
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=250
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>)
CONT.SYSMESSAGE @1153 Strength [+100]
SRC.STR=<SRC.STR> + 100
RETURN 0
ELSE
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
ON=@UNEQUIP
CONT.SYSMESSAGE @1153 Strength [-100]
SRC.STR=<SRC.STR> + (-100)
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
serv.allclients sysmessage @1153 [Item Duyuru]<src.name> Adli Kisi Baskasina Agit Itemi Takmaya Calisti..
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=5
NAME={Quest Point's Deed}
TYPE=t_script
ON=@CREATE
COLOR=1176
ON=@DCLICK
MOREX={10,20,30}
SRC.TAG.QUESTPOINTS=<EVAL <SRC.TAG.QUESTPOINTS>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> quest points kazandiniz...
remove
RETURN 1
[ITEMDEF i_etower1]
DEFNAME=i_etower
ID=i_deed
WEIGHT=5
NAME={Experience Deed}
TYPE=t_script
ON=@CREATE
COLOR=07ba
ON=@DCLICK
MOREX={50}
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> Experience kazandiniz...
remove
RETURN 1
[ITEMDEF i_etower2]
DEFNAME=i_etower2
ID=i_deed
WEIGHT=5
NAME={Experience Deed}
TYPE=t_script
ON=@CREATE
COLOR=07ba
ON=@DCLICK
MOREX={100}
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> Experience kazandiniz...
remove
RETURN 1
[ITEMDEF i_etower3]
DEFNAME=i_etower3
ID=i_deed
WEIGHT=5
NAME={Experience Deed}
TYPE=t_script
ON=@CREATE
COLOR=07ba
ON=@DCLICK
MOREX={250}
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> Experience kazandiniz...
remove
RETURN 1
[ITEMDEF i_etower4]
DEFNAME=i_etower4
ID=i_deed
WEIGHT=5
NAME={Experience Deed}
TYPE=t_script
ON=@CREATE
COLOR=07ba
ON=@DCLICK
MOREX={500}
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> Experience kazandiniz...
remove
RETURN 1
[ITEMDEF i_etower5]
DEFNAME=i_etower5
ID=i_deed
WEIGHT=5
NAME={Experience Deed}
TYPE=t_script
ON=@CREATE
COLOR=07ba
ON=@DCLICK
MOREX={1000}
SRC.TAG.EXPERIENCE=<EVAL <SRC.TAG.EXPERIENCE>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> Experience kazandiniz...
remove
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=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_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=2300
INT=2300
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=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
[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=2700
INT=2700
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=3000
INT=3000
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=3100
INT=3100
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=3200
INT=3200
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.HEARNEWB
0
Total votes: 0
Yorumlar (0)