choose own path like C:\.......

[Anonymous]

autocad save folder like this : CH3_A2-FOL1

strcase(getvar"DWGPREFIX") contains the path of the current drawing

chas contains : CH3_A2

(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL2")) concatenation with it gives=> CH3_A2-FOL1    CH3_A2-FOL2    CH3_A2-FOL3     CH3_A2-FOL4

but i want to change my own directory like this : "C:\Users"

this is the routine:

ZOOM ETENDU _ROTATE TOUT 60,-1470 90
(setq dwg (getvar "dwgname"))
(setq long (strlen dwg))
(setq lon (- long 4))
(setq chas (substr dwg 1 lon))
(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL1"))
(setq WAY2(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL2"))
(setq WAY3(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL3"))
(setq WAY4(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL4"))
(setq WAY5(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL5"))
ZOOM ETENDU WBLOC
(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL1")) 0,0 fenetre -1454,436 122,78
!WAY1

(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL2")) 0,0 fenetre -1454,78 122,-322
!WAY2

(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL3")) 0,0 fenetre -1454,-1114 122,-1476
!WAY3

(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL4")) 0,0 fenetre -1454,-724 122,-1114
!WAY4

(setq WAY1(strcat (strcase(getvar"DWGPREFIX")) chas "-FOL5")) 0,0 fenetre -1454,-322 122,-724
!WAY5

FIN