#mrt off
alias tara {
  var %mrtt = 1
  while (%mrtt <= $nick(#,0)) {
    var %Bad = $nick(#,%mrtt)
    if ($level($nick(#,%mrtt)) == nnick) { msg %bad %swsw  7Tarih :14 $date 7Saat :14 $time  }
    inc %mrtt
  }
}
on *:join:#kanal:if $ulist($nick,nnick,0) { inc -eu300 $+(%,$nick,#) 1 | if $($+(%,$nick,#),2) == 1 { msg $nick %swsw } }
#mrt end
menu * {
  Arkadaş Nick
  .aç:enable #mrt | set %swsw $$?="mesajınızı yazınız:"
  .kapat:disable #mrt
  .tara:tara
  .ekle:auser nnick $$?="nick yazınız:" $+ *
  .çıkart:ruser nnick $$?="nick yazınız:" $+ *
}

#mrt on
alias tara {
  var %mrtt = 1
  while (%mrtt <= $nick(#,0)) {
    var %Bad = $nick(#,%mrtt)
    if ($level($nick(#,%mrtt)) == nnick) { msg %bad %swsw  7Tarih :14 $date 7Saat :14 $time  }
    inc %mrtt
  }
}
on *:join:#kanal:if $ulist($nick,nnick,0) { inc -eu300 $+(%,$nick,#) 1 | if $($+(%,$nick,#),2) == 1 { msg $nick %swsw } }
#mrt end
menu * {
  Arkadaş Nick
  .aç:enable #mrt | set %swsw $$?="mesajınızı yazınız:"
  .kapat:disable #mrt
  .tara:tara
  .listeyi gör:gör
  .ekle:auser nnick $$?="nick yazınız:" $+ *
  .çıkart:ruser nnick $$?="nick yazınız:" $+ *
}
alias gör  { 
  $iif($window(@Görüntüleme),clear @Görüntüleme,window -n @Görüntüleme)
  if ($ulist(*,nnick,0) != $null) { 
    set %cnt.shit 0
    while (%cnt.shit < $ulist(*,nnick,0)) { 
      inc %cnt.shit 1 
      echo @Görüntüleme $ulist(*,nnick,%cnt.shit) 
    }  
    unset %cnt.shit 
  }
}

#Msj Off
on *:join:#: {
  if ($nick == $me) { set -u10 %chan $chan | .timer 1 2 .tara }
  elseif ($nick != $me) && ($level($nick) == Mesaj) { msg $nick %mesaj }
}
#Msj End
alias mesaj {
  set %mesaj $1-
}
alias msj {
  if ($1 == on) && ($var(%mesaj) == 1) { .enable #Msg | echo -a Mesaj İşlemi Açık Hale Getirildi.  } 
  elseif ($1 == on) && ($var(%mesaj) == 0) { Echo -a Lütfen /mesaj Mesajınız Şeklinde Bir İleti Girip Komutu Tekrar Deneyiniz.  } 
  elseif ($1 == off) { .disable #msg  | echo -a Mesaj İşlemi Kapalı Hale Getirildi. }
  else { Echo -a Yanlış Komut Kullandınız. Kullanımı /msj on|off }
}
alias ekle { .auser mesaj $+(*,$1,*) | Echo -a * $qt($1) Nicki Mesaj Listesine Eklendi! }
alias sil { .ruser mesaj $+(*,$1,*) | Echo -a * $qt($1) Nicki Mesaj Listesinden Silindi! }
alias listele {
  var %i = 1,%t = $ulist(*,mesaj,0)
  while (%i <= %t) {
    echo -a $ulist(*,mesaj,%i)
    inc %i
  }
}
alias tara {
  var %csr = 1
  while (%csr <= $nick(%chan,0)) {
    var %mesajnick = $nick(%chan,%csr)
    if ($level($nick(%chan,%csr)) == Mesaj) {  msg %mesajnick %mesaj }
    inc %csr
  }
}

alias tara {
  var %csr = 1
  while (%csr <= $nick(%chan,0)) {
    var %mesajnick = $nick(%chan,%csr)
    if ($level($nick(%chan,%csr)) == Mesaj) {  msg %mesajnick %mesaj }
    inc %csr
  }
}

alias tara {
  var %csr = 1
  while (%csr <= $nick(%chan,0)) {
    var %mesajnick = $nick(%chan,%csr)
    if ($level($nick(%chan,%csr)) == Mesaj) { .timer 1 10 msg %mesajnick %mesaj }
    inc %csr
  }
}