IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   NoMercy v5 download. (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/502141-nomercy-v5-download.html)

IrCbaStarD 30 Ağustos 2012 00:51

NoMercy v5 download.
 
Kod:

alias rklms return (Sunucu ana takısı(irc.kalbim.net) "Kalbim" gibi.)
alias rklms2 return IRC.Kalbim.Net
alias trg { return $replace($1-,mon,Pazartesi,Tue,Salı,wed,Çarşamba,thu,Perşembe,sat,Cumartesi,fri,Cuma,sun,Pazar) }
alias trt { return $replace($1-,jan,Ocak,feb,Şubat,mar,Mart,apr,Nisan,may,Mayıs,jun,Haziran,jul,Temmuz,aug,Ağustos,sep,Eylül,oct,Ekim,nov,Kasım,dec,Aralık) }
alias o.ks { return $+([,4.,$1,]:) }
alias o.ks2 { return $+([,3!,$1,]:) }
alias o.ks3 { return $+([,5-,$1,]:) }
alias o.ks4 { return $+([,10!,$1,]:) }
alias qsupass { return supass }
alias qnickpass { return nickpass }
alias qoperpass { return opernick operpass }
alias qsunucu { return sunucu }
alias qsunucuport { return 6667 }
alias qbotnick { return Botnick takısı(Kalbim-Host) "Kalbim-" gibi.. }
alias qradyoip { return radyo ip }
alias qradyoport { return port }
alias qradyopass { return pass }
alias qsecantet { return [2Kalbim2-SECURITY] }
alias qhostver { return Kalbim.Net }
alias qlogo { return 2• 12No14Me15rcy v145 Sec12urity2™  }
alias qspamlogo { return 2•_12No14Me15rcy_v145_Sec12urity2™  }
alias qreklam { return
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
yerler burada arkadaşlar, ctrl + f ile kalbim.net yazan yerleri kendi serveriniza göre editleyin, editlemezseniz statüsde hata alırsınız.

Online destekden yardım alabilirsiniz.

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

Facebook sayfasini takip edin arkadaşlar ilerde parca kodlar ekliyeceğim nomercy için.. :)
Online destek sayfasindan fikir alış verişi olabilir arkadaşlar yeni ekleme yada şu olsa daha iyi olurdu gibi.. :)

Toprak 30 Ağustos 2012 00:53

Cevap: NoMercy v5 download.
 
Eline saglık Sercan,

q0kh4n 30 Ağustos 2012 07:32

Cevap: NoMercy v5 download.
 
google da en çok aranen NoMercyv5 kelimesiydi, acayip sevaba girdin :D

aSi 30 Ağustos 2012 10:19

Cevap: NoMercy v5 download.
 
Eline sağlık sercan.

devil-boyy 30 Ağustos 2012 10:42

Cevap: NoMercy v5 download.
 
ellerine sağlık tskler

SucLu 31 Ağustos 2012 21:26

Cevap: NoMercy v5 download.
 
Hocam eline sağlık.

dEathLeSs 01 Eylül 2012 08:45

Cevap: NoMercy v5 download.
 
En çok arayanları memnun edecektir. :)

Xpyhre 01 Eylül 2012 16:34

Cevap: NoMercy v5 download.
 
karşiliksiz mükemmel bir paylaşim emeğine sağlik saygılarimla...

WingmaN 01 Eylül 2012 18:49

Cevap: NoMercy v5 download.
 
Paylaşmak da bir sanattır, yakışır :)

SucLu 04 Eylül 2012 01:00

Cevap: NoMercy v5 download.
 
Wigman Hocam sen Worgen 'i ne zaman paylaşmayı düşünüyorsun :)

SeckiN 04 Eylül 2012 02:03

Cevap: NoMercy v5 download.
 
Emeğine SagLık Üstat.

Challenger53 07 Eylül 2012 22:37

Cevap: NoMercy v5 download.
 
link çalışmıyor bakabilir mi biri acaba?

