menu channel,query {
$iif((!$cb),$style(2)) msg clipboard content to $active $iif(($cb(1)),$+([lines,$chr(58) $cb(0),])) : {
var %nr = 1
while ($cb(%nr)) { msg $active $v1 ABCDEF | inc %nr }
}
}
With the $cb identifier you can:
- return whether or not there's something in the clipboard at all : if ($cb)
- return how manly $crlf delimited lines the clipboard holds: $cb(0)
- return single lines of the clipboard content: $cb(N)