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
/
DEMO2.MAC
< prev
next >
Wrap
Text File
|
1990-04-14
|
2KB
|
64 lines
; DEMO2.MAC, Macro demo for DANCAD3D v2.5B release version
; Copyright (c) 1987-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
RUN DEMO2B.SUB ; Intro message.
RUN DEMO2C.SUB ; Make Gears.
RUN DEMO2D.SUB ; Text for first part of this demo.
RUN DEMO2E.SUB ; Active part of first demo.
RUN DEMO2F.SUB ; Text for second part of this demo.
RUN DEMO2G.SUB ; Active part of second part of this demo.
RUN DEMO2H.SUB ; Text for third part of this demo.
RUN DEMO2I.SUB ; Active part of third part of this demo.
; Start Final words
TEXT
ECHO ┌─────────────────────────────────────────────────────────────────────────────┐
ECHO │ DEMO2.MAC DEMONSTRATION MACRO FOR DANCAD3D v2.5x OR LATER. │
ECHO └─────────────────────────────────────────────────────────────────────────────┘
LOCATE 1 5
ECHO Well that's all for this demo. The gears are still in the workspace so you
ECHO can work with them if you wish. Press [Return] to exit to the main menu then
ECHO press [D] to go into the drawing editor. Press [Return] when asked which
ECHO elements to display, then pick the [F]ront view to display. Press [D] to enter
ECHO the drawing sub-menu then press the [+] key to zoom in. Move the zoom border
ECHO around with your mouse-trackball or cursor keys, then press the [*/PrtSc] key
ECHO to redraw the screen. Play with the zoom for a while by using [+] to zoom in
ECHO and [-] or [S]cale to zoom out. If you want to make your own drawing press
ECHO [Return] back to the drawing root menu then press [I] (initialize) to clear the
ECHO workspace. Press [T] (tutor) and read the explanation of how to draw lines.
LOCATE 5 25
ECHO Press [Return] to return to DANCAD3D's Main Menu. %%
WAIT
; End Final Words
; End DEMO2.MAC