home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 63 / CDACTUAL63.iso / Aplicaciones / DarkBasic / DemoDarkBasic.exe / help / examples / basic3d / exam11.dba < prev    next >
Encoding:
Text File  |  1999-12-08  |  665 b   |  30 lines

  1. Rem * Title  : Using Meshes
  2. Rem * Author : DBS-LB
  3. Rem * Date   : 1st Sept 99
  4. rem ============================================
  5. rem DARK BASIC EXAMPLE PROGRAM 11
  6. rem ============================================
  7. rem This program demonstrates using meshes
  8. rem --------------------------------------------
  9.  
  10. rem Load your object
  11. load object "walk.x",1
  12.  
  13. rem Make a mesh from the object
  14. make mesh from object 1,1
  15.  
  16. rem Delete object
  17. delete object 1
  18.  
  19. rem Make new object from mesh
  20. make object 2,1,0
  21.  
  22. rem Show User
  23. while inkey$()="" : xrotate object 2,object angle x(2)+1 : endwhile
  24.  
  25. rem Delete new object
  26. delete object 2
  27.  
  28. rem End the program
  29. end
  30.