#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) 
}