*for i 1 to found
 *get next
 *plot
 *write
 *next