Merhaba arkadaslar bende bir level sistemi var mesela adamların üzerinde kill yazması için:

on=@click
message @0810 Kill : <kills>

Ben adamın üzerinde:


on=@click
message @0810 Level : ?

yapmak istiyorum ama Levelin yaninda mevcut levelin yazmasini nasil yapabilirim ?

Buyrun bu da level sistemi :

[defname clevel]
clvl_exp2 13
clvl_exp3 50
clvl_exp4 75
clvl_exp5 105
clvl_exp6 125
clvl_exp7 175
clvl_exp8 205
clvl_exp9 270
clvl_exp10 300
clvl_exp11 355
clvl_exp12 405
clvl_exp13 475
clvl_exp14 585
clvl_exp15 625
clvl_exp16 675
clvl_exp17 720
clvl_exp18 825
clvl_exp19 975
clvl_exp20 1005
clvl_exp21 1500
clvl_exp22 2000
clvl_exp23 3000
clvl_exp24 4000
clvl_exp25 5000
clvl_exp26 5500
clvl_exp27 6000
clvl_exp28 7500
clvl_exp29 8000
clvl_exp30 8500
clvl_exp31 8750
clvl_exp32 9250
clvl_exp33 9550
clvl_exp34 9750
clvl_exp35 10500
clvl_exp36 11500
clvl_exp37 12000
clvl_exp38 12500
clvl_exp39 13500
clvl_exp40 15000
clvl_exp41 17000
clvl_exp42 19000
clvl_exp43 21000
clvl_exp44 24000
clvl_exp45 26000 
clvl_exp46 28000
clvl_exp47 30000
clvl_exp48 33000
clvl_exp49 37000
clvl_exp50 39000
clvl_exp51 40000
clvl_exp52 41000
clvl_exp53 42000
clvl_exp54 43000
clvl_exp55 44000
clvl_exp56 45000
clvl_exp57 46000
clvl_exp58 47000
clvl_exp59 48000
clvl_exp60 49000
clvl_exp61 50000
clvl_exp62 50000
clvl_exp63 50000
clvl_exp64 50000
clvl_exp65 50000
clvl_exp66 50000
clvl_exp67 50000
clvl_exp68 50000
clvl_exp69 50000
clvl_exp70 50000
clvl_exp71 55000
clvl_exp72 55000
clvl_exp73 55000
clvl_exp74 55000
clvl_exp75 55000
clvl_exp76 55000
clvl_exp77 55000
clvl_exp78 55000
clvl_exp79 55000
clvl_exp80 55000
clvl_exp81 55000
clvl_exp82 55000
clvl_exp83 55000
clvl_exp84 55000
clvl_exp85 55000
clvl_exp86 55000
clvl_exp87 55000
clvl_exp88 55000
clvl_exp89 55000
clvl_exp90 55000
clvl_exp91 55000
clvl_exp92 55000
clvl_exp93 55000
clvl_exp94 55000
clvl_exp95 55000
clvl_exp96 55000
clvl_exp97 55000
clvl_exp98 55000
clvl_exp99 55000
clvl_exp100 60000


clvl_maxstr 400 // Player Skillclasstakiyle birebir olsun.
clvl_maxint 200 // Player Skillclasstakiyle birebir olsun.
clvl_maxdex 250 // Player Skillclasstakiyle birebir olsun.

clvl_maxstat 5 // Level atlarken seçilecek toplam stat miktarı.





[plevel 1]
level

[function level]
if (<eval <src.tag.level>> <1)
src.events +e_clvl
src.newitem i_stat_kilit
src.update
src.tag.level 1
src.tag.sstr <str>
src.tag.ddex <dex>
src.tag.iint <int>
endif
sdialog d_clevel

[dialog d_clevel]
0,0
resizepic 90 80 3500 300 185
resizepic 95 85 9350 290 10
resizepic 95 100 9350 290 145
resizepic 95 248 9350 290 10
resizepic 105 105 9350 140 40
dhtmlgump 110 110 120 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_dred>Level
dhtmlgump 110 125 120 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_black><eval <src.tag.level>>
resizepic 105 160 9350 140 40
dhtmlgump 110 165 120 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_dred>Experience
dhtmlgump 110 180 120 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_black><eval <src.tag.exp>>
if (<eval <def.clvl_exp<eval <eval <src.tag.level>>+1>>>==0)
dhtmlgump 250 110 150 40 0 0 <def.h4><def.bfont_size3><def.bfont_black>Max Leveldesiniz.
else
dhtmlgump 250 110 150 40 0 0 <def.h4><def.bfont_size3><def.bfont_black><eval <eval <src.tag.level>>+1>. Level icin gereken<def.br>Exp: <eval <def.clvl_exp<eval <eval <src.tag.level>>+1>>>
endif