aSi 24 Eylül 2012 15:11

Cevap: NoMercy v5 download.
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] buradan indirebilirsiniz.

Extre 25 Eylül 2012 15:35

Cevap: NoMercy v5 download.
 
Alıntı:

WingmaN Nickli Üyeden Alıntı (Mesaj 1041206809)
Paylaşmak da bir sanattır, yakışır :)

Nomercy i sen kodladın diye hatırlıyorum hocam. Yanlış mı biliyorum acaba başkaları paylaşıyor?

OkyAnuS 25 Eylül 2012 18:18

Cevap: NoMercy v5 download.
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yapmışsa güzeldir güzel :)

WingmaN 25 Eylül 2012 22:07

Cevap: NoMercy v5 download.
 
Alıntı:

Extre Nickli Üyeden Alıntı (Mesaj 1041218875)
Nomercy i sen kodladın diye hatırlıyorum hocam. Yanlış mı biliyorum acaba başkaları paylaşıyor?

NoMercy'nin v5 diye hitab ettiğiniz version'u benim dahilimde değil. Lâkin temeli bizlere ait, geliştirilmesi güncel tutulması emek verilmesi gayet güzel.

Yeni version'u, Revolution olarak, tarafımdan kodlanmaya devam edilmektedir, içeriğini çok geniş tutuyorum.

O kadar saçma sapan, çöplük gibi bir bot haline gelmiş ki, içerisinde açılan bazı socket'ların anlamları bile yok denecek kadar az, az olmasına karşın yine de, fazla görünmesi amacıyla, yeni bir socket açılması sıkıntı ve ziyan'dan başka birşey değildir.

W

SucLu 29 Eylül 2012 00:12

Cevap: NoMercy v5 download.
 
Alıntı:

WingmaN Nickli Üyeden Alıntı (Mesaj 1041219063)
NoMercy'nin v5 diye hitab ettiğiniz version'u benim dahilimde değil. Lâkin temeli bizlere ait, geliştirilmesi güncel tutulması emek verilmesi gayet güzel.

Yeni version'u, Revolution olarak, tarafımdan kodlanmaya devam edilmektedir, içeriğini çok geniş tutuyorum.

O kadar saçma sapan, çöplük gibi bir bot haline gelmiş ki, içerisinde açılan bazı socket'ların anlamları bile yok denecek kadar az, az olmasına karşın yine de, fazla görünmesi amacıyla, yeni bir socket açılması sıkıntı ve ziyan'dan başka birşey değildir.

W


Wingman Hocam Worgen 'i paylasmayı düsünmüyormusun :)

Carpediem 09 Ekim 2012 22:33

Cevap: NoMercy v5 download.
 
Emeğinize sağlık ustad... lakin dosyayı indiriyorum icinde mirc.exe cikmiyor sebep ne olabilir?

[22:11:50] • NoMercy v5 Security™ Koruma sistemi kullanima hazir.
[22:11:50] • NoMercy v5 Security™ Saat : 22:11:50
[22:11:50] • NoMercy v5 Security™ Tarih : 09/10/2012 (Son düzenlemeler IrCbaStarD)
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)



Böyle bir hata veriyor bu socket bot sebep ne olabilir.

IRC-Dancer 10 Ekim 2012 00:49

Cevap: NoMercy v5 download.
 
on *:SOCKOPEN:secbot: {
%secnick = Techv4- $+ $r(100,9999)
sockwrite -nt $sockname NICK %secnick
sockwrite -nt $sockname USER TechnicaL "" " $+ $iif($host,$host,$ip) $+ " : $+ $qlogo
}

