istedigi kod ilgimi cekti.
Sag tik yaparak menu'den acip kapatilabilir.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
#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: Kodu kopyalamak için üzerine çift tıklayın!
#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.