var !getWindow RSHPOS @
var !LeftX PART(|$!getWindow|,2)
var !RightX PART(|$!getWindow|,6)
var !LeftY part(|$!getWindow|,4)
var !RightY part(|$!getWindow|,8)
if (($!LeftX) GT ($!RightX)) then
var !TMP |$!LeftX|
var !LeftX |$!RightX|
var !RightX |$!TMP|
endif
if (($!LeftY) gt ($!RightY)) then
var !TMP |$!LeftY|
var !LeftY |$!RightY|
var !RightY |$!TMP|
endif
ENHANCE ALL (GLAB SLAB) WITH (xyps[1] GE ($!LeftX) AND xyps[1] LE ($!RightX) AND xyps[2] GE ($!LeftY) AND xyps[2] LE ($!RightY)) FOR VIEW
VAR !getEnhanced SPLIT ENHANCE
SPREAD LOCAL SELECT ALL FROM !getEnhanced