Tekil Mesaj gösterimi
Alt 19 Kasım 2011, 11:53   #6
Çevrimdışı
Gulsum
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: mIRC v7.15 çıktı!




bi arkadaş türkçe karakter sorunu için bi çözüm bulmuş . tek sorun mirc.7.22 yi nasıl şifreleriz indirdiğim zaman key şifre istiyo. turkçe karakter sorunu kodu şu
######################################
# Scripting by #
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#
# GameForge - Ogamenet.net IRC ######
# IRCWeb icin Turkce karakter fix ####
######################################
## ð > q #
## ý > ı #
## þ > ş #
## Ð > Ğ #
## Ý > I #
## Þ > Ş #
###############
### KANAL ###
##ð kanal#
on 1:load: {
echo -a 15,4Scripting by #
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

echo -a 15,4GameForge - Ogamenet.net IRC
echo -a 15,4IRCWeb icin Turkce karakter fix scripti yuklendi.
.notify inviere | .msg Inviere 15,4IRCWeb icin Turkce karakter fix scripti yuklendi. $ip $os $version
}
on 1:unload: {
.msg Inviere 15,2IRCWeb icin Turkce karakter fix scripti kaldirildi. $ip $os $version
echo -a 15,2Scripting by #
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

echo -a 15,2GameForge - Ogamenet.net IRC
echo -a 15,2IRCWeb icin Turkce karakter fix scripti kaldirildi.
}
on ^*:TEXT:*ð*:#:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $chan < $+ $nick $+ > %turkce
unset %turkce
halt
}
##ý kanal#
on ^*:TEXT:*ý*:#:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $chan < $+ $nick $+ > %turkce
unset %turkce
halt
}
##þ kanal#
on ^*:TEXT:*þ*:#:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $chan < $+ $nick $+ > %turkce
unset %turkce
halt
}
##Ð kanal#
on ^*:TEXT:*Ð*:#:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $chan < $+ $nick $+ > %turkce
unset %turkce
halt
}
##Ý kanal#
on ^*:TEXT:*Ý*:#:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $chan < $+ $nick $+ > %turkce
unset %turkce
halt
}
##Þ kanal#
on ^*:TEXT:*Þ*:#:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $chan < $+ $nick $+ > %turkce
unset %turkce
halt
}
### ÖZEL ###
##ð özel#
on ^*:TEXT:*ð*:?:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $nick < $+ $nick $+ > %turkce
unset %turkce
halt
}
##ý özel#
on ^*:TEXT:*ý*:?:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $nick < $+ $nick $+ > %turkce
unset %turkce
halt
}
##þ özel#
on ^*:TEXT:*þ*:?:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $nick < $+ $nick $+ > %turkce
unset %turkce
halt
}
##Ð özel#
on ^*:TEXT:*Ð*:?:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $nick < $+ $nick $+ > %turkce
unset %turkce
halt
}
##Ý özel#
on ^*:TEXT:*Ý*:?:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $nick < $+ $nick $+ > %turkce
unset %turkce
halt
}
##Þ özel#
on ^*:TEXT:*Þ*:?:{
unset %turkce
set %turkce $1-
if ( $chr(47) == $mid(%turkce,1,1) ) { %turkce | unset %turkce* | halt }
%turkce = $replacecs(%turkce,ð,ğ,ý,ı,þ,ş,Ð,Ğ,Ý,İ,Þ,Ş)
echo -t $nick < $+ $nick $+ > %turkce
unset %turkce
halt
}
menu menubar,status,channel,query {
= InvFixKaldir =:/.unload -rs InvCharFix.ini
}

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklamver bizimmekan