LOCAL lnlast, lnstart, lni, lcresult lnlast = PROGRAM(-1) IF lnlast > 3 lnstart = lnlast - 2 ELSE lnstart = 1 ENDIF lcresult = "" FOR lni = lnlast TO lnstart STEP -1 lcresult = lcresult + PROGRAM(lni) + CHR(13) NEXT = MESSAGEBOX(lcresult, 64, "Trace")