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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Farklı Yazı Addonu (https://www.ircforumlari.net/mirc-scripting-sorunlari/311277-farkli-yazi-addonu.html)

kilicli_32 15 Ocak 2010 13:45

Farklı Yazı Addonu
 
Selamun aleyküm arkadaşlar benim elimde bi yazı addonu var bütün harfler farklı renkte yazılıyor ben bu koda harf eklemek istiyorum yani her hafr başka şekilde ve başka renkte olacak .. yazı kodu ve eklemek istediğim harf kodu aşağıdadır

Bu Yazı Kodu :

menu status,menubar, {
.-
. 1 $chr(11) © Süper Yazı !
..© Açık !:.enable #süperyazı | .echo -a 0,4 Süper Yazı Yazı AcıLdı.. %logo
..© Kapalı !:.disable #süperyazı | .echo -a 0,4 Süper Yazı Yazı KapatıLdı.. %logo
..© Bilgi !:.echo -a 0,4 Bu Yazı Tipi Helper,Admin, ArkadasLara KoLaylık Saglasın diye EkLendi.. %logo
.-
}
#süperyazı on
on *:input:#:{
if $left($1-,1) != $readini(mirc.ini,text,commandchar) || $ctrlenter == $true {
var %c = 1,2,3,4,5,6,7,10,12,13,14
var %i = 1
var %MAX = $len($1-)
while (%i <= %MAX) {
var %r = $gettok(%c,$rand(1,$numtok(%c,44)),44)
if $mid($1-,%i,1) == $chr(32) { var %t = %t $chr(32) }
else { var %t = %t $+  $+ %r $+ $mid($1-,%i,1) }
inc %i
}
msg $chan %t
halt def
}
}
#süperyazı end

Eklemek istediğim harf kodu ise :

say $replacecs(%b,?,¿,l,L,ş,ş,Ş, Ş,c,14¢,b,2ß,<,«,>,»,a,à,i,î,t,2†, u,µ,f,14ƒ,e,é,o,14ø)

CipriX 15 Ocak 2010 15:23

Cevap: Farklı Yazı Addonu
 
PHP- Kodu:

menu status,menubar, {
      .-
      . 
1 $chr(11© Süper Yazı !
      ..
© Açık !:.enable #süperyazı | .echo -a 0,4 Süper Yazı Yazı AcıLdı.. %logo
      
..© Kapalı !:.disable #süperyazı | .echo -a 0,4 Süper Yazı Yazı KapatıLdı.. %logo
      
..© Bilgi !:.echo -a 0,4 Bu Yazı Tipi Helper,AdminArkadasLara KoLaylık Saglasın diye EkLendi.. %logo
      
.-
    }
#süperyazı on
    
on *:input:#:{
      
if $left($1-,1) != $readini(mirc.ini,text,commandchar) || $ctrlenter == $true {
        var %
1,2,3,4,5,6,7,10,12,13,14
        
var %1
        
var %MAX $len($1-)
        while (%
<= %MAX) {
          var %
$gettok(%c,$rand(1,$numtok(%c,44)),44)
          if 
$mid($1-,%i,1) == $chr(32) { var %= %t $chr(32) }
          else { var %
= %$+  $+ %$+ $mid($1-,%i,1) }
          
inc %i
        
}
        
msg $chan $replacecs(%t,?,¿,l,L,ş,ş,ŞŞ,c,14¢,b,,<,«,>,»,a,à,i,î,t,2&#8224;,  u,µ,f,14ƒ,e,é,o,14ø)
        
halt def
      
}
    }
    
#süperyazı end 


Erva 15 Ocak 2010 16:01

Cevap: Farklı Yazı Addonu
 
10s12é10L4à10m 6n3à12ß1é14r 13d14é1n4é2m1é 14y6à2z1ı6s6ı

Kodu tam alamıyor muyum, yanlış yaptığım ne acaba? Yazı yazarken böyle çıkıyor, sanırım kopyalarken bazı renk kodu gelmiyor

GoldKey 26 Ekim 2016 00:07

Cevap: Farklı Yazı Addonu
 
menu status,menubar, {
.-
. 1 $chr(11) © Süper Yazı !
..© Açık !:.enable #süperyazı | .echo -a 0,4 Süper Yazı Yazı AcıLdı.. %logo
..© Kapalı !:.disable #süperyazı | .echo -a 0,4 Süper Yazı Yazı KapatıLdı.. %logo
..© Bilgi !:.echo -a 0,4 Bu Yazı Tipi Helper,Admin, ArkadasLara KoLaylık Saglasın diye EkLendi.. %logo
.-
}
#süperyazı on
on *:input:#:{
if $left($1-,1) != $readini(mirc.ini,text,commandchar) || $ctrlenter == $true {
var %c = 1,2,3,4,5,6,7,10,12,13,14
var %i = 1
var %MAX = $len($1-)
while (%i <= %MAX) {
var %r = $gettok(%c,$rand(1,$numtok(%c,44)),44)
if $mid($1-,%i,1) == $chr(32) { var %t = %t $chr(32) }
else { var %t = %t $+ $+ %r $+ $mid($1-,%i,1) }
inc %i
}
msg $chan $replacecs(%t,?,¿,l,L,ş,ş,Ş, 2Ş,c,7c,9b14,B,<,«,>,»,a,4a,i,2i ,t,t, u,u,f,4f,e,e,o,9o)
halt def
}
}
#süperyazı end


Buyur Hatasız calışıyorum Umarım bir faydam olmuştur ..

aLone 26 Ekim 2016 07:32

Cevap: Farklı Yazı Addonu
 
maşallah 6 senelik konuya cvp gelmıs :)

GoldKey 28 Ekim 2016 13:32

Cevap: Farklı Yazı Addonu
 
Sen neden vermedin peki cevap ?


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 01:52.

Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2024, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net