IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 15 Haziran 2009, 16:57   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Sadece Oplar için




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#kanal:{
  
;muaf nickler buraya
  
if ($istok(nick1 nick2 nick3,$nick,32)) { halt }
  if (!
$hget(topten)) { hmake topten }
  if ($
== !toplist) { msg $chan $toplist halt }
  if ($
== !puan) { msg $chan $nick Senin Puanın$iif($hget(topten,$nick),$hget(topten,$nick),Yok) | halt }
  if (
$len($1-) <= 50) { hinc topten $nick 1 hsave -o topten $shortfn($mircdirtopten.data) }
}
on *:start:{
  if (!
$hget(topten)) { hmake topten hload topten $shortfn($mircdirtopten.data) }
}
on *:exit:hsave -o topten $shortfn($mircdirtopten.data)
on *:disconnect:hsave -o topten $shortfn($mircdirtopten.data)
alias toplist {
  unset %
top10puan
  hsave topten $shortfn
($mircdirtopten.data)
  .
hfree -sw topten hmake topten hload topten $shortfn($mircdirtopten.data)
  var %
xc $hget(topten,0).data,%ss 1
  
while (%ss <= %xc) {
    
set %top10puan $addtok(%top10puan,$hget(topten,%ss).data,46)
    
inc %ss 1
  
}
  var %
sira $sorttok(%top10puan,46,nr)
  var %
1,%1,%1,%1,%1,%1,%1,%1,%1,%10 1
  
%$fazlaise($gettok(%sira,1,46)) $gettok(%sira,1,46)
  %
$fazlaise($gettok(%sira,2,46)) $gettok(%sira,2,46)
  %
$fazlaise($gettok(%sira,3,46)) $gettok(%sira,3,46)
  %
$fazlaise($gettok(%sira,4,46)) $gettok(%sira,4,46)
  %
$fazlaise($gettok(%sira,5,46)) $gettok(%sira,5,46)
  %
$fazlaise($gettok(%sira,6,46)) $gettok(%sira,6,46)
  %
$fazlaise($gettok(%sira,7,46)) $gettok(%sira,7,46)
  %
$fazlaise($gettok(%sira,8,46)) $gettok(%sira,8,46)
  %
$fazlaise($gettok(%sira,9,46)) $gettok(%sira,9,46)
  %
10 $fazlaise($gettok(%sira,10,46)) $gettok(%sira,10,46)
  return 
0,10Top10 Puan $+(0,$chr(44),4,#10,$chr(44),10,$chr(32),%1) $+(0,$chr(44),4,#20,$chr(44),10,$chr(32),%2) $+(0,$chr(44),4,#30,$chr(44),10,$chr(32),%3) $+(0,$chr(44),4,#40,$chr(44),10,$chr(32),%4) $+(0,$chr(44),4,#50,$chr(44),10,$chr(32),%5) $+(0,$chr(44),4,#60,$chr(44),10,$chr(32),%6) $+(0,$chr(44),4,#70,$chr(44),10,$chr(32),%7) $+(0,$chr(44),4,#80,$chr(44),10,$chr(32),%8) $+(0,$chr(44),4,#90,$chr(44),10,$chr(32),%9) $+(0,$chr(44),4,#100,$chr(44),10,$chr(32),%10)
}
alias -l fazlaise {
  unset %
| unset %w
  
var %$hfind(topten,$1,0,w).data
  
while (%i) {
    %
$hfind(topten,$1,%i,w).data
    
%= %%w
    dec 
%i
  
}
  return 
$replace($sorttok(%w,32,a),$chr(32),$chr(44))


Elimdeki bu kodda !toplist komutunu sadece oplar kullanabilsin istiyorum. Nasıl olacak ?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 15 Haziran 2009, 18:58   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sadece Oplar için




PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on @*:text:*:#kanal:{
  
;muaf nickler buraya
  
if $me !isop ${ return }
  if (
$istok(nick1 nick2 nick3,$nick,32)) { halt }
  if (!
$hget(topten)) { hmake topten }
  if ($
== !toplist) { msg $chan $toplist halt }
  if ($
== !puan) { msg $chan $nick Senin Puanın$iif($hget(topten,$nick),$hget(topten,$nick),Yok) | halt }
  if (
$len($1-) <= 50) { hinc topten $nick 1 hsave -o topten $shortfn($mircdirtopten.data) }
}
on *:start:{
  if (!
$hget(topten)) { hmake topten hload topten $shortfn($mircdirtopten.data) }
}
on *:exit:hsave -o topten $shortfn($mircdirtopten.data)
on *:disconnect:hsave -o topten $shortfn($mircdirtopten.data)
alias toplist {
  unset %
top10puan
  hsave topten $shortfn
($mircdirtopten.data)
  .
hfree -sw topten hmake topten hload topten $shortfn($mircdirtopten.data)
  var %
xc $hget(topten,0).data,%ss 1
  
while (%ss <= %xc) {
    
set %top10puan $addtok(%top10puan,$hget(topten,%ss).data,46)
    
inc %ss 1
  
}
  var %
sira $sorttok(%top10puan,46,nr)
  var %
1,%1,%1,%1,%1,%1,%1,%1,%1,%10 1
  
%$fazlaise($gettok(%sira,1,46)) $gettok(%sira,1,46)
  %
$fazlaise($gettok(%sira,2,46)) $gettok(%sira,2,46)
  %
$fazlaise($gettok(%sira,3,46)) $gettok(%sira,3,46)
  %
$fazlaise($gettok(%sira,4,46)) $gettok(%sira,4,46)
  %
$fazlaise($gettok(%sira,5,46)) $gettok(%sira,5,46)
  %
$fazlaise($gettok(%sira,6,46)) $gettok(%sira,6,46)
  %
$fazlaise($gettok(%sira,7,46)) $gettok(%sira,7,46)
  %
$fazlaise($gettok(%sira,8,46)) $gettok(%sira,8,46)
  %
$fazlaise($gettok(%sira,9,46)) $gettok(%sira,9,46)
  %
10 $fazlaise($gettok(%sira,10,46)) $gettok(%sira,10,46)
  return 
0,10Top10 Puan $+(0,$chr(44),4,#10,$chr(44),10,$chr(32),%1) $+(0,$chr(44),4,#20,$chr(44),10,$chr(32),%2) $+(0,$chr(44),4,#30,$chr(44),10,$chr(32),%3) $+(0,$chr(44),4,#40,$chr(44),10,$chr(32),%4) $+(0,$chr(44),4,#50,$chr(44),10,$chr(32),%5) $+(0,$chr(44),4,#60,$chr(44),10,$chr(32),%6) $+(0,$chr(44),4,#70,$chr(44),10,$chr(32),%7) $+(0,$chr(44),4,#80,$chr(44),10,$chr(32),%8) $+(0,$chr(44),4,#90,$chr(44),10,$chr(32),%9) $+(0,$chr(44),4,#100,$chr(44),10,$chr(32),%10)
}
alias -l fazlaise {
  unset %
| unset %w
  
var %$hfind(topten,$1,0,w).data
  
while (%i) {
    %
$hfind(topten,$1,%i,w).data
    
%= %%w
    dec 
%i
  
}
  return 
$replace($sorttok(%w,32,a),$chr(32),$chr(44))




Konu Cihandar tarafından (16 Haziran 2009 Saat 01:08 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 15 Haziran 2009, 20:42   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sadece Oplar için




ikisi arasındaki fark ne ben göremedim.

 
Alıntı ile Cevapla

Alt 15 Haziran 2009, 21:06   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sadece Oplar için




Denedin mi ?

 
Alıntı ile Cevapla

Alt 16 Haziran 2009, 00:36   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sadece Oplar için




eveet.

 
Alıntı ile Cevapla

Alt 16 Haziran 2009, 01:03   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sadece Oplar için




Tekrar Al Düzeltim

 
Alıntı ile Cevapla

Alt 16 Haziran 2009, 02:31   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Sadece Oplar için




Bu defa da hiç çıkmadı op veya kullanıcı.

 
Alıntı ile Cevapla

Cevapla

Etiketler
için, mirc, mirc download, mirc indir, oplar, sadece


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Yollar sadece gitmek için değil, gelmek için de var... Luthien Şiir, Hikaye ve Güzel Sözler 0 20 Eylül 2014 23:48
Sohbethelp ve oplar için Spam botu Bugra Eggdrop, NeoStats, BNC 4 04 Mayıs 2014 00:50
Text mesajını sadece oplar kullanabilsin sito mIRC Scripting Sorunları 1 17 Eylül 2013 16:17
bu oplar varya bu oplar ah bu oplar Goblin Komik Loglar 4 12 Mart 2007 00:00
Oyun Botu Sadece Oplar Komut Versin ? djsabay Eggdrop, NeoStats, BNC 1 13 Şubat 2007 00:35