!login !puan v.s. bot komutları... - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

NeLix · 22 Ağustos 2005, 22:26

mesala benim botuma registerli ßir nick geldi kendini !login ledi sonra kanalda kaç saat online olduğuna bakacam !puan dediğim zaman nasıl olacak o ßir yardım edecek olan var mı ?

erdem55 · 23 Ağustos 2005, 00:21

nelix sen şimdi adamın kanalda kalma süresine göre puanlama mı yapmak istiyosun yoksa yanlışmı anladım. Valla ne yalan sölim yardım etmeyi istiyorum ama bunu nasıl ayarlıcamı bilmiyorum. Koder arkadaşlara yine iş düştü
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

NeLix · 23 Ağustos 2005, 14:58

Evet !puan dediğim !login olan nicklerin kaç saat online olduklarına bakacam nasıl yapacaz onu ?

WhaLberg · 23 Ağustos 2005, 21:04

NeLix amacın ne bilmiyorum ama senin yardım edilmesi yönünde bir ileti göndermen yeterli. Üç taneye ne gerek var? Sabretmeyi öğrenmeli.

NeLix · 23 Ağustos 2005, 21:15

sende haklısın whaLberg özür diler..

aSii_GeNc · 23 Ağustos 2005, 22:05

Walla herhalde bi kanal olayı yok..
Biraz karışık kod yazarım ama çalışır
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


on 10*:text:*:?: {
if ($ulevel == 101) {
;Burda master başlıyor..
    if ($1 == !ekle) && $2 {
     .auser 100 $2
     .notify $2
     msg $nick $2 Eklendi!
    }
    if ($1 == !sil) && $2 {
     .ruser 100 $2
     .notify -r $2
     unset $+(%,*,$2)
     msg $nick $2 Silindi!
    }
 
    if ($1 == !puan) {
     if ($2) {
        if (!$($+(%,login.,$2),2)) {
         if ($($+(%,online.,$2),2)) {
            msg $nick $2 online gözüküyor ama login olmadı!
            msg $nick $2 Toplam onLine Süresi $duration($($+(%,toplam.,$2),2),2)
         }
         else { msg $nick $2 Şu an offline $($+(%,online.,$nick),2) }
        }
        else {
         msg $nick $2 Şu anki onLine Süresi $duration($calc($ctime - $($+(%,login.,$2),2)),2)
         msg $nick $2 Toplam onLine Süresi $duration($calc($($+(%,toplam.,$2),2) + ($ctime - $($+(%,login.,$2),2))),2)
        }
     }
     else {
        msg $nick --- Listeleniyor ----
        var %i = $ulist(*,100,0)
        while %i {
         %n = $gettok($ulist(*,100,%i),1,42)
         msg $nick Nick: %n Puan: $duration($($+(%,toplam.,%n),2),2) Durum: $iif($($+(%,online.,%n),2),Online Login: $iif($($+(%,login.,%n),2),$duration($calc($ctime - $($+(%,login.,%n),2)),2),Login oLmamış! ),Offline)
         dec %i
        }
        msg $nick ----- Son ------
        msg $nick Ayrıntı için "!puan nick"
     }
    }
 
}
;master sonu
else {
;user başlangıcı
    if ($1 == !Login) {
     if ($($+(%,login.,$nick),2)) { msg $nick Zaten Loginsiniz! }
     else { msg $nick Login oLdunuz! }
     set $($+(%,login.,$nick),1) $ctime
    }
    if ($1 == !Puan) {
     msg $nick Puan: $duration($($+(%,toplam.,$nick),2),2)
    }
}
;user sonu
}
on 100:NOTIFY: { set $($+(%,online.,$nick),1) on }
on 100:UNOTIFY: {
if ($($+(%,login.,$nick),2)) {
    set $($+(%,toplam.,$nick),1) $calc($($+(%,toplam.,$nick),2) + ($ctime - $($+(%,login.,$nick),2)))
}
unset $($+(%,login.,$nick),1)
unset $($+(%,online.,$nick),1)
}

Özellikleri:
1. Level Sistemi ile çalışır
2. 100 User
3. 101 Masterdır.
4. Kişi online olur login olur,olmaz bunları ayrıntılar.
5. Toplam ve o an online olduğu süreyi görebilirsin..

Master Özellikleri:
!puan "Bütün Nicklerin Puanlarını Listeler"
!puan nick " Sadece o nickin puanını listeler"
!ekle nick "Nick ekler"
!sil nick "nick siler"

User özellikleri
!login "login olur"
!puan "kendi puanını öğrenir"

Not: Kodların yanlarına açıklamalar yaptım eklenecek birşeyler olursa ekleriz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Hataları yazmadım nick bulunamadı v.s. kod zaten kalabalık

erdem55 · 23 Ağustos 2005, 22:24

<delisin> !login
<erdem55> Zaten Loginsiniz!
<delisin> !puan
<erdem55> Puan:

bi sorun var ama çözemedim puan vermiyor

erdem55 · 23 Ağustos 2005, 23:28

erdem55 Nickli Üyeden Alıntı

