on *:text:*:#kanal:{
  if (.başla == $1) { $iif(!$timer(reklam),.timerreklam $lines(reklam.txt) 120 reklam) }
  if (.reklamlar == $1) { if (!$read(reklam.txt)) { msg # Gösterilecek Reklam Metni Yok. } | else { msg # Reklam Metinleri Listeleniyor. | play # reklam.txt 1000 } }
  if (.Rekle == $1) { if $read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Var. } | else { msg # Yeni Reklam Metni Eklendi. |  write -il1 reklam.txt $2- } }
  if (.Rsil == $1) { if ($2 == all) { msg # Tüm Reklam Metinleri Silindi. | write -c reklam.txt | halt } | elseif !$read(reklam.txt,w,$+(*,$2-,*)) { msg # Bu reklam Metni Zaten Yok. } | else { msg # Reklam Metni Silindi  | .write -d reklam.txt $2- } }
}

alias reklam { inc %1. | .os global $read(reklam.txt,%1.) | if (%1. == $lines(reklam.txt)) unset %1. }

on *:connect: { if (%gmesaj == on) {  timergmesaj 0 1800 /gmesaj } }
on *:text:!gmesaj*:#opers: {
  if ($2 == on) { 
    if (%gmesaj == on) { msg # 4[12BILGI4] 1Global mesaj reklami zaten acik! | halt }
    set %gmesaj on | msg # 4[12BILGI4] 1Global mesaj reklami acilmistir. | timergmesaj 0 1800 /gmesaj 
    halt
  }
  if ($2 == off) { 
    if (%gmesaj == off) { msg # 4[12BILGI4] 1Global mesaj reklami zaten kapali! | halt }
    set %gmesaj off | msg # 4[12BILGI4] 1Global mesaj reklami kapatilmistir. | timergmesaj off
    halt
  }
  if ($2 == ekle) { 
    gmesajekle $3-
  }
  if ($2 == sil) { 
    gmesajsil $3-
  } 
  if ($2 == list) {
    gmesajlist 
  }
}
alias gmesajekle { if $1 { if $read(gmesaj.txt,w,$1-) { msg $chan - $1- -  4[12BILGI4] 1mesaj zaten listede. | halt } | else { write gmesaj.txt $1- | msg $chan - $1 - 4[12BILGI4] 1mesaj listeye eklendi. } } }
alias gmesajlist { 
  var %s = 1,%ss = $lines(gmesaj.txt) 
  if (%ss == 0) { msg # 4[12BILGI4] 1Listede kayit bulunmamaktadir. | halt }
  msg $chan Global mesaj listesi... 
  while %s <= %ss { 
    msg $chan %s - $read(gmesaj.txt,%s) 
    inc %s 
  }
  msg $chan  Global mesaj listesi sonu...
}
alias gmesajsil { if $1 { if !$read(gmesaj.txt,w,$1-) { msg $chan - $1- - 4[12BILGI4] 1mesaj listesinde yok. | halt } | else { write $+(-dl,$readn) gmesaj.txt | msg $chan - $1- - 4[12BILGI4] 1mesaj listesinden silindi. } } }
alias gmesaj {
  var %kac $rand(1,$lines(gmesaj.txt))
  .describe $+($,$server) $read(gmesaj.txt,%kac)
}