SaNCaK
MFC Üyesi
- Üyelik Tarihi
- 7 Kas 2017
- Konular
- 25
- Mesajlar
- 32
- MFC Puanı
- 0
Kod:
on *:load: {
.echo -aq $input(Yapımcı: SaNCaK $+ $crlf $+ $crlf $+ Addon: Whois $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Yapım: 17/10/2014 $+ $crlf $+ $crlf $+ Iletişim: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Kodu Kullandığınız için Teşekkür ederim,igo,Addon: Whois $chr(40) $+ v5.4 $+ $chr(41))
echo -a _____________________________________________________________________________________
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Add-On yükleniyor...
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Çalışan mIRC15 $version 0Sistem15 Windows $+ $os
echo -a 4,1[15,1 SaNCaK 4,1] 0,1 Coder: 15SaNCaK 0,1 E-Mail: 15sancak@outlook.com.tr
echo -a 4,1[00,01 SaNCaK 4,1] 15,1 Copyright 12©15 1999-2017
echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
on *:unload: {
.echo -aq $input(Author: SaNCaK $+ $crlf $+ $crlf $+ Addon: Whois $chr(40) $+ v5.4 $+ $chr(41) $+ $crlf $+ $crlf $+ Released at: 17/10/2016 $+ $crlf $+ $crlf $+ Contact: sancak@outlook.com.tr $+ $crlf $+ $crlf $+ Unloading...,igo,Addon: Whois $chr(40) $+ v5.4 $+ $chr(41))
}
;~~~~~~~~~~~~~~~ § â ñ ¢ â K ~~~~~~~~~~~~~~
on *^:Join:#:{
if ($nick == $me) {
echo $chan $timestamp 12___[2 # 14Kanalına Girdiniz..12]------------------------------------------° | halt
}
}
raw 332:* {
echo $2 $timestamp 12|--» 14Kanal Mesaj: 02 $3-
halt
}
raw 333:* {
echo $2 $timestamp 12|--» 14Kanal Kuruluş Tarihi:02 $asctime($4)
echo $2 $timestamp 12|--» 14Topic Kurucusu:02 $3
halt
}
raw 366:*: {
echo $2 $timestamp 12|--» 14Kanalda Op:2 $opnick($2,0) 14Voice:2 $vnick($2,0) 14Toplam:2 $nick($2,0) 14kişi bulunuyor.
echo $2 $timestamp 12 ¯°---------------------------------------------------------------------°
halt
}
raw 328:* {
echo $2 $timestamp 12|--» 14URL: 02 $3-
halt
}
;~~~~~~~~~~~~~~~ § â ñ ¢ â K ~~~~~~~~~~~~~~
alias clonecntrl { who +h $1 | set %jnk $1 }
alias kanalclone {
if ($ial($address($1,2),0) == 1) return
var %nickler = 0 | var %clone = $1
while (%nickler < $ial($address($1,2),0)) { inc %nickler | var %clone = $addtok(%clone,$ial($address($1,2),%nickler).nick, 44) }
return %clone
}
#whocontrol off
raw 352:*: {
haltdef
if %jnk { %cloneleri = $addtok(%cloneleri,$6,32) }
}
raw 315:*:if %jnk { haltdef | unset %jnk | echo -a $timestamp 12|--- 14Kullandığı nickler:1 $eval(%cloneleri,2) | .disable #whocontrol }
#whocontrol end
raw 301:*: {
haltdef
echo -a $timestamp 12|--- 14Away Durumu:1 ( $+ $3- $+ )
}
raw 307:*: {
haltdef
echo -a $timestamp 12|--- 14Kayıt Durumu:1 Bu Nick Kayıtlı ve İdentify Edilmiştir.
}
raw 310:*: {
haltdef
echo -a 4» IRC Helper
}
raw 335:*: {
echo -a $timestamp 12|--- 14Bot:1 Evet (+B).
halt
}
raw 311:*:{
haltdef
echo -a $timestamp 12___[1Whois:1 $2 12] -------------------------------------------------------------
;echo -a $timestamp 12|--- 14Nick:1 $2
echo -a $timestamp 12|--- 14FullName:1 $6-
echo -a $timestamp 12|--- 14İp Adresi:1 $3 $+ 04 $+ @ $+ 01 $+ $4
var %clone = $kanalclone($2)
if (%clone == $null) echo -a $timestamp 12|--- 14Kanaldaki Klonları:1 (Clone yok!)
else echo -a $timestamp 12|--- 14Clone:1 ( $+ $numtok(%clone,44) $+ ) kişi 04/01 %clone
haltdef
}
raw 312:*:{
haltdef
echo -a $timestamp 12|--- 14Server:1 $3
}
raw 313:*: {
haltdef
echo -a $timestamp 12|--- 14Network Özelliği:1 $4 $5 $6 $7 $8 $9
}
raw 314:*:{
haltdef
echo -a $timestamp 12¯°--------------------------------------------------------------------------------
echo -a $timestamp 12|--- 14Nick:1 $2
echo -a $timestamp 12|--- 14FullName:1 $6-
echo -a $timestamp 12|--- 14İp Adresi:1 $3 $+ 04 $+ @ $+ 01 $+ $4
var %clone = $kanalclone($2)
if (%clone == $null) echo -a $timestamp 12|--- 14Kanaldaki Klonları:1 ( Clone yok! )
else echo -a $timestamp 12|--- 14Clone:1 ( $+ $numtok(%clone,44) $+ ) kişi 04/01 %clone
haltdef
}
raw 317:*:{
haltdef
%idle = $replace($duration($3),secs,saniye,sec,saniye,mins ,dakika,min,dakika,hrs,saat,hr,saat,days,gün,day,gün,wks,hafta,wk,hafta)
%baglanis = $replace($asctime($4),mon,Pazartesi,tue,Salı,wed,Çarşamba,thu,Perşembe,fri,Cuma,sat,Cumartesi,sun,Pazar,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)
echo -a $timestamp 12|--- 14Bağlandığı Zaman:1 %baglanis
echo -a $timestamp 12|--- 14Boş Olduğu Süre:1 %idle
echo -a $timestamp 12|--- 14Bağlandıktan Sonra Geçen Süre:1 $duration($calc($ctime - $4))
}
raw 318:*:{
haltdef
.timer -h 1 200 echo -a $timestamp 12¯°--------------------------------------------------------------------------------
}
raw 319:*:{
haltdef
echo -a $timestamp 12|--- 14Kanalları:1 $3-
echo -a $timestamp 12|--- 14Ortak kanallar:1 $ortak_k($2) 04/01 Toplam:04 $comchan($2,0) 01Kanal
}
raw 338:*:{
haltdef
echo -a $timestamp 12|--- 14Gerçek İp Adresi:01 $4 $5 $6
echo -a $timestamp 12|--- 14Gerçek İp:1 $3 $4
}
raw 320:*:{
haltdef
echo -a $timestamp 12|--- 14Swhois:1 $2-
}
raw 330:*: echo -a $timestamp 12|--- 14Durum:1 $2 Nicki $3 Accountuna kayıtlıdır. | halt
raw 378:*:{
haltdef
.enable #whocontrol
clonecntrl $7
echo -a $timestamp 12|--- 14Gerçek Ip Adresi:01 $4 $5 $6 $7
}
raw 379:*:{
haltdef
echo -a $timestamp 12|--- 14Nick modeleri:01 $6
}
raw 671:*:{
haltdef
echo -a $timestamp 12|--- 14Bağlantı:1 $3-
}
raw 327:*: {
echo -a $timestamp 12|--- 14Client Info:1 Java User
halt
}
raw 310:*: {
echo -a $timestamp 12|--- 14 Özellikleri 1 Yardım sever biri gibi duruyor
halt
}
raw 325:*: {
echo -a $timestamp 12|--- 14 Özellikleri 1 Hassas Kulaklara Sahip.
halt
}
raw 328:*: {
echo -a $timestamp 12|--- 14 Kullandığı İp Numarası 1 $7-
halt
}
raw 308:*: {
echo -a $timestamp 12|--- 14 Bilgi:1 Servis Ajanı!
halt
}
raw 320:*:{
haltdef
echo -a $timestamp 14|--- 14Swhois:1 $2-
}
raw 330:*: echo -a $timestamp 14|--- 14NickServ:1 $2 $4 $5 $6 $7 $3 | halt
raw 378:*:{
haltdef
.enable #whocontrol
clonecntrl $7
echo -a $timestamp 14|--- 14Real Ip Address:01 $4 $5 $6 $7
}
raw 379:*:{
haltdef
echo -a $timestamp 14|--- 14Modes:01 $6
}
raw 671:*:{
haltdef
echo -a $timestamp 14|--- 14Connection:1 $3-
}
raw 276:*:{
haltdef
echo -a $timestamp 14|--- 14Client :1 $3 $4 $5 $6 $7
}
raw 327:*: {
echo -a $timestamp 14|--- 14Client Info:1 Java User
halt
}
raw 310:*: {
echo -a $timestamp 14|--- 14 Info: 1 Yardım sever biri gibi duruyor
halt
}
raw 325:*: {
echo -a $timestamp 14|--- 14 Info: 1 Hassas Kulaklara Sahip.
halt
}
raw 308:*: {
echo -a $timestamp 14|--- 14 Info:1 Servis Ajanı!
halt
}
alias ortak_k {
if ($server == $null) { echo -a $timestamp 14|--- 14Herhangi bir sêrvêr'a bağlı değilsiniz. }
elseif ($chan($me) == 0) { echo -a $timestamp 14|--- 14Herhangi bir kanala girmiş değilsiniz. }
elseif (!$1) { echo -a $timestamp 14|--- 14Ortak kanallarınızın bulunacağı nick belirtilmedi. }
elseif ($comchan($1,0) == 0) { echo -a $timestamp 14|--- 14No such nick/channel. }
else {
var %oid 1
set %orka $comchan($1,0)
unset %knms
while (%oid <= %orka) {
set %knms $comchan($1,%oid) $+ $chr(32) $+ %knms
inc %oid
}
return %knms
}
}
on *:snotice:*whois*: {
var %> = $+(%,op:,$2)
inc -eu60 $(%>,1)
if ($(%>,2) == 1) {
.msg $gettok(%>,2,58) 1UYARI : 4[ 2Sistem bilgilerime baktığınızı tespit etti.Sorun Nedir? 4] | window -e @Whois | echo @Whois 0,6 $time *** 2UYARI:4 $2 2şu Anda Bilgilerinize Bakıyor 4[2 Whois Çekti 4] | /echo 1 -a 0,6 $time *** 2UYARI: 4 $2 2şu Anda Bilgilerinize Bakıyor 4[2 Whois Çekti 4]
halt
}
elseif ($(%>,2) == 2) {
.msg $gettok(%>,2,58) 1UYARI : 4[ 2Sistem bilgilerime 2. kez baktığınızı tespit etti.Eğer yazınıza cevap alamıyorsanız bilgisayar başında olmayabilirim ya da meşgulümdür. 4] | window -e @Whois | echo @Whois 0,6 $time *** 1UYARI : 4 $2 2şu Anda 2. Kez Bilgilerinize Bakıyor 4[2 Whois Çekti 4] | /echo 1 -a 0,6 $time *** 4[ 2UYARI:4 $2 2şu Anda 2. Kez Bilgilerinize Bakıyor 4[2 Whois Çekti 4]
}
elseif ($(%>,2) == 3) {
.msg $gettok(%>,2,58) 1UYARI : 4[ 2Sistem bilgilerime tekrar baktığınızı tespit etti ve özel korumalarım devreye girdi tekrar whois çekmeyiniz!! 4] | /window -e @Whois | echo @Whois 0,6 $time *** 1UYARI : *** 4 $2 2şu Anda 3. Kez Bilgilerinize Bakıyor 4[2 Whois Çekti 4] | echo -a 0,6 $time *** 1UYARI :4 $2 2şu Anda 3. Kez Bilgilerinize Bakıyor 4[2 Whois Çekti 4]
}
elseif ($(%>,2) == 4) {
.kill $gettok(%>,2,58) 1UYARI : 4[ 2Lütfen Uyarılarımı Dikkate Alınız... Whois Güvenlik Birimleri Tarafından Kill ıle Uyarıldınız 4] | window -e @Whois | echo @Whois 0,6 $time *** 1UYARI : 4[3 $2 5Rumuzlu şahıs gereksiz whois çekme suçundan kill ile uyarıldı. 4] | echo -a 0,6 $time *** 1UYARI : 4[3 $2 5Rumuzlu şahıs gereksiz whois çekme suçundan kill ile uyarıldı. 4]
unset $(%>,1)
}
}
;~~~~~~~~~~~~~~~ § â ñ ¢ â K ~~~~~~~~~~~~~~
raw 1:*:echo -a $timestamp 1Hoşgeldin2 $8 | halt
raw 2:*:echo -a $timestamp 1Server versionu:2 $8 | halt
raw 3:*:echo -a $timestamp 1Server Kuruluş Tarihi:2 $6 $7 $8 $6 $11 | halt
raw 4:*:echo -a $timestamp 1Sunucu Adı:2 $2 1Çalışan Version:2 $3 | halt
raw 5:*:echo -a $timestamp 1Server bilgi:2 $6 $7 $8 $6 $10 | halt
raw 482:*:echo -a $timestamp 4,4 0,0 0,4 HATA 0,0 4,4 12 Bu komutu kullanabilmek için yönetici olmanız gerekmektedir. | halt
raw 401:*:echo -a $timestamp 4,4 0,0 0,4 HATA 0,0 4,4 12 $2 1Nicki şuan 12( $server ) 1 sunucusuna bağlı değil. $time | er54 $2 Nicki şuan ( $server ) sunucusuna bağlı değil. $time | halt
raw 381:*:echo -a $timestamp 3*** Login Basarili: $server Sunucusunda <4 $6- > olarak giriş yaptınız. | halt
raw 008:*:echo -a $timestamp 3*** Aldığınız Masklar: $5 | halt
raw 464:*:echo -a $timestamp 4,4 0,0 0,4 HATA 0,0 4,4 12 Yanlış şifre denemesi lütfen doğru şifreyi giriniz. | halt
;raw 421:*:echo -a $timestamp 4,4 0,0 0,4 HATA 0,0 4,4 1,14 Geçersiz Komut Uyguladınız. Komutlar Hakkında 02#help 1 kanalından yardım alabilirsiniz. | halt
raw 432:*:echo -a $timestamp 12 Kabul edilmeyen karakter kullandınız. Örnek: (ğüşçı) | halt
raw 471:*:echo -a $timestamp 14>1 $2 Kanalında limit var ve şu anda kanal limiti dolu. Daha sonra tekrar deneyiniz... | halt
raw 473:*:echo -a $timestamp 14>1 $2 Kanalına şu anda giremezsiniz. Kanal davetsel konumda (+i). Daha sonra tekrar deneyiniz... | halt
raw 474:*:echo -a $timestamp 14>1 $2 Kanalına giremezsiniz. Banlısınız... | halt
raw 475:*:echo -a $timestamp 14>1 $2 Kanalı şifreli konumda. (+k) Şifreyi bilmeden giremezsiniz. | halt
raw 437:*:echo -a $timestamp 14>1 $2 Kanalında iken nick değiştiremezsiniz. Kanal nick değiştirmeye kapalı durumda. (+N) | halt
raw 472:*:echo -a $timestamp 14>1 $2 Yalnış mode ayarı. | halt
raw 481:*:echo -a $timestamp 12,120 IRCop değilsiniz. Bu komutu kullanamazsınız. | halt
raw 430:*:echo -a $timestamp 12,120 $2 IRCop komutudur. Kullanamazsınız. | halt
raw 404:*:echo -a $timestamp 14>1 $2 Kanalına Gönderilmedi. | halt
raw 405:*:echo -a $timestamp 14>1 Daha fazla kanala giremezsiniz. | halt
raw 352:*:echo -s $timestamp 14Kullanıcılar:1 $2- | halt
raw 421:*:echo -a $timestamp 14>1 $2 Yalnış komut. | halt
raw 474:*:echo -a $timestamp 14>1 $2 Kanalına giremezsiniz. Banlısınız. | halt
raw 441:*:echo -a $timestamp 14>1 $2 $3 Kanalında bulunamadı. | halt
raw 478:*:echo -a $timestamp 14>1 $2 Ban List dolu.. ( $3 ) | halt
raw 412:*:echo -a $timestamp 14>1 $2 yazdığınız gitmedi. | halt
raw 328:*:echo -a $timestamp 14>1 $2 URL: $3 | halt
raw 433:*:echo -a $timestamp 14>1 $2 Nicki şu anda kullanılıyor. | halt
raw 306:*:echo -a $timestamp 14>1 Şu andan ihtibaren awaysiniz. | halt
raw 250:*:echo -a $timestamp 1Toplam bağlantı2 $4 1kişi. | halt
raw 252:*:echo -a $timestamp 1IRC'de olan IRCop sayısı:2 $2 | halt
raw 253:*:echo -a $timestamp 1Bilinmeyen bağlantı sayısı:2 $2 | halt
raw 254:*:echo -a $timestamp 1Aktif kanal sayısı:2 $2 | halt
raw 255:*:echo -a $timestamp 1Alıcılar2 $4 1tane - Yerel kullanıcılar2 $7 1tane. | halt
raw 251:*:echo -a $timestamp 1Toplam kullanıcı sayısı:2 $4 | halt
raw 251:*:echo -a $timestamp 1Görünmeyen kullanıcı sayısı:2 $7 | halt
raw 251:*:echo -a $timestamp 1Toplam Server sayısı:2 $10 | halt
raw 375:*:echo -a $timestamp 2«[1 Server Motd Başlangıcı 2]» | halt
raw 471:*:echo -a $timestamp 6,0 $2 Kanalında limit var ve şu an dolu. Tekrar deneyiniz.. | halt
raw 473:*:echo -a $timestamp 6,0 $2 Kanala Giremezsiniz, Şu An Davetsel 12,0 ( 4,0 invite 12,0 ) 6,0 Konumda.. | halt
raw 474:*:echo -a $timestamp 6,0 $2 Kanala Giremezsiniz, Sizi 6b3anladılar | halt
raw 475:*:echo -a $timestamp 6,0 $2 Kanala Giremezsiniz, Şu An Şifreli 12,0 ( 4,0 key 12,0 ) 6,0 Giriş Konumunda | halt
raw 437:*:echo -a $timestamp 6,0 $2 Bulunduğunuz Kanal 4,0 +d veya 4,0 +m 6,0 Modunda iken Nick Değişemezsiniz.. Kanaldan Çıkıp Tekrardan Deneyin | halt
raw 472:*:echo -a $timestamp 6,0 $2 Yanlış Mode Ayarı.. | halt
raw 430:*:echo -s $timestamp 6,0 $2 IRC Operator Komutudur, Kullanamazsın.. | er54 $2 IRC Operator Komutudur, Kullanamazsın.. | halt
raw 401:*:echo -s $timestamp 6,0 $2 Kişi ßulunamadı.. | er54 $2 Kişi ßulunamadı.. | halt
raw 404:*:echo -a $timestamp 6,0 $2 Yazdığınız Kanala Gönderilemedi.. | halt
raw 405:*:echo -a $timestamp 0,4 Dikkat.! 0,12 $Server Daha fazla kanala girmenize izin vermiyor! | halt
raw 352:*:echo -a $timestamp 6,0 $2- | halt
raw 474:*:echo -a $timestamp 6,0 $2 Kanalına Giremezsin ßanlısın | halt
raw 441:*:echo -a $timestamp 6,0 $2 $3 Kanalında ßulunamadı.. | halt
raw 478:*:echo -a $timestamp 6,0 $2 ßan List Doldu ( $3 ) | notice $2 ßanlist Doldu. | halt
raw 412:*:echo -a $timestamp 6,0 $2 Yazdığınız Karşıya Gitmedi.. | halt
raw 433:*:echo -a $timestamp 6,0 $2 Şu An Kullanılıyor Nick`in Şifresini Biliyorsanız 2,0 /Nickserv Ghost $2 Şifre6,0 Şeklinde komudu kullanın. | halt
raw 493:*:echo -a $timestamp 0,12 0,4 $2 0,12 Nickinin Özeli Kapalı Olduğu Icin Mesajınız Kendisine Ulaşamadı.. | halt
;~~~~~~~~~~~~~~~ § â ñ ¢ â K ~~~~~~~~~~~~~~
dialog error {
title "Hatalı işlem yaptınız"
size -1 -1 250 93
option pixels
button "Tamam", 99, 1001 1001 1 1, ok
text "", 1, 5 5 240 60, center
button "Tamam", 2, 80 70 80 19, flat ok
}
alias er54 {
if ($dialog(error) == $null) {
dialog -m error error
did -ra error 1 $1-
halt
}
did -ra error 1 $1-
}Kodların miRC sisteminize eklenmesi;
Eklenecek kodu kopyalıyoruz. (Kısayol Tuşu Ctrl + C) Ardından mIRC'imizi açıyoruz ve herhangi bir ekranda Alt + R tuşlarına basıyoruz. mIRC Scripts Editörü açılıyor.
[Aliases] [Popups] [Remote] [Users] [Variables] tablarından [Remote] sekmesini tıklıyoruz sonrasında Sol üst menümüzden;
|Dosya (ingilizce için File)
|Yeni (ingilizce için New)
Sekmelerine tıklıyoruz boş bir ekran karşımızda, ekrana sağ tıklayıp yapıştırı tıklıyoruz. (Kısayol Tuşu Ctrl + V) Son Olarak Tamam [OK] butonuna tıklıyoruz ve kodumuzu eklemiş oluyoruz.
