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 Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/1023835-tab-harf-sectiginizde-sectiginiz-harflerle-baslayan-nickleri-listeler.html)

manikdepresif 15 Aralık 2023 16:16

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] nasil bi sey istiyorsun ? Acikca detayli sekilde yazabilirsen yardimci olmaya calisayim.

Toprak 15 Aralık 2023 16:37

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
İstediği şey editbox kısmında göstersin nicki; /editbox MESAJ olarak düzeltebilirsin.

manikdepresif 15 Aralık 2023 19:12

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
istedigi kod ilgimi cekti.
Sag tik yaparak menu'den acip kapatilabilir.

Kod:

#coklutab off
on 1:TABCOMP:#: { if !$istok(%tab,$1-,32) { set %tab %tab $1- | tabtus } | .timertab -m 1 400  tabver }
#coklutab end
alias -l tabver {  editbox  %tab |  unset %tab }
alias -l tabtus { .comopen scrll WScript.Shell  | noop $com(scrll,sendkeys,1,bstr,{TAB})  | .comclose scrll }
menu channel {
  Coklu Tablama $iif($group(#coklutab).status == on,KAPAT,AC)): $iif($group(#coklutab).status == off,.enable #coklutab,.disable #coklutab)
}

Not: Eger ayarlardan com komutlarini pasiflestirmisseniz kod calismaz.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:35 -->-> Daha önceki mesaj 18:02 --

Cumle icinde tablama yaparsaniz sorun cikarabilir bu kodla bilginize ona ayar cekmeye calisicam.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:36 -->-> Daha önceki mesaj 18:35 --

Ornek: selam a (TAB) gibi

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 19:05 -->-> Daha önceki mesaj 18:36 --

Duzelttim son hali asagidadir.
Kod:

#coklutab on
on 1:TABCOMP:#: { if ($0 > 1) { set  %_pretab $gettok($1-,$+(1,-,$calc($0 - 1)),32) }
  var %s_ = $eval($+($,$0),2)
if !$istok(%tab,%s_ ,32) { set %tab %tab %s_  | tabtus } | .timertab -m 1 300  tabver }
#coklutab end
alias -l tabver {  editbox  %_pretab %tab | unset %tab %_pretab  }
alias -l tabtus { .comopen scrll WScript.Shell  | noop $com(scrll,sendkeys,1,bstr,{TAB})  | .comclose scrll }
menu channel {
  Coklu Tablama $iif($group(#coklutab).status == on,KAPAT,AC)): $iif($group(#coklutab).status == off,.enable #coklutab,.disable #coklutab)
}



--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 19:12 -->-> Daha önceki mesaj 19:05 --

Kullanim ornekleri
: s + TABTUSU -> "s" nicki ile baslayan tum kullaniciklari editbox satirina doldurur
: *a + TABTUSU -> sonu "a" ile biten nickleri editbox satirina doldurur.
: *e* + TABTUSU -> icinde "e" gecen nickleri editbox satirina doldurur.

ZaLiM1979 15 Aralık 2023 19:21

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
Alıntı:

manikdepresif Nickli Üyeden Alıntı (Mesaj 1042848785)
istedigi kod ilgimi cekti.
Sag tik yaparak menu'den acip kapatilabilir.

Kod:

#coklutab off
on 1:TABCOMP:#: { if !$istok(%tab,$1-,32) { set %tab %tab $1- | tabtus } | .timertab -m 1 400  tabver }
#coklutab end
alias -l tabver {  editbox  %tab |  unset %tab }
alias -l tabtus { .comopen scrll WScript.Shell  | noop $com(scrll,sendkeys,1,bstr,{TAB})  | .comclose scrll }
menu channel {
  Coklu Tablama $iif($group(#coklutab).status == on,KAPAT,AC)): $iif($group(#coklutab).status == off,.enable #coklutab,.disable #coklutab)
}

Not: Eger ayarlardan com komutlarini pasiflestirmisseniz kod calismaz.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:35 -->-> Daha önceki mesaj 18:02 --

Cumle icinde tablama yaparsaniz sorun cikarabilir bu kodla bilginize ona ayar cekmeye calisicam.

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 18:36 -->-> Daha önceki mesaj 18:35 --

Ornek: selam a (TAB) gibi

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 19:05 -->-> Daha önceki mesaj 18:36 --

Duzelttim son hali asagidadir.
Kod:

#coklutab on
on 1:TABCOMP:#: { if ($0 > 1) { set  %_pretab $gettok($1-,$+(1,-,$calc($0 - 1)),32) }
  var %s_ = $eval($+($,$0),2)
if !$istok(%tab,%s_ ,32) { set %tab %tab %s_  | tabtus } | .timertab -m 1 300  tabver }
#coklutab end
alias -l tabver {  editbox  %_pretab %tab | unset %tab %_pretab  }
alias -l tabtus { .comopen scrll WScript.Shell  | noop $com(scrll,sendkeys,1,bstr,{TAB})  | .comclose scrll }
menu channel {
  Coklu Tablama $iif($group(#coklutab).status == on,KAPAT,AC)): $iif($group(#coklutab).status == off,.enable #coklutab,.disable #coklutab)
}



--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 19:12 -->-> Daha önceki mesaj 19:05 --

Kullanim ornekleri
: s + TABTUSU -> "s" nicki ile baslayan tum kullaniciklari editbox satirina doldurur
: *a + TABTUSU -> sonu "a" ile biten nickleri editbox satirina doldurur.
: *e* + TABTUSU -> icinde "e" gecen nickleri editbox satirina doldurur.


altdaki kod güzel, ama belirtilen tüm nickleri arkaarka degilde teker teker editboxa yazmasi mümkün degilmi? normal mircde nickin ilk harfe ve tab tiklandiginda ilk harfle baslayan nickleri teker teker editboxa yazdigi gibi.. umarim dogru anlattim.

manikdepresif 15 Aralık 2023 19:34

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
benim kafamdaki kod bu. Senin aradigini ornekle gosterir misin editbox satirinda resim atip ?

ZaLiM1979 15 Aralık 2023 19:59

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
Alıntı:

manikdepresif Nickli Üyeden Alıntı (Mesaj 1042848805)
benim kafamdaki kod bu. Senin aradigini ornekle gosterir misin editbox satirinda resim atip ?


Hareketli Resim oldugu icin bildigim siteye yükledim.


Link: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


görüldügü gib Nickin ilk harfini yazdigim ve tabladigim zaman eger o harf ile 1den fazla nick varsa, hepsini yaziyor editbox'a. Benim istedigim hepsini birden degilde teker teker yazsin editbox'a. Umarim anlatabilmisimdir.


*s* yaptigimdada aynisi oluyor. denemedim ama sanirim *s gibi son harfden yaparsakda aynisi oluyor.



Tsk'ler ve saygilar.

manikdepresif 15 Aralık 2023 20:13

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] alt alta mi yazsin yani nickleri onu mu istiyorsun ?

ZaLiM1979 15 Aralık 2023 20:17

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
Alıntı:

manikdepresif Nickli Üyeden Alıntı (Mesaj 1042848811)
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] alt alta mi yazsin yani nickleri onu mu istiyorsun ?


Yok 1'den fazla nick varsa ayni kriterlere uyan teker teker yazsin editbox'a. Hepsini birden degil. Misal: 3 nick var son harfi T olan Ahmet, mehmet ve cevat. ben ilk taba bastigimda önce birini göztersin, sonra bidaha tablayinca 2nci nicki ve bidaha tabladigimda 3ncü nicki göztersin.
Anlatabildim umarim?


Tsk'ler ve saygilar.

OperServ 15 Aralık 2023 20:48

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
Alıntı:

ZaLiM1979 Nickli Üyeden Alıntı (Mesaj 1042848812)
Yok 1'den fazla nick varsa ayni kriterlere uyan teker teker yazsin editbox'a. Hepsini birden degil. Misal: 3 nick var son harfi T olan Ahmet, mehmet ve cevat. ben ilk taba bastigimda önce birini göztersin, sonra bidaha tablayinca 2nci nicki ve bidaha tabladigimda 3ncü nicki göztersin.
Anlatabildim umarim?


Tsk'ler ve saygilar.

Kod:

on 1:TABCOMP:#: {
  if ($0 > 1) {
    set %_pretab $gettok($1-,$+(1,-,$calc($0 - 1)),32)
  }
  var %s_ = $eval($+($,$0),2)
  if !$istok(%tab,%s_ ,32) {
    set %tab %tab %s_
    tabtus
  }
  .timertab -m 1 300 tabver
}
alias -l tabver {
  var %nextnick = $gettok(%tab,1,32)
  editbox %_pretab %nextnick
  var %newtab = $gettok(%tab,2-,-1)
  unset %tab
  if (%newtab) {
    set %tab %newtab
  }
}
alias -l tabtus {
  .comopen scrll WScript.Shell
  noop $com(scrll,sendkeys,1,bstr,{TAB})
  .comclose scrll
}
menu channel {
  Coklu Tablama $iif($group(#coklutab).status == on,KAPAT,AC)): $iif($group(#coklutab).status == off,.enable #coklutab,.disable #coklutab)
}

Bu kod, her tab tuşuna bastığınızda, sırayla kriterlere uyan nickleri editbox'a yazacak..

İlk tab bastığınızda bir nick gösterecek, bir sonraki tab tuşuna bastığınızda bir sonraki nicki gösterecek ve bu şekilde devam edecektir

manikdepresif 15 Aralık 2023 20:56

Cevap: Tab Harf Seçtiğinizde Seçtiğiniz Harflerle Başlayan Nickleri Listeler
 
Kod'a gerek yok bunun icin zaten TAB tusuna bastiginda tek tek gosteriyor.
-
Bu arada nickleri editboxda coklu olarak alt alt yazdirmak istiyorsan da asagida ki kod isini gorecektir.

Kod:

#coklutab on
on 1:TABCOMP:#: {
  if ($0 > 1) { set  %_pretab $gettok($1-,$+(1,-,$calc($0 - 1)),32) }
  var %s_ = $eval($+($,$0),2)
  if !$istok(%tab,%s_ ,32) { set %tab %tab %s_  | tabtus }
  .timertab -m 1 300  tabver
}
#coklutab end
alias -l tabver {  tokenize 32  %_pretab %tab | clipboard  | edityaz $* | editbox $active | ctrlv  }
alias -l edityaz { clipboard -a $1  $crlf  |  unset %tab %_pretab }
alias -l tabtus { .comopen scrll WScript.Shell  | noop $com(scrll,sendkeys,1,bstr,{TAB})  | .comclose scrll }
alias -l ctrlv {  .comopen scrll WScript.Shell  | noop $com(scrll,sendkeys,1,bstr,^V)  | .comclose scrll }
menu channel {
  Coklu Tablama $iif($group(#coklutab).status == on,KAPAT,AC)): $iif($group(#coklutab).status == off,.enable #coklutab,.disable #coklutab)
}



--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 20:56 -->-> Daha önceki mesaj 20:50 --

Alıntı:

Bu kod, her tab tuşuna bastığınızda, sırayla kriterlere uyan nickleri editbox'a yazacak..

İlk tab bastığınızda bir nick gösterecek, bir sonraki tab tuşuna bastığınızda bir sonraki nicki gösterecek ve bu şekilde devam edecektir
ikinci taba basmasina gerek yok ki , tek seferde tum tab uyusmalarini gosterip editbox'a yan yana yazdiriyor..
Son verdigim ise alt alta yazdiriyor.
Kim ne kullanacaksa tercih kullanan kisiye kalmis.


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

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk