mIRCForumlari.Net

mIRCForumlari.Net (https://www.mircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.mircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   mIRC Oto Nick Sifre Girisi (https://www.mircforumlari.net/mirc-scripting-hazir-kodlar/11703-mirc-oto-nick-sifre-girisi.html)

RahmetLi 20 Mart 2023 07:06

mIRC Oto Nick Sifre Girisi
 
Oto sifre tanitma komutu: /identify Sifre

Seklinde giris yapildiginda oto kayit eder.

NOT: /msg nickserv identify sifre yapilan islemler'i algilamaz.
Sunucuda gelen sifre kabul yada identify mesajlari coddakiyle uyusmadigindada islem yapmaz.


PHP- Kodu:

on *:notice:*:?: {
  if $nick == nickserv {
    if IDENTIFY sifreniz isin $strip($1-) && $readini(otosifre.63,$network,$me) { var %sifre $v1
      .msg nickserv identify %sifre
      echo -es 4**3 Oto sifreleme ile sifreniz girilmistir.(Sifreniz: %sifre  $+ )
      return
    }
    if $regex($strip($1-),/(sifre kabul edildi|nicki ile sisteme login)/i) && $network == $hget($network,isim) {
      writeini otosifre.63 $network $hget($network,nick) $hget($network,sifre)
      echo -es **Oto sifreleme kayit edildi.(Sunucu: $server - Nick: $hget($network,nick) - Sifre: $hget($network,sifre) $+ )
      echo -es **3Kayit edildi.
      .hfree -sw $network
      return
    }
  }
}
alias sifre { echo -ea $iif($readini(otosifre.63,$network,$1),Sifre: $v1,Sifre yok) }
alias identify {
  if $network {
    hadd -m $network isim $network
    hadd -m $network sifre $1-
    hadd -m $network nick $me
    identify $1-
  }
  else { echo -ea Herhangi bir yere bagli degilsiniz. }
}



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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.


Navbar with Avatar by Motorradforum