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

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.

SiLuet

10 Şubat 2012 00:43

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

Alıntı:

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

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

Peki Kanal Klasorunde #Diyalog veya Global Kanallardan Biri isminde Dosya Oluşturuyormu?

KivanC

10 Şubat 2012 00:51

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

Evet Var , #Diyalog Şeklinde , Denedim Her şekliyle ama komuta Cevap vermedi.

SiLuet

10 Şubat 2012 01:03

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

Alıntı:

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

Evet Var , #Diyalog Şeklinde , Denedim Her şekliyle ama komuta Cevap vermedi.

Kanal dosyalarında veri kayıt edilmiş mi peki.
[Giris]
1=falan
[Çıkış]
1=filan
gibi
birde Koddaki msg $nick kısımlarını msg #kanal olarak değişirsin Şimdi Aklıma Geldi.

KivanC

10 Şubat 2012 09:50

Cevap: Global Kanallarda kanal bilgisi almak

Alıntı:

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

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.

Suanda Usta Herhangi Bir Klasor , Txt , Txt içerisinde Veri kayıt olmamıs.

SiLuet

10 Şubat 2012 10:26

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

Çalışmaması İçin Bir Sorun Görünmüyor Bende Şimdi denedim?

[10:18:59] <Sancak> !durum #radyo
[10:18:59] <Fenerbahçe> "#radyo" Durum Kontrolu Yapılıyor.
[10:18:59] <Fenerbahçe> "#radyo" Dosya Bilgisi: 0.18KB 10 Satır.
[10:18:59] <Fenerbahçe> "#radyo" Son Giren: Danq3Rxx
[10:18:59] <Fenerbahçe> "#radyo" Son Çıkan: doktorrr__ist
[10:18:59] <Fenerbahçe> "#radyo" Son Ban: aSLim
[10:18:59] <Fenerbahçe> "#radyo" Son Unban: Cesuryürek
[10:18:59] <Fenerbahçe> "#radyo" Son Kick:
[10:18:59] <Fenerbahçe> "#radyo" Son Text: TrApPeR : şirin_süsleniyoruumm bizim köyde dügün cumadan başlar pazar biter:)

Gördüğün Gibi,veriler Kayıt edilcek Kanallar globals.txt İçerisinde Olmalı.

Kodun Ekli olduğu Kışımda Başka Kod Olmamasınada Dikkat edin belki Çakışma Yapabilir.

KivanC

10 Şubat 2012 11:01

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

Global.txt içerisi bende Boş Görünüyor Sadece #Diyalog yazıyor

KivanC

10 Şubat 2012 11:11

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

Kanal ismine Klasor oluştıurmam gerek dimi ?

Kanal , Adında Klasör oluşturdum
Global.txt , Adında txt içerinde #Dİyalog var
Bot #Dİyalog kanalı Icerisinde

Narsinha

10 Şubat 2012 11:18

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

Alıntı:

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

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

unutmuşşun

Alıntı:

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

Kanal ismine Klasor oluştıurmam gerek dimi ?

Kanal , Adında Klasör oluşturdum
Global.txt , Adında txt içerinde #Dİyalog var
Bot #Dİyalog kanalı Icerisinde

evet hata ordan kaynaklanıyor Kanal dosyası olmadığı için içine *.ini uzantılı dosya oluşturamıyor.Kanal dosyası oluşturacaksın ve çalışmasını istediğin kanal globals.txt içerisinde olacak.

Paint

10 Şubat 2012 11:34

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

Kodun daha sağlıklı çalışması için alttaki durum bölümünün kodun üstünde olması gerekir.

KivanC

10 Şubat 2012 11:53

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

Suan kanal Klasor'unda dyalog.in Acıldı Fakat !durum #diyalog kodlaması yemiyor komut işlemiyor bir yerinde kücük bir halt var ama.

KivanC

10 Şubat 2012 11:56

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

Alıntı:

