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

->> [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

işlevi:
.tarih ve .saat komutlarına cevap verir.
her saat başında tarih+saat bilgisi atar.

hangi kanal üstünde çalışması isteniyorsa bota bağlanıp :
.chanset #kanal +saat

Kod:

setudef flag saat
 

bind pubm - "*" saat:pub
 

proc saat:pub {nick uhost hand chan text} {

  if {![channel get $chan saat]} { return;}

  set ::schan $chan

  set a [lindex [string tolower $text] 0]

  switch -- $a {

  .saat { set saat [clock format [clock scan "0 second" -base [clock seconds]] -format "\00304,01\002%H:%M:%S\002\003"]

         putserv "privmsg $chan :\002Saat\002: $saat"

        }

  .tarih { set tarih [clock format [clock scan "0 day" -base [clock seconds]] -format "\00304,01Tarih:\003 \002%d-%B-%Y %A\002 \00304,01Saat:\003 \002%H:%M:%S\002"]

           set tarih [string map -nocase {

                     "January" "Ocak" "February" "Şubat" "March" "Mart" "April" "Nisan" "May" "Mayıs" "June" "Haziran"

                     "July" "Temmuz" "August" "Ağustos" "September" "Eylül" "October" "Ekim" "November" "Kasım"

                     "December" "Aralık" "Monday" "Pazartesi" "Tuesday" "Salı" "Wednesday" "Çarşamba" "Thursday" "Perşembe"

                     "Friday" "Cuma" "Saturday" "Cumartesi" "Sunday" "Pazar"} [join $tarih]]

           putserv "privmsg $chan :$tarih"

        }

      return 0

      }

 }      
 

bind time - "00 *" sayac:pub
 

proc sayac:pub {min hour day mon year} {

  set chan $::schan

  if {![channel get $chan saat]} { return;}

  set tarih [clock format [clock scan "0 day" -base [clock seconds]] -format "\00304,01Tarih:\003 \002%d-%B-%Y %A\002 \00304,01Saat:\003 \002%H:%M:%S\002 \026%z\026"]

  set tarih [string map -nocase {

            "January" "Ocak" "February" "Şubat" "March" "Mart" "April" "Nisan" "May" "Mayıs" "June" "Haziran"

            "July" "Temmuz" "August" "Ağustos" "September" "Eylül" "October" "Ekim" "November" "Kasım"

            "December" "Aralık" "Monday" "Pazartesi" "Tuesday" "Salı" "Wednesday" "Çarşamba" "Thursday" "Perşembe"

            "Friday" "Cuma" "Saturday" "Cumartesi" "Sunday" "Pazar"} [join $tarih]]

    putserv "privmsg $chan :$tarih"

    return 0       

}
 

putlog "ok..."

saat'in doğru gösterebilmesi için botunuzun .conf'unda saat/timezone ayarlarını doğru yapılandırmış olmanız gerekir.

Kod:

set timezone "EST"

set offset "-3"

set env(TZ) "$timezone$offset"

bu ayarlar doğru saati verecektir.

set env(TZ) ayarına dikkat edin bu ayar

Kod:

set env(TZ) "$timezone $offset"

değil..

Kod:

set env(TZ) "$timezone$offset"

$timezone ve $offset birleşik olmalı.aksi halde hatalı saat alırsınız.

bu ayar eski eggdrop.conf'larında hatalıydı.sonradan farkedilip bu şekilde düzeltildi...