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

Etiketlenen Kullanıcılar

1Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 08 Ağustos 2012, 00:18   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
ayni yazi iki defa cikiyor yardım..




arkadaşlar mirc ayni yazi iki defa çıkıyor yardim edermisiniz..
diceksiniz ki sorun input sorunu simdi sole bir durum var
iki adet input var birini iptal edince duzeliyor biri renkli yazi
digeride kisa ornek slm selam gibi veriyor iki dosyayida paylasiyorum
bu konuda yardimci ola bilirmisiniz input olayindan kaynaklainyor.


üsteki sicript.ini dosyasi
altaki renkcolar.mrc

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[script]
n0=On 1:input:*:{
n1=
n2=  if ($1- == op) { /cs Op #  $me   | halt }
n3=  if ($1- == deop) { /mode # -o  $me   | halt }
n4=  if ($1- == +) { /mode # +v  $me   | halt }
n5=  if ($1- == -) { /mode # +v  $me   | halt }
n6=  if ($1- == nbr) { say  4N6a14b2e4r12?  | halt }
n7=  if ($1- == ins) { say  4İ12N4Ş12A4L12L4A12H4  halt }
n8=  if ($1- == duy) { say  7[7,18,1w7,1W7,1w7,1.14,1D7,1u8,1y4,1G11,1u9,1S3,1o8,1H6,1b5,1e13,1T7,1.10,1C11,1o4,1m11,-8,1]  | halt }
n9=  if ($1- == naber) { say 4N6a14b2e4r12? | halt }
n10=  if ($1- == genç) { say 4Gencim 1Güzelim 4HızLıyım 1Bekarım 4Gördüğünüz 1Gibi 4Can Yakarım 1:))) | halt }
n11=  if ($1- == çilek) { say 13MucKSsSsSsSsSsSsSs 7SaNa 3MucKSsSsSsSsSsSsSs 6CiLeK 12YaNaKLaRinDaN 13)) | halt }
n12=  if ($1- == bal) { say 13MucKSsSsSsSsSsSsSs 7SaNa 3MucKSsSsSsSsSsSsSs 6BaL 12DuDaKLaRıNDaN 13)) | halt }
n13=  if ($1- == naber?) { say 4N6a14b2e4r12? | halt }
n14=  if ($1- == mrb) { say 4M2e5r3h6a13b1a halt 
n15=  if ($1- == :::) { say 12 4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:) )  | halt }
n16=  if ($1- == s.a) { say   4S12e4L12å4m12u4N 4A12L4£12y4k12u4m  halt }
n17=  if ($1- == w) { say   4W12å4L12L4å12H4å 4D12e 4H12e4l12e 4:12)4:12)    | halt }
n18=  if ($1- == valla) { say   4W12å4L12L4å12H4å    halt }
n19=  if ($1- == byy) { say  4B12y4e12å4S12s4S12s4S 4B12y4e12å4S12s4S12s4S 4P12å4i 4P12å4i 4P12å4i 4P12å4i    halt }
n20=  if ($1- == nasilsın)  { say  12S2en  12Na4sılsın?    | halt }
n21=  if ($1- == a.s) { say 4A3L4e3Y4K3u4M 4S3e4L3å4M 4H3o4S3G4e3L4D3i4N3   .. | halt }
n22=  if ($1- == s.a) { say 0,4 CSelamun Aleykum C* | halt }
n23=  if ($1- == :i) { say 6¶4,8:) | halt }
n24=  if ($1- == ay) { say 4a7y10a12y12a13y4a7y10a12y12a13y4a7y10a12y12a13y halt }
n25=  if ($1- == canimmm) { say  4C12å4N12i4M12m4M12m4M12m4M12m4M12m4M 12B4å12L4i12M4m12M4m12M 12K4å12y4m12å4g12i4M12m4M    halt }
n26=  if ($1- == s.s.g) { say 4S12e4N12i 4S12e4v12i4y12o4r12u4m12m4m 12G4ü12l4T12a4n12e4M  halt }
n27=  if ($1- == bye) { say 4B7y4e1.14. halt }
n28=  if ($1- == oo  ) { say 13:4o13)2) | halt }
n29=  if ($1- == evet) { say 4E10v7e12t4. halt }
n30=
n31=
n32=
n33=
n34=  if (/* iswm $1) { return }
n35=  var %a 0, %b, %c
n36=  while (%a < $numtok($1-,32)) {
n37=    inc %a
n38=    %c = $gettok($1-,%a,32)
n39=    if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4,%c,) }
n40=    else { %b = %b %c }
n41=  }
n42=  if (!%b) { %b = $1- }
n43=  say %b
n44=  halt 


üsteki sicript.ini dosyasi
altaki renkcolar.mrc



PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
dialog color {
 
  
title "Yazi Renk Format by absolut"
 
  
size --1 325 300
 
  box 
"Normal Renkler"35 5 150 250
 
  
list 422 23 110 230
 
  button 
"Kapat"1140 265 50 25ok 
 
  text 
"
İnce"
935 265 25 25
 
  check 
"" 1060 265 15 15
 
  
check "" 1160 280 15 15
 
  
text "Alti çizgili"810 280 45 25
 
  box 
"Arka Rengi Yazinin"5170 5 150 250
 
  
list 6190 23 110 230
 
}
 
on *:dialog:color:init:*: {  
 
  /
did -a color 4 None
 
  
/did -a color 4 Beyaz
 
  
/did -a color 4 Siyah
 
  
/did -a color 4 Mavi
 
  
/did -a color 4 Koyu Yeşil
 
  
/did -a color 4 Kırmızı
 
  
/did -a color 4 Kahve Rengi
 
  
/did -a color 4 Mor
 
  
/did -a color 4 Turuncu
 
  
/did -a color 4 Sari
 
  
/did -a color 4 Açık Yeşil
 
  
/did -a color 4 Mavi Yeşil
 
  
/did -a color 4 Açık Mavi
 
  
/did -a color 4 Mavi
 
  
/did -a color 4 Pembe
 
  
/did -a color 4 Gri
 
  
/did -a color 4 Açık Gri
 
  
/did -ck color 4 %fgstatus
 
  
/did -a color 6 Normal
 
  
/did -a color 6 Beyaz
 
  
/did -a color 6 Siyah
 
  
/did -a color 6 Siyah Mavi
 
  
/did -a color 6 Siyah Yeşil
 
  
/did -a color 6 Kırmızı
 
  
/did -a color 6 Kahve Rengi
 
  
/did -a color 6 Mor
 
  
/did -a color 6 Turuncu
 
  
/did -a color 6 Sarı
 
  
/did -a color 6 Yeşil
 
  
/did -a color 6 Mavi Yeşil
 
  
/did -a color 6 Açık Mavi
 
  
/did -a color 6 Mavi
 
  
/did -a color 6 Pembe
 
  
/did -a color 6 Gri
 
  
/did -a color 6 Açık Gri
 
  
/did -ck color 6 %bgstatus
 
  
if (%bold == ) {
 
    
did -c color 10
 
  
}
 
  if (%
underline == ) {
 
    
did -c color 11
 
  
}
 
}
 
on *:dialog:color:sclick:10: {
 
  if (
$did(color,10).state) {
 
    /
set %bold 
 
  
}
 
  else {
 
    /unset %
bold
 
  
}
 

 
on *:dialog:color:sclick:11: {
 
  if (
$did(color,11).state) {
 
    /
set %underline 
 
  
}
 
  else {
 
    /unset %
underline
 
  
}
 

 
on *:dialog:color:sclick:13: {
 
  /
set %color on
 
  
/echo Text Changer turned on.
 
}
 
on *:dialog:color:sclick:15: {
 
  /unset %
color
 
  
/echo Text Changer turned off.
 
}
 
on *:dialog:color:sclick:1: {
 
  if (
$did(color,4,1) != $null) { /write -c test.txt | /write test.txt $did(color,4,1) }
 
  if (
$did(color,4,2) != $null) { /write test.txt $did(color,4,2) }
 
  if (
$did(color,4,3) != $null) { /write test.txt $did(color,4,3) }
 
}
 
on *:dialog:color:sclick:4: {
 
  if (
$did(color,4).sel == 1) { set %foreground none set %fgstatus 01 }
 
  if (
$did(color,4).sel == 2) { set %foreground 00 set %fgstatus 02 }
 
  if (
$did(color,4).sel == 3) { set %foreground 01 set %fgstatus 03 }
 
  if (
$did(color,4).sel == 4) { set %foreground 02 set %fgstatus 04 }
 
  if (
$did(color,4).sel == 5) { set %foreground 03 set %fgstatus 05 }
 
  if (
$did(color,4).sel == 6) { set %foreground 04 set %fgstatus 06 }
 
  if (
$did(color,4).sel == 7) { set %foreground 05 set %fgstatus 07 }
 
  if (
$did(color,4).sel == 8) { set %foreground 06 set %fgstatus 08 }
 
  if (
$did(color,4).sel == 9) { set %foreground 07 set %fgstatus 09 }
 
  if (
$did(color,4).sel == 10) { set %foreground 08 set %fgstatus 10 }
 
  if (
$did(color,4).sel == 11) { set %foreground 09 set %fgstatus 11 }
 
  if (
$did(color,4).sel == 12) { set %foreground 10 set %fgstatus 12 }
 
  if (
$did(color,4).sel == 13) { set %foreground 11 set %fgstatus 13 }
 
  if (
$did(color,4).sel == 14) { set %foreground 12 set %fgstatus 14 }
 
  if (
$did(color,4).sel == 15) { set %foreground 13 set %fgstatus 15 }
 
  if (
$did(color,4).sel == 16) { set %foreground 14 set %fgstatus 16 }
 
  if (
$did(color,4).sel == 17) { set %foreground 15 set %fgstatus 17 }
 
}
 
on *:dialog:color:sclick:6: {
 
  if (
$did(color,6).sel == 1) { set %background none set %bgstatus 01 }
 
  if (
$did(color,6).sel == 2) { set %background 00 set %bgstatus 02 }
 
  if (
$did(color,6).sel == 3) { set %background 01 set %bgstatus 03 }
 
  if (
$did(color,6).sel == 4) { set %background 02 set %bgstatus 04 }
 
  if (
$did(color,6).sel == 5) { set %background 03 set %bgstatus 05 }
 
  if (
$did(color,6).sel == 6) { set %background 04 set %bgstatus 06 }
 
  if (
$did(color,6).sel == 7) { set %background 05 set %bgstatus 07 }
 
  if (
$did(color,6).sel == 8) { set %background 06 set %bgstatus 08 }
 
  if (
$did(color,6).sel == 9) { set %background 07 set %bgstatus 09 }
 
  if (
$did(color,6).sel == 10) { set %background 08 set %bgstatus 10 }
 
  if (
$did(color,6).sel == 11) { set %background 09 set %bgstatus 11 }
 
  if (
$did(color,6).sel == 12) { set %background 10 set %bgstatus 12 }
 
  if (
$did(color,6).sel == 13) { set %background 11 set %bgstatus 13 }
 
  if (
$did(color,6).sel == 14) { set %background 12 set %bgstatus 14 }
 
  if (
$did(color,6).sel == 15) { set %background 13 set %bgstatus 15 }
 
  if (
$did(color,6).sel == 16) { set %background 14 set %bgstatus 16 }
 
  if (
$did(color,6).sel == 17) { set %background 15 set %bgstatus 17  }
 
}
 
on *:input:*  { 
 
  if ((
$left($1,1) != /) && (%foreground != none) && (%background != none) && ($active != Status Window)) { 
 
    
msg $active %bold $+ %underline $+  $+ %foreground $+ , $+ %background $+ $$1- | haltdef 
 
  
}
 
  if ((
$left($1,1) != /) && (%foreground != none) && (%background == none) && ($active != Status Window)) { 
 
    
msg $active %bold $+ %underline $+  $+ %foreground $+ , $+ 16 $+ $$1- | haltdef 
 
  
}
 
  if ((
$left($1,1) != /) && (%foreground == none) && (%background != none) && ($active != Status Window)) { 
 
    
msg $active %bold $+ %underline $+  $+ 16 $+ , $+ %background $+ $$1- | haltdef
 
  
}
 
  if ((
$left($1,1) != /) && (%foreground == none) && (%background == none) && ($active != Status Window)) {
 
    
msg $active %bold $+ %underline $+ $$1- | haltdef
 
  
}
 
}
 
on *:load:{ 
 
  
set %foreground none
 
  set 
%background none
 
  set 
%fgstatus 01
 
  set 
%bgstatus 01
 

 
alias renkleriac {
 
  
dialog -m color color
 



 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet sohbet
Alt 08 Ağustos 2012, 00:34   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




kısa ayzı dediğin koddaki

if (/* iswm $1) { return }

var %a 0, %b, %c

while (%a < $numtok($1-,32)) {

inc %a

%c = $gettok($1-,%a,32)

if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4,%c,) }

else { %b = %b %c }

}

if (!%b) { %b = $1- }

say %b

halt

alt kısımda olan bu kısmı silmen gerekli

 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 01:01   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




LineS Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
kısa ayzı dediğin koddaki

if (/* iswm $1) { return }

var %a 0, %b, %c

while (%a < $numtok($1-,32)) {

inc %a

%c = $gettok($1-,%a,32)

if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4,%c,) }

else { %b = %b %c }

}

if (!%b) { %b = $1- }

say %b

halt

alt kısımda olan bu kısmı silmen gerekli




Bahsetiginiz sekilde renk calismiyor hocam usteki olan ornek sa yaziyi buyuten..

 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 01:32   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




ıkıtane yazı kodun var bıtanesi sıl dediğim diğeri renkcolar.mrc ıcerısındeki ıkı ayrı kod ıkı yazı demek nasıl bir yazı şekli istediğini seçmelisin

 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 01:42   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




Yapabileceğin tek mantıklı şey şu olabilir.1.yazıyı kullanırken 2.sini deaktif edeceksin yada 2.sini kullanırken 1.sini kullanacaksın.
Örnek olarak 1.input koduna #renkli1 grubu diye adlandırırsak.
msg $active %bold $+ %underline $+ $+ %foreground $+ , $+ 16 $+ $$1- | haltdef

olan kısmı timerler geciktir 1 sn falan öncesinde de .disable #renkli1 kullan.Yada if kullanarak gene 1.input kodunun grubu aktifse deaktif hale getir 2.kodda.

 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 01:45   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




bak simdi hocam biri renk paleti yazi rengi veriyor renk secim addonu en altaki

en üsteki ise örnek nbr naber die yaziyor
ikiside input ayri ayri doslyar icindeler biri en usteki sciript5.ini de
en altaki ise renkcolors.mrc icinde yani iki input okudugu icin ayni yaziyi iki defa veriyor ornek verim nbr yaziyorum once naber yaziyor sonra nbr iksini birden yaizyor
nbr yazinca karsiya sadece naber gitmeli ama nbr ve nahaber seklide gidiyor..
Nbr
Nehaber.

 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 02:11   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




ıkı input eventinide kaldır bunu ekle kodları yeniledim her ikisinide sılmen gerekir yanlızca bu kodu ekle

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
On 1:input:*:{ if ($1- == op) { /cs Op # $me | halt } if ($1- == deop) { /mode # -o $me | halt } if ($1- == +) { /mode # +v $me | halt } if ($1- == -) { /mode # +v $me | halt } if ($1- == nbr) { say 4N6a14b2e4r12? | halt } if ($1- == ins) { say 4İ12N4Ş12A4L12L4A12H4 | halt } if ($1- == duy) { say 7[7,18,1- w7,1W7,1w7,1.14,1D7,1u8,1y4,1G11,1u9,1S3,1o8,1H6,1b5,1e13,1T7,1.10,1C11,1o4,1m11,1 -8,1] | halt } if ($1- == naber) { say 4N6a14b2e4r12? | halt } if ($1- == genç) { say 4Gencim 1Güzelim 4HızLıyım 1Bekarım 4Gördüğünüz 1Gibi 4Can Yakarım 1:))) | halt } if ($1- == çilek) { say 13MucKSsSsSsSsSsSsSs 7SaNa 3MucKSsSsSsSsSsSsSs 6CiLeK 12YaNaKLaRinDaN 13)) | halt } if ($1- == bal) { say 13MucKSsSsSsSsSsSsSs 7SaNa 3MucKSsSsSsSsSsSsSs 6BaL 12DuDaKLaRıNDaN 13)) | halt } if ($1- == naber?) { say 4N6a14b2e4r12? | halt } if ($1- == mrb) { say 4M2e5r3h6a13b1a | halt } if ($1- == :::) { say 12 4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:)4:)12:) ) | halt } if ($1- == s.a) { say 4S12e4L12å4m12u4N 4A12L4£12y4k12u4m | halt } if ($1- == w) { say 4W12å4L12L4å12H4å 4D12e 4H12e4l12e 4:12)4:12) | halt } if ($1- == valla) { say 4W12å4L12L4å12H4å | halt } if ($1- == byy) { say 4B12y4e12å4S12s4S12s4S 4B12y4e12å4S12s4S12s4S 4P12å4i 4P12å4i 4P12å4i 4P12å4i | halt } if ($1- == nasilsın) { say 12S2en 12Na4sılsın? | halt } if ($1- == a.s) { say 4A3L4e3Y4K3u4M 4S3e4L3å4M 4H3o4S3G4e3L4D3i4N3 .. | halt } if ($1- == s.a) { say 0,4 C* Selamun Aleykum C* | halt } if ($1- == :i) { say 6¶4,8:) | halt } if ($1- == ay) { say 4a7y10a12y12a13y4a7y10a12y12a13y4a7y10a12y12a13y | halt } if ($1- == canimmm) { say 4C12å4N12i4M12m4M12m4M12m4M12m4M12m4M 12B4å12L4i12M4m12M4m12M 12K4å12y4m12å4g12i4M12m4M | halt } if ($1- == s.s.g) { say 4S12e4N12i 4S12e4v12i4y12o4r12u4m12m4m 12G4ü12l4T12a4n12e4M | halt } if ($1- == bye) { say 4B7y4e1.14. | halt } if ($1- == oo ) { say 13:4o13)2) | halt } if ($1- == evet) { say 4E10v7e12t4. | halt } if (($left($1,1) != /) && (%foreground != none) && (%background != none) && ($active != Status Window)) { set %tg %bold $+ %underline $+ $+ %foreground $+ , $+ %background $+ $$1- | haltdef } if (($left($1,1) != /) && (%foreground != none) && (%background == none) && ($active != Status Window)) { set %tg %bold $+ %underline $+ $+ %foreground $+ , $+ 16 $+ $$1- | haltdef } if (($left($1,1) != /) && (%foreground == none) && (%background != none) && ($active != Status Window)) { set %tg %bold $+ %underline $+ $+ 16 $+ , $+ %background $+ $$1- | haltdef } if (($left($1,1) != /) && (%foreground == none) && (%background == none) && ($active != Status Window)) { set %tg %bold $+ %underline $+ $$1- | haltdef } if (/* iswm $1) { return } var %a 0, %b, %c while (%a < $numtok(%tg,32)) { inc %a %c = $gettok(%tg,%a,32) if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(4,%c,) } else { %b = %b %c } } if (!%b) { %b = $1- } echo -a %b halt } dialog color { title "Yazi Renk Format by absolut" size -1 -1 325 300 box "Normal Renkler", 3, 5 5 150 250 list 4, 22 23 110 230 button "Kapat", 1, 140 265 50 25, ok text "İnce", 9, 35 265 25 25 check "" 10, 60 265 15 15, check "" 11, 60 280 15 15, text "Alti çizgili", 8, 10 280 45 25 box "Arka Rengi Yazinin", 5, 170 5 150 250 list 6, 190 23 110 230 } on *:dialog:color:init:*: { /did -a color 4 None /did -a color 4 Beyaz /did -a color 4 Siyah /did -a color 4 Mavi /did -a color 4 Koyu Yeşil /did -a color 4 Kırmızı /did -a color 4 Kahve Rengi /did -a color 4 Mor /did -a color 4 Turuncu /did -a color 4 Sari /did -a color 4 Açık Yeşil /did -a color 4 Mavi Yeşil /did -a color 4 Açık Mavi /did -a color 4 Mavi /did -a color 4 Pembe /did -a color 4 Gri /did -a color 4 Açık Gri /did -ck color 4 %fgstatus /did -a color 6 Normal /did -a color 6 Beyaz /did -a color 6 Siyah /did -a color 6 Siyah Mavi /did -a color 6 Siyah Yeşil /did -a color 6 Kırmızı /did -a color 6 Kahve Rengi /did -a color 6 Mor /did -a color 6 Turuncu /did -a color 6 Sarı /did -a color 6 Yeşil /did -a color 6 Mavi Yeşil /did -a color 6 Açık Mavi /did -a color 6 Mavi /did -a color 6 Pembe /did -a color 6 Gri /did -a color 6 Açık Gri /did -ck color 6 %bgstatus if (%bold == ) { did -c color 10 } if (%underline == ) { did -c color 11 } } on *:dialog:color:sclick:10: { if ($did(color,10).state) { /set %bold  } else { /unset %bold } } on *:dialog:color:sclick:11: { if ($did(color,11).state) { /set %underline  } else { /unset %underline } } on *:dialog:color:sclick:13: { /set %color on /echo Text Changer turned on. } on *:dialog:color:sclick:15: { /unset %color /echo Text Changer turned off. } on *:dialog:color:sclick:1: { if ($did(color,4,1) != $null) { /write -c test.txt | /write test.txt $did(color,4,1) } if ($did(color,4,2) != $null) { /write test.txt $did(color,4,2) } if ($did(color,4,3) != $null) { /write test.txt $did(color,4,3) } } on *:dialog:color:sclick:4: { if ($did(color,4).sel == 1) { set %foreground none | set %fgstatus 01 } if ($did(color,4).sel == 2) { set %foreground 00 | set %fgstatus 02 } if ($did(color,4).sel == 3) { set %foreground 01 | set %fgstatus 03 } if ($did(color,4).sel == 4) { set %foreground 02 | set %fgstatus 04 } if ($did(color,4).sel == 5) { set %foreground 03 | set %fgstatus 05 } if ($did(color,4).sel == 6) { set %foreground 04 | set %fgstatus 06 } if ($did(color,4).sel == 7) { set %foreground 05 | set %fgstatus 07 } if ($did(color,4).sel == 8) { set %foreground 06 | set %fgstatus 08 } if ($did(color,4).sel == 9) { set %foreground 07 | set %fgstatus 09 } if ($did(color,4).sel == 10) { set %foreground 08 | set %fgstatus 10 } if ($did(color,4).sel == 11) { set %foreground 09 | set %fgstatus 11 } if ($did(color,4).sel == 12) { set %foreground 10 | set %fgstatus 12 } if ($did(color,4).sel == 13) { set %foreground 11 | set %fgstatus 13 } if ($did(color,4).sel == 14) { set %foreground 12 | set %fgstatus 14 } if ($did(color,4).sel == 15) { set %foreground 13 | set %fgstatus 15 } if ($did(color,4).sel == 16) { set %foreground 14 | set %fgstatus 16 } if ($did(color,4).sel == 17) { set %foreground 15 | set %fgstatus 17 } } on *:dialog:color:sclick:6: { if ($did(color,6).sel == 1) { set %background none | set %bgstatus 01 } if ($did(color,6).sel == 2) { set %background 00 | set %bgstatus 02 } if ($did(color,6).sel == 3) { set %background 01 | set %bgstatus 03 } if ($did(color,6).sel == 4) { set %background 02 | set %bgstatus 04 } if ($did(color,6).sel == 5) { set %background 03 | set %bgstatus 05 } if ($did(color,6).sel == 6) { set %background 04 | set %bgstatus 06 } if ($did(color,6).sel == 7) { set %background 05 | set %bgstatus 07 } if ($did(color,6).sel == 8) { set %background 06 | set %bgstatus 08 } if ($did(color,6).sel == 9) { set %background 07 | set %bgstatus 09 } if ($did(color,6).sel == 10) { set %background 08 | set %bgstatus 10 } if ($did(color,6).sel == 11) { set %background 09 | set %bgstatus 11 } if ($did(color,6).sel == 12) { set %background 10 | set %bgstatus 12 } if ($did(color,6).sel == 13) { set %background 11 | set %bgstatus 13 } if ($did(color,6).sel == 14) { set %background 12 | set %bgstatus 14 } if ($did(color,6).sel == 15) { set %background 13 | set %bgstatus 15 } if ($did(color,6).sel == 16) { set %background 14 | set %bgstatus 16 } if ($did(color,6).sel == 17) { set %background 15 | set %bgstatus 17 } } alias df { set %foreground none set %background none set %fgstatus 01 set %bgstatus 01 } alias renkleriac { dialog -m color color }


 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 18:55   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




alphae Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bahsetiginiz sekilde renk calismiyor hocam usteki olan ornek sa yaziyi buyuten..

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*:{ var %a 0, %b, %c while (%a < $numtok($1-,32)) { inc %a %c = $gettok($1-,%a,32) if ($remove(%c,!,?,:,;,.,$chr(44),?) ison #) { %b = $iif(%b,%b) $+(  %c  ) } else { %b = %b %c } } if (!%b) { %b = $1- } say %b halt }

bunla yer değiştir alttaki paneli ; Not : (4,%c,) '' %c '' Arasında Renk Kodunu boşluk bırak, Virülü sildinmi işlem düzelir.

__________________
kS.-.cMGz
 
Alıntı ile Cevapla

Alt 08 Ağustos 2012, 22:20   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




sorun iki adet input calismastirmasi cozdum daha farkli bir yontem ile..

 
Alıntı ile Cevapla

Alt 09 Ağustos 2012, 18:44   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: ayni yazi iki defa cikiyor yardım..




Afferim ; bize bu bilgiyi paylaştıgın ıcın tşk ederim.
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
kS.-.cMGz
 
Alıntı ile Cevapla

Cevapla

Etiketler
ayni, cikiyor, defa, iki, yardım, yazi


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Yeni hürrem bu akşam ekrana çikiyor Zen Yerli Diziler 0 19 Haziran 2013 11:23
Sular Çekİldİkce cesetler Çikiyor. Ruj Haber Arşivi 2 21 Mart 2011 17:44
Yardım! Yazi Stili Kodunda Hata Nothinq mIRC Scripting Sorunları 3 16 Ekim 2010 11:56