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

Sayfa 1 Toplam 3 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Botun özeline !durum Yazıldığında. (https://www.ircforumlari.net/mirc-scripting-sorunlari/450890-botun-ozeline-durum-yazildiginda.html)

KivanC

09 Şubat 2012 00:16

Botun özeline !durum Yazıldığında.

mIRCScriptKoruma Botunun Özeline Kullanıcı Bot hakkında Bilgi almak istese
!durum olarak belirtse Botun içerisindeki Codlamalar kac satır , kac kb 'dır olduğunu öğrenmesini nasıl sağlarız..

Örnek :
!durum
Suan Botnick 55 txt'den oluşmakta
Botnick koruma.txt 325 kb 'dır

Gibi mümkünmüdür.

Narsinha

09 Şubat 2012 00:57

Cevap: Botun özeline !durum Yazıldığında.

//echo -a $bytes($file(koruma.txt),k).suf

koruma.txt kb cinsinden büyüklüğünü verir.

//echo -a $lines(koruma.txt)

koruma.txt'deki satır sayısını verir.

SiLuet

09 Şubat 2012 11:12

Cevap: Botun özeline !durum Yazıldığında.

Alıntı:

Egzodya Nickli Üyeden Alıntı (Mesaj 1041025021)

//echo -a $bytes($file(koruma.txt),k).suf

koruma.txt kb cinsinden büyüklüğünü verir.

//echo -a $lines(koruma.txt)

koruma.txt'deki satır sayısını verir.

Ek Olarak Dosya Klasor, dll txt ini vs uzantılı dosya sayısını Almak İçin Örnek;

Kod:

//echo 1 Bot4 $finddir($mircdir,*.*,0) Klasor4 $findfile($mircdir,*.txt,0)  Text:4  $findfile($mircdir,*.dll,0)  dll4 $findfile($mircdir,*.ini,0)  İni Uzantılı Dosyadan Oluşmaktadır.

Bot[B] 75[/B] Klasor [B]403[/B] Text: [B]53[/B] dll [B]93[/B] İni Uzantılı Dosyadan Oluşmaktadır.

Gibi Sonuçlar Alabilirsin. Verilen Örneklerden Sorununu Halletmeye Çalış Yapamazsan Yardımcı Oluruz Yine.

KivanC

09 Şubat 2012 11:38

Cevap: Botun özeline !durum Yazıldığında.

<Worgen> [ • 7W12o2rge7n - v-1 2] - 6•2 Modüller 6•
<Worgen> 6•2 Worgen: 6.37 5KB ve 173 2Satır.
<Worgen> 6•2 Worgen-SERVER: 30.14 5KB ve 478 2Satır.
<Worgen> 6•2 Worgen-CHANNEL: 26.91 5KB ve 421 2Satır.
<Worgen> 6•2 Worgen-PROFILE: 13.1 5KB ve 289 2Satır.
<Worgen> 6•2 Worgen-RADIO: 6.53 5KB ve 150 2Satır.
<Worgen> 6•2 Worgen-ENJOY: 801 5B ve 20 2Satır.
<Worgen> 6•2 Worgen--------: 5.52 5KB ve 129 2Satır.
<Worgen> 6•2 Worgen-mIRCHelp: 4.1 5KB ve 92 2Satır.
<Worgen> [ • Worgen - v-1 ] - • Data Kayıtları •
<Worgen> • Küfür Data: 9.88 KB
<Worgen> • Badnick Data: 28.82 KB
<Worgen> • Chan Data: 309 B
<Worgen> -

Gibi Bir özelden !durum halinde kişileri bilgilendirebilirmiyiz

SiLuet

09 Şubat 2012 13:25

Cevap: Botun özeline !durum Yazıldığında.

Örnek Olarak Botun Mirci İçindeki Txt Uzantılı Dosyaların
Boyutunu almak ve Kaç satır Olduğu Bilgisini istiyoruz Ve Bunun için Bota Özelden !durum Yazıyoruz.

Kod:

on *:text:*!durum:?:{

  msg $nick Durum Kontrol

  var %1. 1,%2. $findfile($mircdir,*.txt,0)

  while (%1. <= %2.) {

    msg $nick 4 $Nopath($findfile($mircdir,*.txt,%1.)) Dosya Bilgisi: 4Boyut: $bytes($file($findfile($mircdir,*.txt,%1.)),k).suf 4Satır: $lines($shortfn($findfile($mircdir,*.txt,%1.))) 

    inc %1.

  }

}

Ancak Sağlıklı Olacağını Düşünmüyorum ,Çünkü Botda Dosya Çok Olursa Flood Dan düşer. Düşmese Bile Kasma Yapar.

KivanC

09 Şubat 2012 14:43

Global Kanallarda kanal bilgisi almak

globals.txt kanalında Bulunan kanalları Takip Etmek isteriz ,

Icerisinde Bulunan #Sohbet Kanalı örnek verelim

Kod:

!Durum #Sohbet
 

#Sohbet Kanalı Son ban : $1-

#Sohbet kanalında Son Cümle: $1-

#Sohbet Kanalında Son Giren: $1-

#Sohbet Kanalında Son Cıkıs: $1-

Bunlar gibi örnek vermek istedim Biraz Değişiklik artık iyi gelir dimi

SiLuet

09 Şubat 2012 16:11

Cevap: Global Kanallarda kanal bilgisi almak

Kod:

on !*:join:#:if $read(globals.txt,w,#) { writeini $+(Kanal\,#,.ini,) Giris 1 $nick }

on !*:part:#:if $read(globals.txt,w,#) { writeini $+(Kanal\,#,.ini,) Part 1 $nick }

on !*:BAN:#:if $read(globals.txt,w,#) { writeini $+(Kanal\,#,.ini,) Ban  1 $nick }

on !*:UNBAN:#:if $read(globals.txt,w,#) { writeini $+(Kanal\,#,.ini,) UnBan 1 $nick }

on !*:Kick:#:if $read(global.txts,w,#) { writeini $+(Kanal\,#,.ini,) Kick 1 $nick }

on !*:text:*:#:if $read(globals.txt,w,#) { writeini $+(Kanal\,#,.ini,) Text 1 $nick : $1- }
 

on *:text:!durum*:#Kanal:{

  msg $nick 4 $qt($2) Durum Kontrolu Yapılıyor.

  msg $Nick 4 $qt($2) Dosya Bilgisi: $bytes($file($+(Kanal\,$2,.ini)),k).suf  $lines($+(Kanal\,$2,.ini)) Satır.

  msg $Nick 4 $qt($2) Son Giren: $readini($+(Kanal\,$2,.ini),Giris,1)

  msg $Nick 4 $qt($2) Son Çıkan: $readini($+(Kanal\,$2,.ini),part,1)

  msg $Nick 4 $qt($2) Son Ban: $readini($+(Kanal\,$2,.ini),ban,1)

  msg $Nick 4 $qt($2) Son Unban: $readini($+(Kanal\,$2,.ini),unban,1)

  msg $Nick 4 $qt($2) Son Kick: $readini($+(Kanal\,$2,.ini),Kick,1)

  msg $Nick 4 $qt($2) Son Text: $readini($+(Kanal\,$2,.ini),Text,1)

}

