mIRCbuL.Net Türkçe mIRC indir

mirc Proxy saldırları için güzel kulanışlı bir admin remotesi alt+r yapıp remoteye ekliyoruz gerekli yerlere ayarlamayı yaptıktan sonra kullabilirsiniz

on OpenProxy:join:#:{ if ($nick != $me) { .kline $nick Ban Sebebin } }
alias Proxyconf if $dialog(Proxylist) == $null dialog -m Proxylist Proxylist
dialog Proxylist {
title “Proxy ip Korumasi”
size -1 -1 200 280

button “Tamam”, 1, 110 200 70 20,ok, flat
list 2, 10 20 180 135, sort
box “ProxyListesi”, 3, 5 5 190 145
edit “*!*@”, 4, 10 165 180 20, autohs
box “Eklenecek İp”yi Girin”, 5, 5 150 190 45
button “İp Ekle”, 6, 20 200 70 20, flat
box “Not:”, 7, 5 225 190 45
text “İp”yi Kaldirmak icin İp”nin Uzerine Cift Tiklayin”, 8, 25 240 140 45
}
alias Proxysetup if $dialog(Proxylist) == $null dialog -m Proxylist Proxylist
on *:dialog:Proxylist:dclick:2:{ .ruser OpenProxy $did(2).seltext | did -d Proxylist 2 $did(2).sel }
on *:dialog:Proxylist:sclick:6:{ if ($did(4) != $null) { did -a Proxylist 2 $did(4) | .auser OpenProxy $did(4) | did -fr Proxylist 4 } }
on *:dialog:Proxylist:init:*:{
if ($ulist(*,OpenProxy,0) != $null) {
set %prx.Proxy 0
while (%prx.Proxy < $ulist(*,OpenProxy,0)) {
inc %prx.Proxy 1
did -a Proxylist 2 $ulist(*,OpenProxy,%prx.Proxy)
}
unset %prx.Proxy
}
}
on *:snotice:*client connect*:var %ip $remove($gettok($10,2,64),$chr(41)),%id = $remove($gettok($10,1,64),$chr(40)),%full = $+($9,!,%id,@,%ip) | if ($level(%full) == OpenProxy) { .kline $9 Ban Sebebin }

