tutorial/group3/09.bas

   1 SCREEN 13\r
   2 \r
   3 pi = 3.14\r
   4 mi = 7       ' amount of points on circular shape\r
   5 \r
   6 FOR a = 0 TO pi * 2 STEP pi * 2 / mi\r
   7 \r
   8   x = SIN(a) * 50 + 100\r
   9   y = COS(a) * 50 + 100\r
  10   PSET (x, y), 10\r
  11 \r
  12 NEXT a\r
  13 \r