Gibi.

KivanC

09 Şubat 2012 16:52

Cevap: Botun özeline !durum Yazıldığında.

<Sky-BLuE> !durum #Diyalog
<IBot> "#Diyalog" Durum Kontrolu Yapılıyor.
<IBot> "#Diyalog" Dosya Bilgisi: 0 Satır.
<IBot> "#Diyalog" Son Giren:
<IBot> "#Diyalog" Son Çıkan:
<IBot> "#Diyalog" Son Ban:
<IBot> "#Diyalog" Son Unban:
<IBot> "#Diyalog" Son Kick:
<IBot> "#Diyalog" Son Text:

Herhangi Bir Sonuc Alamadım Pardon Birde Kanalda kullanabilirmiyiz.

SiLuet

09 Şubat 2012 17:44

Cevap: Botun özeline !durum Yazıldığında.

Alıntı:

Sky-bLue Nickli Üyeden Alıntı (Mesaj 1041025478)

Kodu Tekrar Al,Kanal' Göre Ayarlandı. AYrıca Botun Verileri kayıt edebilmesi İçin, Dialog Kanalında Olması Lazım vede Kanalın globals.txt İçerisinde Olması Lazım. Kodu Paylaşırken Mirc Ana Dizininde Kanal Klasorunun Oluşturman Gerek Onu Söylemeyi Unutmuşum.

KivanC

09 Şubat 2012 23:38

Cevap: Botun özeline !durum Yazıldığında.

Alıntı:

SiLuet Nickli Üyeden Alıntı (Mesaj 1041025540)

«23:36:47» <Sky-BLuE> !durum #Diyalog
«23:37:08» <Sky-BLuE> !durum #Diyalog
«23:37:25» <Sky-BLuE> !durum #Diyalog
«23:37:47» <Sky-BLuE> !durum #Diyalog

Sonuc Alamadım Usta.

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 17:50.

Sayfa 1 Toplam 3 Sayfadan

Konuya ait 40 Mesajı başka Sayfada göster