/Version yazarak bağlı bulunduğumuz sunucu hakkında detaylı bilgiye ulaşırız.
bu komutu uyguladığımızda aldığımız yanıtta neler anlatılmak istediğini inceleyelim ;
KNOCK : sunucuda /KNOCK komutunun aktif olduğu anlamına gelir.
Davetsel (inviteonly) konumda olan kanallar icin, KNOCK komutunu kullanarak, kendinizi kanala davet etmelerini isteyebilirsiniz.
Kullanım Şekli : /KNOCK #kanal mesajınız
Örnek : KNOCK #kanal Kanala girmek istiyorum, beni davet edermisiniz ?
MAP : sunucuda /MAP komutunun aktif olduğu anlamına gelir.
Sunucu ile ilgili grafiksel sunucu haritasını görüntüler.
Kullanım Şekli : /MAP
DCCALLOW : sunucuda /DCCALLOW komutunun aktif olduğu anlamına gelir.
Kullanım Şekli : /DCCALLOW +nick – /DCCALLOW -nick
Örnek : /DCCALLOW +idealsohbet – /DCCALLOW -idealsohbet
USERIP : suncuda /USERIP komutunun aktif olduğu anlamına gelir.
Kullanicinin ip adresini gosterir, genellikle scriptler veya botlar tarafindan kullanilir.
Kullanım Şekli : /USERIP nick
Örnek: /USERIP idealsohbet
SAFELIST : sunucuda /LIST değişik parametrelerde kanal listelemesi yapılabileceğini anlamına gelir. bu parametreler hakkında detaylı bilgi almak için list komutu hakkında eğitimizi inceleyebilirsiniz.
HCN :”Hybrid Connect Notice” protokolünün sunucu tarafından desteklendiği anlamına gelir.
MAXCHANNELS=12 : sunucuda kullanıcıların girebileceği maksimum kanal sayısının 12 olduğu anlamına gelir.
CHANLIMIT=#:12 : kullanıcıların girebileceği maksimum kanal sayısının 12 olduğu anlamına gelir.
MAXLIST=b:60,e:60,I:60 : sunucuda kullanıcının bir kanalda atabileceği maximum +b,+e,+I sayısını gösterir.
NICKLEN=30 : sunucuda nick karakter uzunluğunun maksimum “30″ olduğu anlamına gelir.
CHANNELLEN=32 : sunucuda kanal karakter uzunluğunun maksimum “32″ olduğu anlamına gelir.
TOPICLEN=307 : yazılabilecek topic’in maksimum “307″ karakter olabileceği anlamına gelir.
KICKLEN=307 : kick mesajlarının makimum “307″ karakter olabileceği anlamına gelir.
AWAYLEN=307 : sunucuda away mesajı uzunluğunun maximum “307″ karakter olabileceği anlamına gelir.
MAXTARGETS=20: sunucuda /PRIVMSG nick,nick1 /PRIVMSG #KANAL,#KANAL1, /AME, /AMSG komutları ile nicklere ve kanallara gönderilebilecek mesaj sayısı maximum “20″ olduğu anlamına gelir.
WALLCHOPS : sunucuda /PRIVMSG ve /NOTICE “/PRIVMSG (@,%,+)#kanaladı” komutlarının aktif olduğu anlamına gelir.
WATCH=128 : sunucuda /WATCH +NICK komutuna maksimum “128″ kullanıcı eklenebileceği anlamına gelir.
SILENCE=15 : sunucuda /SILENCE +NICK komutuna maksimum “128″ kullanıcı eklenebileceği anlamına gelir.
MODES=12 : sunucuda “/mode #kanal +modes-modes maksimum” şeklinde tek satırda en fazla “12″ mod eklenebileceği anlamına gelir.
CHANTYPES=# : sunucuda kanal işareti olarak “#” kullanıldığı anlamına gelir.
PREFIX=(~&ohv)~&@%+: sunucuda kanal yetkililerinin alabileceği kiplerin “~&@,%,+” olduğu anlamına gelir.
CHANMODES=beIqa,kfL,lj,psmntirRcOAQKVGCuzNSMTGD : sunucuda kullanılabilen kanal kiplerinin “beIqa,kfL,lj,psmntirRcOAQKVGCuzNSMTGD” kipleri olduğu anlamına gelir.
NETWORK=Sunucuadı : bağlı olduğunuz Network’ün adını verir.
CASEMAPPING=ascii : sunucu karakter sisteminin “ascii karakter” sistemi olduğu anlamına gelir.
EXTBAN=~,cqnr: sunucuda aktif olan ban kipi parametrelerinin “c,q,n,r” olduğu kipleri olduğu bilgisini verir.
ELIST=MNUCT : sunucuda maske(M), negatif maske(N), kanaldaki kullanıcı sayısına göre(U), kanal oluşturulma zamanına göre(C), yazılan topic tarihine göre(T) “MNUCT” parametreleri ile /List komutunun kullanılabileceği anlamına gelir. detaylı bilgi için “list” komutu hakkındaki eğitimi inceleyiniz.
STATUSMSG=~&;@%+ sunucuda “/PRIVMSG” komutunun “~&@%+” eklerini almış kullanıcılara uygulanabileceği anlamına gelir.
EXCEPTS : sunucuda “Exceptions” aktif olduğunu gösterir.
Kullanım şekli : /mode #kanal +e nick!ident@host
Örnek : /mode #kanal +e  Razor!liderChat@Razor.LiderChat.Net
INVEX : sunucuda INVEX a ktif olduğunu gösterir
Kullanım şekli : /mode #kanal +I nick!ident@ip
Örnek : /mode #kanal +I karaYeL!LiderChat@hostu
bu dökümandaki rakamsal sonuçlar sadece bir sunucu göz önüne alınarak hazırlanmıştır.
“/version” komutunu uygulayarak sunucunuzdaki rakamsal farklılıklar var ise görebilirsiniz.

;Günlük Fal addonı, Editleyen: ‘KeMaNcI’

;Günlük falınıza bakmak için “/günlükfal” yazınız, ya da popupslardaki Günlük Fal’a tıklayınız.

on *:LOAD:echo 12 -st > Günlük Fal addonını yüklediniz. “/günlükfal” yazarak yada popupslardaki Günlük Fal’a tıklayarak falınıza bakabilirsiniz.

menu status,menubar,channel {

-

Günlük Fal:günlükfal

}

alias günlükfal { if !$sock(muneccim) { if $dialog(sa_gunlukfal) { dialog -x sa_gunlukfal } | dialog -ma sa_gunlukfal sa_gunlukfal } | else { echo 12 -st > Hata: Başka bir fala bakılıyor. } }

alias -l falgoster { if !$window(GünlükFal) { window -k0 @GünlükFal } | aline -p @GünlükFal $1- }

on *:sockopen:muneccim:{

if %burç {

sockwrite -n $sockname GET $+(/gunluk_fal/bugun.asp?burc=,%burç) HTTP/1.1

sockwrite -n $sockname Host: muneccim.com $+ $crlf $+ $crlf

}

else { echo 12 -st > Hata: Burç seçmelisiniz.. }

}

on *:sockread:muneccim:{

if ($sockerr) {

echo 12 -st > Hata: Bağlantı hatası, lütfen tekrar deneyiniz.

halt

}

else {

var %temptext

sockread %temptext

if (*<td><p align=”center”><img src=”../images/*”></td>* iswm %temptext) && $istok(koc.boga.ikizler.yengec.aslan.basak.terazi.akrep.yay.oglak.kova.balik,$gettok($gettok($gettok(%temptext,3,47),1,34),1,46),46) { falgoster $+(04,$upper($gettok($gettok($gettok(%temptext,3,47),1,34),1,46))) }

if (*<p align=”center”><big><big><font face=”Arial Black”>*</font></big></big></p>* iswm %temptext) { falgoster $+(14,$htmlfree(%temptext)) }

if (<p><font color=”#000000″ face=”Arial Narrow”><strong><big>* iswm %temptext) { falgoster $+(10,$htmlfree(%temptext)) | falgoster  | if $sock(muneccim) { sockclose muneccim } }

}

unset %burç

}

alias -l htmlfree {

var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)

return %x

}

dialog sa_gunlukfal {

title “Günlük Fal”

size -1 -1 59 35

option dbu

combo 1, 3 8 53 55, size drop

box “Burç:”, 2, 1 0 57 21

button “Oku”, 3, 3 22 25 10

box “”, 4, 1 17 29 17

button “Kapat”, 5, 31 22 25 10, ok

box “”, 6, 29 17 29 17

}

on *:dialog:sa_gunlukfal:*:*:{

if $devent = INIT {

didtok $dname 1 44 koç,boğa,ikizler,yengeç,aslan,başak,terazi,akrep,yay,oğlak,kova,balık

did -c $dname 1 1

}

if $devent = SCLICK {

if $did = 3 { if !$sock(muneccim) { set %burç $did($dname,1).sel | sockopen muneccim muneccim.com 80 } | else { echo 12 -st > Hata: Başka bir fala bakılıyor. } }

}

}

Bu Kodu Yuklemek için ONcelikle Arkadaslar İlk Yapacagımız Şey C:\Program Files  içinde bulunan C:\Program Files\xx-Script Dosyamızın içine bir tane txt dosyası acıyoruz ornek olarak veriyorum gunlukfal.txt yukardaki addonumuzu bu koda yerleştirdikden sonra dosyamıza kayıt ediyoruz ve  scriptimizi acıyoruz oraya yazmamız gereken acıldıkdan sonra ise /load -rs gunlukfal.txt kodunu yazıp enterledikden sonra gunluk fal addonumuz kullanıma hazır haldedir.

on *:text:*:?:{

if $1 == yardim {

msg $nick Lütfen !yardım olarak kullanın.

}

elseif $1 == !yardım {

var %> = $+(%,yardım,$nick)

if !$(%>,2) {

.timer 0 6 /sajoin $nick #Help | msg $nick Yardım odasına yönlendiriliyorsunuz. | /timer 0 11 /timers off |

inc -u200 $(%>,1)

}

else {

msg $nick Daha önce yardım almışınız,3 dk. beklemeniz gerekli

}

}

YÜKLEME :

Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı !yard

ım.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs!yardım.txt yazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.

#joinpart on

on *:join:#kanall: {

if ($level($nick) == muafnlist) { halt }

if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global)/i)) { halt }

if $me !isop $chan { halt } | if $nick isop $chan { halt }

inc -u10 %join [ $+ [ $nick ] ] [ $+ [ $chan ] ]

if ( %join [ $+ [ $nick ] ] [ $+ [ $chan ] ] == 4 ) {

unset %join [ $+ [ $nick ] ] [ $+ [ $chan ] ]

banla # $nick

.msg # $+(“,$nick,”) Asiri Join/Part yapimi yasak!

}

}

#joinpart end

YÜKLEME :

Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı Join/part.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs Join/part.txtyazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.

on *:snotice:*: {

if ($level($9) == muafnlist) { halt }

if ($level($9) == muafclist) { halt }

if (connecting isin $1-) {

if (%botnet == Acik) {

var %:ip $remove($gettok($10,2,64),$chr(41))

if $read(muafips.txt,w,$+(*,%:ip,*)) { halt }

if ($read(botnet.txt,w,$9)) {

.gzline $+(*@,%:ip) %agresif [ $+ [ %:ip ] ] +1800 Sc5 veya Botnet girisi olasiligiyla sunucudan 30 dakika Uzaklastirildiniz $date $time $+([,%botnick,])

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Sc5 Veya Botnet Olasiligi]

halt

}

}

if (%random == Acik) {

var %identd = $remove($gettok($10,1,64),$chr(40))) {

if ($randomnick($9)) || ($randomnick(%identd)) { .gzline $+(*@,%:ip) +3800 Random nick/ident girisi yasaktir lutfen turkce karakterli harfler kullaniniz! $date $time $+([,%botnick,]) | .msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Random Nick] | halt }

}

}

if (%proxy == Acik) {

if $read(muafips.txt,w,$+(*,%:ip,*)) { halt }

if $level($remove($gettok($10,2,64),$chr(41))) == proxy {

.gzline $+(*@,%:ip) +0 Proxy Korumasi! $date $time $+([,$me,])

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Proxy Girisi][Users]

inc %istabutun

inc %istaProxy

}

else {

var %proxya $gettok($remove($10,$chr(41)),2,64)

if $read(proxyport.txt,w,$+(*,%proxya,*)) {

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Proxy Girisi][Proxyport.Txt]

.gzline $+(*@,%:ip) +0 Proxy Korumasi! $date $time $+([,%botnick,]) | unset %proxya

}

if $read(proxylist.txt,w,%proxya) {

.msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Proxy Girisi][Proxylist.Txt]

.gzline $+(*@,%:ip) +0 Proxy Korumasi! $date $time $+([,%botnick,]) | unset %proxya | halt

}

}

if (%agresif == Acik) {

if ($level($9) == muafnlist) { halt }

inc -u15 %agresif. [ $+ [ %:ip ] ]

if ( %agresif. [ $+ [ %:ip ] ] == 3 ) { .gzline $+(*@,%:ip) +1200 agresif baglanma sebebiyle 10 dakka sunucudan uzaklastirildiniz $date $time $+([,%botnick,]) | .msg %operkanali [BILGI][ IP : %:ip ][ NICK : $9 ][Agresif Baglanma] | unset %agresif. [ $+ [ %:ip ] ] | halt }

}

}

if (%vsifre == Acik) {

writeini version.ini $9 ip $+(*@,$gettok($replace($10,$chr(40),$chr(32),$chr(41),$chr(32)),-1,64))

.msg $9
VERSION

.timervkontrol 1 15 /set -u1 %vkontrol on

.timer $+ $9 1 15 /who $+(*,%:ip,*)

halt

}

}

}

alias guncelle {

.write -c proxylist.txt

sockopen dify list.iblocklist.com 80

.msg %operkanali Güncel proxy listesi alınıyor…

}

on *:sockopen:dify:{

sockwrite -n $sockname GET /?list=tor HTTP/1.1

sockwrite -n $sockname Host: list.iblocklist.com $+ $crlf $+ $crlf

}

on *:sockread:dify:{

if ($sockerr) { echo 12 -st Hataya rastlandı | halt }

else {

var %dify

sockread %dify

if $regex(%dify,/^tor:(.+)-/) { prekle $regml(1) }

}

}

on *:connect: {

torkur

}

alias torkur {

.timer 05:00 1 1 /guncelle

}

alias prekle { if $1 { if $read(proxylist.txt,w,$1) { halt } | else { write proxylist.txt $1 } } }

YÜKLEME :

Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı sc5random.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs sc5random.txtyazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.

#uzunyazi off

on *:TEXT:*:%global:{

if ($regex($address($nick,2),/(helper|admin|ircop|services|dj.|tech|global)/i)) { halt }

if $nick isop $chan { halt }

if $nick ishop $chan { halt }

if ($len($strip($1-)) >= 190) {

.banla # $nick | .msg # $+(“,$nick,”) Fazla sayida uzun yazi kullandiginiz icin 5 dakika konusmaniz engellenmistir!

}

}

#uzunyazi end

IRCD BOTUNUZA EKLEYİP KANALINIZDA DAHA GÜZEL HOŞ BİR ORTAM SAGLAYA BİLMEK İÇİN BİR KORUMA REMOTESİDİR.

YÜKLEME :

Bos Bir Txt Belgesi OlusTurun bu txt belgesinin adı uzunyazi.txt örnek olsun bu belgeyi Mirc Klasörünüzün iÇine Veya Mirc Klasörünüzün Çinde Bas ka bir Klasöre Ati n daha sonra mirci açip/ load-rs uzunyazi.txtyazip enterleyin bu sayede haberler taramasi mircinize hazır olarak yüklenmiş olacaktır. Bu İşlemden Sonra Yapmanız Gereken İşlem Çalıştırmanızı Saglıyacaktır.

on *:snotice:*whois*: {

inc -u120 %whois [ $+ [ $2 ] ]

if ( %whois [ $+ [ $2 ] ] == 1) {

.msg $2 4Merhaba $+(“,,$2,,”) , Lutfen Mesaj Atmayiniz!

.msg $2 4Ben Sunucu sorunlaarınızı #Operhelp Belirtiniz

.msg $2 4IRCD / services için #Help.

}

}

menu menubar,status,channel {
  . 1 $chr(11) Proxy Koruması
  ..Açık:.enable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devrede.. 
  ..Kapalı:.disable #MKSProxy | echo -a %mksLogo 11,2 Proxy Koruması Devredışı.. 
}
#MKSProxy off

on ^*:snotice:*: {
  if client connecting* iswm $4- {
    var %:ip $remove($gettok($10,2,64),$chr(41))
    kontrol %:ip
    hadd -m ckontrol %:ip $9
    halt
  }
}
alias kontrol {
  sockopen $+(kontrol,$r(1,999999999)) $1- 1080
  sockopen $+(kontrol,$r(1,999999999)) $1- 3128
  sockopen $+(kontrol,$r(1,999999999)) $1- 9050
  sockopen $+(kontrol,$r(1,999999999)) $1- 50050
}
on *:sockopen:kontrol*: {
  if !$sockerr {
    .raw gline *@ $+ $sock($sockname).ip +0 14Proxy Girişi Yasaktır %mksLogo 
    echo -a 2Proxy girişvar : $+(,$sock($sockname).ip,3:,$sock($sockname).port,) – Nicki bu:4 $ip2nick($sock($sockname).ip)
    hdel ckontrol $sock($sockname).ip
    sockclose $sockname
  }
}
on *:sockclose:kontrol*: {
  hdel ckontrol $sock($sockname).ip
}
alias ip2nick {
  var %i 1
  while %i <= $hget(ckontrol,0).item {
    if $hget(ckontrol,%i).item == $1 { return $hget(ckontrol,%i).data | halt }
    inc %i
  }
}

#MKSProxy end

on *:input:*:{
if ($left($1,1) !isin x/$%.! && !$ctrlenter) {
var %smiley = :\\ :/ ;D ;P ;/ ;\\ ;( :* ;* :@ :S :# :$ xD :< :> ;@ ;S ;# ;$ ;o ;< ;>
var %smileys = :-\\ :-/ ;-D ;-P ;-/ ;-\\ ;-( :-* ;-* :-@ :-S :-# :-$ :-< :-> ;-@ ;-S ;-# ;-$ ;-o ;-< ;-> :=) :=D :=P :=( :=\\ :=/ ;=) ;=D ;=P ;=/ ;=\\ ;=( :=* ;=* :=@ :=S :=# :=$ :=o :=< :=> ;=@ ;=S ;=# ;=$ ;=o ;=< ;=> ^_^ o_o O_O o_O O_o 0_0 0_o o_0 *_^ ^_* -.- omg lol btw wtf heh bbl brb
var %noact = $chr(33) $chr(64) $chr(35) $chr(36) $chr(37) $chr(94) $chr(38) $chr(42) $chr(40) $chr(41) $chr(45) $chr(43) $chr(61) $chr(49) $chr(50) $chr(51) $chr(52) $chr(53) $chr(54) $chr(55) $chr(56) $chr(57) $chr(48) $chr(92) $chr(123) $chr(125) $chr(124) $chr(59) $chr(58) $chr(39) $chr(34) $chr(44) $chr(46) $chr(60) $chr(62) $chr(47) $chr(63) $chr(95) $chr(91) $chr(93)
var %httpthingy = htt www ftp
var %httpthingy21 = .com .net .org .php .asp .htm omfg rofl .asx
var %httpthingy22 = .html .aspx
var %newmsg = $iif($1 !ison $active && $1 != $active && !$istok(%smiley,$1,32) && !$istok(%smileys,$1,32) && !$istok(%noact,$1,32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%httpthingy22,$right($1,5),32),$upper($left($1,1)) $+ $right($1,-1),$1) $+ $iif($2-,$chr(32) $+ $2- $+ $iif(!$istok(%noact,$right($2-,1),32) && !$istok(%smiley,$right($2-,2),32) && !$istok(%smileys,$right($2-,3),32) && !$istok(%httpthingy,$left($gettok($2-,-1,32),3),32) && !$istok(%httpthingy21,$right($gettok($2-,-1,32),4),32) && !$istok(%noact,$left($gettok($2-,-1,32),1),32) && !$istok(%httpthingy22,$left($gettok($2-,-1,32),5),32),.),$iif(!$istok(%noact,$right($1,1),32) && !$istok(%smiley,$right($1,2),32) && !$istok(%smileys,$right($1,3),32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%noact,$left($1,1),32) && !$istok(%httpthingy22,$right($1,5),32),.))
var %newmsg = $regsubex(%newmsg,/\\bi\\b/g,I)
msg $active %newmsg
halt
}
}

ilk harfi büyük  Sonuna Nokta Yazi Tipi
Güzel bir yazı tipi daha Bazı mIRC(Script)’den anlamayan site sahipleri bu kodu da alın

Bu kodun mantıgını açıklıyayım

Her yazdığınız kelimenin ilk harfi büyük olur ve cümle sonunada nokta koyar.
Kırmızı ile belirttigim yerleri koyar.

Site adresi verdiginizde kod karişmamaktadir. Mesela mIRC(Script) yazdınız. Yazdiginiz gibi karşıya cıkar. Site linklerinin sonunada nokta koymaz. Kodu açip kapama geregi duymazsiniz. Diğer bir özelligi ise Attıgınız gülücük ifadelerinin sonunada nokta koymaz o ifadeleri ayıklar.
Kod:
CTRL+A tusuna basarak kodun tamamını kopyalayiniz.