Category: mIRC Script

Addonlar / DLL / Hazır Kodlar / mIRC Script

9 Nisan 2017

Amsg ve ame Muaf kodu Gelişmiş

Merhaba. Oper Admin ve Helperler için kullanması zorunlu olan kodlardan birisi haline gelen remotelerden birisi olan amsg ve ame muaf kodunu sizinle paylaşacağım. Kodun kullanımı oldukça kolay. Öncelikle aşağıda vereceğim kodları mircinizin remote kısmına...

mIRC Script / Socket Bot

1 Nisan 2017

Youtube link analiz botu

Youtube link analiz botu Çalışma şekli !kim youtubelinki örnek: !kim youtube.be/watch?v=PUiNB0UFwJM

## KraLaz ##
on *:text:!kim &:#: {
  ;msg # calisti döngü
  noop $regex($2,/(youtube\.com)\/.*v=([^&]+)|(youtu\.be)\/(.+)/Si)
  if $read(songrequest.txt,nw,$+(*,$2)) { 
    ; msg # $gettok($v1,2-,32) << 4,40 Youtube Link Dedektör  :
  }
  elseif !$regml(2) {
    msg # $nick --> url
  }
  else {
    youtube $2 $chan $nick
  }
}

alias -l sockopenmark { sockopen -e $1-3 | sockmark $1 $4- }
alias -l youtube {
  noop $regex($1,/(youtube\.com)\/.*v=([^&]+)|(youtu\.be)\/(.+)/Si)
  sockopenmark $+(yt.,$calc($ticks + $rand(1,99))) www.youtube.com 443 $regml(2) msg $2- 
}
on *:sockopen:yt.*:{
  tokenize 32 $sock($sockname).mark
  sockwrite -n $sockname GET /watch?v= $+ $1 HTTP/1.0 
  sockwrite -n $sockname HOST: www.youtube.com $+ $str($crlf,2)
}
on *:sockread:yt.*:{
  tokenize 32 $sock($sockname).mark
  var %v | sockread %v
  if ($regex(%v,/"name" content="(.+)"/)) { 
    var %song $replace($regml(1),&amp;amp;,$chr(38),&amp;#39;,$chr(39),&#39;,$chr(39),&amp;quot;,$chr(34),&quot;,$chr(34),&amp;,$chr(38)) $5-
    $2-3 4,40 Youtube  12Linki Verilen Parça : 1 %song 
    write songrequest.txt $4 $+ : %song $+ : 
    sockclose $sockname
  }
  elseif *</html> iswm %v { $2-3 The Song ( https://www.youtube.com/watch?v= $+ $1 ) is not exists. }
}

## KraLaz ##

on *:text:!kim &:#: {

;msg # calisti döngü

noop $regex($2,/(youtube\.com)\/.*v=([^&]+)|(youtu\.be)\/(.+)/Si)

if $read(songrequest.txt,nw,$+(*,$2)) {

; msg # $gettok($v1,2-,32) << 4,40 Youtube Link Dedektör :

}

elseif !$regml(2) {

msg # $nick --> url

}

else {

youtube $2 $chan $nick

}

alias -l sockopenmark { sockopen -e $1-3 | sockmark $1 $4- }

alias -l youtube {

noop $regex($1,/(youtube\.com)\/.*v=([^&]+)|(youtu\.be)\/(.+)/Si)

sockopenmark $+(yt.,$calc($ticks + $rand(1,99))) www.youtube.com 443 $regml(2) msg $2-

}

on *:sockopen:yt.*:{

tokenize 32 $sock($sockname).mark

sockwrite -n $sockname GET /watch?v= $+ $1 HTTP/1.0

sockwrite -n $sockname HOST: www.youtube.com $+ $str($crlf,2)

}

on *:sockread:yt.*:{

tokenize 32 $sock($sockname).mark

var %v | sockread %v

if ($regex(%v,/"name" content="(.+)"/)) {

var %song $replace($regml(1),&amp;,$chr(38),&#39;,$chr(39),',$chr(39),&quot;,$chr(34),",$chr(34),&,$chr(38)) $5-

$2-3 4,40 Youtube 12Linki Verilen Parça : 1 %song

write songrequest.txt $4 $+ : %song $+ :

sockclose $sockname

}

elseif *</html> iswm %v { $2-3 The Song ( https://www.youtube.com/watch?v= $+ $1 ) is not exists. }

}

mIRC Script / Socket Bot

1 Nisan 2017

Kanalda burç socket botu

Kodu mircinizin remote kısmına eklemeniz yeterli olacaktır. Bot komutları .burç – .burc – !burç- !burc bu komutların hepsinde çalışır. örnek: !burç kova

alias -l fltr { if $isid { return /^[.!]bur[cçÇ]\s(?:ko[Ççc]|bo[gğĞ]a|[İiı]k[İiı]zler|yenge[cÇç]|aslan|ba[Şşs]ak|teraz[İıi]|akrep|yay|o[Ğğg]lak|kova|bal[iİı]k)$/Si }
  else { set -e %brc $replace($lower($1),ç,c,ğ,g,Ğ,g,ı,i,İ,i,ş,s,Ş,s,Ç,c) | set -e %k_ $2 
var %rd $r(111,999999) | sockopen $+(burc,%rd) www.saglikveguzellik.net 80 | sockmark $+(burc,%rd) %brc } }
on *:sockopen:burc*:var %b sockwrite -n $sockname | %b GET /gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ HTTP/1.1 | %b host: $sock($sockname).addr | %b $crlf 
on *:sockread:burc*:var %a | sockread %a | if $regex(%a,/(?:&lt;p&gt;.+(&lt;\/p&gt;&lt;p&gt;)?&lt;\/p&gt;\z)/) { tokenize 46 $regsubex(b,%a,/\x3C.+\x3E/UgS,) | msg %k_ 2 $* }
;on *:sockclose:burc*:msg %k_ 4Kaynak: 5http://www.saglikveguzellik.net/gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ 
on *:input:#:if !$regex($1,^\/) { if $regex($1-,$fltr) { fltr $2 # } }
on $*:text:$($fltr):#:fltr $2 #

alias -l fltr { if $isid { return /^[.!]bur[cçÇ]\s(?:ko[Ççc]|bo[gğĞ]a|[İiı]k[İiı]zler|yenge[cÇç]|aslan|ba[Şşs]ak|teraz[İıi]|akrep|yay|o[Ğğg]lak|kova|bal[iİı]k)$/Si }

else { set -e %brc $replace($lower($1),ç,c,ğ,g,Ğ,g,ı,i,İ,i,ş,s,Ş,s,Ç,c) | set -e %k_ $2

var %rd $r(111,999999) | sockopen $+(burc,%rd) www.saglikveguzellik.net 80 | sockmark $+(burc,%rd) %brc } }

on *:sockopen:burc*:var %b sockwrite -n $sockname | %b GET /gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/ HTTP/1.1 | %b host: $sock($sockname).addr | %b $crlf

on *:sockread:burc*:var %a | sockread %a | if $regex(%a,/(?:<p>.+(<\/p><p>)?<\/p>\z)/) { tokenize 46 $regsubex(b,%a,/\x3C.+\x3E/UgS,) | msg %k_ 2 $* }

;on *:sockclose:burc*:msg %k_ 4Kaynak: 5http://www.saglikveguzellik.net/gunluk-burclar/ $+ $sock($sockname).mark $+ -burcu/

on *:input:#:if !$regex($1,^\/) { if $regex($1-,$fltr) { fltr $2 # } }

on $*:text:$($fltr):#:fltr $2 #

Hazır Kodlar

31 Mart 2017

Proxy Koruma Remotesi ( txt okutmalı )

Merhaba arkadaşlar. Bu yazımızda sunucu güvenliğinin sağlanması için oldukça gerekli olan Proxy Koruması hakkında bilgiler vereceğim. Öncelikle bilmenizi isterimki vereceğim kod sizin ekleyeceğiniz proxy.txt dosyasından ip adreslerini okuyarak sunucuya girişleri kontrol edip ona göre...

Addonlar / Hazır Kodlar

26 Mart 2017

Ip den şehir bulma remotesi ( .Who Nick )

Ip den şehir bulma remotesi ( .Who Nick ) Merhaba bügün sizlere Ip den şehir bulma remotesi ( .Who Nick ) hakkında yardım edeceğim. Aşağıdaki kodu mircinizin remote kısmına ekliyorsunuz. Alt +R şeklinde remote satırını...

Hazır Kodlar / mIRC Script

23 Mart 2017

Helper Admin F Tuşu Kısayolları

Helper Admin F Tuşu Kısayolları mirc alias kısmına ekleyiniz.

### Gün durumlu helper kısayolları ve diğer f tuşu kısayol ayarları by KraLaz ##

gundurumu {
  %durum = $gettok($time,1,58)
  if $istok(22 23 24 00 01 02 03 04,%durum,32) {
    return İyi Geceler
  }
  if $istok(05 06 07 08 09 10 11,%durum,32) {
    return Günaydın
  }
  if $istok(12 13 14 15 16 17 18,%durum,32) {
    return İyi Günler
  }
  if $istok(19 20 21,%durum,32) {
    return İyi Akşamlar
  }
}

-

F1 /mode # +v $$1 | /msg # $gundurumu $$1 $+ , size nasıl yardımcı olabilirim?
F2 /say $$1 , yardımcı olabileceğim başka sorunuz varmıdır? 
F3 /say $$1 , Kanalda bekleme yapmak yasaktır. | mode # -v $$1
F4 /mode # +b $$1 | /kick # $$1 5 # Kanalı kurallarına uymadığınız gerekçesiyle kanaldan uzaklaştırıldınız. 4 $me
F5 /say $$1 , Bu konuda 4#operhelp kanalından yardım alabilirsiniz. #Help kanalında bu konuda yardım verilmemektedir.
F6 /chanserv akick # add $$1 $+ !*@* Akick yasak tekrarı.. | /kick # $1 5Yasak tekrarı sebebiyle Akick Listesine Alındınız.
F7 /join #$$?="Kanalın adı?"
F8 /oper $me $$?="Oper Sifreniz"
f9 /ignore $$1 | msg $$1 12Sizi engelledim artık bana yazamassınız yazdıklarını görmeyeceğim. | /close -m $$1 | echo -a 4 $$1 5 Nicki engellendi artık size yazamaz.
f10 /zline $$1 Kurallara uymadığınız tespit edildi.
f11 /mode # -M | /mode # -R | /msg # 3Güvenli Mod devre dışı bırakıldı. 
f12 /mode # +M | /mode # +R | /msg # 4Agresif bağlantı tespit edildi kanal güvenli moda alındı.

### Gün durumlu helper kısayolları ve diğer f tuşu kısayol ayarları by KraLaz ##

gundurumu {

%durum = $gettok($time,1,58)

if $istok(22 23 24 00 01 02 03 04,%durum,32) {

return İyi Geceler

}

if $istok(05 06 07 08 09 10 11,%durum,32) {

return Günaydın

}

if $istok(12 13 14 15 16 17 18,%durum,32) {

return İyi Günler

}

if $istok(19 20 21,%durum,32) {

return İyi Akşamlar

}

F1 /mode # +v $$1 | /msg # $gundurumu $$1 $+ , size nasıl yardımcı olabilirim?

F2 /say $$1 , yardımcı olabileceğim başka sorunuz varmıdır?

F3 /say $$1 , Kanalda bekleme yapmak yasaktır. | mode # -v $$1

F4 /mode # +b $$1 | /kick # $$1 5 # Kanalı kurallarına uymadığınız gerekçesiyle kanaldan uzaklaştırıldınız. 4 $me

F5 /say $$1 , Bu konuda 4#operhelp kanalından yardım alabilirsiniz. #Help kanalında bu konuda yardım verilmemektedir.

F6 /chanserv akick # add $$1 $+ !*@* Akick yasak tekrarı.. | /kick # $1 5Yasak tekrarı sebebiyle Akick Listesine Alındınız.

F7 /join #$$?="Kanalın adı?"

F8 /oper $me $$?="Oper Sifreniz"

f9 /ignore $$1 | msg $$1 12Sizi engelledim artık bana yazamassınız yazdıklarını görmeyeceğim. | /close -m $$1 | echo -a 4 $$1 5 Nicki engellendi artık size yazamaz.

f10 /zline $$1 Kurallara uymadığınız tespit edildi.

f11 /mode # -M | /mode # -R | /msg # 3Güvenli Mod devre dışı bırakıldı.

f12 /mode # +M | /mode # +R | /msg # 4Agresif bağlantı tespit edildi kanal güvenli moda alındı.

Hazır Kodlar / mIRC Script

23 Mart 2017

Kick Ban Koruma Remotesi

## Kick Ban koruması by KraLaz ##

on *:ban:#: {
  if $banmask iswm $address($me,5) {
    echo -as 4,1<15,1  # 4,1> kanalinda  $+ $nick $+  sizi banladi:  $+ $banmask $+ ) 
    if $yetki(#) {
      mode # -b $banmask

    }
  }
}

on *:kick:#: {
  if $knick == $me && $nick != $me {
    .msg # Ban otomatik açılıyor.
    .cs unban # $me
    .timer 1 2 join #
  }
}

## Kick Ban koruması by KraLaz ##

on *:ban:#: {

if $banmask iswm $address($me,5) {

echo -as 4,1<15,1 # 4,1> kanalinda $+ $nick $+ sizi banladi: $+ $banmask $+ )

if $yetki(#) {

mode # -b $banmask

}

on *:kick:#: {

if $knick == $me && $nick != $me {

.msg # Ban otomatik açılıyor.

.cs unban # $me

.timer 1 2 join #

}

Hazır Kodlar / mIRC Script

23 Mart 2017

Özelde ve Kanalda Seslenme Remotesi

### Kanalda ve özelde size seslenenleri bildirme by KraLaz ###

on *:Text:$(* $+ $me $+ *):?:{ 
  if ($active == $nick) { goto son } 
  echo -a 4|||||| *** 12 ( $+ $time(hh:nn) $+ ) 1 $+ $nick $+  özelinde senden bahsediyor : " $1- " 
  :son 
} 


on *:Text:$(* $+ $me $+ *):#:{ 
  if ($active == $chan) { goto end } 
  echo -a 4||||  *** 12 ( $+ $time(hh:nn) $+ ) 1 $+ $nick $+  $chan kanalında senden bahsediyor : " $1- " 
  :end 
}

### Kanalda ve özelde size seslenenleri bildirme by KraLaz ###

on *:Text:$(* $+ $me $+ *):?:{

if ($active == $nick) { goto son }

echo -a 4|||||| *** 12 ( $+ $time(hh:nn) $+ ) 1 $+ $nick $+ özelinde senden bahsediyor : " $1- "

:son

}

on *:Text:$(* $+ $me $+ *):#:{

if ($active == $chan) { goto end }

echo -a 4|||| *** 12 ( $+ $time(hh:nn) $+ ) 1 $+ $nick $+ $chan kanalında senden bahsediyor : " $1- "

:end

}

Hazır Kodlar / mIRC Script

23 Mart 2017

Otomatik Oper ve Nick Şifresi Remotesi

#sifre on
;on *:notice:*Nickserv*IDENTIFY*:*: { if ($nick == Nickserv) .dialog -m sifre sifre }
;on *:notice:*Kayıt*nick*:*: { if ($nick == Nickserv) .dialog -m sifre sifre }
#sifre end
alias sifre { .dialog -m sifre sifre }
dialog sifre {
  title "Otomatik Oper Sifre"
  size -1 -1 130 130
  option dbu
  box $me Kayitli bir Nicktir., 2, 4 2 122 50
  text " Sifre Gir: ", 3, 10 12 50 10
  text " Nick Degistir:", 4, 10 24 50 10
  edit "", 5, 70 12 50 10, pass autohs
  edit "", 6, 70 24 50 10, autohs
  button "Uygula", 8, 10 38 110 10, ok
  box "", 9, 4 54 122 60
  check "Oto Nick Identify Aç Kapat", 10, 10 60 110 8
  text " Şifre Gir;", 11, 10 70 50 10
  edit "", 12, 70 70 50 10, pass autohs
  check "Oto Oper nick Oper Pass Aç Kapat", 13, 10 82 110 8
  text " Oper Nick Gir;", 14, 10 92 50 8
  text " Oper Pass Gir;", 15, 70 92 50 8
  edit "", 16, 10 102 50 10, flat
  edit "", 17, 70 102 50 10, pass autohs
  button "Tamam", 18, 10 117 110 10, cancel
}
on 1:dialog:sifre:sclick:*: {
  if ($did(10).state == 1) { .enable #otonick | .disable #sifre } | else { .disable #otonick | .enable #sifre }
  if ($did(13).state == 1) { .enable #operpasta } | else { .disable #operpasta }
  if ($did == 8) { if ($null != $did(6)) .nick $did(6) | .ns identify $did(5)
    else {
      .ns identify $did(5)
    }
  }
}
on 1:dialog:sifre:*:*:{
  if ($devent == edit) {
    if ($did == 12) { set %oto-nick-sifre $did(12) }
    if ($did == 16) { set %oper-nick $did(16) }
    if ($did == 17) { set %oper-pass $did(17) }
  }
  if ($devent == init) {
    idset
    if ($group(#otonick) == on) { did -c sifre 10 }
    if ($group(#operpasta) == on) { did -c sifre 13 }
    did -ra $dname 12 %oto-nick-sifre
    did -ra $dname 16 %oper-nick 
    did -ra $dname 17 %oper-pass
  }
}
#otonick off
on *:notice:*:*:{
  if ($nick == NickServ) {
    if (*Nickserv*IDENTIFY* iswm $1-) {
      .dialog -m sifre sifre
      .ns identify %oto-nick-sifre 
    }
    if (*Sifre*kabul*edildi* iswm $1-) {
      echo -a 14,14l15,1  $me Şifreniz Kabul Edildi.14,14l %logo
      .dialog -x sifre sifre
      .halt
    }
  }
}
#otonick end
#operpasta off
on *:connect:{
  .oper %oper-nick %oper-pass
}

#sifre on

;on *:notice:*Nickserv*IDENTIFY*:*: { if ($nick == Nickserv) .dialog -m sifre sifre }

;on *:notice:*Kayıt*nick*:*: { if ($nick == Nickserv) .dialog -m sifre sifre }

#sifre end

alias sifre { .dialog -m sifre sifre }

dialog sifre {

title "Otomatik Oper Sifre"

size -1 -1 130 130

option dbu

box $me Kayitli bir Nicktir., 2, 4 2 122 50

text " Sifre Gir: ", 3, 10 12 50 10

text " Nick Degistir:", 4, 10 24 50 10

edit "", 5, 70 12 50 10, pass autohs

edit "", 6, 70 24 50 10, autohs

button "Uygula", 8, 10 38 110 10, ok

box "", 9, 4 54 122 60

check "Oto Nick Identify Aç Kapat", 10, 10 60 110 8

text " Şifre Gir;", 11, 10 70 50 10

edit "", 12, 70 70 50 10, pass autohs

check "Oto Oper nick Oper Pass Aç Kapat", 13, 10 82 110 8

text " Oper Nick Gir;", 14, 10 92 50 8

text " Oper Pass Gir;", 15, 70 92 50 8

edit "", 16, 10 102 50 10, flat

edit "", 17, 70 102 50 10, pass autohs

button "Tamam", 18, 10 117 110 10, cancel

}

on 1:dialog:sifre:sclick:*: {

if ($did(10).state == 1) { .enable #otonick | .disable #sifre } | else { .disable #otonick | .enable #sifre }

if ($did(13).state == 1) { .enable #operpasta } | else { .disable #operpasta }

if ($did == 8) { if ($null != $did(6)) .nick $did(6) | .ns identify $did(5)

else {

.ns identify $did(5)

}

on 1:dialog:sifre:*:*:{

if ($devent == edit) {

if ($did == 12) { set %oto-nick-sifre $did(12) }

if ($did == 16) { set %oper-nick $did(16) }

if ($did == 17) { set %oper-pass $did(17) }

}

if ($devent == init) {

idset

if ($group(#otonick) == on) { did -c sifre 10 }

if ($group(#operpasta) == on) { did -c sifre 13 }

did -ra $dname 12 %oto-nick-sifre

did -ra $dname 16 %oper-nick

did -ra $dname 17 %oper-pass

}

#otonick off

on *:notice:*:*:{

if ($nick == NickServ) {

if (*Nickserv*IDENTIFY* iswm $1-) {

.dialog -m sifre sifre

.ns identify %oto-nick-sifre

}

if (*Sifre*kabul*edildi* iswm $1-) {

echo -a 14,14l15,1 $me Şifreniz Kabul Edildi.14,14l %logo

.dialog -x sifre sifre

.halt

}

#otonick end

#operpasta off

on *:connect:{

.oper %oper-nick %oper-pass

}

Hazır Kodlar / mIRC Script

23 Mart 2017

mIRC Raw Kodları

mIRC Raw kodları mircinizin remote kısmına ekleyebilirsiniz.

### Kanala Giriş Rawları - KraLaz ###

on *^:Join:#:{

  if ($nick == $me) { 
    echo $chan  4 $+ # 14Kanalına Girdiniz.. | halt
  }
}
raw 332:* {
  echo $2  4Kanal Mesaj:  $+ $3- $+ 
  halt
}
raw 333:* {
  echo $2  4Kanal Kuruluş Tarihi:14 $asctime($4)
  echo $2  4Topic Kurucusu:14 $3
  halt
}
raw 366:*: {
echo $2  4Kanalda Op:14 $opnick($2,0) 4Voice:14 $vnick($2,0) 4Toplam:14 $nick($2,0) kişi bulunuyor. | echo -a 14 $str(¯,106)  | halt } 
halt
}}


### Nick whois rawları ###
raw 301:*: {
  haltdef
  echo -a  Durumum :12 ( $+ $3- $+ ) 
}
raw 307:*: {
  haltdef
  echo -a  15»14»1» Kayıt Durumu: Bu Nick Kayıtlı ve İdentify Edilmiştir.
}
raw 310:*: {
  haltdef
  echo -a  15»14»1» 4Sunucu Yardım Görevlisi (IRCd Helper) 
}
raw 311:*:{
  haltdef
  echo -a _____________________________________________
  echo -a   $str($chr(160),10) 4Whois Başlangıcı 
  echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
  echo -a  15»14»1» Nick :4 $2
  echo -a  15»14»1» FullName: $6-
  echo -a  15»14»1» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 312:*:{
  haltdef
  echo -a  15»14»1» Bağlı Olduğu Server: $3 
}
raw 313:*: {
  haltdef
  echo -a  15»14»1» 4Network Özelliği: $5 $6 $7 $8 $9
}
raw 314:*:{
  haltdef
  echo -a _____________________________________________
  echo -a   $str($chr(160),10) 4Whois Başlangıcı
  echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
  echo -a  15»14»1» Nick: $2
  echo -a  15»14»1» FullName: $6-
  echo -a  15»14»1» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4
}

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($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),Cumarttesi,Cumartesi)
  echo -a  15»14»1» Bağlandığı Zaman: %baglanis
  echo -a  15»14»1» Boş Olduğu Süre: %idle
  echo -a  15»14»1» Bağlandıktan Sonra Geçen Süre: $duration($calc($ctime - $4))
}


raw 318:*:{
  haltdef
  echo -a ____________________________________________
  echo -a  $str($chr(160),10) 4Whois Bitişi    
  echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯
}
raw 319:*:{
  haltdef
  echo -a  15»14»1» Kanalları: $3-
}

raw 338:*:{
  haltdef
  echo -a  15»14»1» Gerçek İp Adresi:  $4 $5 $6
  echo -a  15»14»1» Gerçek İp: $4 $5 $6
}
raw 320:*:{
  haltdef
  echo -a  15»14»1» LOGIN ID: $5-
}
raw 378:*:{
  haltdef
  echo -a  15»14»1» Gerçek Ip Adresi:  $6 $7
}
raw 379:*:{
  haltdef
  echo -a  15»14»1» Nick modeleri: $6-
}
raw 671:*:{
  haltdef
  echo -a  15»14»1» Bağlantı: $3-
}

### Notice ve servis raporları bildirimleri ###

on ^*:SNOTICE:*: {
  echo -s  $+ $colour(notice) $+ 4,1<15,1 $server 4,1> $+ $colour(notice) $1-
  haltdef
}

on ^*:NOTICE:*:?: { 
  echo -a 4,1<15,1 $nick 4,1> $+ $colour(notice) $1- | haltdef
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

### Kanala Giriş Rawları - KraLaz ###

on *^:Join:#:{

if ($nick == $me) {

echo $chan 4 $+ # 14Kanalına Girdiniz.. | halt

}

raw 332:* {

echo $2 4Kanal Mesaj: $+ $3- $+

halt

}

raw 333:* {

echo $2 4Kanal Kuruluş Tarihi:14 $asctime($4)

echo $2 4Topic Kurucusu:14 $3

halt

}

raw 366:*: {

echo $2 4Kanalda Op:14 $opnick($2,0) 4Voice:14 $vnick($2,0) 4Toplam:14 $nick($2,0) kişi bulunuyor. | echo -a 14 $str(¯,106) | halt }

halt

}}

### Nick whois rawları ###

raw 301:*: {

haltdef

echo -a Durumum :12 ( $+ $3- $+ )

}

raw 307:*: {

haltdef

echo -a 15»14»1» Kayıt Durumu: Bu Nick Kayıtlı ve İdentify Edilmiştir.

}

raw 310:*: {

haltdef

echo -a 15»14»1» 4Sunucu Yardım Görevlisi (IRCd Helper)

}

raw 311:*:{

haltdef

echo -a _____________________________________________

echo -a $str($chr(160),10) 4Whois Başlangıcı

echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

echo -a 15»14»1» Nick :4 $2

echo -a 15»14»1» FullName: $6-

echo -a 15»14»1» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4

}

raw 312:*:{

haltdef

echo -a 15»14»1» Bağlı Olduğu Server: $3

}

raw 313:*: {

haltdef

echo -a 15»14»1» 4Network Özelliği: $5 $6 $7 $8 $9

}

raw 314:*:{

haltdef

echo -a _____________________________________________

echo -a $str($chr(160),10) 4Whois Başlangıcı

echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

echo -a 15»14»1» Nick: $2

echo -a 15»14»1» FullName: $6-

echo -a 15»14»1» İp Adresi: $3 $+ 4 $+ @ $+ 1 $+ $4

}

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($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),Cumarttesi,Cumartesi)

echo -a 15»14»1» Bağlandığı Zaman: %baglanis

echo -a 15»14»1» Boş Olduğu Süre: %idle

echo -a 15»14»1» Bağlandıktan Sonra Geçen Süre: $duration($calc($ctime - $4))

}

raw 318:*:{

haltdef

echo -a ____________________________________________

echo -a $str($chr(160),10) 4Whois Bitişi

echo -a ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯

}

raw 319:*:{

haltdef

echo -a 15»14»1» Kanalları: $3-

}

raw 338:*:{

haltdef

echo -a 15»14»1» Gerçek İp Adresi: $4 $5 $6

echo -a 15»14»1» Gerçek İp: $4 $5 $6

}

raw 320:*:{

haltdef

echo -a 15»14»1» LOGIN ID: $5-

}

raw 378:*:{

haltdef

echo -a 15»14»1» Gerçek Ip Adresi: $6 $7

}

raw 379:*:{

haltdef

echo -a 15»14»1» Nick modeleri: $6-

}

raw 671:*:{

haltdef

echo -a 15»14»1» Bağlantı: $3-

}

### Notice ve servis raporları bildirimleri ###

on ^*:SNOTICE:*: {

echo -s $+ $colour(notice) $+ 4,1<15,1 $server 4,1> $+ $colour(notice) $1-

haltdef

}

on ^*:NOTICE:*:?: {

echo -a 4,1<15,1 $nick 4,1> $+ $colour(notice) $1- | haltdef

}

Category: mIRC Script

Amsg ve ame Muaf kodu Gelişmiş

Youtube link analiz botu

Kanalda burç socket botu

Proxy Koruma Remotesi ( txt okutmalı )

Ip den şehir bulma remotesi ( .Who Nick )

Helper Admin F Tuşu Kısayolları

Kick Ban Koruma Remotesi

Özelde ve Kanalda Seslenme Remotesi

Otomatik Oper ve Nick Şifresi Remotesi

mIRC Raw Kodları

Son Yorumlar

Etiketler

Sponsor Siteler

Kategoriler

Eklenen Son Yazılar