drawpoly.bmx 258 B

123456789101112131415
  1. ' drawpoly.bmx
  2. ' draws a simple triangle using the
  3. ' DrawPoly command and an array of
  4. ' floats listed as 3 pairs of x,y
  5. ' coordinates
  6. Local tri#[]=[0.0,0.0,100.0,100.0,0.0,100.0]
  7. Graphics 640,480
  8. While Not KeyHit(KEY_ESCAPE)
  9. Cls
  10. DrawPoly tri
  11. Flip
  12. Wend