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

NeLix · 23 Ağustos 2005, 23:06

on 10*:text:*:?: {
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)
}

şöyle ßir şey yapmam mümlün olur mu acaßa denicem ama e-kolaydan banlıyım ..

aSii_GeNc · 23 Ağustos 2005, 23:18

ilk önce ekli olmalı Master
/auser 101 masternick
ondan sonra masternick !ekle nick olarak user eklemeli sonra çalışır..
Herşeyi ayrıntısına kadar anlatmayalım arkadaşlar biraz tahmin edin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

NeLix · 23 Ağustos 2005, 23:22

asii_Genc ağßi senden ßir ricam olsa ßu /auser 101 masternick ve !ekle nick eklemeden sadece variables ßölümünde %loginnick Nick şeklinde ekli olunca çalışsa onu yapaßilir miyiz ?

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ı...

aSii_GeNc · 24 Ağustos 2005, 12:23

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


 
on 10*:text:*:?: {
if ($ulevel == 101) {
    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 $puan($2).toplam
         }
         else { msg $nick $2 Şu an offline }
        }
        else {
         msg $nick $2 Şu anki onLine Süresi $puan($2).puan
         msg $nick $2 Toplam onLine Süresi $puan($2).toplam
        }
     }
     else {
        msg $nick --- Listeleniyor ----
        var %i = $ulist(*,100,0)
        while %i {
         %n = $gettok($ulist(*,100,%i),1,42)
         msg $nick Nick: %n Puan: $puan(%n).toplam Durum: $iif($($+(%,online.,%n),2),Online Login: $iif($($+(%,login.,%n),2),$puan(%n).puan,Login oLmamış! ),Offline)
         dec %i
        }
        msg $nick ----- Son ------
        msg $nick Ayrıntı için "!puan nick"
     }
    }
 
}
else {
    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 Toplam: $puan($nick).toplam Şu anki Puan: $puan($nick).puan
    }
}
}
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)
}
alias puan {
if $prop == puan {
    if ($($+(%,login.,$1),2)) {
     return $duration($calc($ctime - $($+(%,login.,$1),2)),2)
    }
    else { return 0secs }
}
if $prop == toplam {
    set $($+(%,toplam2.,$1),1) $calc($($+(%,toplam.,$1),2) + $iif($($+(%,login.,$1),2),$calc($ctime - $($+(%,login.,$1),2)),0))
    if (!$($+(%,toplam2.,$1),2)) { var %2 = 1 }
    else { var %2 = $($+(%,toplam2.,$1),2) }
    return $duration(%2,2)
}
}

Tekrar düzenledim. Puanlama yok dakikasını snysini gösterir.
Puanlama görüldüğü gibi "puan" identifier inda. Değişiklikleriniz $duration kısmında yapabilirsiniz...

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

 
[12:19] <DarkLord> !login
[12:19] <asd> Login oLdunuz!
[12:19] <DarkLord> !puan
[12:19] <asd> Toplam: 30mins Şu anki Puan: 7secs

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

[12:20] <aSii_GeNc> !ekle DarkPrinCe
[12:20] <asd> DarkPrinCe Eklendi!
[12:20] <aSii_GeNc> !puan
[12:20] <asd> --- Listeleniyor ----
[12:20] <asd> Nick: DarkPrinCe Puan: 1sec Durum: Offline
[12:20] <asd> Nick: DarkLord Puan: 32mins Durum: Online Login: 1min
[12:20] <asd> ----- Son ------
[12:20] <asd> Ayrıntı için "!puan nick"
[12:20] <aSii_GeNc> !puan DarkLord
[12:20] <asd> DarkLord Şu anki onLine Süresi 1min
[12:20] <asd> DarkLord Toplam onLine Süresi 32mins
[12:21] <aSii_GeNc> !puan DarkPrince
[12:21] <asd> DarkPrince Şu an offline

Bir kanal olayı varsa.
on 100:NOTIFY: kısmını on 100:join:#kanal:
on 100:UNOTIFY kısmını on 100:part:#kanal:
değiştirebilirsin...

djiNn · 24 Ağustos 2005, 13:08

eLine Sağlık Asii_Genc
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Inşallah Senin Bu Yazdıklarını Kendim Yazdım Diye Övünen Olmaz
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Veya Yazacam Diye Kandırmaya Çalışan
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
DDDDDDDDDDDD aehuaeh

aSii_GeNc · 24 Ağustos 2005, 16:24

Ben kimse adımı duysun diyerek bunu yapmıyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kullananı görürsem bu beni sevindirir.
Zaten söylemişin işte çalan anca kendini kandırır...

Spectral · 18 Haziran 2007, 05:35

aradan Çok Zaman Geçmiş Ama Bilen Birisi Cevap Verir Umarım

Ben Bunun Sürelisinin Türkçesini Ve @ Kanalında !durum yazdığım Zaman Bot O An @ Kanalında Olanların Toplam Kanalda Ne Kadar Durduklarını Yazacak

[12:19] <DarkLord> !puan
[12:19] <asd> Toplam: 30mins Şu anki Puan: 7secs

Bunun !durum Yazacam

Bot
x nick = 1 saat
y nick = 10 dk
Toplam o Güne Kadar Kaç Dakka Saat Durduysa

Bide Login Olma Gibi Bİşi Olmıcak Sadece Ben Kullanacam Ve O An Kanalda Olanların

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
!Puan Yazınca Puan Göstermek.	Amigo	mIRC Scripting Sorunları	21	30 Mayıs 2017 19:48
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)

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.