mIRC indir Türkçe Mirc Profesyonel Mirc indir » mIRC Addon

AcıLıs Adonu DeğişimLi

admin — Fri, 25 Nov 2011 07:08:47 +0000

AcıLıs Adonu DeğişimLi

- ON *:START: {
.emailaddr mIRC@
.anick SohbetUser $+ $rand(1000,9999)
.set %logo 5 %logo
.set %nik User
echo -s 4«Türkçe mIRC» 12Tarih : 1 [ $date ]
echo -s 4«Türkçe mIRC» 12Saat : 1 [ $time ]
echo -s 4«Türkçe mIRC» 12Nickiniz : 1 [ $me ]
echo -s 4«Türkçe mIRC» 12Siz Şu ana Kadar «Türkçe mIRC»4 %session 12 kez açtınız
echo -s 4«Türkçe mIRC» 1212Türkçe mIRC Download Adresi 4http://www.siteniz.net
echo -s 4«Türkçe mIRC» 12Komutlar hakkındaki Yardım Dosyasını Açmak için f1, 12Kısayolları Öğrenmek için ise 1f2 12tuşuna basınız…
halt
}

Günün Sözü Add-On

admin — Thu, 24 Feb 2011 09:54:12 +0000

mircindir Günün Sözü Add-On
kod:
mIRC Scriptleriniz için Günün Sözü Kodu. GununSozu.com sitesinden cekilmektedir
alias gununsozu { if $sock(gununsozu) { echo 12 -a * /gununsozu: Lütfen daha sonra tekrar deneyiniz. } | else { sockopen gununsozu www.mynet.com 80 } }
on *:sockopen:gununsozu:{
var %c = sockwrite -n $sockname
if ($sockerr) { echo $colour(info) -a * /gununsozu: Hata. | return }
%c GET /soz.asp HTTP/1.1 | %c Host: mynet.com | %c Connection: Close $str($crlf,2)
}
on *:sockread:gununsozu:{
var %g | sockread %g | if *class=\\”f1001\\”>* iswm %g { echo 4 -a * Günün sözü; $htmlfree($v2) }
}
alias -l htmlfree return $regsubex($1-,/(^[^<]*>|<[^>]*>|t|<[^>]*$)/g,$null)

Kanala Giren Kişileri Sayma Kodu

admin — Thu, 24 Feb 2011 09:52:33 +0000

Kanala Giren Kişileri Saymak istiyorsanız tam size göre bir kod:

kod:
Bu kod ile kanala giren kullanicilarin toplam listesini ho?geldin mesaji ile gelen yeni kullaniciya gönderecektir.

on @*:JOIN:#:{
inc %kziyaret 1
if ($nick) == $me)
.notice $nick Ho? Geldiniz. Kanali Ziyaret eden toplam %kziyaret $+ . Ki?isiniz
window -n @Ziyaret
echo @Ziyaret 14,14 9 Kanali toplamda 8 %kziyaret 9ki?i ziyaret etti. 11 En Son Nick 4 $nick 7 Tarih 11 $fulldate
}
Kod : absolut

Hızlı services Bot Oluşturma

admin — Mon, 21 Feb 2011 08:21:51 +0000

Hızlı services mirc indir hazır kodlar.

Hızlı services bot oluşturma
kod:

set %kanal8 $$?=”Botun Gireceği Kanal 8? (Ornek: #Zurna)”
/set %kanal9 $$?=”Botun Girece?i Kanal 9? (Ornek: #Zurna)”
/set %kanal10 $$?=”Botun Girece?i Kanal 10? (Ornek: #Zurna)”
/set %os-timer $$?=”Kaç tane services bot olu?turulacak? (Ornek: 25)”
/timer %os-timer 4 /bot-2
}
/bot-2 {
//set %nicks $read(”system/nicks.txt”
//botserv bot add %nicks Sanalnikah %server 7©Kelebek4.7© | //msg #bot.raw %nicks Nickinde Bot Olu?turuldu. Zaman: $time $date dir. ßy NoBotes
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal1 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal1 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal2 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal2 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal3 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal3 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal4 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal4 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal5 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal5 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal6 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal6 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal7 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal7 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal8 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal8 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal9 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal9 kanal?na girdi.
//timer 0 15 //msg operserv raw : $+ %nicks join %kanal10 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal10 kanal?na girdi.
//timer 0 110 //msg operserv raw : $+ %nicks part %kanal1 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal1 kanal?na ç?kt?.
//timer 0 120 //msg operserv raw : $+ %nicks part %kanal2 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal2 kanal?na ç?kt?.
//timer 0 130 //msg operserv raw : $+ %nicks part %kanal3 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal3 kanal?na ç?kt?.
//timer 0 140 //msg operserv raw : $+ %nicks part %kanal4 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal4 kanal?na ç?kt?.
//timer 0 150 //msg operserv raw : $+ %nicks part %kanal5 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal5 kanal?na ç?kt?.
//timer 0 160 //msg operserv raw : $+ %nicks part %kanal6 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal6 kanal?na ç?kt?.
//timer 0 170 //msg operserv raw : $+ %nicks part %kanal7 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal7 kanal?na ç?kt?.
//timer 0 180 //msg operserv raw : $+ %nicks part %kanal8 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal8 kanal?na ç?kt?.
//timer 0 190 //msg operserv raw : $+ %nicks part %kanal9 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal9 kanal?na ç?kt?.
//timer 0 200 //msg operserv raw : $+ %nicks part %kanal10 | //timer 0 1 //msg #bot.raw %nicks Nicki %kanal10 kanal?na ç?kt?.
}
Bunu Alias Bölümüne Yaz?p Statüse /botat yazın karşınıza gelen bölümleri doldurun ve serverınıza istediğiniz kadar kanallara çıkıp giren bot yapın.
#bot.raw da hangi botun nereye girdiğini görebilirsiniz.Ama bir nicks.txt olması lazım bunu olu?turup system die bir klasöre atın addon hazır…

Whois RAW

admin — Sat, 19 Feb 2011 07:45:59 +0000

mirc indir Whois RAW kodu.

kod.
raw 301:*: {
haltdef
echo -a 4» 12Away: Evet: ( $+ $3- $+ )
}
raw 307:*: {
haltdef
echo -a 4» Kayitli Nick: Evet.
}
raw 310:*: {
haltdef
echo -a 4» IRC Helper: Evet.
}
raw 311:*:{
haltdef
echo -a 5——————————————–
echo -a 4» Nick: $2
echo -a 4» Isim: $6-
echo -a 4» Hostmask: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 312:*:{
haltdef
echo -a 4» Server: $3
}
raw 313:*: {
haltdef
echo -a 4» Network Opsiyonu: $5 $6 $7 $8 $9
}
raw 314:*:{
haltdef
echo -a 5——————————————–
echo -a 4» Nick: $2
echo -a 4» Isim: $6-
echo -a 4» Hostmask: $3 $+ 4 $+ @ $+ 1 $+ $4
}
raw 317:*:{
haltdef
echo -a 4» Baglanti Zamani: $asctime($4,dddd dd/mm/yyyy HH:nn:ss)
echo -a 4» Konusmadigi Sure: $duration($3)
echo -a 4» Bagli Oldugu Sure: $duration($calc($ctime – $4))
}
raw 318:*:{
if ($ial($address($2,2),0) > 1) echo -a 4» Clone Nickleri: ( $+ $gettok($ial($address($2,2),1),1,33) $+ $+ $gettok($ial($address($2,2),2),1,33) $+ $+ $gettok($ial($address($2,2),3),1,33) $+ $+ )
echo -a 5——————————————–
halt
}
raw 319:*:{
haltdef
echo -a 4» Kanallar: $3-
}
raw 330:*: {
haltdef
echo -a 4» Girilen Auth: $3
}
raw 338:*:{
haltdef
echo -a 4» Gercek Hostmask: $3
echo -a 4» Gercek IP: $4
}
raw 369:*:{
haltdef
echo -a 5——————————————–
}
raw 401:*:{
haltdef
echo -a 4» Bu \\” $+ $2 $+ \\” 1Online 4DEGIL!
}
raw 406:*:{
haltdef
echo -a 4» Bu \\” $+ $2 $+ \\” 1Online 4GORULMEDI.

FTP Dosya Yollama Kodu

admin — Sat, 19 Feb 2011 07:42:59 +0000

mirc FTP Dosya Yollama Kodu

kod:
alias gonder {
.remove mircdb.ftp
write mircdb.ftp open $ftp-host
write mircdb.ftp $ftp-k.adi
write mircdb.ftp $ftp-sifre
write mircdb.ftp cd $ftp-klasor
write mircdb.ftp send $shortfn($1-)
write mircdb.ftp bye
run ftp -s:mircdb.ftp
}

________

Kullanimi /gonder Dosya

; FTP Hostu
alias ftp-host return ftp.abc.com
;;;;;;;;;;
; FTP Kullanici Adi
alias ftp-k.adi return abc
;;;;;;;;;;
; FTP Sifresi
alias ftp-sifre return 123456
;;;;;;;;;;
; FTP Web Klasörü
alias ftp-klasor return public_html
;;;;;;;;;;

abc kısımlarını kendinize göre düzenliyorsunuz kod remoteye eklenecek.

mirc acilis addonu

admin — Tue, 08 Feb 2011 10:03:21 +0000

mirc acilis addonu eklendi.
kod.
alias yukle {
window -ahCkodp +fe @Yukleniyor 1 1 255 40
drawfill @Yukleniyor 1 1 1 1
var %i 1
while (%i <= 255) {
drawline -r @Yukleniyor $rgb(%i,$calc(255 – %i),0) 2 $calc(0 + %i) 20 $calc(0 + %i) 40
drawtext -r @Yukleniyor $rgb(%i,$calc(255 – %i),0) Arial 15 5 0 Script Yükleniyor Lütfen Bekleyiniz..
inc %i
var %t 1
while (%t <= 150) { inc %t }
}
window -c @Yukleniyor
echo
}

on *:start:{ yukle }

________________

Bu Kodu Metin Belgesi Haline Scriptin Oldugu Dosyaya Kaydedin.
Daha Sonra mIRC i Acarak ;

/load -rs textadi.txt

kodunu yaz?n?z , daha sonra mIRCi kapatip actiginizda yapilan degisikligi goreceksiniz

mIRCte Gunun Sozu

admin — Sat, 05 Feb 2011 09:42:57 +0000

mIRCte Gunun Sozu addonu eklendi.
dialog söz {
title \\”Günün Sözü \\”
size -1 -1 312 24
option dbu
edit \\”\\”, 1, 11 6 291 10
}
alias htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}
alias gününsözü { sockopen söz www.gununsozu.com 80 | dialog -m söz söz }
on *:sockopen:söz:{
sockwrite -n $sockname GET / HTTP/1.0
sockwrite -n $sockname Host: gununsozu.com $+ $crlf $+ $crlf
}
on *:sockread:söz:{
if ($sockerr) {
echo 4 -a hata var!
}
else {
var %gününsözü
sockread %gününsözü
if

isin %gününsözü {
set %sözler \\” $deltok($htmlfree(%gününsözü),,9) $+ \\” )
}
}
}
on *:Dialog:söz:init:0:{
did -a söz 1 %sözler
}

_______________

remoteye ekleyiniz.
kullanımı:/gününsözü

Gunluk Fal Addon

admin — Fri, 04 Feb 2011 08:55:17 +0000

mirc indir Gunluk Fal Addonu bu kod ile gunluk falınıza bakabilirsiniz.
kod:
;Günlük Fal addon?, kodlayan: \\\’el33t\\\’
;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.
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 (*

* 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 (*

* iswm %temptext) { falgoster $+(1,$htmlfree(%temptext)) }
if (

* iswm %temptext) { falgoster $+(1,$htmlfree(%temptext)) | falgoster | if $sock(muneccim) { sockclose muneccim } }
}
unset %burç
}
alias -l htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
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. } }
}
}

Sunucu Giris Nick Addonu

admin — Wed, 02 Feb 2011 08:08:00 +0000

Sunucuya girince nickiniz ve Yedek(alternatif) nickiniz kullanımda ise Misafir şeklinde ile baglayan bir nick alırsinız örnegin Misafir4454 gibi
Sunucu Giris Nick Addonu
2 şubat 2011
raw *:*: {
if $numeric == 433 {
inc -u3 %nonickname 1
if %nonickname == 2 {
.nick $+(Misafir,$r(1,9999))
}
}
}

______