button 100 215 2511 2510 1 0 1
dhtmlgump 135 215 250 20 0 0 <def.h4><def.bfont_size3><def.bfont_dred>LEVEL ATLA
//button 225 215 2511 2510 1 0 3
//dhtmlgump 260 215 250 20 0 0 <def.h4><def.bfont_size3><def.bfont_dred>EXP DEED'E ÇEVİR

page 2
resizepic 90 280 3500 300 185
resizepic 95 285 9350 290 10
resizepic 95 300 9350 290 145
resizepic 95 448 9350 290 10
resizepic 105 305 9350 270 30
dhtmlgump 110 310 250 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_dred>Toplam <eval <def.clvl_maxstat>> Stat Secme Hakkiniz Var
resizepic 105 350 9350 270 60
dhtmlgump 110 360 70 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_dred>Str
dhtmlgump 190 360 70 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_dred>Int
dhtmlgump 270 360 70 20 0 0 <def.center><def.h4><def.bfont_size3><def.bfont_dred>Dex
dtextentry 137 380 20 20 0 0 0
dtextentry 217 380 20 20 0 1 0
dtextentry 297 380 20 20 0 2 0
button 115 417 4023 4025 1 0 2
dhtmlgump 150 417 250 20 0 0 <def.h4><def.bfont_size3><def.bfont_dred>LEVEL ATLA


[dialog d_clevel button]
onbutton 1
if (<eval <src.tag.exp>> < <eval <def.clvl_exp<eval <eval <src.tag.level>>+1>>>)
src.sysmessage @1153 Level atlamak icin Experience yetmiyor.
return 1
endif
if (<eval <def.clvl_exp<eval <eval <src.tag.level>>+1>>>==0)
src.sysmessage @1153 Zaten son leveldesiniz.
return 1
endif
sdialog d_clevel 2


onbutton 2
if !(<isnum <argtxt[0]>>) || !(<isnum <argtxt[1]>>) || !(<isnum <argtxt[2]>>)
src.sysmessage @1153 Statlara rakam yazmak zorundasiniz.
sdialog d_clevel 2
return 1
endif
var.clvl_stats <eval <argtxt[0]>> + <eval <argtxt[1]>> + <eval <argtxt[2]>>
if !(<eval <var.clvl_stats>>==<eval <def.clvl_maxstat>>)
src.sysmessage @1153 Statlarin toplami <eval <def.clvl_maxstat>> olmak zorunda.
sdialog d_clevel 2
return 1
endif
if (<eval <src.ostr>+<eval <argtxt[0]>>> > <eval <def.clvl_maxstr>>)
src.sysmessage @1153 Str <eval <def.clvl_maxstr>>'den yuksek olamaz.
sdialog d_clevel 2
return 1
endif
if (<eval <src.oint>+<eval <argtxt[1]>>> ><eval <def.clvl_maxint>>)
src.sysmessage @1153 Int <eval <def.clvl_maxint>>'den yuksek olamaz.
sdialog d_clevel 2
return 1
endif
if (<eval <src.odex>+<eval <argtxt[2]>>> ><eval <def.clvl_maxdex>>)
src.sysmessage @1153 Dex <eval <def.clvl_maxdex>>'den yuksek olamaz.
sdialog d_clevel 2
return 1
endif




src.tag.exp -=<eval <def.clvl_exp<eval <eval <src.tag.level>>+1>>>
src.tag.level +=1
effect=3,0375a,6,30,1
src.ostr +=<eval <argtxt[0]>>
src.oint +=<eval <argtxt[1]>>
src.odex +=<eval <argtxt[2]>>
src.tag.sstr <src.ostr>
src.tag.iint <src.oint>
src.tag.ddex <src.odex>



[Plevel 1]
acctix


