
/// runner script for dxf2sci
/// author: lukas wischounig
/// this should just give you an idea how to call this thing


/// call e.g.: 
/// ___ARCS(3)
/// ___ARCS(3).colour
/// ___ARCS(3).radius
/// 
/// --> see the dxf2sci code for available information
/// e.g. case arcs: valid calls are
/// xx.id, xx.colour,xx.x_coords,xx.y_coords,xx.z_coords,xx.radius,xx.start_angle,xx.end_angle,xx.colour,xx.layer
///
/// e.g. length(___POINTS) gives you the number of extracted entities
///
/// CAUTION:
/// Multiple Extraction is NOT valid .....
/// things like ___POINTS(2:3).id result in an ERROR  --> make a loop extraction
///





PathFileName_in = uigetfile(["*.dxf"]);
lines (0);
disp(PathFileName_in);

tic();

[___ARCS,___ELLIPSES,___POINTS,___LINES,___LWPOLYLINES,___POLYLINES,___3DFACES,___CIRCLES,___TEXTS,___MTEXTS,___IMAGES] = dxf2sci(PathFileName_in);


if isempty (___ARCS) then
    clear ___ARCS
end

if isempty (___ELLIPSES) then
    clear ___ELLIPSES
end

if isempty (___POINTS) then
    clear ___POINTS
end

if isempty (___LINES) then
    clear ___LINES
end

if isempty (___LWPOLYLINES) then
    clear ___LWPOLYLINES
end

if isempty (___POLYLINES) then
    clear ___POLYLINES
end

if isempty (___3DFACES) then
    clear ___3DFACES
end

if isempty (___CIRCLES) then
    clear ___CIRCLES
end

if isempty (___TEXTS) then
    clear ___TEXTS
end

if isempty (___MTEXTS) then
    clear ___MTEXTS
end

if isempty (___IMAGES) then
    clear ___IMAGES
end



t=toc();
disp("Processing Finished in");
disp(t);
disp("seconds");
