TFormNormal.bb 450 B

1234567891011121314151617181920
  1. ; TFormNormal example
  2. Graphics3D 640, 480
  3. ; Just a quick demonstration of the 'normalization' feature.
  4. TFormNormal 1,2,2, 0,0 ; transform from world to world
  5. ; The transformation from world to world does nothing.
  6. ; But afterward the vector (1,2,2) is divided by the length 3.
  7. message$ = "The normalized vector is ( "
  8. message = message + TFormedX() + ", " + TFormedY() + ", " + TFormedZ() + " )"
  9. Text 70, 180, message
  10. Flip
  11. WaitKey()
  12. End