on *:text:.online:#opkanali: {
  if $read(online.txt,w,$nick) { 
    write $+(-dl,$readn) online.txt | msg $chan $nick Online oldugunu bildirdi listeden çıkarıldı. 
    var %i 1 | while %i <= $lines(online.txt) { 
      if $read(online.txt,%i) ison $chan { .mode #deopkanali -o $read(online.txt,%i) | msg $chan $read(online.txt,%i) uzun süredir online olmadığınız için deop edildiniz. }
      inc %i 
    } 
  }
  else msg $chan Sen degil yavrucugum. 
}