IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Yazı koduna Yardim Lütfen (https://www.ircforumlari.net/mirc-scripting-sorunlari/361210-yazi-koduna-yardim-lutfen.html)

Yazı koduna Yardim Lütfen

Selam Arkadaslar şimdi bi yazı kodı hazırladim calısıyor suanda Fakat nickleri tab yaptıgım zaman onlarin yazilarinida Sekilli yapıyor bu koda göre ayarlanabilirmi sizlerden yardım bekliyorum ornek ;
-
Dis¢øññé¢†éd ñaßér ñasiLsiñ
Dedigimde Kanalda bulunan Disconnected nickine soyle olsun mesela
-
Disconnected ñaßér ñasiLsiñ
Elimdeki kodda budur ; buna göre ayarlanirsa sevinirim,
-
on 1:INPUT:*:{
unset %elit
set %elit $1-
if ( $chr(47) == $mid(%elit,1,1) ) { %elit | halt }
%elit = $replace(%elit,b,ß)
%elit = $replace(%elit,n,ñ)
%elit = $replace(%elit,o,ø)
%elit = $replace(%elit,ö,ø)
%elit = $replace(%elit,2,²)
%elit = $replace(%elit,1,¹)
%elit = $replace(%elit,3,³)
%elit = $replace(%elit,t,†)
%elit = $replace(%elit,x,×)
%elit = $replace(%elit,c,¢)
%elit = $replace(%elit,c,¢)
%elit = $replace(%elit,f,ƒ)
%elit = $replace(%elit,!,¡)
%elit = $replace(%elit,?,¿)
%elit = $replace(%elit,>,»)
%elit = $replace(%elit,-,¬)
%elit = $replace(%elit,:,¦)
%elit = $replace(%elit,',`)
%elit = $replace(%elit,`,')
%elit = $replace(%elit,.,)
%elit = $replace(%elit,l,L)
%elit = $replace(%elit,-,)
%elit = $replace(%elit,e,é)
say %elit
unset %elit
halt
}
-
Şimdiden Tesekkürler...

Yazı Stili yardim ..

Cevap: Yazı koduna Yardim Lütfen

Kod:

on *:input:#:if $left($1,1) != / { msg $active $regsubex($1-,/(\S+)/g,$iif(\1 ison #,\1,$replace(\1,b,ß,n,ñ,o,ø,ö,ø,2,²,1,¹,3,³,t,†,x,×,c,¢,c,¢,f,ƒ,!,¡,?,¿,>,»,-,¬,:,¦,',`,`,',.,,l,L,-,,e,é))) | halt }