SCREEN 9 FOR Y = 1 TO 320 FOR X = 1 TO 320 IF X = 1 OR X = 2 OR X = 319 OR X = 320 OR Y = 1 OR Y = 2 OR Y = 319 OR Y = 320 THEN PSET (X - 1, Y - 1), 1 ELSE IF X = Y OR X - Y = 1 OR Y - X = 1 OR 319 - X = Y OR 319 - Y = X OR 320 - X = Y OR 320 - Y = X OR 321 - X = Y OR 321 - Y = X OR X = 3 OR X = 4 OR X = 5 OR X = 6 OR X = 7 OR X = 8 OR Y = 3 OR Y = 4 OR Y = 5 OR Y = 6 OR Y = 7 OR Y = 8 OR X = 313 OR X = 314 OR X = 315 OR X = 316 OR X = 317 OR X = 318 OR Y = 313 OR Y = 314 OR Y = 315 OR Y = 316 OR Y = 317 OR Y = 318 THEN PSET (X - 1, Y - 1), 4 ELSE PSET (X - 1, Y - 1), 15 LOCATE 23, 41 PRINT USING "&###.#####&"; " ("; (320 * (Y - 1) + (X - 1)) / 1024; "% complete ) " NEXT X LOCATE 22, 41 PRINT " "; Y / 3.2; "% complete " NEXT Y