on *:SOCKREAD:secbot: {
var %s2
sockread %s2
tokenize 32 %s2
;.echo -a $1-
if $1 == PING {
sockwrite -nt $sockname PONG $2
}
;Rawlar!
if ($2 == 322) {
if (!$hget(_tchan)) hmake _tchan 100
hadd -m _tchan $4 $5
}
if $2 == 376 || $2 == 422 {
sockwrite -nt $sockname oper $qoperpass
.timer-SEC 0 60 sw $sockname list
}
if $2 == 381 {
sockwrite -nt $sockname join 0,
sockwrite -nt $sockname ns ghost $qbotnick $+ SECURITY $qnickpass
sockwrite -nt $sockname ns release $qbotnick $+ SECURITY $qnickpass
.timer 1 2 sockwrite -nt $sockname NICK $qbotnick $+ SECURITY
.timer 1 2 sockwrite -nt $sockname NICK $qbotnick $+ SECURITY
}
if $2 == 352 {
var %amkident $5
var %Amkfullname $11-
}
if $2 == 366 {
if $4 != #System && $4 != #Aux && $4 != #Opers {
sockwrite -nt $sockname PART $4
}
}
;Rawlar end!
;Event's
if $2 == NICK {
if $right($3,-1) == $qbotnick $+ SECURITY {
sockwrite -nt $sockname MODE $qbotnick $+ SECURITY +BH-h
sockwrite -nt $sockname ns identify $qnickpass
sockwrite -nt $sockname os su $qsupass
.timer 1 5 sockwrite -nt $sockname setident 2o11
.timer 1 5 sockwrite -nt $sockname sethost Guvenlik. $+ $qhostver
.timer 1 5 sockwrite -nt $sockname JOIN #Spamming,#Staff,#Staff
.timer 1 6 sockwrite -nt $sockname mode #Spamming +a $qbotnick $+ SECURITY
}
if $botfnick($1) == $qbotnick $+ SECURITY {
sockwrite -nt $sockname ns ghost $qbotnick $+ SECURITY $qnickpass
sockwrite -nt $sockname ns release $qbotnick $+ SECURITY $qnickpass
.timer 1 3 sockwrite -nt $sockname NICK $qbotnick $+ SECURITY
}
}
if $2 == Notice {
if *Client connecting* iswm $1- {
;irchubs sec
if $9 != at {
Sockwrite -nt $sockname privmsg $12 FINGER
Sockwrite -nt $sockname privmsg $12 VERSION
Sockwrite -nt $sockname notice $12 $qlogo güvenlik kontrolünden geçiyorsunuz lütfen bekleyiniz..
}
;irchubs end
;webhubs sec
if web isin $10 {
;echo -a $1-
}
;webhubs end
}
}
}


@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Alt +R '' Scurity.amk '' sil Bunu ekle oraya.
Sendeki hata : Scurity.amk < bölümünün '' 3 '' satırı hata veriyor.

BoZo25 11 Ekim 2012 17:50

Cevap: NoMercy v5 download.
 
merhaba arkadaşlar nomercy5 de bu sorunla karşılaştım yardımcı olurmusunuz

