|
[defname topplayer]
topplayer 10
////////////////////////
[itemdef i_top10listesi]
defname i_top10listesi
ID=i_adam4
name [ Top10 Listesi ]
weight 1231231
TYPE T_NORMAL
on=@create
TIMER = <EVAL (3600*24)*7>
color 0
ATTR=010
on=@click
message @38,,1 <name>
src.sysmessage @49,,1 <eval <timer>/86400> Gun, <eval (<timer>%86400)/3600> Saat ve <eval ((<timer>%86400)%3600)/60> Dakika sonra Resetlenecek.
return 1
on=@dclick
IF ( <DISTANCE> < 5 )
SRC.SFX 555
src.top10
ELSE
message @38,,1 <name>
src.sysmessage @49,,1 <eval <timer>/86400> Gun, <eval (<timer>%86400)/3600> Saat ve <eval ((<timer>%86400)%3600)/60> Dakika sonra Resetlenecek.
RETURN 1
ENDIF
RETURN 1
on=@timer
top10temizligi
TIMER = <EVAL (3600*24)*7>
//////////////////////////
[itemdef i_top10odulu]
defname i_top10odulu
id 03f19//012cb //5018
name top10 odulu
on=@create
color 0
timer 172800
on=@click
if <timer> = 0
remove
src.sysmessage @38,,1 Esyanizin suresi dolmustur.
return 1
endif
message @07b7,,1 [Haftanin Top10 1'incisi Oldunuz]
message @1153,,1 [ Tebrikler ]
src.sysmessage @0856,1 Silinmesine: <eval <timer>/86400> Gun <eval (<timer>/3600)-((<timer>/86400)*24)> Saat <eval (<timer>/60)-((<timer>/3600)*60)> Dakika <eval <timer>-((<timer>/60)*60)> Saniye.
return 1
on=@dclick
if (<topobj.uid> != <src.uid>)
src.sysmessage @07b7,,1 Cantanizda olmalıdır.
return 1
endif
serv.newitem i_random
new.bounce
remove
///////////////////////////***************////////////////////
[plevel 1]
top10
[function top10]
src.dialogclose d_top10n
src.sdialog d_top10n
[dialog d_top10n]
100,100
resizepic 40 0 5150 520 375
page 0
dtext 180 230 1153 <serv.servname> Top10 Tablosu
dtext 70 250 1153 Top10 Listesi haftalık olarak yenilenir. 1'ci sıradaki oyuncuya haftanın
dtext 70 270 1153 Random ödülünü verilir.
dtext 70 290 38 Not: Listede Puanını göremiyen oyuncu puan aldıktan sonra listede
dtext 70 310 38 tekrar yerini alır !
dtext 65 20 68 1.Isim=
dtext 65 40 68 2.Isim=
dtext 65 60 68 3.Isim=
dtext 65 80 68 4.Isim=
dtext 65 100 68 5.Isim=
dtext 65 120 68 6.Isim=
dtext 65 140 68 7.Isim=
dtext 65 160 68 8.Isim=
dtext 65 180 68 9.Isim=
dtext 65 200 68 10.Isim=
dtext 400 20 68 Puan=
dtext 400 40 68 Puan=
dtext 400 60 68 Puan=
dtext 400 80 68 Puan=
dtext 400 100 68 Puan=
dtext 400 120 68 Puan=
dtext 400 140 68 Puan=
dtext 400 160 68 Puan=
dtext 400 180 68 Puan=
dtext 400 200 68 Puan=
for c 1 10
obj = <var.topplayer_<dlocal.c>>
if !(strmatch('<var0.topplayer_<dlocal.c>>','0')
dtext 130 <hval <local.c>*20> 38 <obj.name>
dtext 450 <hval <local.c>*20> 38 <dobj.tag0.puan_action>
endif
endfor
TBUTTON_K 400,322,999,KAPAT
///////////////////////////***************////////////////////
[function list]
tag0.puan_action +=1
for 1 <ddef.topplayer>
var.remove <ddef.topplayer>
for y 1 <ddef.topplayer>
ref1=<var.topplayer_<dlocal.y>>
if (<ref1> = <uid>)
var.remove <dlocal.y>
endif
endfor
ref2=<var.topplayer_<dlocal._for>>
if (<dtag.puan_action> >= <ref2.dtag.puan_action>)
var.topplayer_<dvar.remove>
for x <dvar.remove> <dlocal._for>
//var.topplayer_<dlocal.x> <var.topplayer_<eval <dlocal.x> -1>>
endfor
var.topplayer_<dlocal._for> <uid>
var.remove
return 1
endif
endfor
///////////////////////////***************////////////////////
[function top10temizligi]
remove
tebelekoy
kimbirinci
top10puanlarinisil
///////////////////////////***************////////////////////
[function tebelekoy]
serv.newitem i_top10listesi
new.p 5961,1068
new.update
new.fix
///////////////////////////***************////////////////////
[function kimbirinci]
for c 1 10
obj = <var.topplayer_<dlocal.c>>
if !(strmatch('<var0.topplayer_<dlocal.c>>','0')
if (strmatch("<dlocal.c>","1")
try uid.<obj.uid>.odulumuverleyn
return 1
endif
endfor
///////////////////////////***************////////////////////
[function odulumuverleyn]
serv.newitem i_top10odulu
serv.allclients sysmessage @38,,1 [Haftalik Top10 Duyuru]
serv.allclients sysmessage @49,,1 Haftanin Top10 Birincisi <name> olmustur.
sysmessage @0796,,1 Odulunuz Bankaniza Aktarilmistir.
new.cont <findlayer(29).uid>
///////////////////////////***************////////////////////
[function top10puanlarinisil]
forplayers 65000
IF (<id> == c_man) || (<id> == c_woman)
tag0.puan_action = 0
sysmessage @1153,,1 Puaniniz sifirlandi.
ENDIF
ENDFOR
//////////////////////////////////////////////////////////
[function top10pvpsil]
forplayers 65000
IF (<id> == c_man) || (<id> == c_woman)
tag0.puan_pvplist = 0
sysmessage @1153,,1 Puaniniz sifirlandi.
ENDIF
ENDFOR
//var.topplayer_<dlocal.x> <var.topplayer_<eval <dlocal.x> -1>> burası kapalı kalmış.[function top10puankazan]
for 1 <ddef.topplayer>
var.remove <ddef.topplayer>
for y 1 <ddef.topplayer>
ref1=<var.topplayer_<dlocal.y>>
if (<ref1> = <uid>)
var.remove <dlocal.y>
endif
endfor
ref2=<var.topplayer_<dlocal._for>>
if (<dtag.puan_action> >= <ref2.dtag.puan_action>)
var.topplayer_<dvar.remove>
for x <dvar.remove> <dlocal._for>
var.topplayer_<dlocal.x> <var.topplayer_<eval <dlocal.x> -1>>
endfor
var.topplayer_<dlocal._for> <uid>
var.remove
return 1
endif
endforGelelim tag0.puan_action +=1 kısmını ne yapacağımıza.ON=[url=u-death-9220.html]@death[/url]
if <fame> >= 500
if <act.isplayer> // kesen kişi sadece oyuncu ise. (npc fix)
act.tag0.puan_action +=1
act.top10puankazan
act.sysmessage @,,1 <name> isimli oyuncuyu katlettiğiniz için 1 puan kazandınız.
endif
endifAyrıca bu script çok eski packlerden birinde vardı. Değişiklikler yapılmış seninkinde fakat 3,5 aynı mantık.
[itemdef i_top10dedektor]
ID=i_grave_stone_4
name top10 dedektor
weight 1231231
TYPE T_NORMAL
on=@create
TIMER = <EVAL (3600*24)*7>
color 0846
ATTR=010
var.uidcikk <uid>
on=@click
message @07a1,,1 <serv.name> dedektor
src.sysmessage @49,,1 <eval <timer>/86400> Gun, <eval (<timer>%86400)/3600> Saat ve <eval ((<timer>%86400)%3600)/60> Dakika sonra Resetlenecek.
return 1
on=@timer
top10puanlarinisil
TIMER = <EVAL (3600*24)*7>
|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
|
alfabetik sıralama
Son cevap: 22-12 18:27 · Son yazan: flyborn · Mesaj: 8 · Görüntü: 2488
|
Script Yardımı | 22-12 18:27 | 8 | 2488 | |
|
|
Guild Sıralama
Son cevap: 30-08 11:27 · Son yazan: dwayne · Mesaj: 3 · Görüntü: 4121
|
Script Yardımı | 30-08 11:27 | 3 | 4121 | |
|
|
Tagli Sıralama fonksiyonları
Son cevap: 11-04 13:45 · Son yazan: Khaonem · Mesaj: 3 · Görüntü: 4278
|
Script Yardımı | 11-04 13:45 | 3 | 4278 | |
|
|
Büyükten küçüğe sayı sıralama
Son cevap: 12-12 00:25 · Son yazan: aldarson · Mesaj: 38 · Görüntü: 25753
|
Script Yardımı | 12-12 00:25 | 38 | 25753 |