Kod: Kodu kopyalamak için üzerine çift tıklayın!
######################################
# 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
}
Bu şekilde duzenleyince calisiyor. Ancak,
1- Nicklerdeki ve Status'deki Turkce karakterleri duzeltmiyor. Sadece Kanal ve Ozeldeki meseajlari duzeltiyor.
2- Scripti load ettiginizde mircde zaten turkce karakter problemi oldugu icin load'dan sonra scriptin icindeki turkce karakterleri otomatik man degistiriyor kendisi script editorde. Scripti yukledikten sonra,
bu satirlari kontrol edin. Eger,
bu sekilde kendisi otomatik bozduysa elle 1 ust satirdaki haline cevirmeniz gerek.
NOT: Soyle 1 problem aldim simdi. Bu kodla sizin mesajlarda gordugunuz turkce karakterler duzeliyor. Ancak siz ı,I,ş,Ş,ğ,Ğ gibi karakterlerle birsey yazdiginizda bu sefer karsi tarafta mesela eschatten baglanan birinde ışı gibi bozuk karakterler cikiyor. Yani 2 ucu ....'lu degnek gibi birsey. Sizi duzeltiyor ama karsi tarafi bozuyor
Yinde kullanmak istiyenler icin bu haliyle calisiyor.