code:

$index = 0
$groups = ""
$cr = chr(13)+chr(10)

do
$groups = $groups + enumgroup($index) + $cr
$index = $index + 1
until enumgroup($index) = ""

? $groups