/////////////////////////////////////////////////////////////////////
// MINIPRINT SAMPLE
/////////////////////////////////////////////////////////////////////

      SELECT PRINTER DEFAULT
      START PRINTDOC
         FOR i := 1 TO 10
            START PRINTPAGE
               @ 10,10 PRINT "Page" + STR( i )
            END PRINTPAGE
         NEXT i
      END PRINTDOC