am 2011-04-18 10:15 AM
!Konstruktionsdetail M1:20 oder genauer
!ArchiMedia & IDC, dgu2000
!Kanthölzer DIN4070
for x=1 to anz
pen ph
rect2 0,0,b1,h1
if kreuz=1 then
pen pk
line2 0,0,b1,h1
line2 0,h1,b1,0
endif
pen psch
fill fh
if sch=1 then
poly2_b 4,6, psch, gs_back_pen,
0,0,0,
b1,0,0,
b1,h1,0,
0,h1,0
endif
if fix=1 then
hotspot2 0,0
hotspot2 b1,0
hotspot2 b1,h1
hotspot2 0,h1
endif
add2 b1+ab,0
next x
am 2011-04-18 11:16 AM
am 2011-04-18 11:30 AM
am 2011-04-18 03:10 PM
am 2011-04-18 03:46 PM
am 2011-04-18 04:19 PM
am 2011-04-21 11:01 AM