Sohbet , Chat , IRC Forum , Genel Forum Sitesi  

  Sohbet , Chat , IRC Forum , Genel Forum Sitesi > >

 



Yeni Konu   Cevap Yaz

 
Seçenekler Stil
Alt 09 Şubat 2019, 19:33   #1
Fredyyy

Fredyyy - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 29 Kasım 2015
Mesajlar: 6
Konuları:
WEB Sitesi: Yok
IRC Sunucusu: Yok

Aldığı Beğeni: 1
Verdiği Beğeni: 4
-ip arşiv kodu hk.


PHP- Kodu: 
on *:snotice:*:{
if (*
client*connectiswm $1-) { 
var %
difyip $remove($token($10,2,64),$chr(41)), %difynick = $9, %difyident $remove($token($10,1,64),$chr(40))
if 
$read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick$chr(32),*)) { write $+(-dl,$readnarsiv.txt }
write arsiv.txt %difyip %difynick 4Ident: $+ %difyident 1Son Girişi: $+($time,-,$date
}
elseif (*
changed*his*her*nicknameiswm $1-) {
var %
difyzip $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz $remove($token($5,1,64),$chr(40))
if 
$read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynick z,$chr(32),*)) { write $+(-dl,$readnarsiv.txt }
write arsiv.txt %difyzip %difynickz 4Ident: $+ %difyidentz 1Son Girişi: $+($time,-,$date
}
}
;
kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz
on *:text:*:#: { 
if $regex($1,/^([!/./-][Iıİi]p)$/i) {
if 
$regex($2,/^\d+.\d+/) {
if 
$read(arsiv.txt,r,/^\$+ $$+ \E\s/) { 
if !$
msg $chan Hatalı Kullanım 4-ip 78.98.162.78 1Şeklinde Yazın$+ $nick $+ 1, | return }
msg $chan $2 arşivi listeleniyor 
filter 
-ffcg arsiv.txt depo.txt /^\$+ $$+ \E\s
play $chan depo.txt 750
}
else { 
msg $chan $2 arşivde bulunmuyor 
}
}
if 
$regex($2,/^[^\d]/) {
if 
$read(arsiv.txt,r,/[^:]\s\$+ $$+ \E\s/i) { 
msg $chan $2 arşivi listeleniyor 
filter 
-ffcg arsiv.txt depo.txt /[^:]\s\$+ $$+ \E\s/
play $chan depo
.txt 750 
}
else { 
msg $chan $2 arşivde bulunmuyor }
}
}


Böyle bir kod paylaşımı olmuştu. Ben bu kod için giriş noticelerini statüste değil #Takip kanalında bot tarafından yazılınca görebiliyorum. Örn: <irc.random.net> Client connecting on port 6667: cam-ustasi (Sohbet@46.196.XX.XX) [Web Random.Net IRC Client] [clients] | isteğim kodun oradan bilgiyi alabilmesi arşiv dosyasına ekletebilmek ve bu arşivdeki nicklere koruma için otoshun ekleme şansımız da olur mu? Nickine olacak şekilde olabilir mesela.

Çevrimdışı
   
  Alıntı

Alt 09 Şubat 2019, 20:33   #2
pCkOpAt

pCkOpAt - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 03 Kasım 2016
Mesajlar: 139
Konuları:
WEB Sitesi: www.sohbetciyiz.net
IRC Sunucusu: irc.sohbetciyiz.net
İlgi Alanı: mIRC Scripting
Aldığı Beğeni: 63
Verdiği Beğeni: 50
Cevap: -ip arşiv kodu hk.


Kod: 
on *:snotice:*:{ if (*changed*his*her*nickname* iswm $1-) { var %difyzip = $remove($token($5,2,64),$chr(41)), %difynickz = $11, %difyidentz = $remove($token($5,1,64),$chr(40)) if $read(arsiv.txt,w,$+(*,%difyzip,$chr(32),%difynick z,$chr(32),*)) { write $+(-dl,$readn) arsiv.txt } write arsiv.txt %difyzip %difynickz Ident: $+ %difyidentz Son Girişi: $+($time,-,$date) } } ;kod içerisindeki #KANAL kısmını kendinize göre değişebilirsiniz on *:text:*:#: { if (*client*connect* iswm $strip($1-)) { var %difyip = $remove($token($strip($7),2,64),$chr(41)), %difynick = $strip($6), %difyident = $remove($token($strip($7),1,64),$chr(40)) if $read(arsiv.txt,w,$+(*,%difyip,$chr(32),%difynick, $chr(32),*)) { write $+(-dl,$readn) arsiv.txt } write arsiv.txt %difyip %difynick Ident : $+ %difyident Son Girişi: $+($time,-,$date) } if $regex($1,/^([!/./-][Iıİi]p)$/i) { if $regex($2,/^\d+.\d+/) { if $read(arsiv.txt,r,/^\Q $+ $2 $+ \E\s/) { if !$2 { msg $chan Hatalı Kullanım -ip 78.98.162.78 Şeklinde Yazın. $+ $nick $+ , | return } msg $chan $2 arşivi listeleniyor filter -ffcg arsiv.txt depo.txt /^\Q $+ $2 $+ \E\s/ play $chan depo.txt 750 } else { msg $chan $2 arşivde bulunmuyor } } if $regex($2,/^[^\d]/) { if $read(arsiv.txt,r,/[^:]\s\Q $+ $2 $+ \E\s/i) { msg $chan $2 arşivi listeleniyor filter -ffcg arsiv.txt depo.txt /[^:]\s\Q $+ $2 $+ \E\s/i play $chan depo.txt 750 } else { msg $chan $2 arşivde bulunmuyor } } } }


shun kısmı için tam olarak ne istediğini anlamadım.

Çevrimdışı
   
  Alıntı


Yeni Konu   Cevap Yaz

Bookmarks

Etiketler
client, raw


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Amsg Muaf Kodu AntepLi Hazır Kodlar 0 01 Mart 2019 13:41
CR de Söz Yazma Kodu Goemon ConferenceRoom 0 05 Mart 2015 10:51
!nerden Kodu Toprak Hazır Kodlar 1 17 Şubat 2015 00:54
Motd Kodu Goemon ConferenceRoom 0 15 Şubat 2015 17:02
mIRC Scripting Hazır Kodlar Arşiv Toprak Hazır Kodlar 0 26 Ocak 2015 00:55