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

Kod:

on *:connect:{

  if (!$hget(profil)) hmake profil 5

}
 

on *:JOIN:#:{

  if ($nick == $me) return
 

  var %nick = $nick

  var %mask = $address(%nick,2)

  var %oldnick = $readini(profil.ini,%mask,nick)

  var %oldmask = $readini(profil.ini,%mask,mask)

  var %quand = $readini(profil.ini,%mask,quand)
 

  if (%mask == %oldmask) {

    if (%nick != %oldnick) {
 

      if ($exists($mircdir sounds\open.wav)) {

        splay $mircdir sounds\open.wav

      }
 

      if (!$window(@İP_Takip)) window -enz @İP_Takip
 

      aline -hp @İP_Takip - $time - [ $chan ] 04 %nick 01 Nicki'nin aynı IP'de daha önce kullandığı nick: 03 %oldnick 01 ( %quand )
 

      ; Aynı kanalı tekrar yazmamak için

      var %c = 1, %yazilan

      while (%c <= $comchan(%nick,0)) {

        var %kanal = $comchan(%nick,%c)

        if (!$istok(%yazilan,%kanal,32)) {

          echo @İP_Takip - $time - [ %kanal ] 04 %nick 01 aynı IP'de kullandığı nick: 03 %oldnick

          var %yazilan = %yazilan %kanal

        }

        inc %c

      }

    }

  }
 

  ; Bilgileri kaydet

  hmake profil 5

  hadd profil nick %nick

  hadd profil mask %mask

  hadd profil quand $time $+ - $+ $date

  hsave -ai profil profil.ini %mask

  hfree profil

}

Örnek :
- 11:19:13 - #Radyo Gülnihalseviyeli_ 01 Nicki'nin aynı IP'de daha önce kullandığı nick: Gülnihalseviyeli 01 ( 11:18:26-06/02/2026 )
- 11:19:13 - #Radyo Gülnihalseviyeli_ 01 aynı IP'de kullandığı nick: Gülnihalseviyeli