Red[] repeat i 5 [ loop i [prin "*"] prin newline ]