eh you could probably use an alias with a while loop like:
alias blah { var %i = 1 var %end = $did(dialog,1).lines var %results while (%i <= %end) { var %results = %results $did(dialog,1,%i).text inc %i } set %var %results }
We don't just write the scripts, we put them to the test! (ScriptBusters)