Extracting text from clipboard

[Gintaras]

Macro Macro471

Code:

Copy      Help

;set clipboard text for testing
str s1=
;...
;... start
;A contract ...
;...
;... start B contract ...
;...
;... start C contract ...

s1.setclip

;--------------

;macro

str s.getclip
if(s.len=0) ret

ARRAY(str) a; int i
findrx(s "(?s)\bstart\b.+?\bcontract\b" 0 4 a)
;remove (?s) if text between start and contract cannot be multiline

;results
for i 0 a.len
,out a[0 i]