PHP- Kodu:
Raw 322:*: {
if (ş isin $2) || (ı isin $2) || (ö isin $2) || (ç isin $2) {
.write tkanal.txt $+($2,$chr(9)) $+($3,$chr(9)) $+($4,$chr(9)) $+($5-,$chr(9))
.timer2932 1 2 /türkçelerigöster
}
}
alias türkçelerigöster {
if ($window(@@Channel-List2)) { window -c @@Channel-List2 } {
window -glk0 @@Channel-List2 -1 -1 800 600 Fixedsys 11
iline @@Channel-List2 1 0,0.4Kanal0,0...4Sayı0,0....4Modes0,0..4Topic0,0................
titlebar @@Channel-List2 Türkçe Karakter içeren Kanallar Listesi
var %s = 2
while %s <= $lines(tkanal.txt) {
var %k = $read(tkanal.txt,%s)
iline @@Channel-List2 %s $gettok(%k,1,32) $gettok(%k,2,32) $gettok(%k,3,32) $gettok(%k,4,32) $gettok(%k,5-,32)
inc %s
unset %k
}
.remove tkanal.txt
}
halt
}
menu @@Channel-List2 {
[!] Kanala Gir: {
.join $1
halt
}
}
Code: UnLimitedBOY
Tarih: 05.03.2009
Amaç: Türkçe Karakter içeren kanalların Bilindiği Üzere mIRC Channel Listte görünmememektedir. ( /list ) Bu sorunu aşmak amacı ile yardımcı bir ek liste almanızı sağlar.
10-10-2009, 23:07
(/List ) Türkçe Karakter Yaması
Normal
