mıRC, mIRC indir, Sohbet, Chat

kod bunlar

Kod:
on *:text:*:#oyun:{
if $nick == Oyuncu {
if *BiLmece* iswm $1- {
set -e %BiLmece $strip($regsubex($1-,/(.*BiLmece*|\.)/g,$null))
write aziz.log $+(%BiLmece)
}
}
}Kod:
on *:text:*:#oyun:{
if $nick == Oyuncu {
if *Cevap* iswm $1- {
set -e %cevap $strip($regsubex($1-,/(.*Cevap*|\.)/g,$null))
write aziz.log $+(%cevap)
}
}
} mirc, mirç, türkçe mirç,

verdiğim kodu da remoteye yazıcaksın örneği aşağıda;

Kod:
alias ayıkla { return $regsubex($1-,/(\x3\d\d\,\d\d|\x3\d\d.)/g,$null) }

on *:text:*:#: {
if ananı isin $ayıkla($1-) || ebeni isin $ayıkla($1-) { atma komutları }
}gibi regexlede yapabilirsin, ama bu tür korumalarda daha mantıklı bir yol olarak bu yazıda boşluk yok ve renk kodu çok fazla o yüzden yazıda 5 ten fazla renk içerip 3 ten az space (boşluk) var isede atsın kodu aşağıda

Kod:
alias ayıkla { return $regsubex($1-,/((\x3\d\d\,\d\d)|(\x3\d\d.))/g,$null) }
alias tst {
if $count($1-,$chr(3)) > 5 && $count($1-,$chr(32)) < 3 {
;atma komutları 5 ten fazla renk kodu içerip 3 ten az boşluklu bir yazı ise
ban -k $chan $nick Küfür olasılıklı içerik
return
}
if ananı isin $ayıkla($1-) || ebeni isin $ayıkla($1-) {
;atma komutları
ban -k $chan $nick Küfür olasılıklı içerik
}
} mirc, mirç, türkçe mirç

4.)Avatar Sistemi Sayesinde Bu Scripti Kullanan Diğer Kişilerle Resimli İletişim Kurabileceksiniz.
mirc
5.)Titreşim Sayesinde Bu Scripti Kullanan Diğer Kişileri MSN’deki Gibi Titretebileceksiniz.(mirç)

6.)Script Toolbar Menüsüyle Herşeye Rahatça Erişebilecek ve Eklentilerinizi Scripte Kolaylıkla Yükleyebileceksiniz. “sendkeys”

7.) Sözlük Sayesinde İngilizce Türkçe Çeviri Yapabilecek, Kanaldaki Yazıların(Türkçe) İngilizce Karşılıgını Hemen Yanında Oku***** İngilizcenizi Pratik Şekilde Geliştirebileceksiniz ()

8.)mIRC Media Center sayesinde Script İçerisinde Hem Videolarınızı İzleyebilecek Hem Hazır Olan Birçok Radyoyu Dinleyebilecek Kısacası Media Player’la Yaptıgınız Tüm Multimedya İşlemlerini Gerçekleştirebileceksiniz (SeRDaR406)

9.)Mdx.DLL,Toolbar,Popups Renklendirme İle 3 Ayrı Ana Theme Seçeneği Kullanabileceksiniz. Scripti Renk Düzeni Sayesinde Gece Gündüz Rahatlıkla Gözünüzü Almayacak Şekilde Kullanabileceksiniz.

10.)MemoServ Paneli İle Hem Yeni Memo Geldiğinde Dialogla Anında Haberdar Olacak ve Memonuzu Otomatik Olarak Dialog Penceresine Yansıtarak Sizi Komut İşkencesinden Kurtaracaktır. Ayrıca Yeni Memo Yazmak,silmek,listelemek,son memoyu okumak,okunmayan memoları okumak Vb. MemoServ İşlemlerini Tek Dialogtan Yapabileceksiniz..

11.) Genel Taramalar(Whois,ircop,clone vs.) MynetFm, Aktif Ekranı Fotoğraflama, Helper Menüsü, Vb. Daha Birçok Eklenti Sizleri Beklemektedir

Normalde satır sonu için /window -al# dosya komutunu kullanabiliriz ama onda boşluk karakteri ekletmede sorun yaşıyoruz
mirc,

istediğin kodlar kırmızı yerleri değiştirmen yeterli, ayrıca dosyanın içeriğindeki yazyı silmeyide ekledim.

Kodlar Aliases’e eklenecek;

Kod:
satirsonu {
var %file = $qt(dosya yolu ve uzantısı dahil adı)

var %i = 1, %lines = $lines(%file), %readed = $null
while %i <= %lines {
%readed = $read(%file,%i)
write -l $+ %i %file $+(%readed,$chr(32),$1-)
inc %i 1
}
}

satirbasi {
var %file = $qt(dosya yolu ve uzantısı dahil adı)

var %i = 1, %lines = $lines(%file), %readed = $null
while %i <= %lines {
%readed = $read(%file,%i)
write -l $+ %i %file $+($1-,$chr(32),%readed)
inc %i 1
}
}
icindensil {
var %file = $qt(dosya yolu ve uzantısı dahil adı)

var %i = 1, %lines = $lines(%file), %readed = $null
while %i <= %lines {
%readed = $read(%file,%i)
write -l $+ %i %file $regsubex(%readed,$1-,$null)
inc %i 1
}
} mirc, mirç türkçe mirç