; DEMO3.MAC, Macro demo for DANCAD3D v2.5x release version ; Copyright (c) 1990, Daniel H. Hudgins, All rights reserved. ; Other macro files come with the registered user outfit. ; Write to: DANCAD3D, 466 Diamond St., San Francisco, CA 94114, USA. ; Begin set up INIT ; clear DANCAD3D's workspace WORLD 240 ; set world scale to inches ; End Set up TEXT_MODE ECHO 旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� ECHO � DEMO3.MAC DEMONSTRATION MACRO FOR DANCAD3D v2.5x OR LATER. � ECHO 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� LOCATE 1 5 ECHO This DEMO macro shows you some of the types of shapes that can be drawn ECHO with DANCAD3D. Almost any type of mechanical drawing that can be done with ECHO DANCAD3D. Additionally DANCAD3D can be used to draw tool paths for DANCAM and ECHO DANPLOT to manufacture or automate. DANCAD3D's workspace is virtually ECHO boundless and points can be positioned in the workspace to tremendous accuracy ECHO (much better than one millionth of an inch.) You can make very accurate ECHO drawings with DANCAD3D. You can freely mix 2D and 3D drawing components in ECHO DANCAD3D drawings. To draw with DANCAD3D you just move the drawing cursor to ECHO any point in the workspace, press the [Right] mouse button, move the cursor to ECHO the end point for the line segment you want to draw and press the [Left] mouse ECHO button! LOCATE 1 17 ECHO This demo has several parts. You should read the messages that come on ECHO then screen and press the [Return] key when you are finished reading the ECHO messages. INITIALIZE_WORKSPACE BEGIN_CUBE { Element 1 } APPEND_LINE -0.5 -0.5 -0.5 0.5 -0.5 -0.5 1 1 0 0 APPEND_LINE 0.5 -0.5 -0.5 0.5 0.5 -0.5 1 1 0 0 APPEND_LINE 0.5 0.5 -0.5 -0.5 0.5 -0.5 1 1 0 0 APPEND_LINE -0.5 0.5 -0.5 -0.5 -0.5 -0.5 1 1 0 0 APPEND_LINE -0.5 -0.5 0.5 0.5 -0.5 0.5 1 1 0 0 APPEND_LINE 0.5 -0.5 0.5 0.5 0.5 0.5 1 1 0 0 APPEND_LINE 0.5 0.5 0.5 -0.5 0.5 0.5 1 1 0 0 APPEND_LINE -0.5 0.5 0.5 -0.5 -0.5 0.5 1 1 0 0 APPEND_LINE -0.5 -0.5 -0.5 -0.5 -0.5 0.5 1 1 0 0 APPEND_LINE -0.5 0.5 -0.5 -0.5 0.5 0.5 1 1 0 0 APPEND_LINE 0.5 -0.5 -0.5 0.5 -0.5 0.5 1 1 0 0 APPEND_LINE 0.5 0.5 -0.5 0.5 0.5 0.5 1 1 0 0 { End CUBE } # 1 CENTER_FOR_CUBE 0.5 0.5 0.5 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO DANCAD3D can display the line segments in the workspace several different ECHO ways on the screen. Flat on like here. # 0 DISPLAY 0 0 0 -1.000E+18 480 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO With Rotation to show all the sides. # 0 DISPLAY -20 -20 0 -1.000E+18 480 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO Or with exaggerated perspective to show depth better. You can even ANIMATE ECHO the display with the Main Menu [P]review command to get an even better feel for ECHO the shape of the objects in the workspace. When you press [Return] the screen ECHO will redraw ten times then animate continuously. To continue the DEMO3 you ECHO will need to press [Return] then [Q] (for Quit) to quit the ANIMATE command. # 0 DISPLAY -20 -20 0 -2 480 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 1 # 0 DISPLAY -20 -20 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.1 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 2 # 0 DISPLAY -20 -11 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.2 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 3 # 0 DISPLAY -20 -2 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.3 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 4 # 0 DISPLAY -20 7 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.4 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 5 # 0 DISPLAY -20 16 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.5 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 6 # 0 DISPLAY -20 25 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.6 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 7 # 0 DISPLAY -20 34 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.7 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 8 # 0 DISPLAY -20 43 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.8 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 9 # 0 DISPLAY -20 52 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.9 GRAPH_MODE B&W LOCATE 1 1 ECHO PIXEL FRAME: 10 # 0 DISPLAY -20 61 0 -2 480 1 0 0 SAVE PIXEL PIX\DEMO3.10 GRAPH_MODE B&W ANIMATE PIX\DEMO3 40 INITIALIZE ; polygon curve part GRAPH_MODE B&W LOCATE 1 1 ECHO Since all drawing elements in DANCAD3D are made from line segments the ECHO polygon command is used to approximate circles and similar round shapes. ECHO Having DANCAD3D only manipulate the end points of line segments allows DANCAD3D ECHO to deal with complex three dimensional forms and makes the program flexible and ECHO adaptable to any line drawing purpose. POLYGON 6 6 2 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 240 1 0 0.6 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO By using a lager number of sides polygons can look like circles. As a ECHO practical mater this is standard practice in computer graphics, and works well ECHO if you use more sides for larger circles. DANCAD3D lets you decide on the ECHO resolution you want the circles to have. POLYGON 72 72 2 1 1 0 0 { This is element 2 } # 0 DISPLAY 0 0 0 1E18 240 1 0 0.5 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO The MAGNIFY command can be used to squash or stretch "circles". # 2 MAGNIFY C 1 0.5 1 # 2 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO The ROTATE command can be used to rotate a squashed or stretched "circle" ECHO to any angle you may need. # 2 CENTER_ON_POINT 0 0 0 # 2 ROTATE C 0 0 45 # 2 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO The WINDOW command can chop part of any element off so you can use part of ECHO an element is some special way. # 2 WINDOW_ELEMENT 5000 0 -2 0 2 2.5 0 # 3 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO The COPY and FLIP element commands are used here to mirror the windowed ECHO part of the magnified and rotated element. # 3 COPY_ELEMENT_IN_WORKSPACE # 4 FLIP C X JOIN_TWO_ELEMENTS 3 4 # 3 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO The two halves of the heart can be made into one element and then windowed ECHO again to make a new shape. # 3 WINDOW_ELEMENT 5000 -2.2 0 0 1.9 -1.9 0 # 4 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO And you can COPY and FLIP (this time the Y axis in place of the X axis) the ECHO windowed element to make still another shape. # 4 COPY_ELEMENT_IN_WORKSPACE # 5 OFFSET CURRENT 0 0 0 # 5 FLIP C Y JOIN_TWO_ELEMENTS 4 5 # 4 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO You can COPY, ROTATE, and JOIN the new shape to make a compound form. # 4 ROTATE C 0 0 45 # 4 COPY_ELEMENT_IN_WORKSPACE # 5 OFFSET CURRENT 0 0 0 # 5 ROTATE C 0 0 45 JOIN_TWO_ELEMENTS 4 5 # 4 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO You can continue to copy, rotate and join elements to approximate any form ECHO of line segments you can imagine. # 4 COPY_ELEMENT_IN_WORKSPACE # 5 OFFSET CURRENT 0 0 0 # 5 ROTATE C 0 0 22.5 JOIN_TWO_ELEMENTS 4 5 # 4 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT ; Fit curve part INITIALIZE GRAPH_MODE B&W LOCATE 1 1 ECHO DANCAD3D's FIT_CURVE command can make a smooth curve from a roughly drawn ECHO curve. Here you see the roughly drawn curve. BEGIN APPEND -2.1 0 0 -1.4 -1.2 0 1 1 0 0 APPEND -1.4 -1.2 0 -0.1 -1.2 0 1 1 0 0 APPEND -0.1 -1.2 0 0.5 0 0 1 1 0 0 APPEND 0.5 0 0 0.5 1.2 0 1 1 0 0 APPEND 0.5 1.2 0 1.5 1.5 0 1 1 0 0 APPEND 1.5 1.5 0 1.8 0.4 0 1 1 0 0 APPEND 1.8 0.4 0 1.2 -0.8 0 1 1 0 0 APPEND 1.2 -0.8 0 -0.2 -0.8 0 1 1 0 0 APPEND -0.2 -0.8 0 -0.7 0.2 0 1 1 0 0 APPEND -0.7 0.2 0 0.9 0.5 0 1 1 0 0 APPEND 0.9 0.5 0 1.9 -0.4 0 1 1 0 0 APPEND 1.9 -0.4 0 1.9 -1.5 0 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO Next you see that the new element of the smooth curve makes the smooth ECHO curve pass through all of the end points of the roughly drawn curve. # 1 CURVE_FIT 4 0.2 # 0 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO If the smooth curve element looks correct you can erase the roughly drawn ECHO curve element from the workspace, so that the smooth curve is un-obscured. # 1 ERASE_ELEMENT # 0 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INITIALIZE_WORKSPACE GRAPH_MODE B&W LOCATE 1 1 ECHO Aside from drawing curves, the FIT_CURVE command has practical uses in the ECHO production of ribs for ship hulls and air or space craft parts. BEGIN APPEND 1.8 -1.3 0 1.5 -0.2 0 1 1 0 0 APPEND 1.5 -0.2 0 0.8 0.7 0 1 1 0 0 APPEND 0.8 0.7 0 0 0.9 0 1 1 0 0 APPEND 0 0.9 0 -0.8 0.7 0 1 1 0 0 APPEND -0.8 0.7 0 -1.5 -0.2 0 1 1 0 0 APPEND -1.5 -0.2 0 -1.8 -1.3 0 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO Because DANCAD3D's method of fitting curves assures that the curve will ECHO pass through the points of the rough curve you can easily draw the rough curve ECHO from the drawing editor by using the [G]oto point command. # 1 CURVE_FIT 5 0.2 # 0 DISPLAY 0 0 0 1E18 240 1 0 0.25 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH_MODE B&W LOCATE 1 1 ECHO After the quality of the curve is accepted you can use DANPLOT to make ECHO actual size drawings for the curves, or use DANPLOT and DANCAM to actually cut ECHO out and machine the part! Advanced commands are available in the macro ECHO language to interpolate extra ribs BETWEEN the major ones. The fit curve ECHO command will work in 3D to allow for the design of surface contours. # 1 ERASE # 0 DISPLAY 0 0 0 1E18 240 1 0 0.5 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT ; Thicken part GRAPH_MODE B&W LOCATE 1 1 ECHO The THICKEN command can thicken an outline of a shape to give the ECHO appearance of thickness to elements viewed in perspective. Here you see an ECHO outline flat on, like in the drawing editor front view. INITIALIZE POLYGON 36 36 0.75 1 1 0 0 # 1 OFFSET ZERO 0 -1 0 POLYGON 60 30 1 1 1 0 0 # 2 ROTATE ZERO 0 0 -90 # 2 OFFSET ZERO 0 -1 0 # 2 CENTER 0 -1 0 # 2 ROTATE CURRENT 0 0 -90 APPEND -1 -1 0 -1 1 0 1 1 0 0 APPEND -1 1 0 1 1 0 1 1 0 0 APPEND 1 1 0 1 -1 0 1 1 0 0 POLYGON 12 12 0.125 1 1 0 0 # 3 OFFSET ZERO 0.7 0.7 0 # 3 COPY # 4 OFFSET CURRENT -1.4 0 0 JOIN 3 4 JOIN 2 3 JOIN 1 2 # 0 DISPLAY 0 0 0 1E18 240 1 0 0.5 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO Here is the same outline shown in perspective. # 0 DISPLAY 30 -20 45 -2.5 350 1 0 -0.3 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO And now the outline has been thickened. This is a perspective view to show ECHO how the polygons have been made into holes and rounded surfaces. The thicken ECHO command takes a moment to work but is not used frequently, so the time is not ECHO important. # 1 THICKEN Z -0.375 # 0 DISPLAY 30 -20 45 -2.5 350 1 0 -0.3 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT ; Lathe part GRAPH B&W LOCATE 1 1 ECHO The LATHE command simplifies the drawing of round shapes by using a right ECHO hand profile of the round shape you want to make as a template for the ECHO "turning" of the form. Here you see a right hand profile. INITIALIZE POLYGON 36 9 1 1 1 0 0 # 1 OFFSET ZERO 0 -1 0 # 1 CENTER 0 -1 0 # 1 ROTATE CURRENT 0 0 90 APPEND 1 -1 0 0.9 -0.8 0 1 1 0 0 APPEND 0.9 -0.8 0 0.9 1 0 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 240 1 0 0.5 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO Here you see the result of the LATHE command on the right hand profile ECHO element you say in the last screen. The lathe command will take a moment to ECHO work but is is not used frequently so that is not important. This shape ECHO resembles a rivet before being used. Macro commands are available to modify ECHO the profile, before the element is lathed, to vary the contours during ECHO animation. # 1 LATHE 12 12 # 0 DISPLAY 0 0 90 -20 350 1 0.5 0.25 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO You can use the LATHE command to turn parts that make up part of a complete ECHO rotation around the lathe axis. In a moment you see a one quarter turn made ECHO from the same profile used in the last example. INITIALIZE POLYGON 36 9 1 1 1 0 0 # 1 OFFSET ZERO 0 -1 0 # 1 CENTER 0 -1 0 # 1 ROTATE CURRENT 0 0 90 APPEND 1 -1 0 0.9 -0.8 0 1 1 0 0 APPEND 0.9 -0.8 0 0.9 1 0 1 1 0 0 # 1 LATHE 24 6 # 0 DISPLAY -20 -20 90 -2.5 350 1 0.5 0.5 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INIT GRAPH B&W LOCATE 1 1 ECHO Here is another example of how the lathe command can be used. To make ECHO outlines of shapes that have openings at the center you would draw all the line ECHO segments in the element to lathe right of center. BEGIN APPEND 2 0 0 1 0 0 1 1 0 0 APPEND 1 0 0 1 -0.4 0 1 1 0 0 APPEND 1 -0.4 0 1.3 -0.4 0 1 1 0 0 APPEND 1.3 -0.4 0 1.3 -0.2 0 1 1 0 0 APPEND 1.3 -0.2 0 2 -0.2 0 1 1 0 0 APPEND 2 -0.2 0 2 0 0 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 240 1 0 0.3 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO Circles or rectangles right of center when lathed make ring type shapes. ECHO In the last screen you saw a "L" shaped rectangular source element. When the ECHO lathed element made from the source element in the last screen appears you will ECHO see that the result looks like a shoulder washer with the raised part of the ECHO "L" making the shoulder. Use the Lathe command when you need stepped edges ECHO like this. # 1 LATHE 18 18 # 0 DISPLAY -35 0 0 -4 310 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT ; Start Thicken two INIT GRAPH B&W ECHO When you need ring shapes that do not have rounded edges or steps the ECHO Thicken command can be used to produce a different type of appearance. For the ECHO Thicken command you would draw the full face of the part, as shown here. POLYGON 72 72 2 1 1 0 0 POLYGON 40 40 1 1 1 0 0 POLYGON 12 12 0.125 1 1 0 0 # 3 OFFSET ZERO 0 -1.5 0 # 3 COPY # 4 OFFSET CURRENT 0 0 0 # 3 COPY # 5 OFFSET CURRENT 0 0 0 # 5 CENTER 0 0 0 # 5 ROTATE CURRENT 0 0 120 # 4 CENTER 0 0 0 # 4 ROTATE CURRENT 0 0 -120 APPEND 0 -2 0 0 -1.625 0 1 1 0 0 APPEND 0 -1.375 0 0 -1 0 1 1 0 0 APPEND 0 1 0 0 2 0 1 1 0 0 APPEND -1 0 0 -2 0 0 1 1 0 0 APPEND 1 0 0 2 0 0 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 240 1 0 0.3 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT GRAPH B&W LOCATE 1 1 ECHO Then after thickening the small circles will become the mounting holes. # 0 THICKEN Z -0.375 # 0 DISPLAY 33 0 30 -7 330 1 0 -0.3 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INIT GRAPH B&W ECHO DANCAD3D lets you make special fonts for the lettering commands. These are ECHO some of the characters that come with the user outfit. Special International ECHO fonts are supplied with the user outfit. Also supplied are fonts for drafting ECHO that use fewer line segments than the default font on the ShareWare disks. LOAD 2D DEMO3A.2D # 0 DISPLAY 0 0 0 1E18 260 1 0 0 # 0 DISPLAY 0 0 0 1E18 260 1 0.01 0.01 # 0 DISPLAY 0 0 0 1E18 260 1 0.01 -0.01 # 0 DISPLAY 0 0 0 1E18 260 1 -0.01 0.01 # 0 DISPLAY 0 0 0 1E18 260 1 -0.01 -0.01 # 0 DISPLAY 0 0 0 1E18 260 1 0.0065 0.0065 # 0 DISPLAY 0 0 0 1E18 260 1 0.0065 -0.0065 # 0 DISPLAY 0 0 0 1E18 260 1 -0.0065 0.0065 # 0 DISPLAY 0 0 0 1E18 260 1 -0.0065 -0.0065 # 0 DISPLAY 0 0 0 1E18 260 1 0.003 0.003 # 0 DISPLAY 0 0 0 1E18 260 1 0.003 -0.003 # 0 DISPLAY 0 0 0 1E18 260 1 -0.003 0.003 # 0 DISPLAY 0 0 0 1E18 260 1 -0.003 -0.003 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INIT GRAPH B&W LOCATE 1 1 ECHO DANCAD3D's ALIAS index files let you quickly load symbols like these into ECHO your drawings while drawing. These are some examples from the symbols supplied ECHO with the user outfit. Among the symbols supplied with the outfit are symbols ECHO for Electronic schematics, PCB layout, Mathematical symbols, Flow chart ECHO symbols, and assorted symbols for Astronomy, Map making, and Music engraving. ECHO You can create any number of special symbols for your own use. LOAD 2D DEMO3B.2D # 0 DISPLAY 0 0 0 1E18 1 1 0 0 # 0 DISPLAY 0 0 0 1E18 1 1 1.75 1.75 # 0 DISPLAY 0 0 0 1E18 1 1 1.75 -1.75 # 0 DISPLAY 0 0 0 1E18 1 1 -1.75 1.75 # 0 DISPLAY 0 0 0 1E18 1 1 -1.75 -1.75 # 0 DISPLAY 0 0 0 1E18 1 1 1 1 # 0 DISPLAY 0 0 0 1E18 1 1 1 -1 # 0 DISPLAY 0 0 0 1E18 1 1 -1 1 # 0 DISPLAY 0 0 0 1E18 1 1 -1 -1 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INIT GRAPH B&W WORLD 240 ECHO DANCAD3D offers several line types: Solid, Dotted, Dashed, and Combination ECHO of dots and dashes. You can adjust the spacing of the dots and dashed to get ECHO dozens of variations of each style. BEGIN APPEND -2.25 -1.5 0 2.25 -1.5 0 1 1 0 0 APPEND 2.25 -0.5 0 -2.25 -0.5 0 1 1 0 161 APPEND -2.25 0.5 0 2.25 0.5 0 1 1 0 242 APPEND 2.25 1.5 0 -2.25 1.5 0 1 1 0 227 # 0 DISPLAY 0 0 0 -1.000E+18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INIT GRAPH B&W WORLD 240 ECHO DANCAD3D also lets you vary the line width from vary narrow to very wide. ECHO When the line segments are wide you can also chose from several styles for the ECHO end shape of the line segments, such as round or square. BEGIN APPEND -2.25 -1.5 0 2.25 -1.5 0 1 1 0 0 APPEND 2.25 -0.5 0 -2.25 -0.5 0 1 20 0 0 APPEND -2.25 0.5 0 2.25 0.5 0 1 50 0 0 APPEND 2.25 1.5 0 -2.25 1.5 0 1 255 16 0 # 0 DISPLAY 0 0 0 -1.000E+18 240 1 0 0 LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT INIT TEXT ECHO This demo has just scratched the surface of all the types of drawing ECHO elements you can make with DANCAD3D. Please read the file DANCAD3D.DOC that ECHO you should have on your program disks. Additional examples and explanation of ECHO how to use DANCAD3D are included in the registered user outfit. LOCATE 1 6 ECHO I hope you enjoy learning how to make practical use of DANCAD3D. If your ECHO hardware meets the requirements outlined in the file DANCAD3D.DOC DANCAD3D ECHO should work for you. If you are having any problems feel free to write to ECHO report the problem you are having. When you write please enclose return ECHO postage for the reply as US first class stamps or some first class ECHO international postal vouchers. LOCATE 5 25 ECHO Press [Return] to continue. %% WAIT ; END MACRO FILE DEMO3.MAC