home *** CD-ROM | disk | FTP | other *** search
/ norge.freeshell.org (192.94.73.8) / 192.94.73.8.tar / 192.94.73.8 / pub / computers / pcjr / graphics / DC-25C.LZH / DEMO1.SUB < prev    next >
Text File  |  1990-10-04  |  2KB  |  54 lines
  1. ; START DEMO1.SUB this goes with DEMO1.MAC for DANCAD3D v2.5x
  2. ; Copyright (c) 1990 by Daniel H. Hudgins.  All rights reserved.
  3.  
  4. TEXT  ; Clear the screen
  5.  
  6. ECHO ┌─────────────────────────────────────────────────────────────────────────────┐
  7. ECHO │         DEMO1.MAC DEMONSTRATION MACRO FOR DANCAD3D v2.5x OR LATER.          │
  8. ECHO └─────────────────────────────────────────────────────────────────────────────┘
  9. LOCATE 1 5
  10. ECHO     This macro creates a series of pixel frame files that form a frame sequence
  11. ECHO for the animation of a piston,  rod,  and  crank  shaft.  DANCAD3D  macros  are
  12. ECHO scripting  files  of  common  ASCII  format  text,  and can be created with the
  13. ECHO internal text editor,  Write from the main menu,  or any pure ASCII text editor
  14. ECHO or  word  processor.  The  macro  commands  correspond  to the menu commands in
  15. ECHO DANCAD3D, for instance, Rotate in the menu is ROTATE in the macro code.
  16. LOCATE 1 12
  17. ECHO     The macro begins by setting up a quick loading elements file  set  that  is
  18. ECHO loaded  automatically  by  the LOAD command in the main animation loop in macro
  19. ECHO DEMO1.MAC.  The RUN macro command in macro DEMO1.MAC allows DANCAD3D macros  to
  20. ECHO automatically  run  sub-macros  (subroutines),  in  this  case  the  file named
  21. ECHO DEMO1.SUB.
  22. LOCATE 1 18
  23. ECHO     The main loop of the macro  takes  advantage  of  DANCAD3D's  comprehensive
  24. ECHO kernel of mathematical functions.  DANCAD3D macro language allows for variables
  25. ECHO to  be used to hold and calculate values that can be entered automatically into
  26. ECHO any of DANCAD3D's commands that operate on  elements  of  the  drawing  in  the
  27. ECHO workspace.  The  ANIMATE  command  at the end of the macro loads the pixel file
  28. ECHO set and displays the frames on the computer screen.
  29.  
  30. LOCATE 1 25 ECHO        <<< Read the above information while the program is working... >>>   %%
  31.  
  32. { Set up quick loading set of elements. }
  33.  
  34. INITIALIZE ; Clear the workspace.
  35. LOAD ASCII DEMO1A.ASC
  36. LOAD ASCII DEMO1B.ASC
  37. LOAD ASCII DEMO1C.ASC
  38. SAVE ELEMENTS DEMO1.3DE
  39.  
  40. BEEP
  41.  
  42. LOCATE 1 25 ECHO      Press the [Return] key when finished reading the above information.    %%
  43.  
  44. WAIT  ; Wait for [Return] or [Mouse-Left] button to be pressed.
  45.  
  46. LOCATE 1 25 ECHO              <<< Working: Macro now running, please stand by... >>>         %%
  47.  
  48. ; END DEMO1.SUB
  49.  
  50.  
  51.  
  52.  
  53.  
  54.