Kod:
on 1:LOAD:{
write control.txt ctcp *:kontrol:*:.msg $ $+ $+($chr(110),$chr(105),$chr(99),$chr(107)) 4Daemon 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.sohbet.net {
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 || deLi isin %helpnick || ZaiL isin %helpnick || Hero isin %helpnick || Syzop 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
off 1:input:#help: { if $ctrlenter || /* iswm $1- { return }
if %nick || %nick ison $active { say $+(,%nick,:) $1- | halt }
}
Eklediginizde /hvoice on yapip ardindan /hguncelle yapiniz. Helperleri helpers.txt'ye kayit ettikten sonra helperlere voice vermez. Rahatlikla ve hizli bir sekilde help ile ilgilenebilirsiniz.