Arkadaslar var.clients 0 diye oluşturduk var'imizi bunu scriptte Online Player:<eval <var.clients>+7> olarak işledik ve çalışır durumda şimdi bunu ben diger türlü kullanmak istiyorum mesela en çok rutbesi olanı istatistikte yazdırmak istiyorum.Denedigim yollar En cok Rutbe'si olan player:<eval <src.tag.pan>> bunu kullandım fakat playerin kendi puanını gösterdi bir kaç degişim yaptım olmadı yardımcı olurmusunuz ?

Öncelikle bir event yazıyoruz ;

[events e_puanlar]

on=@kill

if (<argo.fame> >= 1000) && (<argo.isplayer>)

toplist

Toplist fonksiyonunu önceden bir arkadaşım öğretmişti ;

[defname topplayer]

topplayer 10 //değiştirilebilir topplayer değeri



[function toplist]

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

Sonra'da bunu dialog'a döküyoruz..

[dialog d_top10] 

100,100

nomove

resizepic 50 0 3500 500 250 //ARka Fon

//resizepic 50 260 5120 220 100 //ARka Fon

//resizepic 60 270 3000 200 80//Zamazingo

resizepic 60 20 3000 480 20////Liste Cizgileri

resizepic 60 40 3000 480 20////Liste Cizgileri

resizepic 60 60 3000 480 20////Liste Cizgileri

resizepic 60 80 3000 480 20////Liste Cizgileri

resizepic 60 100 3000 480 20////Liste Cizgileri

resizepic 60 120 3000 480 20////Liste Cizgileri

resizepic 60 140 3000 480 20////Liste Cizgileri

resizepic 60 160 3000 480 20////Liste Cizgileri

resizepic 60 180 3000 480 20////Liste Cizgileri

resizepic 60 200 3000 480 20////Liste Cizgileri

page 0 

dtext 200 220 450 <serv.name> Oyuncu Puan Tablosu

   dtext 65 20 38 1.Name:                       

   dtext 65 40 38 2.Name:                        

   dtext 65 60 38 3.Name:

   dtext 65 80 38 4.Name:                          

   dtext 65 100 38 5.Name:

   dtext 65 120 38 6.Name:

   dtext 65 140 38 7.Name:

   dtext 65 160 38 8.Name:

   dtext 65 180 38 9.Name:

   dtext 65 200 38 10.Name:

   dtext 450 20 38 Puan:                       

   dtext 450 40 38 Puan:                         

   dtext 450 60 38 Puan: 

   dtext 450 80 38 Puan:                           

   dtext 450 100 38 Puan: 

   dtext 450 120 38 Puan: 

   dtext 450 140 38 Puan: 

   dtext 450 160 38 Puan: 

   dtext 450 180 38 Puan: 

   dtext 450 200 38 Puan: 

for c 1 10  

obj = <var.topplayer_<dlocal.c>>

if !(strmatch('<var0.topplayer_<dlocal.c>>','0')//Düzenlendi..

   dtext 130 <hval <local.c>*20> 50 <obj.name>

   dtext 500 <hval <local.c>*20> 50 <dobj.tag0.puan_action>

endfor

Siteye dökmek istersen ;

[plevel 6]

denemeyaw



[function denemeyaw]

allplayerchars f_denemeyaw



[function f_denemeyaw]

//db.execute "delete from top10

db.execute "insert into top10 VALUES ('<uid>', '<addslashes <name>>', '<dtag0.puan_action>');"

//return 1



[function allplayerchars]

for 0 <eval <serv.accounts>-1>

local.cnum=0

local.acctnum=<local._for>

for <serv.account.<eval <local.acctnum>>.chars>

if (<serv.account.<eval <local.acctnum>>.chars>)

ref1=<serv.account.<dlocal.acctnum>.char.<dlocal.cnum>.uid>

ref1.<args>

endif

local.cnum += 1

endfor

endfor



[function addslashes]

local.str=<asc <args>>

local.string=s

for i 0 strlen(<local.str>)

    local.check=<strarg <local.str>>

    local.last=<local.check>

    if <local.check>==00

        return <strsub 1 <eval strlen(<local.string>)-2> <local.string>>

    endif

    if <local.check>=<asc \>

        local.last=<asc \>

        local.string <strsub 0 <eval strlen(<local.string>)-1> <local.string>>\\s

    elif <local.check>=<asc '>

        local.string <strsub 0 <eval strlen(<local.string>)-1> <local.string>>\'s

    else

        local.string <strsub 0 <eval strlen(<local.string>)-1> <local.string>><chr <local.check>>s

    endif

    local.str=<streat <local.str>>

endfor

return <strsub 1 <eval strlen(<local.string>)-2> <local.string>>

Bunun php kodu ;

<table width="100%" height="5%" border="1" background="images/back_content.png">

<tr>

<td width="74%">Kullanıcı Adı:</td>

<td width="74%">Puan:</td>

</tr>

</table>



<?

$tablo = "top10";

$veritabanıismi = "Veritabani?";

$veritabaninabaglan = mysql_connect("localhost","root","Şifren?")

or die ("Database servera baglanIlamadI...");

$database = mysql_select_db("$veritabanıismi", $veritabaninabaglan) or die("Veritabanı Doldurulmadi...");

$son = "select * from $tablo order by puan desc LIMIT 0, 10 ";

$bitti = mysql_query($son) or die("Sorgulama Yaparken Hata...");



while ($row = mysql_fetch_object($bitti))

{

$adi = $row->oyuncu;

$puani = $row->puan;



echo "<table width=\"100%\" height=\"5%\" border=\"1\" background=\"images/back_content.png\">";

echo "<tr>";

echo "<td width=\"74%\">$adi</td>";

echo "<td width=\"26%\">$puani</td>";

echo "</tr>";

echo "</table>";

}



mysql_free_result($bitti);

mysql_close($veritabaninabaglan);

?>



<body topmargin="1" leftmargin="15" rightmargin="10" bottommargin="10" bgcolor="e5dcca">

İsteyen kullanabilir tanıdıgım bir arkadaşa ait kodlama.

teşekkur ederim.

Tiffany :
Arkadaslar var.clients 0 diye oluşturduk var'imizi bunu scriptte Online Player:<eval <var.clients>+7> olarak işledik ve çalışır durumda

sikripting

Forumlarda sıralama diye bir function var Slothere'nin yazdığı onu uyarlıyarak hiç var falan kullanmadan çok güzel bir toplist sistemi yapabilirsiniz.

@xearth O kodlama tanıdıgım arkadasıma aittir demissin kime ait acaba söylermisin.

Ne alakası war şimdi kime ait olup olmadığının?

Çok alakası var. lütfen isim verirmisin.
tanıdıgın arkadaşını sorabilirmiyim.

İsim falan vermiyorum senide hiç ilgilendirmez işine bak..

Bu kodlama land-gamers'ın 2008 ayında açıldı 2009 yılında kapandı.
ve ayrıca kodlama ismail köse ve ozan tarafından yapıldı yani eSi ve Sincerly tarafından.
Anlamıyorum bu kodlamalar nereden geçti elinize.