; Editbox History Overview ; http://dev.adiirc.com/boards/5/topics/584 ; v0.2 by pereba alias EditboxHistory { if ($dialog(EditboxHistory)) dialog -x EditboxHistory dialog -ma EditboxHistory EditboxHistory } menu status,channel,query { - Editbox History: /EditboxHistory - } dialog EditboxHistory { title "Editbox History" size -1 -1 200 160 option dbu text "Filter", 6, 135 2 12 8 edit "", 4, 149 1 50 9 list 11, -1 11 202 90, size hide list 1, -1 11 202 90, size edit "", 2, -1 100 202 45, read multi vsbar button "Copy", 3, 0 145 200 15, disable flat tab "$active ( $+ $editboxhistory($active,0) $+ )", 5, 0 0 99 47 } on *:DIALOG:EditboxHistory:*:*: { if ($devent == init) { var %i $editboxhistory($active,0) while (%i) { did -a $dname 1 $editboxhistory($active,%i) dec %i } } ; Filter field if ($devent == edit && $did == 4) { if ($did($dname,$did) == $null) { did -h $dname 11 | did -v $dname 1 | did -r $dname 2 return } filter -ioc $dname 1 $dname 11 * $+ $did($dname,$did) $+ * did -v $dname 11 | did -h $dname 1 } if ($devent == sclick) { ; List item if ($did == 1 || $did == 11) { did -e $dname 3 did -ra $dname 2 $replace($did($dname,$did).seltext,$chr(13),$crlf) } ; Copy button if ($did($dname,2).lines && $did == 3) { clipboard filter -ikr 1- $dname 2 _copyline } } } alias -l _copyline { clipboard -an $1 }