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

 Kayıt ol  Topluluk
1Beğeni(ler)

Yeni Konu aç Cevapla
Sayfa 1 Toplam 2 Sayfadan 1 2
 
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,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 }
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 C* Selamun 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 -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  }
 
}
 
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ı reklam ver Benimmekan Mobil 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
Sayfa 1 Toplam 2 Sayfadan 1 2

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

« önceki Konu | sonraki Konu »

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
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
DTP ve Apo Ayni karade :@ Gravity Haber Arşivi 2 06 Şubat 2008 20:26




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
yavru köpek sohbet instagram takipçi sohbet teması yetişkin sohbet
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

mimarsinanokullari.com mjsanaokulu.com eburke.org