def box
@mod = Sketchup.active_model
@ent = @mod.active_entities
@Length = 100.mm unless @Length
@Width = 100.mm unless @Width
@Height = 100.mm unless @Height
@X = 0.mm unless @X
@Y = 0.mm unless @Y
@Z = 0.mm unless @Z
@dlg=UI::WebDialog.new("Create Box", false,"WDID",200,300,10,10,true)
html = <<-HTML
HTML
@dlg.set_html(html)
@dlg.add_action_callback("box") {|d,p|
p.gsub!("?",""); tokens=p.split("&"); puts p
tokens.each{|t|
var,val = t.split("="); puts t
case var
when 'Length' then @Length = val.to_l
when 'Width' then @Width = val.to_l
when 'Height' then @Height = val.to_l
when 'X' then @X = val.to_l
when 'Y' then @Y = val.to_l
when 'Z' then @Z = val.to_l
end
}
@mod.start_operation "Create Box"
p1 = [@X, @Y, @Z]
p2 = [@X+@Length, @Y, @Z]
p3 = [@X+@Length, @Y+@Width, @Z]
p4 = [@X, @Y+@Width, @Z]
face = @ent.add_face(p1, p2, p3, p4)
face.reverse!
face.material=Sketchup::Color.new(255, 255, 255)
face.material.alpha = 0.4
group = @ent.add_group face
face.pushpull @Height
@mod.commit_operation
};
RUBY_PLATFORM =~ /(darwin)/ ? @dlg.show_modal() : @dlg.show();
end
box