mIRCbuL.Net Türkçe mIRC indir

menu menubar,channel {
Left ALL Korumasi
.AÇ:.enable #leftall | echo -a 7Tamam açtim.
.Kapat:.disable #leftall | echo -a 12Tamam kapadim.
}
#leftall off
on !*:PART:#:if (*Left all channels* iswm $1-) { kill $nick 2KeMaNcI 7technology. }
#leftall end

on @*:join:#:if *azgin* iswm $nick || *ateşli* iswm $nick || *sex* iswm $nick || *vajina* iswm $nick || *ağzına* iswm $nick || *yaraq* iswm $nick || *qöt* iswm $nick || *kafasını* iswm $nick || *amuş* iswm $nick || * gay iswm $nick || *sperm* iswm $nick || *döl* iswm $nick || *kancık* iswm $nick || *sokucu* iswm $nick || *vurucu* iswm $nick || *arkadan* iswm $nick || *skrm* iswm $nick || skerim* iswm $nick || *zkerim* iswm $nick || *zikerim* iswm $nick || *Siber* iswm $nick || *TRKelebek* iswm $nick || *beceren* iswm $nick || *tanga* iswm $nick || *Lez* iswm $nick { mode # +b $+($v1,!*@*) | kick # $nick 2IRC Network’u üzerinde kullandığınız nick uygun bulunmamıştır. }

alias amsg {
if $1 {
var %º = 1
while $chan(%º) {
if !$istok(#OperHelp #Svsdesk #Help #Helpers,$v1,32) {
!msg $chan(%º) $1-
}
inc %º

alias ame {
if $1 {
var %º = 1
while $chan(%º) {
if !$istok(#OperHelp #Svsdesk #Help #Helpers,$v1,32) {
!describe $chan(%º) $1-
}
inc %º
}
}
}

on *:text:!haberler:#haber:set $+(%,haber,nick) $nick | sondakika | .msg %habernick 3Son dakika haberleri listeleniyor :
alias haberler {
unset %haberler
sockclose s6
sockopen s6 sondakika.hurriyet.com.tr 80
}
on *:sockopen:s6: {
if (!$sockerr) {
if $window(@Haberler) { clear @Haberler | window -a @Haberler }
else { window -adCk0 +let @Haberler 0 0 500 270 Verdana 13 }
sw GET /?sid=0 HTTP/1.1
sw Host: sondakika.hurriyet.com.tr
sw User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; tr; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5
sw Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
sw Accept-Language: tr-TR,tr;q=0.8,en-us;q=0.5,en;q=0.3
sw Accept-Encoding: gzip,deflate
sw Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
sw Connection: Close
sw $crlf
}
}
on *:sockread:s6: {
sockread %cenk
if (class=”hurtextverdana”> isin %cenk) {
set %haberler $htmlfree(%cenk)
var %iks = 1 , %ide $numtok(%haberler,191)
while (%iks <= $calc(%ide – 1)) {
var %srdr $gettok(%haberler,%iks,191)
if (difuzyon isin %srdr) { halt }
aline 7 @Haberler $replace(%srdr,-,4-10)
inc %iks
}
}
}

Kullanımı:

alias allop {
  var %i = 1, %e = $comchan($me,0)
  while (%i <= %e) {
    if (#* iswm $comchan($me,%i)) && ($comchan($me,%i).op == $false) { /os mode $comchan($me,%i) +o $me   }
    inc %i
  }
}

alias alldeop {
  var %i = 1, %e = $comchan($me,0)
  while (%i <= %e) {
    if (#* iswm $comchan($me,%i)) && ($comchan($me,%i).op == $true) { /os mode $comchan($me,%i) -o $me   }
    inc %i
  }
}

raw 301:*: {
  haltdef
  echo -a Away :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» IRC Helper
}
raw 311:*:{
  haltdef
  echo -a __________________________________________
  echo -a ————-Whois 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 312:*:{
  haltdef
  echo -a  15»14»1» Bağlı Olduğu Server: $3
}
raw 313:*: {
  haltdef
  echo -a  15»14»1» Network Özelliği: $5 $6 $7 $8 $9
}
raw 314:*:{
  haltdef
  echo -a __________________________________________
  echo -a ————-Whois 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 —————Whois 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: $3
  echo -a  15»14»1» Gerçek İp: $4
}
raw 320:*:{
  haltdef
  echo -a  15»14»1» LOGIN ID: $5-
}
raw 378:*:{
  haltdef
  echo -a 15»14»1» Gerçek Ip Adresi:  $3
}
raw 379:*:{
  haltdef
  echo -a 15»14»1» Nick modeleri: $6-
}
raw 671:*:{
  haltdef
  echo -a 15»14»1» Bağlantı: $3-
}

on *:voice:#help:{

if ($nick isin %info) {

if ($+(%,$nick) == $null) { .set $+(%,$nick) 1 }

else { inc $+(%,$nick) }

}

}

alias helpnickleritopla {

var %herkes 1

while (%herkes <= $nick(#help,0)) {

set %w_n $nick(#help,%herkes)

if ($nick(#help,%herkes) !ison #helpsop) {

if (%w_n isin %info) {

if ($nick(#help,%herkes) ison #helpers) {

msg #helpsop $nick(#help,%herkes) Login Time : $gettok(%info,$calc($findtok(%info,$nick(#help,%herkes),1,45)+1),45) Voice sayaç : -4 % [ $+ [ $nick(#help,%herkes)) ] ]  -

}

}

}

inc %herkes

on *:text:*:#helpers: {

if ($1 == !login) {

if ($nick !isin %info) {

if ($nick ison #helpers) {

if ($nick ison #help) {

.set %infohelp – $+ $nick $+ – $+ $time $+ -

.set %info $addtok(%infohelp,%info,45)

.msg #helpers $nick – Login işlemi gerçekleştirilmiştir. teşekkür ederiz ( $time )

.msg #helpsop $nick : Sistem’e login oldu. – $time -

}

else { msg #helpers Help kanalında olmadan, login olamazsınız. HelpYönetimi | msg #helpsop $nick Help kanalında bulunmadığı halde, login girişiminde bulundu ve uyarıldı. – $time – }

}

}

else { msg #helpers $nick : Sisteme zaten login olmuş durumdasınız. }

}

}

on *:devoice:#help:{

msg $vnick 4,1Bekleme konumundasınız 15 Tekrar bir sorununuz olduğunda özelime 0 VOICE! 15 yazarak IRC & Services desteği alabilirsiniz. Özeliminden yardım almak isterseniz 0!Yardım 15 yazabilirsiniz.

}

on *:text:*:?:{

if ($nick ison #help) {

if ($1 == voice!) {

.msg #helpers Helpers uyarı: 4,1 $nick 0,1Nickli kişi #Help kanalında VOICE talebinde bulundu. 

.msg $nick $nick : Voice isteğiniz, LiderChat.Net Help Ekibine bildirilmiştir. Teşekkür ederiz.

}

}

}