IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası - Founder yardımcısı bir kısım ufak bir sorun.

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Founder yardımcısı bir kısım ufak bir sorun. (https://www.ircforumlari.net/mirc-scripting-sorunlari/211628-founder-yardimcisi-bir-kisim-ufak-bir-sorun.html)

Founder yardımcısı bir kısım ufak bir sorun.

Kod:

alias yuzde3 { return $+($chr(40),%,$left($calc($hget($1,$2) * 100 / $hget($3,v)),4),$chr(41)) }
 alias kapsa { return $+($chr(2),$1-,$chr(2)) }
 alias pp { var %& = $numtok($findfile($mircdir,*.db,1),92) | var %j = 1, %k = $findfile($mircdir,*.db,0) | while %j <= %k { if $gettok($findfile($mircdir,*.db,%j),%&,92) != nickler.db { echo -a $gettok($findfile($mircdir,*.db,%j),%&,92) } | inc %j } | hfree -w * | unset %trh | voicesıfırla }
 alias gun { return $replace($1,Monday,Pazartesi,Tuesday,Salı,Wednesday,Çarşamba,Thursday,Perşembe,Friday,Cuma,Saturday,Cumartesi,Sunday,Pazar) }
 alias helperler { if $1 { var %1 = 1,%2 = $nick($1,0),%3 | while %1 <= %2 { if $nick($1,%1) != $me { %3 = $addtok(%3,$nick($1,%1),32) } | inc %1 } } msg $2 %3 }
 alias helpersil { 
  hdec voiceler v $hget(vc,$1)  
  hdel nickler $1 | hsave -i nickler nickler.db | hdel vc $1 | hsave -i vc vc.db
 }
 on *:start: { 
  if !%trh { set %trh $date } 
  if $isfile(nickler.db) { hmake nickler 100 | hload -i nickler nickler.db } | else { hmake nickler 100 | hsave -i nickler nickler.db }
  if $isfile(voiceler.db) { hmake voiceler 100 | hload -i voiceler voiceler.db } | else { hmake voiceler 100 | hsave -i voiceler voiceler.db }
  if $isfile(vc.db) { hmake vc 100 | hload -i vc vc.db } | else { hmake vc 100 | hsave -i vc vc.db }
 }
 on *:voice:#HELP: { if $hmatch(nickler,$nick) { hinc -m voiceler v 1 | hsave -i voiceler voiceler.db | hinc -m vc $nick 1 | hsave -i vc vc.db } }
 on 999:text:*:#Helps: {
  if $1 == !Tlist { 
    if $hget(nickler,0).item < 1 { msg # Takip listesinde kayıtlı helper yok. | halt }
    else { msg # Takip listesine kayıtlı olan toplam; 1[ $kapsa($hget(nickler,0).item) 1] adet helper sıralanıyor; | var %& = 1,%&& = $hget(nickler,0).item | while %& <= %&& { msg # $+(%&,$chr(45)) $kapsa($hget(nickler,%&).item) | inc %& } 
    }
    msg # 1Takip listesindeki helper kayıtları sıralandı.
  }
  if $1 == !Tekle {
    if !$2 { msg # [1 Hata 1]; Kullanım şekli: $kapsa(!Tekle yeni-helper-nick) | halt }
    if $hmatch(nickler,$2) { msg # $kapsa($2) 1helper takip listesinde zaten mevcut. | halt }
    else { hadd -m nickler $2 | hsave -i nickler nickler.db | msg #  $kapsa($2) helper takip listesine eklendi. } 
  }
  if $1 == !Tsil {
    if !$2 { msg # [1 Hata 1]; Kullanım şekli: $kapsa(!Tsil helper-nick) | halt }
    if !$hmatch(nickler,$2) { msg # $kapsa($2) 1helper takip listesinde zaten mevcut değil. | halt }
    else { helpersil $2 | msg # $kapsa($2) 1nickli helper takip listesinden tüm kayıtları ile beraber silindi. }
  }
 }

Takip listesini script'i kapatıp acıyorum sıfırlıyor bunun nedeni ne acaba. :(
Bide arasında şu kısım gereksiz dediğiniz yer var mı? Yani hiçbir işlevi yok bu kısmın dediğiniz.
İyi forumlar...