on *:input:#Opers:{ 
  if $regex($1,/^([!\.]seslen)/Si) {
    var %n = 1
    while %n <= $nick(#,0) {
      if !$istok($me Alper ImBOT S-Bot,$nick(#,%n),32) {
        var %nickler %nickler $nick(#,%n)
      }
      inc %n
    }
    .timer -h 1 500 msg # %nickler Lütfen 4#Opers'e bakınız..
  }
}

on *:text:*:#opers,#kanal,%bilgikanal: {
  if $regex($1,/[!.]seslen/i) {
    var %:cc 1 
    while %:cc <= $nick(#,0) { 
      if !$istok(Subzero Nomercy,$nick(#,%:cc),32) {
        .set %:ccc $iif(%:ccc,%:ccc $+ $chr(32) $+ $nick($chan,%:cc),$nick(#,%:cc)) 
      }
      inc %:cc 
    }     
    msg # %:ccc 
    .unset %:ccc 
  }
}