Paint Nickli Üyeden Alıntı (Mesaj 1041026514)

Kodun daha sağlıklı çalışması için alttaki durum bölümünün kodun üstünde olması gerekir.

Haklı cıktın :)

<Sky-BLuE> !durum #Sohbet
<IBot> "#Sohbet" Durum Kontrolu Yapılıyor.
<IBot> "#Sohbet" Dosya Bilgisi: 0.18KB 8 Satır.
<IBot> "#Sohbet" Son Giren: Sky-BLuE
<IBot> "#Sohbet" Son Çıkan: hakan-ofiste
<IBot> "#Sohbet" Son Ban: NoMercy
<IBot> "#Sohbet" Son Unban:
<IBot> "#Sohbet" Son Kick:
<IBot> "#Sohbet" Son Text: NoMercy : IBot; kanal genelinde baska bir

Unban:
Kick:

Eksik Görünüyor.

Eset	23 Mayıs 2012 07:03

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

hocam bunu klasör olarak nasıl ayırt edebiliriz hangi txt hangi klasörün içersinde ise onuda yazabilir mi örnek;

Kod:

[07:00] <~Nod32>  Yeni Klasör2

[07:00] <~Nod32>  yasaks.txt Dosya Bilgisi: Boyut: 0KB Satır: 0 

[07:00] <~Nod32>  yident.txt Dosya Bilgisi: Boyut: 0.01KB Satır: 1

[07:00] <~Nod32>  Yeni Klasör3

[07:00] <~Nod32>  yönetimkanal.txt Dosya Bilgisi: Boyut: 0.06KB Satır: 7 

[07:00] <~Nod32>  channels.txt Dosya Bilgisi: Boyut: 0.91KB Satır: 13 

[07:00] <~Nod32>  Yeni Klasör4

[07:00] <~Nod32>  magazin.txt Dosya Bilgisi: Boyut: 5.71KB Satır: 100 

[07:00] <~Nod32>  spor.txt Dosya Bilgisi: Boyut: 1.15KB Satır: 20

[07:00] <~Nod32>  yident.txt Dosya Bilgisi: Boyut: 0KB Satır: 0

gibi tabi hangi klasörde ise o klasörün adını yazsın

Supernova

23 Mayıs 2012 10:29

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

Kod:

 [10:12] <NoMercy>  2• 12No14Me15rcy v145 Sec12urity2™ Network : 232 satır.

[10:12] <NoMercy>  2• 12No14Me15rcy v145 Sec12urity2™ W-Master : 1177 satır.

[10:12] <NoMercy>  -

[10:12] <NoMercy>  2• 12 Kurulu Aliaslar 2•12

[10:12] <NoMercy>  -

[10:12] <NoMercy>  2• 12No14Me15rcy v145 Sec12urity2™ Aliaslar

[10:12] <NoMercy>  2• 12No14Me15rcy v145 Sec12urity2™ Alias 1 : 907 satır.

[10:12] <NoMercy>  2• 12No14Me15rcy v145 Sec12urity2™ Alias 2 : 193 satır.

[10:12] <NoMercy>  2• 12No14Me15rcy v145 Sec12urity2™ Toplam satır sayısı : 5250 satır.

[10:12] <NoMercy> Kullanılan hash table : 18 Adet

Gibi bişey mi istiyorsun ?

Eset	23 Mayıs 2012 11:31

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

yanlış yere yazmışım :) ya ben !istatistik yazdığımda botun klasörde bulunan bütün txt lerin adını ve boyutunu gösteriyor fakat bu txtler hangi klasörde onuda gösterse güzel olacak, onu kast etmiştim kod bu fakat hangi txt hangi klasörün içersinde onu da göstersin teşekkürler. uykulu uykulu birdaha yorum yapmacayağım :)

Kod:

  if ($1 == !istatistik) {

    msg $chan Durum Kontrol

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

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

      msg $chan 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.

    }

  }

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