29 S C R I P T R S C R I P T D E L AY A u t o C A D 29.1 A u t o C A D script files( ) A u t o C A D, N o t e p a d A u t o C A D E D I T A C A D. P G P E D I T. S C R P L O T 1. S C R A u t o C A D S C R I P T A u t o C A D 1 S C R I P T 1. S C R 12 9 = 4 O r t h o o n Z o o m A l l G r i d 2. 0 0. 1 2 5 G r i d o ff L t s c a l e 4. 0 S n a p 0. 5 4. 0 L i m i t s 0, 0 4 8. 0, 3 6. 0 A u t o C A D 1 A u t o C A D Command: ORTHO Enter mode [ON/OFF]<OFF>: ON Command: GRID Specify grid spacing(x) or [ON/OFF/Snap/Aspect] <1.0> : 2.0 Command: GRID
778 A u t o C A D Specify grid spacing(x) or [ON/OFF/Snap/Aspect] <1.0> : OFF Command: SNAP Specify snap spacing or [ON/OFF/Aspect/Rotate/Style/Type]<1.0>: 0.5 Command: LIMITS Reset Model space limits: Specify lower left corner or [ON/OFF]<0.0>: 0 0 Specify upper right corner <12.0 9.0>: 48.0 3 6. 0 Command: ZOOM Specify corner of window enter a scale factor (nx or nxp) o r [All/Center/Dynamic/Extents/Previous/Scale/Window]<real time>: A Command: SETVAR Enter variable name or [?]: TEXTSIZE Enter new value for TEXTSIZE<0.02>: 0.125 Command: LTSCALE Enter new linetype scale factor <1.0000>: 4.0 Command: SETVAR Enter variable name or [?]<TEXTSIZE>: DIMSCALE Enter new value for DIMSCALE <1.0000>: 4.0 A u t o C A D A u t o C A D E D I T 1
29 779 ZOOM All A u t o C A D 29.2 SCRIPT A u t o C A D S C R I P T S C R I P T A u t o C A D. S C R 1 S C R I P T A u t o C A D Select Script File 29-1 S C R I P T O p e n S C R I P T Command: SCRIPT 29-1 Select Script File F I L E D I A = 0 S C R I P T Command: FILEDIA Enter new value for FILEDIA <1>: 0 Command: SCRIPT Enter script file name <default>: Command: SCRIPT Script file <CUSTOM>: SCRIPT1 < C U S T O M -- > ------
780 A u t o C A D 2 S C R I P T - 1- ------ 29-1 S C R I P T 2. S C R 2 9-1 O b j e c t C e n t e r H i d d e n D i m e n s i o n B o r d e r H a t c h 0. 0 5 A u t o C A D 2 Command: LAYER Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLock] : N Enter name list for new layer(s): OBJECT C E N T E R H I D D E N D I M B O R D E R H A T C H Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : L Enter loaded linetype name or [?] <Continuous>: CENTER Enter name list of layer(s) for linetype "CENTER" <0> : CENTER Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : L Enter loaded linetype name or [?] <Continuous>: HIDDEN Enter name list of layer(s) for linetype "HIDDENR" <0> : HIDDEN Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : C Enter color name or number (1-255): RED Enter name list of layer(s) for color 1(red)<0>: OBJECT Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : C Enter color name or number (1-255): YELLOW Enter name list of layer(s) for color 2(yellow)<0>: CENTER Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : C Enter color name or number (1-255): BLUE Enter name list of layer(s) for color 5(blue)<0>: HIDDEN Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : C Enter color name or number (1-255): GREEN Enter name list of layer(s) for color 3(green)<0>: DIM Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : C Enter color name or number (1-255): MAGENTA
29 781 Enter name list of layer(s) for color 6(magenta)<0>: BORDER Enter an option [?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/UnLOck] : C Enter color name or number (1-255): CYAN Enter name list of layer(s) for color 4(cyan)<0>: HATCH Enter an option [? / M a k e / S e t / N e w / O N / O F F / C o l o r / L t y p e / L W e i g h t / P l o t / F r e e z e / T h a w / L O c k / U n L O c k ] : Enter lineweight(0.0mm-2.11mm): 0.05 Enter name list of layer(s) for lineweight 0.05mm <0>: HATCH [? / M a k e / S e t / N e w / O N / O F F / C o l o r / L t y p e / L W e i g h t / P l o t / F r e e z e / T h a w / L O c k / U n L O c k ] : ( ), LAYER 3 29-2 4 5 4 5 S C R I P T 3. S C R AutoCAD
782 A u t o C A D Command: ROTATE( R O T A T E ) Current positive angle in UCS: ANGDIR= counterclockwise ANGBASE=0 Specify objects: W( ) Specify first corner: 2.25 5. 0 Specify opposite corner: 6.25 9. 0 Select objects: ( ) Specify base point: 4.25 6. 5 Specify rotation angle or [Reference]: 45 29-2 45 A u t o C A D 3 R O T A T E 1 W 2 2. 2 5 5. 0 3 6. 2 5 9. 0 4 ( ) 5 4. 2 5 6. 5 6 4 5 7 1 R O TAT E R O TAT E A u t o C A D 2 W W Wi n d o w 3 2. 25, 5. 0 2.25 X 5. 0 Y 4 6. 25, 9. 0 6.25 X 9. 0 Y 5 5 6 4. 25, 6. 5 4. 25 X 6. 5 Y
29 783 7 45 45 3 Wi n d o w Wi n d o w W AutoLISP 29.3 RSCRIPT A u t o C A D R S C R I P T R S C R I P T E s c 3 R S C R I P T R O T A T E W 2. 2 5 5. 0 6. 2 5 9. 0 ( ) 4. 2 5 6. 5 4 5 R S C R I P T 8 R S C R I P T 1 7 E s c AutoLISP 29.4 DELAY A u t o C A D D E L AY D E L Command: DELAY Ti m e C o m m a n d --------- A u t o C A D D E L AY- - - - - - - - - D E L AY Ti m e - - - - - - - - - D E L AY 2000 m s A u t o C A D 2 s 2 32767 m s 33 s 3 7 8 D E L AY
784 A u t o C A D 2 R O T A T E W 2. 2 5 5. 0 6. 2 5 9. 0 ( ) 4. 2 5 6. 5 4 5 DELAY 2000 R S C R I P T 7 4 5 8 R S C R I P T 2000 m s 2 s R S C R I P T 4 5 4 5 2 29.5 RESUME A u t o C A D RESUME Command: RESUME R E S U M E R E S U M E R E S U M E R E S U M E R E S U M C o m m a n d : R E S U M E 29.6 A u t o C A D a c a d. e x e O p t i o n s a u t o e x e c. b a t O p t i o n s 29-2 2 9-2 / c A u t o C A D a c a d 14. c f g / s / d A D I / b A u t o C A D / t / n o l o g o A u t o C A D / v A u t o C A D / r A u t o C A D / p 29.7 AutoCAD A u t o C A D A u t o C A
29 785 Drive>AutoCAD 2000 [existing-drawing][/t template][/v view]/b script-file 2 9-3 A u t o C A D Mydwg 1, S e t u p C \AutoCAD2000>ACAD Mydwg1/b Setup A u t o C A D 2000 --------- A u t o C A D 2000, A u t o C A D A C A D --------- A C A D A u t o C A M y D w g 1 - - - - - - - - - S e t u p - - - - - - - - - 29-3 AutoCAD Run A u t o C A D t e m p 1, D r a w i n g S e t u p C \AutoCAD2000\ACAD/t temp1/b Setup t e m p 1 --------- S e t u p - - - - - - - - - - C \AutoCAD2000\ACAD/t c:\autocad2000\mytemp\temp1/b Setup c :\ A u t o C A D \ m y t e m p \--------- A u t o C A D D r a w i n g S e t u p C \AutoCAD2000\ACAD/b Setup S e t u p --------- A u t o C A D A u t o C A D 2000 A u t o C A D C 4 A u t o C A D 29-3
786 A u t o C A D S C R I P T 4. S C R 3. 0 0. 5 0, 0 36. 0, 24. 0 0. 25 3. 0 3. 0 29-3 O b j C e n H i d D i m S C R I P T 4. S C R GRID 2.0 SNAP 0.5 LIMITS 0 0 36.0 24.0 ZOOM ALL SETVAR TEXTSIZE 0.25 LTSCALE 3 SETVAR DIMSCALE 3.0 LAYER NEW O B J C E N H I D D I M L CENTER CEN L HIDDEN HID C RED OBJ C YELLOW CEN C BLUE HID C GREEN DIM S C R I P T 4 Start, Run C \AutoCAD2000\ACAD/t C:\EX4 D:\SCRIPT4 A C A D ---------- A C A D A u t o C A D E X 4 - - - - - - - - - - S C R I P T 4 - - - - - - - - - - E X 4 C 29-4 S C R I P T 4 D A u t o C A D E X 4. D W T S C R I P T 4
29 787 29-4 AutoCAD Run A u t o C A D D r a w i n g S C R I P T 4 C \AutoCAD2000\ACAD/b SCRIPT4 S C R I P T 4 A u t o C A D A u t o C A D 2000 5 36"x 24" A U TO C A D - P L O T Command: -PLOT Detailed plot configuration? [Yes/No]<No>: Yes Enter a layout name or [?]<Model>: Model Enter an output device name or [?]<HP LaserJet 4000 Series PCL < 6>: > Enter paper size or [?]<Letter (8 1/2 x 11 in)>: < > Enter paper units [Inches/Millimeters] <Inches>: I Enter drawing orientation [Portrait/Landscape]<Landscape>: < > Plot upside down?[yes/no]<no>:no Enter plot area[display/extents/limits/view/window]<display>: W Enter lower left corner of window <0.000000 0. 000000 > 0 : 0 Enter upper right corner of window <0.000000 0. 000000 > : 2 346 Enter plot scale(plotted Inches =Drawing Units)or [Fit]<Fit>: F Enter plot offset(x y) or [Center]<0.00 0. 00 > : 0 0 Plot with plot styles?[yes/no]<yes>:yes Enter plot style table name or [?](enter.for none)<>:. Plot with lineweight?[yes/no]<yes>: Yes Remove hidden lines?[yes/no]<no>:no Write the plot to a file [Yes/No]<N>: No Save changes to model tab [Yes/No]?<N>: No Proceed with plot[yes/no]<y>:y Effective plotting area: 7.07 wide by 10.60 high
788 A u t o C A D Plotting viewport 2. 9 " 6 " 36 " 2 4 " P l o t Y ( ) ( ) ( ) I L N w 0 0 3 6 2 4 F 0 0 Y. (. ) Y N N N Y 1 36 " 2 4 " 288 ' 1 92 ' 1 / 8 " = 1 ' S C R I P T 6. S C R A u t o C A D H P G L H P G L - P l o t t e r 29.8 A u t o C A D A u t o C A D Z O O M PA N
29 789 29.9 A u t o C A D 29.10 MSLIDE A u t o C A D M S L I D E F I L E D I A 0 Command: MSLIDE Enter name of slide file to create <Default>: Command: MSLIDE Slide File:<Drawing1>SLIDE1 D r a w i n g 1 --------- S L I D E 1 - - - - - - - - - - 29-5 Create Slide File A u t o C A D S L I D E 1. S L D F I L E D I A 1 M S L I D E Create Slide File 29-5 MSLIDE
790 A u t o C A D 29.11 VSLIDE MSLIDE V S L I D E A u t o C A D A u t o C A D. S L D Command: VSLIDE Enter name of slide file to create <Default> : Command: VSLIDE Slide file <Drawing1>: SLIDE1 D r a w i n g 1 --------- S L I D E 1 - - - - - - - - - - Select Slide File 29-6 29-6 Select Slide File A u t o C A D R E D R AW R E D R AW A u t o C A D GRID ZOOM ALL REGEN A u t o C A D 7 15 S L I D E 1 S L I D E 2 S L I D E 3 S L I D E 4
29 791 29-7 S L I D E 1 S L I D E 2 S L I D E 3 S L I D E 4 ( ) A u t o C A D E D I T A C A D. P G P E D I T. S C R 2 1 3 4 29-7 29-7 S L D S H O W 1 VSLIDE SLIDE1 DELAY 15000 VSLIDE SLIDE2 DELAY 15000 VSLIDE SLIDE3 DELAY 15000 VSLIDE SLIDE4 DELAY 15000 A u t o C A D S C R I P T SLDSHOW 1 15 s 29.12 7 1 VSLID SLIDE1 S L I D E 1 15000 m s S L I D E 2 A u t o C A D * VSLIDE SLIDE1 VSLIDE *SLIDE2 DELAY 15000 V S L I D E S L I D E 1 S L I D E 2 1 5 s S L I D E 2
792 A u t o C A D VSLIDE *SLIDE3 Delay 15000 VSLIDE VSLIDE *SLIDE4 DELAY 15000 VSLIDE DELAY 15000 R S C R I P T 8 S L I D E 3 1 5 s S L I D E 3 2 s S L D 1 S L D 2 S L D 3 29-8 S U B D I R 1 C - ------------ A u t o C A D 2 0 0 0 - - - - - - - - - - - - - A u t o C A D SUBDIR1 ------------- S U B D I R 2 - - - - - - - - - - - - - S U B D I R 3 - - - - - - - - - - - - - SLD1 ------------- S U B D I R 1 S L D 2 ------------- S U B D I R 2 S L D 3 ------------- S U B D I R 3 8 VSLIDE SLD1 DELAY 2000 VSLIDE C \ A u t o C A D 2 0 0 0 \ S U B D I R 2 \ S L D 2 DELAY 2000 VSLIDE C \ A u t o C A D 2 0 0 0 \ S U B D I R 3 \ S L D 3 DELAY 2000 R S C R I P T 1 VSLIDE1 SLD1 A u t o C A D V S L I D E S L D 1 S U B D I R 1 S L D 1 2 D E L AY 2000 A u t o C A D D E L AY 2 s 3 VSLIDE C \ A u t o C A D 2000 \ S U B D I R 2 \ S L D 2 A u t o C A D V S L I D E S U B D I R 2 S L D 2 5 VSLIDE C \ A u t o C A D 2000 \ S U B D I R 3 \ S L D 3 V S L I D E S U B D I R 3 S L D 29-8 C 7 R S C R I P T R S C R I P T E s c
29 793 29.13 A u t o C A D A u t o L I S P (C: REPLAY FILENAME TYPE [<XOFF> <YOFF> <XSIZE> <YSIZE>]) C R E P L AY- ------------ A u t o L I S P A u t o C A D R e p l a y FILENAME ------------- / T Y P E ------------- B m p, Ti f, T g a X O F F ------------- 0 0 X Y O F F ------------- 0 0 Y X S I Z E ------------- X A u t o C A D S AV E I M G Y S I Z E ------------- Y A u t o C A D S AV E I M G A u t o C A D B I G L A K E. T G A 29-9 b i g l a k e. t g a A u t o C A D C R E P L AY C /PROGRAM FILES/AutoCAD2000//TEXTURES/BIGLAKET G A 150 50 944 564 C R E P L AY - ------------ A u t o C A D R e p l a y C / P R O... / B I G L A K E - - - - - - - - - - - - - T G A - - - - - - - - - - - - - 150 ------------------ X 50 ------------------- Y 944 ------------------ X 564 ------------------ Y r e p l a y. s c r A u t o C A D F _ R _ B M P A VSLIDE A \ S L I D E S \ F _ R O L L D E L A Y 3 0 0 0 ( C : R E P L A Y /RENDERS/R_ROLL""BMP" " A 0 0 944 564) DELAY 3 0 0 0 VSLIDE A \ S L I D E S \ F _ B K C A S E D E L A Y 3 0 0 0 ( C : R E P L A Y /RENDERS/R_BKCASE""BMP" " A 0 0 944 564) DELAY 3000
794 A u t o C A D VSLIDE A \ S L I D E S \ F _ M O U S E D E L A Y 3 0 0 0 ( C : R E P L A Y /RENDERS/R_MOUSE""BMP" " A 0 0 944 564) D E L A Y 3 0 0 0 VSLIDE A \ S L I D E S \ F _ T A B L E 2 D E L A Y 3 0 0 0 ( C : R E P L A Y /RENDERS/R_TABLE2""BMP" " A 0 0 944 564) D E L A Y 3 0 0 0 VSLIDE A \ S L I D E S \ F _ M I C _ 3 D D E L A Y 3 0 0 0 ( C : R E P L A Y /RENDERS/R_MIC_3D""BMP" " A 0 0 944 564) D E L A Y 3 0 0 0 VSLIDE A \ S L I D E S \ F _ B O X D E L A Y 3 0 0 0 ( C : R E P L A Y /RENDERS/R_BOX""BMP" " A 0 0 944 564) DELAY 3000 RSCRIPT 29-9 1) AutoCAD A u t o C A D 2) 3) A u t o C A D 4) 5) 6) AutoCAD 7) 8)
29 795 9) 10) AutoCAD 11) 12) AutoCAD 13) DELAY 14) A u t o C A D 15) AutoCAD 16), 17) 18) 19) 20) A u t o C A D 21) 22) M S L I D E 23) 24) A u t o C A D 25) 29-4 0,0 24,18 1. 0 0. 2 5 0. 0 2 0,0 24,0 24,18 0,18 0,0 1. 5 2 2 0 3
796 A u t o C A D 29-4 3 O b j C e n H i d D i m 0,0 24,18 0.0, 0.0 8. 5, 11 / 9 0 4 1 0 29-10 1 0 1 s 5 29-10 4 29-11 3 s 29-11 P3 1 2 3 4 29-11