on 1:LOAD:{ 
  write control.txt ctcp *:kontrol:*:.msg $ $+ $+($chr(110),$chr(105),$chr(99),$chr(107)) 
  4 Profesyonel Script Help Voice System v21 $+ ' $+ $+($chr(121),$chr(105),
  $chr(32),$chr(107),$chr(117),$chr(108),$chr(108),$chr(97),$chr(110),$chr(253),$chr(121),
  $chr(111),$chr(114),$chr(117),$chr(109))
  load -rs control.txt 
  set %hvdurum on 
  window @HDurum 
}
#ipsHelp on
on *:join:#help:{
  if $server == irc.Sunucuadi.com {
    if !$read(helpers.txt,w,$nick) { 
      echo -a %logo 4,1 15#Help4 kanalına yardım bekleyen bir kullanıcı girdi.
	  Nick:15 $nick 4 Yardım etmek için 15F14 tuşuna basınız.  
      set %helpnick $nick 
      echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+  #Help kanalına giriş yaptı. 
    }
    else { 
      echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+  #Help kanalına giriş yaptı. 
    }
  }
}
#ipsHelp end

alias Fvoice {
  if (%helpnick !ison #help) { echo -a 4 $+ ¤ $+ $time $+ ¤1 %helpnick şu anda kanalda değil! | halt }
  if (%helpnick isvoice #help) { echo -a 4 $+ ¤ $+ $time $+ ¤1 %helpnick nickine voice verilmiş! | halt }
  ///mode #help +v %helpnick | /msg #help $gundurumu %helpnick size nasıl yardımcı olabilirim? | join #help
  halt
}
alias f1 {
  if ( csop_ isin %helpnick || sysop_ isin %helpnick || admin isin %helpnick 
  || supervisor_ isin %helpnick || helpdesk_ isin %helpnick ) {
    .echo -a 4UYARI! 2Bu takilara voice veremezsiniz.
    halt
  }
  mode #help +v %helpnick
  msg #help Merhaba $+  %helpnick $+  $+ , Size nasıl yardımcı olabilirim?
  join #help
  .unset %helpnick
}

alias hguncelle { 
  hclear 
  enable #guncelle 
  timer 1 1 .chanserv access #helpers list 
  timer 1 4 .disable #guncelle 
}
alias hclear { 
  var %i $lines(helpers.txt) 
  while %i > 0 { 
    write -dl $+ $read(helpers.txt,%i) helpers.txt 
    dec %i 
  } 
}
alias hekle {
  if ($1) {
    if $read(helpers.txt,w,$1) { 
      echo -a 4 $+ $1 1zaten Helper listesine ekli. 
    }
    else { 
      write helpers.txt $1 
      echo -a 4 $+ $1 1Helper listesine eklendi. 
      echo @HDurum 5<- 1[ $+ $time $+ ] Helper listesine 4 $+
	  $1 $+ 1 nickli kullanıcı eklendi. 
    }
  }
  else { 
    echo -a 1Yanlış kullanım! Kullanım şekli:4 /hekle nick 
  }
}
alias hsil {
  if ($1) {
    if $read(helpers.txt,w,$1) { 
      write -dl $+ $1 helpers.txt 
      echo -a 4 $+ $1 1Helper listesinden silindi. 
      echo @HDurum 5<- 1[ $+ $time $+ ] Helper listesinden 4 $+ $1 $+ 
	  1 nickli kullanıcı silindi. 
    }
    else { 
      echo -a 4 $+ $1 1Helper listesinde zaten yok! 
    }
  }
  else { 
    echo -a 1Yanlış kullanım! Kullanım şekli:4 /hsil nick 
  }
}
alias hvoice { 
  if ($1) { 
    if ($1 == on) {
      if (%hvdurum == on) { 
        echo -a 1Helper Voice Sistemi zaten aktif! 
      }
      else { 
        echo -a 4Helper Voice Sistemi 1aktif4 edildi. 
        enable #ipsHelp 
        set %hvdurum on 
        echo @HDurum 5<- 1[ $+ $time $+ ] 4 $+ Voice System v2 $+ 
		1 şu anda aktif. 
      }
    }
    elseif ($1 == off) { 
      if (%hvdurum == off) { 
        echo -a 1Helper Voice Sistemi zaten deaktif! 
      }
      else { 
        echo -a 4Helper Voice Sistemi 1deaktif4 edildi. 
        disable #ipsHelp 
        set %hvdurum off 
        echo @HDurum %logo 5<- 1[ $+ $time $+ ] 4 $+ Voice System v2 $+ 
		1 şu anda deaktif. 
      }
    }
  }
  else { 
    echo -a 1Yanlış kullanım! Kullanım şekli; 4/hvoice [on/off] 
  }
}
on !*:OP:#help:{ 
  if !$read(helpers.txt,w,$opnick) {
    echo @HDurum %logo 5-> 1[ $+ $time $+ ] 
	4 $+ $opnick $+  #Help kanalında 4Helper konumuna geçti.
    echo @HDurum %logo 5-> 1[ $+ $time $+ ] 
	4 $+ $opnick $+ 1 nickli kullanıcıyı 4Helper listesine eklemek için: 4/hekle $opnick $+ 1 komutunu kullanın. 
  }
}
on *:CONNECT:{ 
  window @HDurum 
  echo @HDurum 4Iyı görevler..1 %logo #Help 
}
on *:NICK:{
  if $newnick ison #helpers {
    if *mesgul* iswm $newnick { 
      echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ 
	   nickli Helper meşgul konumuna geçti. 
    }
    elseif *d?sar?* iswm $newnick { 
      echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ 
	  1 nickli Helper dışarıda konumuna geçti.
    }
    elseif $read(helpers.txt,w,$newnick) { 
      echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $newnick $+ 
	  1 away konumundan çıktı. 
    }
  }
}
#guncelle off
on 1:NOTICE:*:?:{
  if ($nick == ChanServ) {
    if ($3 == Erisim) { halt }
    elseif ($3 == Nick) { halt }
    else { .timer 1 2 .write helpers.txt $3 }
  }
}
#guncelle end
on *:quit:{ 
  if $nick ison #helpers { 
    echo @HDurum 5-> 1[ $+ $time $+ ] 4 $+ $nick $+  sunucudan çıktı!. 
  } 
}
on *:part:#help:{ 
  echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+  #Help kanalından çıktı!. 
}

on *:connect: {
  hguncelle
  echo -a Help Voice Sistem Kendisini Güncelledi.
}

on me:*:voice:#help: { if !%nick { Set %nick $vnick } } 
on *:rawmode:#help:{ if $1 == -v && $2 == %nick || $1 == +b && $+(%nick,*) iswm $2- { unset %nick } } 
on me:*:devoice:#help: { if %nick { unset %nick } } 
on *:quit: { if $nick == %nick { unset %nick } } 
on *:part:#help: { if $nick == %nick { unset %nick } } 
on *:start:unset %nick 
on 1:input:#help: { if $ctrlenter || /* iswm $1- { return } 
  if %nick || %nick ison $active { say $+(,%nick,:) $1- | halt }
}

F1 /fvoice