create_workplane :new :world_origin :current-direction 0.0,0.0,-1.0 50 complete
fit_vp "1" update_screen 
set_default_part_color green   complete create_part :name "1" complete create_straight 00.0,00.0,0.0 00.0,50.0,0.0 complete 
set_default_part_color yellow  complete create_part :name "2" complete create_straight 00.0,50.0,0.0 25.0,75.0,0.0 complete 
set_default_part_color blue    complete create_part :name "3" complete create_straight 25.0,75.0,0.0 50.0,50.0,0.0 complete 
set_default_part_color magenta complete create_part :name "4" complete create_straight 50.0,50.0,0.0 00.0,50.0,0.0 complete
set_default_part_color cyan    complete create_part :name "5" complete create_straight 00.0,50.0,0.0 50.0,00.0,0.0 complete
set_default_part_color white   complete create_part :name "6" complete create_straight 50.0,00.0,0.0 50.0,50.0,0.0 complete
set_default_part_color black   complete create_part :name "7" complete create_straight 50.0,50.0,0.0 00.0,00.0,0.0 complete
set_default_part_color red     complete create_part :name "8" complete create_straight 00.0,00.0,0.0 50.0,00.0,0.0 complete
create_part :name "foobar" complete set_pers_context "Toolbar-relative" delete_3d "/foobar" complete
project set_pers_context "Toolbar-relative" :all_3d complete 
(ELAN-UI::RESET-3D-OBJECT-SETTINGS '(:PART-APP))