2008-02-01 07:16 PM
ww=wall_direction add2 label_position [2][1]+label_position [3][1], label_position [2][2]+label_position [3][2] IF ww = 180 THEN ww = 0 IF ww = 270 THEN ww = 90 ROT2 ww+90 IF mir=1 THEN rot2 180 PEN LP SET FILL BP line2 ell*A_,0,-el*A_,0 HOTSPOT2 ell*A_,0 HOTSPOT2 -el*A_,0 If UDS=1 THEN FS=FS1 ENDIF PEN OP rect2 ell*A_,(-s/2)*A_,(ell+s)*A_,(s/2)*A_ HOTSPOT2 0,0 HOTSPOT2 ell*A_, (-s/2)*A_ HOTSPOT2 ell*A_, (s/2)*A_ HOTSPOT2 (ell+s)*A_, (s/2)*A_ HOTSPOT2 (ell+s)*A_, (-s/2)*A_ rot2 -90 add2 0,(ell+s/2)*A_ rot2 -ww if mir = 1 then ROT2 180 PEN TP DEFINE STYLE "AC_STYLE_1" F, FS*25.4/72, 5, 0 SET STYLE "AC_STYLE_1" HOTSPOT2 0,0 TEXT2 0, 0, T
2008-02-04 07:45 PM
2008-02-04 07:59 PM
2008-02-04 08:12 PM
2008-02-04 09:13 PM
FILL "empty fill" POLY2_B 5, 3, 1, BP, ell*A_, (-s/2)*A_, 1, (ell+s)*A_, (-s/2)*A_, 1, (ell+s)*A_,(s/2)*A_, 1, ell*A_,(s/2)*A_, 1, ell*A_, (-s/2)*A_, -1
2008-02-05 12:01 AM