Tekil Mesaj gösterimi
Alt 09 Şubat 2019, 20:33   #2
pCkOpAt
 
pCkOpAt - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 03 Kasım 2016
Bulunduğu yer: Rize
Mesajlar: 139
WEB Sitesi: www.sohbetciyiz.net
IRC Sunucusu: irc.sohbetciyiz.net
İlgi Alanı: mIRC Scripting
Alınan Beğeni: 63
Standart 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.
 pCkOpAt isimli Üye şimdilik offline konumundadır   Alıntı