Konu: shunlist hk.
Tekil Mesaj gösterimi
Alt 16 Eylül 2019, 02:11   #12
Çevrimdışı
diEfoRyoU
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: shunlist hk.




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start:{ $iif(!$isfile(shunick.die),write shunick.die) | hmake shunick 100 | hload shunick shunick.die } on *:join:#sohbet:{ if $hmatch(shunick,$nick) { $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Nick),window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Nick,window -en @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Nick) | echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Nick $+($chr(3),$color(notice)) *** UYARI! $nick ShunNicki # kanalına giriş yaptı! if %shunick == on { shun $nick you are my ShunList echo -tm @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Nick $+($chr(3),$color(notice)) *** UYARI! Shun listesindeki $nick # kanalına giriş yaptı ve Shun uygulandı! } } } alias shunick { if !$istok(list add on off del alldel,$1,32) { echo -a $+($chr(3),$color(notice)) *** Tanımsız parametre:4 $1 echo -a 5***Kullanım şekli 2/shunick 5[2add5|2del5[4nick5]]|2list5|2alldel5 | return } if $regex($1,/(on|off)/i) { echo -a $+($chr(3),$color(notice)) *** ShunNick koruması $iif($regml(1) == on,2AÇIK,2KAPALI) | set %shunick $regml(1) | return } if $regex($1-,/add\x20) { if $hmatch(shunick,$2) { echo -a $+($chr(3),$color(notice)) ***4 $2 $+ 5, nicki ShunNick listesinde mevcut. | return } if !$2 { echo -a $+($chr(3),$color(notice)) *** Nick eklemeyi unuttun sanırım:) | return } hadd -m shunick $+(*,$2,*) | hsave shunick shunick.die echo -a $+($chr(3),$color(notice)) *** $2 $+ : nicki ShunNick listesine eklendi } if $regex($1-,/del\x20) { if $hget(shunick,0).item == 0 { echo -a $+($chr(3),$color(notice)) *** Oluşturulmuş ShunNick listesi bulunamadı. | return } if !$hmatch(shunick,$2) { echo -a $+($chr(3),$color(notice)) ***4 $2 $+ 5, nicki ShunNick listesinde bulunamadı | return } if !$2 { echo -a $+($chr(3),$color(notice)) *** Silinecek nicki yazmayı unuttun sanırım:) | return } hdel -w shunick $2 | echo -a $+($chr(3),$color(notice)) ***4 $2 $+ 5, nicki ShunNick listesinden silindi hsave shunick shunick.die } if $regex($1,/list/i) { if $hget(shunick,0).item == 0 { echo -a $+($chr(3),$color(notice)) *** Oluşturulmuş ShunNick listesi bulunamadı. | return } var %^ = 1 | echo -a $+($chr(3),$color(notice)) *** ShunNick kayıtları listeteleniyor, while ($hget(shunick, %^).item) { echo -a $+($chr(3),$color(notice)) *** %^ $+ ) $v1 | inc %^ } echo -a $+($chr(3),$color(notice)) *** ShunNick kayıtları listelendi. } if $regex($1,/alldel/i) { if !$hget(shunick) { echo -a $+($chr(3),$color(notice)) *** Oluşturulmuş ShunNick listesi bulunamadı. | return } hfree shunick | echo -a $+($chr(3),$color(notice)) *** ShunNick listesi sıfırlandı. } }

yukarıdaki kodun sağlıklı çalışması için öncelikle shun listesine bir kaç ekleme yapıp sonra da /shunick on yazmalısın
kodu aktif/pasif etmek için: /shunick on/off
nick eklemek/silmek için: / shunick add/del nick
listelemek için: /shunick list
bütün listeyi silmek için: /shunick alldel

yazılan herhangi bir badnick remote'u de uyarlayabilirdin. Ben bu remote'u badnick için yazmıştım ve forumda mevcuttu. Umarım istediğin gibi olmuştur.

__________________
TurkSohbet.NET | #XPass
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver