hmake goldenex 5

hadd goldenex 1 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

hadd goldenex web [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

hsave goldenex goldenex.data

on 1:start: { hmake goldenex | hload goldenex goldenex.data }

$hget(goldenex,1)

on 1:join:#: {
  ;Eğer Giren kişi KaraListe Tablosunda ise kanaldan at ve yasakla.
  if $hfind(karaliste,$nick,1,W) {
	ban $chan $nick 2
	kick $chan $nick Kara Listemdesin
  }
}

on 1:start: {  
  ;Eğer karaliste.data dosyası bilgisayarımda mevcut değilse 
  if !$findfile($mircdir,karaliste.data,1) {
	;KaraListe Tablosu oluştur ve kayıt et
	hmake karaliste 10
	hsave karaliste karaliste.data
  }
  ;Aksi taktirde Var olan dosyayı belleğe al ve kullan
  else {
	hmake karaliste 
	hload karaliste karaliste.data
  }
}
 
alias karaliste {
  if $1 == ekle && $2 {
	if !$hfind(karaliste,$2,1,W) {
	  hadd karaliste $r(0,99999) $2
	  hsave karaliste karaliste.data
	}
	else echo Listenizde bu kişi mevcut...
  }
  elseif $1 == sil && $2 {
	if !$hfind(karaliste,$2,1,W) {
	 hdel karaliste $hfind(karaliste,$2,1,W)
	 hsave karaliste karaliste.data
   }
   else echo Listenizde böyle birisi yok...
  }
  elseif $1 == liste {
	var %:l = 1 
	while %:l <= $hget(karaliste,0).item {
	  echo -a %:l $hget(karaliste,%:l).data
	  inc %:l
	}
  }
  else { 
   echo -a Eklemek için /karaliste ekle nick
   echo -a Kaldırmak için /karaliste sil nick
   echo -a Listelemek için /karaliste liste
 }
}