on *:text:*:#:{
  if $1 == !rules {
    var %a 1
    while %a <= $lines(rules.txt) {
      notice $nick $read(rules.txt,%a)
      inc %a
    }
  }
}

on *:text:!kurallar:#:if $nick isop # { .rules } 

alias rules { 
msg # 5 SUNUCU KURALLARI VE YAPTIRIMLAR: 

msg # 1-) Türk aile ve ahlak yapysyna uygun sohbet etmelidir, 
msg # 2-) Siyasi, kültürel veya dini savunuculuk yapmamalydyr, 
msg # 3-) Reklam içerikli hiçbir mesaj göndermemeli, rumuz almamalydyr, 
msg # 4-) Küfür, hakaret içerikli hiçbir mesaj göndermemeli, rumuz almamalydyr, 
msg # 5-) Di?er kullanycylaryn özel bilgilerini payla?mamalydyr, 
msg # 6-) Cinsellik ifade eden rumuzlarla global kanallara girmemelidir, 
msg # 7-) Zorlayycy ve itici davrany?larda bulunmamalydyr, 
msg # 8-) Bulundu?u kanalyn genel düzenine göre hareket etmelidir, 
msg # 9-) Ki?isel ve özel bilgilerini (adres,tel vb.) kimse ile payla?mamalydyr, 
msg # 10-) Kanala veya özele saldyry sayylabilecek hareketlerde bulunmamalydyr. 
msg #  
}

on *:text:*!rules*:#: {
  notice $nick $read(rules.txt)
}

on *:Text:*!rules*:#: {
var %i = 1,%t = $lines(rules.txt)
while (%i <= %t) {
notice $nick $read(rules.txt,%i) 
inc %i
}
} 

on *:Text:*:#: {
  if ($strip($1) = !rules) { 
    $iif(!$fopen(!rules),.fopen !rules $shortfn($mircdirrules.txt))
    fseek -l !rules 1 
    .timer $+ $nick 0 2 notice $nick $$!fread(!rules)) 
  }
}