[Function acctix] 
SRC.SYSMESSAGE @1153 Tix Aktarimi
MENU m_acctix

[MENU m_acctix] 
Experience: <eval <src.tag.exp>> 
ON=0 50 Tix
IF (<eval <src.tag.exp>>>49) 
TAG.exp=<TAG.exp>+(-50) 
SRC.NEWITEM=i_tix1 
SRC.ACT.BOUNCE 
ELSE 
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.
RETURN 1 
ENDIF 
ON=0 100 Tix
IF (<eval <src.tag.exp>>>99) 
TAG.exp=<TAG.exp>+(-100) 
SRC.NEWITEM=i_tix2
SRC.ACT.BOUNCE 
ELSE 
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.
ON=0 250 Tix
IF (<eval <src.tag.exp>>>249) 
TAG.exp=<TAG.exp>+(-250) 
SRC.NEWITEM=i_tix
SRC.ACT.BOUNCE 
ELSE 
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.
ON=0 500 Tix
IF (<eval <src.tag.exp>>>499) 
TAG.exp=<TAG.exp>+(-500) 
SRC.NEWITEM=i_tix3
SRC.ACT.BOUNCE 
ELSE 
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.
ON=0 1000 Tix
IF (<eval <src.tag.exp>>>999) 
TAG.exp=<TAG.exp>+(-1000) 
SRC.NEWITEM=i_tix4
SRC.ACT.BOUNCE 
ELSE 
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.
ON=0 5000 Tix
IF (<eval <src.tag.exp>>>4999) 
TAG.exp=<TAG.exp>+(-5000) 
SRC.NEWITEM=i_tix5
SRC.ACT.BOUNCE 
ELSE 
ON=0 7500 Tix
IF (<eval <src.tag.exp>>>7499) 
TAG.exp=<TAG.exp>+(-7500) 
SRC.NEWITEM=i_tix7
SRC.ACT.BOUNCE 
ELSE 
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.
ON=0 10000 Tix
IF (<eval <src.tag.exp>>>9999) 
TAG.exp=<TAG.exp>+(-10000) 
SRC.NEWITEM=i_tix6
SRC.ACT.BOUNCE 
ELSE
SRC.SYSMESSAGE @1153 Tixiniz Yeterli Degil.

[ITEMDEF i_tix]
DEFNAME=i_tix
ID=i_deed
WEIGHT=5
NAME=250 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1

ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=250
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix1]
DEFNAME=i_tix1
ID=i_deed
WEIGHT=5
NAME=50 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1

ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=50
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix2]
DEFNAME=i_tix2
ID=i_deed
WEIGHT=5
NAME=100 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1

ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=100
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix3]
DEFNAME=i_tix3
ID=i_deed
WEIGHT=5
NAME=500 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1

ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=500
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix4]
DEFNAME=i_tix4
ID=i_deed
WEIGHT=5
NAME=1000 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1

ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=1000
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix5]
DEFNAME=i_tix5
ID=i_deed
WEIGHT=5
NAME=5000 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1

ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=5000
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix6]
DEFNAME=i_tix6
ID=i_deed
WEIGHT=5
NAME=10000 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1




ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=10000
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1

[ITEMDEF i_tix7]
DEFNAME=i_tix7
ID=i_deed
WEIGHT=5
NAME=7500 Experience
TYPE=t_script

ON=@CREATE
COLOR=0bae

On=@Click 
if (<attr>&(attr_identified))  
message @1153 <name>
message @1153 [EternitY]
return 1 
ELSE 
message @1153 <name>
message @1153 [EternitY]
return 1 
endif 
return 1




ON=@DCLICK
if !(<topobj.uid> == <src.uid>)
src.sysmessage @080a Bunu Sadece Cantanda Kullanabilirsiniz.
return 1
endif
MOREX=7500
SRC.TAG.exp=<EVAL <SRC.TAG.exp>> + <MOREX>
SRC.SYSMESSAGE @1153 <MOREX> experience kazandiniz...
remove
RETURN 1
RETURN 1



[events pet_events]
ON=@CLICK
VAR.X=<EVAL <oSTR> /6>
IF !(0<VAR.X>)
VAR.X=1
ENDIF
Message Level: <EVAL <VAR.X>>

