on !*:JOIN:#:{
  inc -u10 %joins [ %4$s %4$s($cid,$chan) ]
  set -u10 %joinsnicks [ %4$s %4$s($cid,$chan) ] $addtok(%joinsnicks [ %4$s %4$s($cid,$chan) ],$nick,32)
  if (%joins [ %4$s %4$s($cid,$chan) ] > 1) {
    var %x = %joins [ %4$s %4$s($cid,$chan) ]
 while (%x) {
      if ($gettok(%joinsnicks [ %4$s %4$s($cid,$chan) ],%x,32) ison $chan) { write giriş.txt Nick : $nick Host $address($nick,2) : $ifmatch  }
      dec %x
    }
  }
} 

on *:join:*: {
  %clones = $ialchan($wildsite,#,0)
  if ( %clones > 1) {
    var %count = 1
    set %clone.nicks -->
    while (%count <= %clones)  {
      %clone.nicks = %clone.nicks  $ial($wildsite,%count).nick
    inc %count  }
  write giriş.txt $remove(%clone.nicks,-->) %clones Tane }
  set %change $read -s $+ $address($nick,4) notes.ini
  if (%change == $null) {
    haltdef
    halt  
  }
}