Sayfalar Sayfalarımız
Kategoriler Kategorilerimiz
Hakkımızda Hakkımızda 
İletişim İletişim Kategori: Hazır Kodlar
mirc indir, mirc download, sitesi
Kod:
on *:VOICE:#: {
//set %helper $nick
/enable #vois
}
on *:DEVOICE:#: {
//unset %helper
/disable #vois
}
#vois on
on *:text:*:#help:{
write helper/ $+ %helper $+ .txt $nick $+ : $1-
}
#voice end
on *:text:*!goster*:#helpsop:{
play #helpsop helper/ $+ $2 $+ .txt
}
on *:text:*!Doğru*:#helpsop:{
inc %Yes $+ $2 1
.remove helper/ $+ $2 $+ .txt $1
}
on *:text:*!Yanlış*:#helpsop:{
inc %No $+ $2 1
.remove helper/ $+ $2 $+ .txt $1
}
on *:text:*!rapor*:#helpsop:{
//set %toplam %Yes [ $+ [ $2 ] ] + %No [ $+ [ $2 ] ]
/msg #helpsop $2 Nicki Toplam %toplam kişiye Yardım Etmiştir, Bundan %Yes [ $+ [ $2 ] ] Tanesi Doğru Cevap, %No [ $+ [ $2 ] ] Tanesi Yanlış Cevaptır..
.remove helper/ $+ $2 $+ .txt $1
//Unset %toplam
}
mircindir www.mircindir.com.tr
mirc indir, sitesi
#a #b #c
senin #a ve #c kanalında opun yok ama #b kanalında opun var şimdi tuşa basınca neye görer karar vericek?
#a ve #c de op yoksa çoğunluk op olmayan tarafında deyip op mu vericek yoksa herhangi bir kanalda op isen op olmadığın kanallarda op mu vericek sorun burada neye görer karar vericez?
aşağıdaki kodu aliases e kopyalamanız gerek: mirc download
Kod:
f10 {
var %i = $chan(0)
while %i {
if %deopped { cs op $chan(%i) $me }
else { mode $chan(%i) -o $me }
dec %i 1
}
set %deopped $iif(%deopped,0,1)
}
www.mircindir.com.tr
mirc indir, kelime yasaklama
(*) Spamfilter haricinde ” mirc ” ‘imi kullanarak nasıl reklamları engellerim ?
block(yasaklama)’nın bir çok önlemi olabilir , en çok kullanılan ve nadiren kullanılıp daha fazla başarı olan kodları sizlere vereceğim ;
öncelik olarak ” isin ve iswm ” ‘i vereceğim “mirc indir”
yasaklanacak olan kelimeler => http:// , www. , .com , .net , .gen.tr , cjb.net , .org , .us , .biz
Kod:
on *:text:*:#: {
if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers {
if *http://* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *www.* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.net* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.com* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.gen.tr* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.cjb.net* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.org* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.us* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if *.biz* iswm $1- {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
}
}
iswm ‘li reklam engelleme kodunu üst bölümde gördünüz , * ‘ları kaldırdığınızda bütün cümlede arayacaktır , * ‘lari kaldırmazsanız kelime sonlarında , eğer kaldırırsanız *’ları iswm yerine isin kullanmanız gerekmektedir.
Örnek ; if .org isin $1- {
————————————————————–
mirc, mirc indir, mirc download, mirc yükle, türkçe mirç, sitesi
————————————————————–
Regex kullanarak nasıl engellenir ?
Kod:
on *:text:*:#: {
if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers {
if($regex($1-,/.*?([hH]{1,20}\W*[tT]{1,20}\W*[tT]{1,20}\W*[pP]{1,20}\W*[:.]{1,20}\W*[/\]{1,20}\W*[/\]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([wW]{1,20}\W*(v|V|[wW]){1,20}\W*[wW]{1,20}\W*[.]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*[cC]{1,20}\W*[oO]{1,20}\W*[mM]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*[nN]{1,20}\W*(é|€|[eE]){1,20}\W*[tT]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*(0|[oO]){1,20}\W*[rR]{1,20}\W*[gG]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*[gG]{1,20}\W*(é|€|[eE]){1,20}\W*[nN]{1,20}\W*[.:]{1,20}\W*[tT]{1,20}\W*[rR]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
}
}() * Sunucu genelinde reklam kontrol nasıl yapabilirim ? * ()
bunun için bir addon’a gerek yok aslında , direkt olarak describe kullanabilirsin ;
/describe $*serverin.com Reklam kontrol
bunun haricinde alt bölümde verdiğim kod , bütün server userlarina mesaj atar ve özelinize gelen reklamları gline ile cezalandırır
Kod:
raw 352:*: {
if serv !isin $6 {
msg $6 Reklam kontrol
halt
}
}
on *:text:*:?: {
closemsg $nick
if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers {
if($regex($1-,/.*?([hH]{1,20}\W*[tT]{1,20}\W*[tT]{1,20}\W*[pP]{1,20}\W*[:.]{1,20}\W*[/\]{1,20}\W*[/\]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([wW]{1,20}\W*(v|V|[wW]){1,20}\W*[wW]{1,20}\W*[.]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*[cC]{1,20}\W*[oO]{1,20}\W*[mM]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*[nN]{1,20}\W*(é|€|[eE]){1,20}\W*[tT]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*(0|[oO]){1,20}\W*[rR]{1,20}\W*[gG]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
if ($regex($1-,/.*?([..]{1,20}\W*[gG]{1,20}\W*(é|€|[eE]){1,20}\W*[nN]{1,20}\W*[.:]{1,20}\W*[tT]{1,20}\W*[rR]{1,20})/)) {
gline $nick Reklam sebebi ile uzaklaştırıldınız
}
}
}/who yazmanız yeterli olacaktır
Not : kullanabilmeniz için ircop(+o) usermodu taşımanız gerekmektedir. Değilseniz kullanamazsınız
************************************************** ******
************************************************** ******
üst bölümdeki reklam korumaları klasik işlerinizi görecek kodlarla dizilidir , bunları sağlıklı bir şekilde kullanabilirsiniz;
(*) Spamfilter haricinde ” mirc ” ‘imi kullanarak nasıl küfürleri engellerim ?
reklamlarda olduğu gibi buradada event’imiz on *:text:*:#: { ‘dir
lütfen event derslerini dikkatli bir şekilde inceleyiniz , aksi taktirde anlatımlarda zorlanabilirsiniz.
küfürlerde isin ve iswm genel olarak tercih edilendir , basit’tir , regex kullanımı pek sağlıklı değildir çok hassas olabilir
bütün küfürleri bir arada toplamak mümkün olmadığından ötürü , bir kaç örnek vererek nasıl yapacağınız açıklayacağım ;
yasaklanacak kelimeler => köpek , salak , mal , gerizekalı
Kod:
on *:text:*:#: {
if $nick !isop $chan && $nick !ishop $chan && $nick !isvop $chan && $nick !ison #opers {
if köpek isin $1- {
gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız
}
if salak isin $1- {
gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız
}
if mal* iswm $1- {
gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız
}
if ger?zekal?* iswm $1- {
gline $nick Küfür ettiğinizden ötürü uzaklaştırıldınız
}
}
}üst bölümdede gördüğünüz gibi , dikkat ettiğinizde ne kadar basit olduğunu göreceksiniz ve bir kez daha sormak zorunda kalmayacaksınız ;
on *:text:*:#: { => başlangıc event’imiz
if yasaklanacakkelime isin $1- { => burası ayıklama yapacağınız bölüm
gline $nick Küfür => burası kullanıcı işlemi
} => burası ayıklama bölümünü sonlandırır
} => burası event bölümünü sonlandırır
mirc indir, mirc download, sitesi www.mircindir.com.tr
mirc indir, mirc download, mirc, sitesi www.mircindir.com.tr
mirc 6.16 da olan :error, $error, /reseterror hakkında açıklama başka versiyonda varmı bilmiyorum.
Mirc de * /if: invalid format (line 4, aliases.ini) gibi hataları okutabildiğinizi hatta isterseniz rengini stilini değiştirebileceğinizi biliyormuydunuz?
şöyleki:
bir aliases oluşturalım adı deneme olsun
deneme {
if c = { echo alo }
:error
echo : $error
}
kasti olarak if fonksiyonunu hatalı yazdım /deneme yazınca gelen uyarı:
: * /if: invalid format (line 2, aliases.ini)
* /if: invalid format (line 2, aliases.ini)
: ile başlıyan bizim echo : $error dan gelen mesajımız
şimdi normal mirc nin mesajını iptal edelim
deneme {
if c = { echo alo }
:error
echo : $error
reseterror
}
böylece sadece : * /if: invalid format (line 2, aliases.ini) mesajını alırız
Eğer fonksiyonumuzda hata yoksa bu durumda yine error ifadesini görüntülemeye çalışacaktır bunu engellemenin yollarından iki tanesi :
1.
deneme {
if c = { echo alo }
halt
:error
echo : $error
reseterror
}
şeklinde kullanabilirsiniz eğer if komutumuz düzgün olsa idi halt ile işlemi sonlandırırdı.
2.
deneme {
if c = { echo alo }
:error
$derror($error)
reseterror
}
derror {
if $1 { return echo -t 7[5Hata!7]:5 $1- }
}
Benim tavsiyem 2. yöntemi kullanmanız böylece fonksiyonlarınızdaki hataları da özelleştirebilir. herhangi bir hatada debug.log oluşturup kullanıcıların sizinle irtibata geçmesini sağlayabilirsiniz. Bunları 1. dede yapabilirdiniz ama her fonksiyona eklemek yerine 1 fonksiyonu çağırmak çok daha kullanışlı olur. mirc indir, sitesi tarafindan sizlere sunulur
Yorumlar