on=@death
act.tag.exp +=<eval <str>/2>
act.sysmessageua 0481,6,6,trk <eval <str>/2> Experience Kazandiniz.



[events e_clvl]
on=@environchange
var.stats <eval(<str>+<int>+<dex>)>
tag.ostr <str>
tag.odex <dex>
tag.oint <int>
events -e_str
events -e_dex
events -e_int
events +e_spr
else


[plevel 1]
deneseco

[function deneseco]
src.sysmessage @1153 str <eval <src.tag.sstr>>
src.sysmessage @1153 dex <eval <src.tag.ddex>>
src.sysmessage @1153 int <eval <src.tag.iint>>




[EVENTS e_Show]
ON=@CLICK
message @1153 [Level: <eval <tag.level>>]
IF (<dtag0.level> >= 1) && (<dtag0.level> <=19)
message @0799 [Young]
endif
IF (<dtag0.level> >= 20) && (<dtag0.level> <=39)
message @0799 [Lord]
endif
iF (<dtag0.level> >= 40) && (<dtag0.level> <=59)
message @0799 [Evildor]
endif
if (<dtag0.level> >= 60) && (<dtag0.level> <=69)
message @0799 [HellMaster]
endif
if (<dtag0.level> >= 70) && (<dtag0.level> <=150)
message @0799 [HellRaiser]
endif




[plevel 1]
sac

[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 Cesede Tiklayiniz.

[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.baseid> = i_corpse_orc)
else
IF !(<SRC.TARG.LINK>=04fffffff)
CONT.SYSMESSAGE @1153 Insan Cesetlerine Yapamazsiniz.
RETURN 1
ELSE
IF !(<SRC.TARG.TYPE>=t_corpsesac)
CONT.SYSMESSAGE @1153 Bu Ceset Olmaz.
RETURN 1
ELSE
if (<src.targ.distance> > 4)
src.sysmessage @39,,1 Hata: Cesede Cok Uzaksiniz.
return 1
ELSE
SRC.TARG.REMOVE
CONT.SYSMESSAGE @1153 Kazandigin Miktar: 50 Gold
SRC.NEWITEM=i_gold
SRC.ACT.AMOUNT=50
SRC.ACT.CONT=<CONT.UID>
REMOVE
RETURN 1
ELSE
REMOVE
RETURN 1

ON=@TIMER
REMOVE
RETURN 1


[eof]
on=@click
message @0810 [Level : <eval <src.tag0.level>>]
Cok tesekkur ederim oldu =)
söyle denedinmi <level> olarak bunun gibi bişi olması gerek yada yani söyle bişi varmi player yazıcak .levelim
leveliniz 5dir gibi ? böyle bir komut varmi
Ayrıca scriptinize dikkatli bakarsanız ;

[EVENTS e_Show]
ON=@CLICK
message @1153 [Level: <eval <tag.level>>]
IF (<dtag0.level> >= 1) && (<dtag0.level> <=19)
message @0799 [Young]
endif
IF (<dtag0.level> >= 20) && (<dtag0.level> <=39)
message @0799 [Lord]
endif
iF (<dtag0.level> >= 40) && (<dtag0.level> <=59)
message @0799 [Evildor]
endif
if (<dtag0.level> >= 60) && (<dtag0.level> <=69)
message @0799 [HellMaster]
endif
if (<dtag0.level> >= 70) && (<dtag0.level> <=150)
message @0799 [HellRaiser]
endif
Onu gördüm biliyorum onu ekletince çıkar da amacım o degil (:
ON=@CLICK
message @1153 [Level: <eval <tag.level>>]

bu kısımdan yararlanırdınız ? :)
Oyle yaptım zaten =)
sen kimsin arkadasim

message @1153 <name>
message @1153 [EternitY] bu serveri ben kurmustum bu level scp ben editlemistim sen nerden buldun....
return 1
endif
aş bunları arkadaşım böyle artık :D
aynen deniz dogru soyluorsun server kurmak artik calmak olmus .
Expert
34.0001
Xantier yine sen yazdığımı çaldılar diyorsun editlediğimi çaldılar ne demek yav saçma olmayın.
arkadasim simdik o serveri ben yaptim dogal olarakta serverda emegim cok ha yardim alinmis editlenmis kendim yazmis oldugumda var .

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.