<delisin> !login
<erdem55> Zaten Loginsiniz!
<delisin> !puan
<erdem55> Puan:

bi sorun var ama çözemedim puan vermiyor

gözden kaçtı sanırım puanları söylemiyor

24 Ağustos 2005, 11:04

Ben bir kod yazdım ama çalışıp çalışmadığından emin değilim. Eğer çalışmazsa akşama düzenler, yarın yeniden yollarım...

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


alias _calc {
  if (!$hget(calc)) hmake calc 10
   if ($gettok($2,1,58) > $gettok($1,1,58)) return
   if ($gettok($1,1,58) > 23 || $gettok($2,1,58) > 23) return
   hadd calc top1 $calc($gettok($1,1,58) * 3600 + $gettok($1,2,58) * 60 + $gettok($1,3,58))
   hadd calc top2 $calc($gettok($2,1,58) * 3600 + $gettok($2,2,58) * 60 + $gettok($2,3,58))
   
   hadd calc gun $calc($gettok($3,1,47) - $gettok($4,1,47))
   hadd calc fark $calc($hget(calc,top1) - $hget(calc,top2))
   if $hget(calc,fark) >= 3600 {
     hadd calc saat 1
     :loop
     hadd calc fark $calc($hget(calc,fark) - 3600)
     if $hget(calc,fark) >= 3600 { hinc calc saat | goto loop }
   }
   else { hadd calc saat 0 }
   if $hget(calc,fark) >= 60 {
     hadd calc dakika 1
     :loop2
     hadd calc fark $calc($hget(calc,fark) - 60)
     if $hget(calc,fark) >= 60 { hinc calc dakika | goto loop2 }
   }
   else { hadd calc dakika 0 }
   return $hget(calc,gun) Gün, $hget(calc,saat) Saat, $hget(calc,dakika) dakika, $hget(calc,fark) Saniye
   hfree calc
}
alias puan { return $calc($gettok($1,1,32) * 1440 + $gettok($1,3,32) * 24 + $gettok($1,5,32)) }
on *:TEXT:*:?: {
  if $nick == admin {
    if $1 == !istatistikler {
      var %avril = 1
      while %avril <= $hget(ist,0).item {
        _linedance msg $nick $hget(ist,%avril).data
        inc %avril
      }
    }
  }
  if (!$hget(login)) hmake login 100
  if $1 == !login {
    if $nick ison #mychan {
      if ($hget(login,$nick)) .msg $nick Zaten Login Oldunuz!
      else { 
        hadd login $nick $time $date 
        .msg $nick Hoş Geldiniz, $nick $+ . Login Olduğunuz Saat: $time Tarih: $date 
      }
    }
  }
  elseif $1 == !puan {
    if $nick ison #mychan {
      if (!$hget(login,$nick)) .msg $nick Login Olmamışsınız!..
      else {
        .msg $nick Şu an ki Online Süreniz: $_calc($gettok($hget(login,$nick),1,32),$time,$gettok($hget(login,$nick),2,32),$date)
        .msg $nick Buna göre puanınız: $puan($_calc($gettok($hget(login,$nick),1,32),$time,$gettok($hget(login,$nick),2,32),$date))
      }
    }
  }
  elseif $1 == !logout {
    if $hget(login,$nick) {
      hadd ist $r(0,99999999) $nick $puan($gettok($hget(login,$nick),1,32),$time,$gettok($hget(login,$nick),2,32),$date))
      hsave ist ist.data 
      hdel login $nick
      if (!$hget(login,$nick)) .msg $nick Başarı ile Logout oldunuz
      else .msg $nick Logout İşlemi Sırasında bir hata oluştu
    }
    else .msg $nick Zaten Login değilsiniz.
  }
}
on *:PART:#mychan: { 
  if $hget(login,$nick) {
    hdel login $nick 
    .msg $nick Otomatik Logout!..
    hadd ist $r(0,99999999) $nick $puan($_calc($gettok($hget(login,$nick),1,32),$time,$gettok($hget(login,$nick),2,32),$date))
    hsave ist ist.data
  }
}
on *:START: {
  if !$findfile($mircdir,ist.data,1) { hmake ist 100 | hsave ist ist.data }
  else { hmake ist | hload ist ist.data }
}

24 Ağustos 2005, 11:06

Bu kodda bir iki açıklama yapayım.

1- Online Süresinde Dakika başına bir puan verir
2- #mychan yerine Kendi kanalını yazacaksınız
3- $nick == admin 'daki "admin" yerine botu kullanacak kişinin nicki yazılmalı...

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal gösterime geğ Hybrid-Şeklinde Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Güncel unrealde puan kullanıcılara puan sistemi	Frei	Unreal IRCd	3	03 Aralık 2021 17:27
22.02.2014 Kalbim.Net Chanserv Levels Komutları ve Chanserv Akick Egitim Komutları	Amelia	Eğitim Dünyası	9	23 Şubat 2014 16:26
Nick Serv Komutları - IRC Komutları - mIRC	armoking_yesil	Unreal IRCd	0	09 Mart 2009 20:35

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

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.