on *:Text:!Proxy *:#Kanal: {
  if $2 == Ac {
    if !$read(admin.txt,w,$nick) { .msg $chan $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. }
    elseif (%Proxy == Acik) { .msg $chan Proxy Koruması Zaten Acık! } 
    else { .msg $chan Proxy Koruması Acılmıştır | set %Proxy Acik }
  }
  if $2 == Kapat {
    if !$read(admin.txt,w,$nick) { .msg $chan $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. }
    elseif (%Proxy == Kapali) { .msg $chan Proxy Koruması Zaten Kapalı! } 
    else { .msg $chan Proxy Koruması Kapatılmıştır] | set %Proxy Kapali }
  }
  if ($2 == Durum) {
    if !$read(admin.txt,w,$nick) { .msg $chan $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz.  }
    else { .msg $chan Proxy Koruması Durum :  %Proxy }
  }
}

on *:input:*:{
  if $1 == !proxyac {
    if %proxy == acik {  msg # proxy koruması zaten acik | return } 
  else { set %proxy acik | msg # koruma acildi | return } }
  if $1 == !proxykapat { 
    if %proxy == kapali { msg # proxy koruması zaten kapali | return } 
  else { set %proxy kapali | msg # koruma kapatildi | return } }
}

on *:join:*: {
  if ($regex($address($nick,2),/(services|admin|ircop|oper|helper|services|dj)/i)) { return }
  %clones = $ialchan($wildsite,#,0)
  if ( %clones > 1 ) {
    var %count = 1
    set %clone.nicks -->
    while (%count <= %clones) {
      %clone.nicks = %clone.nicks $ial($wildsite,%count).nick
    inc %count }
  echo $chan  Uyarı clone Girişi  $remove(%clone.nicks,-->)   clone sayısı  > %clones  }
  if (%change == $null) {
    haltdef
    halt 
  }
}