home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2003 November / PCWK1103B.iso / DesignCAD 3D Max PLUS trial 30 / DATA1.CAB / Example_Files / Sample_Macros / String One.d3m < prev    next >
Encoding:
Text File  |  2003-09-29  |  767 b   |  25 lines
  1.  
  2. sys(130)=-10                'X placement of input box
  3. sys(131)=-10                'Y placement of input box
  4. input "Enter the String." str$    'allows user input into dist
  5. sys(130)=-10                'X placement of input box
  6. sys(131)=-10                'Y placement of input box
  7. input "Enter the First Number." x1    'allows user input into dist
  8. sys(130)=-10                'X placement of input box
  9. sys(131)=-10                'Y placement of input box
  10. input "Enter the Second Number." x2    'allows user input into dist
  11. sys(130)=-10                'X placement of input box
  12. sys(131)=-10                'Y placement of input box
  13. input "Enter the Third Number." x3    'allows user input into dist
  14. y1$=x1
  15. y2$=x2
  16. y3$=x3
  17. open "o", 1, "steve.txt"
  18. print #1, str$;  
  19. print #1, ",";
  20. print #1, y1$;
  21. print #1, ",";
  22. print #1, y2$;
  23. print #1, ",";
  24. print #1, y3$
  25.