/runsx: Servera bağlı değilsiniz
-
* /runsx: Servera bağlı değilsiniz
-
* /sockopen: Geçersiz parametre (Satır 581, Aliaslar.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /runsx: Servera bağlı değilsiniz
-
* /sockopen: Geçersiz parametre (Satır 581, Aliaslar.amk)

IRC-Dancer 11 Ekim 2012 20:04

Cevap: NoMercy v5 download.
 
Alıntı:

BoZo25 Nickli Üyeden Alıntı (Mesaj 1041225713)
merhaba arkadaşlar nomercy5 de bu sorunla karşılaştım yardımcı olurmusunuz

/runsx: Servera bağlı değilsiniz
-
* /runsx: Servera bağlı değilsiniz
-
* /sockopen: Geçersiz parametre (Satır 581, Aliaslar.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /runsx: Servera bağlı değilsiniz
-
* /sockopen: Geçersiz parametre (Satır 581, Aliaslar.amk)

alias killnick {
hadd -m killnick $1 .
sw sysbot USERIP $1
sw sysbot WHOIS $1
.timer 1 15 hdel killnick $1
}
alias o.ks { return $+([,4.,$1,]:) }
alias o.ks2 { return $+([,3!,$1,]:) }
alias o.ks3 { return $+([,5-,$1,]:) }
alias o.ks4 { return $+([,10!,$1,]:) }
alias qsupass { return ***** }
alias qnickpass { return ***** }
alias qoperpass { return ***** ***** }
alias qsunucu { return irc.sunucuadı.com }
alias qsunucuport { return 6667 }
alias qbotnick { return Takı- }
alias qradyoip { return Radyo İp }
alias qradyoport { return Radyo Port }
alias qradyopass { return Radyo şifre }
alias qsecantet { return [2Sunucuadı2-Güvenlik] }
alias qhostver { return Bot-Hostu }
alias qlogo { return 2•_12No14Me15rcy_v145-12Aux2™_2• }
alias qspamlogo { return 2•_12No14Me15rcy_v145-12Aux2™_2• }
alias qreklam { return Sunucu-Adı }
alias ceo { return Vagrant }
alias ipnedir? { sockopen ip [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
on *:SOCKOPEN:ip: {

Buralara bi göz at sorun yasanırsa , tekrar dönüş yaparsın.
Radyo bilgilerini girmemissin alias'lar kısmında.

Carpediem 11 Ekim 2012 22:15

Cevap: NoMercy v5 download.
 
[22:14:45] • NoMercy v5 Security™ Koruma sistemi kullanima hazir.
[22:14:45] • NoMercy v5 Security™ Saat : 22:14:45
[22:14:45] • NoMercy v5 Security™ Tarih : 11/10/2012 (Son düzenlemeler IrCbaStarD)
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)




Aynı hata bendede var...

IRC-Dancer 11 Ekim 2012 22:19

Cevap: NoMercy v5 download.
 
Alıntı:

Vagrant Nickli Üyeden Alıntı (Mesaj 1041225754)
alias killnick {
hadd -m killnick $1 .
sw sysbot USERIP $1
sw sysbot WHOIS $1
.timer 1 15 hdel killnick $1
}
alias o.ks { return $+([,4.,$1,]:) }
alias o.ks2 { return $+([,3!,$1,]:) }
alias o.ks3 { return $+([,5-,$1,]:) }
alias o.ks4 { return $+([,10!,$1,]:) }
alias qsupass { return ***** }
alias qnickpass { return ***** }
alias qoperpass { return ***** ***** }
alias qsunucu { return irc.sunucuadı.com }
alias qsunucuport { return 6667 }
alias qbotnick { return Takı- }
alias qradyoip { return Radyo İp }
alias qradyoport { return Radyo Port }
alias qradyopass { return Radyo şifre }
alias qsecantet { return [2Sunucuadı2-Güvenlik] }
alias qhostver { return Bot-Hostu }
alias qlogo { return 2•_12No14Me15rcy_v145-12Aux2™_2• }
alias qspamlogo { return 2•_12No14Me15rcy_v145-12Aux2™_2• }
alias qreklam { return Sunucu-Adı }
alias ceo { return Vagrant }
alias ipnedir? { sockopen ip [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
on *:SOCKOPEN:ip: {

Buralara bi göz at sorun yasanırsa , tekrar dönüş yaparsın.
Radyo bilgilerini girmemissin alias'lar kısmında.

Alıntı:

Corpi Nickli Üyeden Alıntı (Mesaj 1041225805)
[22:14:45] • NoMercy v5 Security™ Koruma sistemi kullanima hazir.
[22:14:45] • NoMercy v5 Security™ Saat : 22:14:45
[22:14:45] • NoMercy v5 Security™ Tarih : 11/10/2012 (Son düzenlemeler IrCbaStarD)
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)
-
* /runsx: Servera bağlı değilsiniz
-
* /sockwrite: 'Secbot' Bağlı Değil (Satır 3, Scurity.amk)




Aynı hata bendede var...

Sende aynı durum sanırsam.

BoZo25 12 Ekim 2012 10:43

Cevap: NoMercy v5 download.
 
kardeş hata yok suanda botta ama simdide nicklerini girmiyorlar anlamadımbişe

amasyaLi 12 Ekim 2012 21:53

Cevap: NoMercy v5 download.
 
değiştireceğimiz dosyaları özellikle satırları kırmızı ile gösterebilirmisin sana zahmet çünkü bazı yerler çok karışık, serde birazda acemilik var teşekkürler

IRC-Dancer 12 Ekim 2012 22:14

Cevap: NoMercy v5 download.
 
alias killnick {
hadd -m killnick $1 .
sw sysbot USERIP $1
sw sysbot WHOIS $1
.timer 1 15 hdel killnick $1
}
alias o.ks { return $+([,4.,$1,] }
alias o.ks2 { return $+([,3!,$1,] }
alias o.ks3 { return $+([,5-,$1,] }
alias o.ks4 { return $+([,10!,$1,] }
alias qsupass { return Supass }
alias qnickpass { return Nick-Şifre }
alias qoperpass { return Oper-Nick Oper-Şifre }
alias qsunucu { return irc.sunucuadı.com }
alias qsunucuport { return 6667 }
alias qbotnick { return Botun-Takısı }
alias qradyoip { return Radyo İp }
alias qradyoport { return Radyo Port }
alias qradyopass { return Radyo şifre }
alias qsecantet { return [2Sunucuadı2-Güvenlik] }
alias qhostver { return Bot-Hostu }
alias qlogo { return 2•_12No14Me15rcy_v145-12Aux2™_2• }
alias qspamlogo { return 2•_12No14Me15rcy_v145-12Aux2™_2• }
alias qreklam { return Sunucu-Adı }
alias ceo { return Root-Nick }
alias ipnedir? { sockopen ip [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
on *:SOCKOPEN:ip: {

amasyaLi 12 Ekim 2012 22:23

Cevap: NoMercy v5 download.
 
* /on: Servera bağlı değilsiniz (Satır 306, Radyo.amk)
-
* /runsx: Servera bağlı değilsiniz



şimdide böyle hata veriyor kardeşim sanada zahmet veriyoruz kusura bakma hakkını helal et

ayrıca bizim sunucu anope yani supass yok orayı aynen bıraksak olurmu

IRC-Dancer 12 Ekim 2012 23:14

Cevap: NoMercy v5 download.
 
.timerciprix 1 200 kontrol.cip
sockwrite -n $sockname GET $+(/admin.cgi?pass=,$shoutcast.adminpass,&mode=viewxml HTTP/1.1)
sockwrite -n $sockname Host: $+($shoutcast.host, :, $shoutcast.port)
sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20040614 Firefox/0.8
sockwrite -n $sockname *.*, */*
sockwrite -n $sockname Accept-Language: en-us,en;q=0.5
sockwrite -n $sockname Accept-Language: tr,tr;q=0.5
sockwrite -n $sockname Accept-Encoding: gzip,deflate
sockwrite -n $sockname Accept-Charset: ISO-8859-1,utf-8;q=0.7,*;q=0.7
sockwrite -n $sockname Keep-Alive: 300
sockwrite -n $sockname Connection: keep-alive
sockwrite -n $sockname $crlf
}


Alt +R'den : Radyo.amk Aliasın ıcındeki satır aramalarda : 305 - 319'uza kadar satırı böyle yaparsan sorun kalkar. @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

amasyaLi 13 Ekim 2012 00:13

Cevap: NoMercy v5 download.
 
[00:08:29] Closing Link: [88.242.89.113] (Too many unknown connections from your IP)

uyarısı verdi bir müddet sonra girdim sunucuya ama oper falan girmedi galiba ben bu işi başaramayacağım :) yine de teşekkürler

IRC-Dancer 13 Ekim 2012 04:56

Cevap: NoMercy v5 download.
 
Sunucu Adını bana yaz ; Meil adresini pm at @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Z-Lined 13 Ekim 2012 17:09

Cevap: NoMercy v5 download.
 
Şunu Söylemek İstiyorum, Neden Bu Nomercy'de 13 12 15 Tane Bot var Bence Çok Gereksiz, 2 Tane Olsun Örneğin ; Teki Radyo Teki Koruma, Bi Bakmışsın icinde 50 Bot bunun Sebebi nedir, Bir Botta Okadar Kod Kasar Diyemi 15 Bot Yapmışsınız Yoksa, Çok Görülsün Daha İyi olur En azından kasmas, Ve kullanışlı olur Diyemi

aquabluee 18 Ekim 2012 23:03

Cevap: NoMercy v5 download.
 
nomercy bot operlerini girio ama nıcklerını gıremıyo nasıl yapabılırım yardımcı olursanız sevınırım

IRC-Dancer 19 Ekim 2012 15:48

Cevap: NoMercy v5 download.
 
Nomercy : Nick'ini Kayıt edip admin liste eklediysen ve sorun hala devam ediyorsa , aliaslar bölümünü tekrar gözden geçir.

AngeL 20 Ekim 2012 17:02

Cevap: NoMercy v5 download.
 
eline saglık canım ;s1

H3ctoR 25 Kasım 2012 06:48

Cevap: NoMercy v5 download.
 
Ben Naptıysam Swat Botları Girmiyo Nomercy'nin ;mads

Z-Lined 25 Kasım 2012 17:28

Cevap: NoMercy v5 download.
 
Bana Baş Vurun ben Yardım Ederim

IRC-Dancer 26 Kasım 2012 21:12

Cevap: NoMercy v5 download.
 
Kod:

if !$sock(chancontrolA) {
    sockopen chancontrolA $qsunucu $qsunucuport
  }
  if !$sock(chancontrolL) {
    sockopen chancontrolL $qsunucu $qsunucuport
  }
  if !$sock(chancontrolX) {
    sockopen chancontrolX $qsunucu $qsunucuport
  }
  if !$sock(chancontrolZ) {
    sockopen chancontrolZ $qsunucu $qsunucuport
  }

Bunlar aliaslar bölümünde varmı bakar mısın @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

H3ctoR 27 Kasım 2012 16:02

Cevap: NoMercy v5 download.
 
Evet Var Ama Girmiyor

IRC-Dancer 27 Kasım 2012 17:49

Cevap: NoMercy v5 download.
 
Kod:

on *:SOCKOPEN:chancontrol*: {
  %ccnick. [ $+ [ $right($sockname,1) ] ] = Auxv1- $+ $r(100,9999)
  sw $sockname NICK %ccnick. [ $+ [ $right($sockname,1) ] ]
  sw $sockname USER Ircbook "" " $+ $iif($host,$host,$ip) $+ " : $+  $qlogo Aux
}

on *:SOCKREAD:chancontrol*: {
  var %q
  sockread %q
  tokenize 32 %q
  if $1 == PING {
    sw $sockname PONG $2
  }
  if $2 == 376 || $2 == 422 {
    sw $sockname oper $qoperpass
  }
  if $2 == 381 {
    sw $sockname MODE %ccnick. [ $+ [ $right($sockname,1) ] ] -s
    sw $sockname MODE %ccnick. [ $+ [ $right($sockname,1) ] ] +s
    sw $sockname MODE %ccnick. [ $+ [ $right($sockname,1) ] ] -s
    sw $sockname MODE %ccnick. [ $+ [ $right($sockname,1) ] ] +s
    sw $sockname join 0,
    sw NoMercy os raw svskill $right($sockname,1) $+ -SunucuAdı- Reconnect
    .timer 1 2 sw $sockname NICK $right($sockname,1) $+ -Aux-Kontrol
    .timer 1 5 sw $sockname chghost $right($sockname,1) $+ -Aux-Kontrol $+($right($sockname,1),-Ircd.Aux.Security)
  }
  if $2 == NICK {
    if *MuafNick* iswm $right($3,-1) && $left($right($3,-1),1) == $right($sockname,1) {
      sw $sockname MODE $right($3,-1) +BH-h
      sw $sockname MODE $right($3,-1) +s
      sw $sockname MODE $right($3,-1) -s
      sw $sockname MODE $right($3,-1) +s
      sw $sockname LIST
      .timer 1 5 sw $sockname setident Ircbook
      .timerlist $+ $sockname 0 50 sw $sockname LIST
      .timerkontrolmsgA 0 $r(600,1500) botkontrolA
      .timerkontrolmsgL 0 $r(600,1500) botkontrolL
      .timerkontrolmsgX 0 $r(600,1500) botkontrolX
      .timerkontrolmsgZ 0 $r(600,1500) botkontrolZ
    }
  }
  if $2 == 352 {
    sw NoMercy PRIVMSG #Aux : $+ %reklamchan reklam botu: Clonelari: $8
    sw $sockname WHOIS $8
  }
  if $2 == 319 {
    var %c $right($5-,-1) , %i 1
    while %i <= $numtok(%c,32) {
      if % [ $+ [ $delprefix($gettok(%c,%i,32)) ] ] {
        if $left($gettok(%c,%i,32),1) != $chr(35) {
          sw NoMercy PRIVMSG #Aux : $+ $delprefix($gettok(%c,%i,32)) reklam botu: Inviter clonelarindan $4 $delprefix($gettok(%c,%i,32)) kanalinda $left($gettok(%c,%i,32),1) olarak tespit edildi.
          sw NoMercy PRIVMSG #Aux :.kill $4
        }
      }
      inc %i
    }
  }
  if $2 == 322 {
    if $5 < 25 {
      $+(.timercont,join,$4,$right($sockname,1)) off
    }
    if i !isincs $6 && s !isincs $6 && O !isincs $6 && $5 >= 25 && $4 != #Aux && $4 != #Opers && $4 != #Operhelp  && $4 != #Radyo {
      $+(.timercont,join,$4,$right($sockname,1)) 1 $r(10,40) sw $sockname JOIN $4
    }
  }
  if $2 == JOIN && *-Aux-* iswm $remove($gettok($1,1,33),:) && $left($remove($gettok($1,1,33),:),1) == $right($sockname,1) {
    $+(.timercont,cycle,$right($3,-1),$right($sockname,1)) -o 1 $r(500,1000) sw $sockname PART $right($3,-1)
    $+(.timercont,part,$right($3,-1),$right($sockname,1)) off
  }
  if $2 == PART && *-Aux-* iswm $remove($gettok($1,1,33),:) && $left($remove($gettok($1,1,33),:),1) == $right($sockname,1) {
    $+(.timercont,part,$3,$right($sockname,1)) -o 1 5 sw $sockname JOIN $3
    $+(.timercont,join,$3,$right($sockname,1)) off
  }
  if $2 == PRIVMSG {
    if *-Aux-* iswm $3 && *.*.* !iswm $botfnick($1) {
      var %::text $remove($gettok($4-,1,33),:)
      inc -u5 %qflood. [ $+ [ $+($sockname,($strip(%::text)),32) ] ]
      if %qflood. [ $+ [ $+($sockname,($strip(%::text)),32) ] ] == 3 {
        sw NoMercy privmsg #Aux : $+ $sockname $+  [Nick]:  $+ $botfnick($1) $+  [Mesaj]: $remove($gettok($4-,1,33),:)
      }
    }
  }
  if $2 == PRIVMSG {
    if *-Aux-* iswm $3 && *.*.* !iswm $botfnick($1) {
      var %::qtext $remove($gettok($4-,1,33),:)
      var %deneme $remove($gettok($4-,1,33),:)
      if !$oyunnick($botfnick($1)) {
        if $len(%::qtext) >= 15  {
          if *flood* !iswm %::qtext {
            if *girisme*istegi* !iswm %::qtext || *ozel*mesajlarim*kapa* !iswm %::qtext || *ozel*mesajlarim* !iswm %::qtext  || *s*l*m* !iswm %::qtext || *s*c*r*i*p*t* !iswm %::qtext || *CouraG* !iswm %::qtext || *Degerlendiriliyor.* !iswm %::qtext ||  *JAVASCRIPT*nudge*  !iswm  %::qtext ||  *Fenerba*  !iswm  %::qtext  ||  *KaSıRqa ScRipT*  !iswm  %::qtext  ||  *Veremiyeceqim*  !iswm  %::qtext {
              if *selam*nas?ls?n* !iswm %::qtext {
                hinc -mu60 SwatFlood $+($deneme,.,$deneme) 1
                if $hget(SwatFlood,$+($deneme,.,$deneme)) == 5 {
                  sw $sockname spamfilter add ap gzline 1h 2Spam/Reklam_[Aux-Swat-System] $yildiztemizle($strip(%::qtext))
                  sw NoMercy privmsg #Aux :Swat-System tarafindan spamfilter (gzline) edildi: $yildiztemizle($strip(%::qtext))
                  hadd -m Spamaddx $r(1000,999999) $yildiztemizle($strip(%::qtext))
                  hsave -i Spamaddx Spam/Spamaddx.bastard
                  .hdel -s SwatFlood $+($deneme,.,$deneme))
                  sw $sockname privmsg Nick'in :Spam mesaji ; $botfnick($1) %::qtext
                  .timer 1 120  sw $sockname spamfilter del ap gzline 1h 2Spam/Reklam_[Aux-Swat-System] $yildiztemizle($strip(%::qtext))
                }
              }
            }
          }
        }
      }
    }
  }
  if $2 == PRIVMSG || $2 == NOTICE {
    if *-Aux-* iswm $3 && *.*.* !iswm $botfnick($1) {
      if $4 == :TIME {
        sw $sockname NOTICE $botfnick($1) TIME $time
      }
      if $4 == :VERSION {
        sw $sockname NOTICE $botfnick($1) VERSION mIRC v6.16 Khaled Mardam-Bey
        ; sw $sockname NOTICE $botfnick($1) VERSION Bhedee
      }
      if $4 == :FINGER {
        sw $sockname NOTICE $botfnick($1) FINGER $fullname (bot) Idle 0 seconds
      }
      if $4 == :DCC {
        _gline $botfnick($1) DCC exploit tespit edilmistir!
      }
      elseif *serv !iswm $botfnick($1) {
        if !$oyunnick($botfnick($1)) {
          mesajkontrol $botfnick($1) $strip($right($4-,-1))
          if $chr(35) isin $strip($right($4-,-1)) && $botfnick($1) != NoMercy && !$oyunnick($botfnick($1)) {
            var %rk $strip($right($4-,-1))
            var %i 1
            while %i <= $numtok(%rk,32) {
              if $left($gettok(%rk,%i,32),1) == $chr(35) {
                set -u15 % [ $+ [ $gettok(%rk,%i,32) ] ] 1
                set %reklamchan $gettok(%rk,%i,32)
              }
              inc %i
            }
            set %reklamsock $sockname
            sw NoMercy USERHOST $botfnick($1)
            killnick $botfnick($1)
          }
        }
      }
    }
  }
}

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Sanırım bu işini görür , aliaslar kısmını kontrol et , eğer yoksa kanal ve nick'leri kendine göre ayarla tekrar dene hata devam ederse '' PM '' at bi bakalım , hatanın nerde olduğunu bilmediğimden şuanlık birşey diyemem.

Bahtiyar 01 Ocak 2013 13:26

Cevap: NoMercy v5 download.
 
Konu da söylenen yerleri değiştirip actim. Ama giriş yapmadı. Sorun ne olabilir?


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 04:50.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk