IP'ye tıklama ile Kline atmak.
 

;;@Giris/Cikis Penceresinde veya menual pencerede görünen
;[23:36] *** Notice -- Client connecting on port 6669: Auth ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]
;[23:36] *** Notice -- Client exiting: Auth ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [Quit]
; giriş ve cıkışlar gibi ip lere tek tık ile K:line atar..

on ^1:SNOTICE:*:{
if (exiting isin $1-) {
if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
echo 4 -t @Giris/Cikis Çıkış : $1- | halt
}
if (Connecting isin $1-) {
if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
echo 3 -t @Giris/Cikis Giriş : $1- | halt
}
halt
}
on ^1:HOTLINK:*.*.*:*:{
if ( $active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,2)
return $1
}
}
halt
}
on *:HOTLINK:*.*.*:*:{
if ($active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,1)
}
}
}

alias -l X:CoCoRiCo {
if ($2 = 1 ) {
var %q $mid($1,$pos($1,@),$len($1))
var %x $calc($len(%q) - 1 )
;S:ban secenegi (Kline)
.Kline $+(*,$left(%q,%x)) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
echo 4:lined ip $+(*,$left(%q,%x))
}
if ($2 = 2 ) {
var %q $mid($1,$pos($1,@),$len($1))
var %x $calc($len(%q) - 1 )
Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x))
}
}

Düzenleyip kanalda +b de yapabilirsiniz.. karısık sayılmaz :)

üstad sen şu Mynete girebilen arkadaş mısın?

evet 8 haneli bi şifreyi randomize edip kırmak zor degil birininkine denk geliyor :)

Ne diyim :) Helal olsun... Bu bilgini paylaşmayı düşünüyor musun?:) Sanırım hayır ama bir sorayım dedim...

Hayır diycem cünkü mynete iyilik yaparım ...
kaliteli userlerını kaybetsin onlar, 99 kayıtlı nicki para karsılıgı satıp Droplattılar.
Beter olsunlar baska bişi demiyorum.

Bu konuda sana katılıyorum... Ama benim demek istediğim, senin burada kullanış mantığın nedir. Daha önce burada senin hakkında çok konuşuldu. Hatta bir kaç screenshot elimize geçti. Burada bir program kullanıyordun. O akşam bu programı aradım, yazıcıoğluna bile gittim ama bulamadım.

Eğer bilgini benle paylaşmak istersen, msn: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]...

Temel mantık su SHA1 algoritmasının yerel intranette bi kopyası fakat kısa zaman önce mynete attıgım memo ile sohbet.mynet.com/java adresindeki bu CVS acıgınıda kapattırdım Pram lardaki acıkları kapattırdım. dedimya amacım kırmakdı kırdım. ama kimse sahip olamadı shotlarıda ben yolladım mynete adminlere nasıl size geldi bilmiyorum..

c:\windows\download files\ dizininde görebilirsin sohbetin SHA1 Db lerini.

hımmm. Peki teşekkür ederim...

kolay aslında sende yaparsın

Randomize için kullandığın program adı neydi, forumda aradım ama henüz bulamadım başlığı

program yok ben mircle yaptım
mesela şifre gd2bfsaV

$rand(a,z) gibi bunu bi dat yada ini dosyasına mümkün oldugu kadar kaydetip whlie kullanarak dogru şifreyi girebilir yada direk calısabilirsin, şifreleme mantıgı için Java programını yüklemen yeterli Program files dizinindeki programın Temp lerinden şifrelerin asimetrik kısmını bulabilirsin.

kodu denedim, hata verdi.

TITLEBAR: Unknown command

dedi 20 kere falan. mirc versionum 6.03 olmasından kaynaklanıyor herhalde.

Titlebar kısmını ( ;TITLEBAR ) disable et sorun cıkmaz o üstte sadece tıklıyacagın IP hakkında bilgi gösteriyor, 6.16 da sorunsuz calısıyor
tek yapman gereken ip üzerine gidip mouse iconu EL seklini aldıgında tıklamak.

ekstradan bi bilgi vereyim...

bu şekilde eklendiğinde, sadece giriş ve çıkış snoticeleri gözüküyor. haltı silindiğinde, yani:

haline geldiğinde, diğer snoticeleride normal şekilde görebilirsiniz. İsterseniz ufak bi kod ile, diğer snoticeleride ayrı bir pencereye atarsınız...

kodu hazırlayan arkadaşın ellerine sağlık. birçok kişinin çok işine yarayacağına eminim.

TITLEBAR: Geçersiz Bir Komut! yazdı

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

ßuraya Aynı şekil de mırc 6.16 da olacka yazarmısınız?

Hiphop zaten 6.16da sorunsuz çalışıyor yazmış arkadaş. Nasıl okuyorsun anlamıyorum ki... Titlebar olan satırın başına ; koyarsan düzelir sorun. O da yazıyor linkini verdiğim postta... Birazcık dikkat edin...

aßi Valla yapamadim dedigini yaptim ßak ßunu koydum
on ^1:SNOTICE:*:{
if (exiting isin $1-) {
if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
echo 4 -t @Giris/Cikis Çıkış : $1- | halt
}
if (Connecting isin $1-) {
if (!$window(@Giris/Cikis)) { window -en @Giris/Cikis }
echo 3 -t @Giris/Cikis Giriş : $1- | halt
}
halt
}
on ^1:HOTLINK:*.*.*:*:{
if ( $active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,2)
return $1
}
}
halt
}
on *:HOTLINK:*.*.*:*:{
if ($active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,1)
}
}
}
alias -l X:CoCoRiCo {
if ($2 = 1 ) {
var %q $mid($1,$pos($1,@),$len($1))
var %x $calc($len(%q) - 1 )
;S:ban secenegi (Kline)
.Kline $+(*,$left(%q,%x)) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
echo 4:lined ip $+(*,$left(%q,%x))
}
if ($2 = 2 ) {
var %q $mid($1,$pos($1,@),$len($1))
var %x $calc($len(%q) - 1 )
;Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x))
}


Aynen ßöyle ama olmadi

Muhtemel sebepler :
1.Cr deki giriş ve cıkıs mesajları farklı olabilir, CR IRCD de sorun cıkabilir.
2.Oper olmamıs olabilirsin (snotice görebilmek için IRCOP sart)
3.Giriş Cıkış mesajları flag 'ını almamıs olabilirsin.
4. Aliases lara eklemedigine emin misin.

bunlar dısında calısması gerek...

ßen o komutu ald1m alt+r ye remote new e ekledim o kadar daha baska birsey yapadmim server benim operimi girdim

Bende calısıyor istersen baska bi mIRC de dene.. sorun olmaması gerek..

ya aßi o komutu tekrar yazip nereye nasil koyacagii anlatirsan yapacam lütfen
ßüyük ßir önemi varda

al scriptimde kullandıgım
 

Suan kullangıdım ve calısan hali hiç bi farkı yok..
__________________________________________________ _____
on *:HOTLINK:*.*.*:*:{
if ($active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,1)
}
}
}
alias -l X:CoCoRiCo {
if ($2 = 1 ) {
var %q $mid($1,$pos($1,@),$len($1)) , %x $calc($len(%q) - 1 )
.Kline $+(*,$left(%q,%x)) perm [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
echo 4:lined ip $+(*,$left(%q,%x))
}
if ($2 = 2 ) {
var %q $mid($1,$pos($1,@),$len($1)) , var %x $calc($len(%q) - 1 )
.Titlebar: IP $+(*,$left(%q,%x))
}
}
__________________________________________________ ____________
:lined ip [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
[21:57] *** Notice -- Client exiting: Bebetto ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [User is banned ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])]
__________________________________________________ _______________

on *:HOTLINK:*.*.*:*:{
if ($active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,1)
}
}
}


yerine ctrl tusuna basıp ta hotlinki kullanmak daha mantıklı olur gibime geliyor böylece yanlış tıklama olayını egale etmiş oluruz.

on ^*:HOTLINK:*.*.*:*:{ }
on *:HOTLINK:*.*.*:*:{
if ( $mouse.key & 2 ) {
if ($active = #) { halt }
else {
if (@ isin $1) {
$x:CoCoRiCo($1,1)
}
}
}
}

TITLEBAR: Yalnış komut.
TITLEBAR: Yalnış komut.
TITLEBAR: Yalnış komut.
bende bu çıkıyo version cr yada bendemi bi hata var ;huh

Bu Giriş/Cıkış Ları Noticeleri Pencerede Gösteriyor Bu Giriş Cıkışları Kanala Nasıl Yansıtcaz KanaldaGösterirmi?

echo 4 -t @Giris/Cikis Çıkış : $1-
;kısmında eğer belirli bi kanala aktarıcaksan
echo #kanal $1- şeklinde
;bulunduğun kanala yansıtmak icin ise
echo -a $1-
;yapmalısın

Arkadaşım Onun YanSıttıgını Başkası Göremiyor Ben istiyorum ki Kanala Yansıtsın Herkez Görsün Bu Mümkünmü? Yardımın için Teşekkürler..

/echo yerine /msg kullan o nun için

Yanıt: IP'ye tıklama ile Kline atmak.
 

Arkadaşım verdiğin Komutu Remote'a atıp Statuste IP'ye tıkladiğim Zaman Direk Şu hayati veriyor
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!
[AyOpS] TITLEBAR: Geçersiz Bir Komut!

Sebebi Nedir Acaba ?

Yanıt: IP'ye tıklama ile Kline atmak.
 

Titlebar: K:LINED EDILECEK! $+(*,$left(%q,%x))
bu kısmı
Titlebar : K:LINED EDILECEK! $+(*,$left(%q,%x))
bu sekilde degiştir. : noktayı ayırırsan sorun cıkmaz.

Yanıt: IP'ye tıklama ile Kline atmak.
 

Arkadaşımızın verdiği kodları çalıştıramayanlar bide bunu denesin

alt+R yapında mirc dosyası çıkar oraya altda yazanı kopyala

On ^1:SNOTICE:*connecting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c7 @ConnExit $4-
if ($len($9) >= 9) {
%a = $left($9,4)
%i = 0
%bukadar = 0
while (%i < 4) {
inc %i
%b = $mid(%a, %i,1)
if (%b isin qwrtypsdfghjklzxcvbnm) {
inc %bukadar
}
}
if (%bukadar == 4) {
%glineho = $pos($10,@,1) + 1
%glinehos = $mid($10, %glineho, $len($10) - 1)
%uzun = $len(%glinehos) - 1
%glinehost = $left(%glinehos, %uzun)
aline -c4 @ConnExit G-line $9 %glinehost
gline *@ $+ %glinehost +365d : trojan
unset %glineho
unset %glinehos
unset %uzun
unset %glinehost
inc %glinecount
}
unset %bukadar
}
}
haltdef
}
On ^1:SNOTICE:*exiting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c12 @ConnExit $4-
haltdef
}

Sonra alieas a gel ve altda olan $eyide oraya kopyala

spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline sayısı: %klinecount
unset %klinecount
window -c @ConnExit
}
}

/spam yaptığında bi pencere çıkacak. Bu çıkan pencerede giriş çıkışları gösterir. Tek tıkla at gitsin ;)

Kolay gelsin

Yanıt: IP'ye tıklama ile Kline atmak.
 

SONRA Unknown command
SPAM Unknown command

şu kodu tam olarak verebilecek biri yokmu , hala çalıştıramadım denildiği gibi

Yanıt: IP'ye tıklama ile Kline atmak.
 

İkisindede hata yok

Yanıt: IP'ye tıklama ile Kline atmak.
 

Anti Spam offLine
Toplam Kline sayısı:
-
SONRA Unknown command
-
SPAM Unknown command
-
Anti Spam OnLine.
-
SONRA Unknown command
-
SPAM Unknown command
-
Anti Spam offLine
Toplam Kline sayısı:
-
SONRA Unknown command
-
SPAM Unknown command
-

