Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
| 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
} |