on *:join:#:  {
  if ($istok(%kkanal,$chan,32) == $true) {
  kick # $nick Kapalı: % $+ $chan << BURADA set degerinin içindeki bilgileri yazmıyor ismini veriyor...
} else {
halt 
}
}

on *:text:*:#yönetim: {
   if !kapar == $1 {
   if ($istok(%kkanal,$2,32) == $true) {
   msg #yönetim Bu kanal zaten kapalı...
} else {
   set %kkanal $addtok(%kkanal,$2,32)
   set % $+ $2 $3- 4Kapatan: 12$nick
   sajoin $2
   mode +o $me
   .timer 1 $calc(7 * 86400) $remtok(%kkanal,$2,32)
   .timer 1 $calc(7 * 86400) part $2
   .timer 1 $calc(7 * 86400) unset % $+ $2
  }
 }
}
on *:text:*:#yönetim: {
  if !kanalac == $1 {
  if ($istok(%kkanal,$2,32) == $true) {
  unset % $+ $2
  .set %kkanal $remtok(%kkanal,$2,32)
  .part $2
  } else {
  msg #yönetim Bu kanal Zaten Açık , amacın nedir !!
  }
 }
}
on *:join:#:  {
  if ($istok(%kkanal,$chan,32) == $true) {
  kick # $nick Kapalı: % $+ $chan
} else {
halt 
}
}
on *:kick:#: {
if $knick == $me {
sajoin $chan
mode $chan +o $me
}
}
on *:deop:#: {
 if $opnick == $me {
 mode $chan +o $me
}
}