pencere açılıyor kapanıyor kafasına gore anlamadım:S

Yanıt: IP'ye tıklama ile Kline atmak.
 

ALT+R ye basarak mIRC editoru acin
ve asagidaki kodu remote kismina ekleyin...



menu @ConnExit {
dclick: {
%satir = $line(@ConnExit, $1)
%glineho = $pos(%satir,@,1) + 1
%hede = $pos(%satir,[,1) - 2
%bukadar = %hede - %glineho
%glinehoo = $mid(%satir, %glineho, %bukadar)
aline -c4 @ConnExit G-Line %glinehoo
dline @ConnExit $1
gline *@ $+ %glinehoo +90d : 1S14pam12/1T14rojan 1N14edeniyle 1B14anlandınız. [Nick]
unset %satir
unset %hede
unset %bukadar
unset %glineho*
}
}
On ^1:SNOTICE:*connecting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c7 @ConnExit $4-
if ($len($9) >= 9) {
%a = $left($9,4)
%i = 0
%bukadar = 0
while (%i < 4) {
inc %i
%b = $mid(%a, %i,1)
if (%b isin qwrtypsdfghjklzxcvbnm) {
inc %bukadar
}
}
if (%bukadar == 4) {
%glineho = $pos($10,@,1) + 1
%glinehos = $mid($10, %glineho, $len($10) - 1)
%uzun = $len(%glinehos) - 1
%glinehost = $left(%glinehos, %uzun)
aline -c4 @ConnExit G-line $9 %glinehost
gline *@ $+ %glinehost +365d : 1S14pam12/1T14rojan 1N14edeniyle 1B14anlandınız. [Nick]
unset %glineho
unset %glinehos
unset %uzun
unset %glinehost
inc %glinecount
}
unset %bukadar
}
}
haltdef
}
On ^1:SNOTICE:*exiting*: {
if (%meydeymeydey == 1) {
if ($window(@ConnExit, wid) == 0) { window -dChk[0]l +ftl @ConnExit }
aline -c12 @ConnExit $4-
haltdef
}
}
daha sonra aliases sekmesine geliyor ve asagidaki kodu ekliyoruz
-------------------------------------------------------»
spam {
if (%meydeymeydey != 1) {
%meydeymeydey = 1
mode $me +s +ckeG
echo -a Anti Spam OnLine.
halt }
elseif (%meydeymeydey == 1) {
unset %meydeymeydey
echo -a Anti Spam offLine
echo -a Toplam Kline sayısı: %klinecount
unset %klinecount
window -c @ConnExit
}
}

-----------------------------------------------------------------------


Bu iki kismi ekledikten sonra OK tusuna basip Editorumuzu kapatiyoruz. İşlem bu kadar Şimdi geldik kullanmaya

/spam yazdiginiz vakit
Anti Spam OnLine.
der ve ayri bir pencere acilir.


Mause ile giris cikislara tiklayarak gline atabilirsiniz. Trojanlar girer girmez cikarlar ciktiklari
zaman mause ile tiklayip gline atabilirsiniz.
Kapatmak icin yine komut
/spam

Anti Spam offLine
Toplam Kline sayısı:

Yanıt: IP'ye tıklama ile Kline atmak.
 

usta dediğini yaptım gerçekten sorun vermedi ama bu seferde
[13:53:08] -Irc.Haydi.NET- *** Global -- from webchat.haydi.net: Clone Alert: 5 clients from 88.226.169.233

şekiLde olan IP'leri tıkLamıyor

İdent ve IP'yi yanyana bulunduranları tıklıyor;
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] gibi acaba ba$ında @ işareti bulunmadiğindan mi kaynaklanıyor diğerinin tıklanmamasi,yoksa dediğim gibi identle IP'in yanyana oldugu durumlarda mi tıklıyor sadece ?

Yanıt: IP'ye tıklama ile Kline atmak.
 

usta yapsanda bunu bir şey deişmiyor yine tıklama ile Oluyor :)