From d789f4582b124c474e29895e584a1bea1a614be1 Mon Sep 17 00:00:00 2001 From: Clifford Yapp <238416+starseeker@users.noreply.github.com> Date: Fri, 22 Nov 2024 13:36:28 -0500 Subject: [PATCH] Phew. Looks like most of these are in the other libtclcad command table. --- src/libtclcad/commands.c | 28 ++++----- src/tclscripts/ged_notfound.txt | 104 -------------------------------- 2 files changed, 14 insertions(+), 118 deletions(-) diff --git a/src/libtclcad/commands.c b/src/libtclcad/commands.c index c46df6202b..9e83f472ff 100644 --- a/src/libtclcad/commands.c +++ b/src/libtclcad/commands.c @@ -835,6 +835,10 @@ static struct to_cmdtab to_cmds[] = { {"blast", (char *)0, TO_UNLIMITED, to_blast, GED_FUNC_PTR_NULL}, {"bot_edge_split", "bot face", TO_UNLIMITED, to_bot_edge_split, GED_FUNC_PTR_NULL}, {"bot_face_split", "bot face", TO_UNLIMITED, to_bot_face_split, GED_FUNC_PTR_NULL}, + {"bot_move_pnt", (char *)0, TO_UNLIMITED, to_bot_move_pnt, GED_FUNC_PTR_NULL}, + {"bot_move_pnt_mode", "obj i mx my", TO_UNLIMITED, to_bot_move_pnt_mode, GED_FUNC_PTR_NULL}, + {"bot_move_pnts", (char *)0, TO_UNLIMITED, to_bot_move_pnts, GED_FUNC_PTR_NULL}, + {"bot_move_pnts_mode", "mx my obj i1 [i2 ... iN]", TO_UNLIMITED, to_bot_move_pnts_mode, GED_FUNC_PTR_NULL}, {"bounds", "[\"minX maxX minY maxY minZ maxZ\"]", TO_UNLIMITED, to_bounds, GED_FUNC_PTR_NULL}, {"configure", "vname", TO_UNLIMITED, to_configure, GED_FUNC_PTR_NULL}, {"constrain_rmode", "x|y|z x y", TO_UNLIMITED, to_constrain_rmode, GED_FUNC_PTR_NULL}, @@ -844,15 +848,16 @@ static struct to_cmdtab to_cmds[] = { {"data_axes", "???", TO_UNLIMITED, to_data_axes, GED_FUNC_PTR_NULL}, {"data_labels", "???", TO_UNLIMITED, to_data_labels, GED_FUNC_PTR_NULL}, {"data_lines", "???", TO_UNLIMITED, to_data_lines, GED_FUNC_PTR_NULL}, - {"data_polygons", "???", TO_UNLIMITED, to_data_polygons, GED_FUNC_PTR_NULL}, {"data_move", "???", TO_UNLIMITED, to_data_move, GED_FUNC_PTR_NULL}, {"data_move_object_mode", "x y", TO_UNLIMITED, to_data_move_object_mode, GED_FUNC_PTR_NULL}, {"data_move_point_mode", "x y", TO_UNLIMITED, to_data_move_point_mode, GED_FUNC_PTR_NULL}, {"data_pick", "???", TO_UNLIMITED, to_data_pick, GED_FUNC_PTR_NULL}, + {"data_polygons", "???", TO_UNLIMITED, to_data_polygons, GED_FUNC_PTR_NULL}, {"data_scale_mode", "x y", TO_UNLIMITED, to_data_scale_mode, GED_FUNC_PTR_NULL}, {"data_vZ", "[z]", TO_UNLIMITED, to_data_vZ, GED_FUNC_PTR_NULL}, {"delete_view", "vname", TO_UNLIMITED, to_delete_view, GED_FUNC_PTR_NULL}, {"dlist_on", "[0|1]", TO_UNLIMITED, to_dlist_on, GED_FUNC_PTR_NULL}, + {"edit_motion_delta_callback", "vname [args]", TO_UNLIMITED, to_edit_motion_delta_callback, GED_FUNC_PTR_NULL}, {"faceplate", "center_dot|prim_labels|view_params|view_scale color|draw [val(s)]", TO_UNLIMITED, to_faceplate, GED_FUNC_PTR_NULL}, {"fit_png_image", "image_file_in req_width req_height scale image_file_out", 6, to_fit_png_image, GED_FUNC_PTR_NULL}, {"fontsize", "[fontsize]", 3, to_fontsize, GED_FUNC_PTR_NULL}, @@ -866,18 +871,10 @@ static struct to_cmdtab to_cmds[] = { {"listen", "[port]", TO_UNLIMITED, to_listen, GED_FUNC_PTR_NULL}, {"local2base", (char *)0, TO_UNLIMITED, to_local2base, GED_FUNC_PTR_NULL}, {"make", (char *)0, TO_UNLIMITED, to_make, GED_FUNC_PTR_NULL}, + {"metaball_move_pnt_mode", "obj pt_i mx my", TO_UNLIMITED, to_metaball_move_pnt_mode, GED_FUNC_PTR_NULL}, {"mirror", (char *)0, TO_UNLIMITED, to_mirror, GED_FUNC_PTR_NULL}, {"model_axes", "???", TO_UNLIMITED, to_model_axes, GED_FUNC_PTR_NULL}, - {"edit_motion_delta_callback", "vname [args]", TO_UNLIMITED, to_edit_motion_delta_callback, GED_FUNC_PTR_NULL}, {"more_args_callback", "set/get the \"more args\" callback", TO_UNLIMITED, to_more_args_callback, GED_FUNC_PTR_NULL}, - {"move_arb_edge_mode", "obj edge x y", TO_UNLIMITED, to_move_arb_edge_mode, GED_FUNC_PTR_NULL}, - {"move_arb_face_mode", "obj face x y", TO_UNLIMITED, to_move_arb_face_mode, GED_FUNC_PTR_NULL}, - {"bot_move_pnt", (char *)0, TO_UNLIMITED, to_bot_move_pnt, GED_FUNC_PTR_NULL}, - {"bot_move_pnts", (char *)0, TO_UNLIMITED, to_bot_move_pnts, GED_FUNC_PTR_NULL}, - {"bot_move_pnt_mode", "obj i mx my", TO_UNLIMITED, to_bot_move_pnt_mode, GED_FUNC_PTR_NULL}, - {"bot_move_pnts_mode", "mx my obj i1 [i2 ... iN]", TO_UNLIMITED, to_bot_move_pnts_mode, GED_FUNC_PTR_NULL}, - {"metaball_move_pnt_mode", "obj pt_i mx my", TO_UNLIMITED, to_metaball_move_pnt_mode, GED_FUNC_PTR_NULL}, - {"pipe_pnt_mode", "obj seg_i mx my", TO_UNLIMITED, to_pipe_move_pnt_mode, GED_FUNC_PTR_NULL}, {"mouse_brep_selection_append", "obj mx my", 5, to_mouse_brep_selection_append, GED_FUNC_PTR_NULL}, {"mouse_brep_selection_translate", "obj mx my", 5, to_mouse_brep_selection_translate, GED_FUNC_PTR_NULL}, {"mouse_constrain_rot", "coord mx my", TO_UNLIMITED, to_mouse_constrain_rot, GED_FUNC_PTR_NULL}, @@ -901,20 +898,23 @@ static struct to_cmdtab to_cmds[] = { {"mouse_poly_cont", "mx my", TO_UNLIMITED, to_mouse_poly_cont, GED_FUNC_PTR_NULL}, {"mouse_poly_ell", "mx my", TO_UNLIMITED, to_mouse_poly_ell, GED_FUNC_PTR_NULL}, {"mouse_poly_rect", "mx my", TO_UNLIMITED, to_mouse_poly_rect, GED_FUNC_PTR_NULL}, + {"mouse_protate", "obj attribute mx my", TO_UNLIMITED, to_mouse_protate, GED_FUNC_PTR_NULL}, + {"mouse_pscale", "obj attribute mx my", TO_UNLIMITED, to_mouse_pscale, GED_FUNC_PTR_NULL}, + {"mouse_ptranslate", "obj attribute mx my", TO_UNLIMITED, to_mouse_ptranslate, GED_FUNC_PTR_NULL}, {"mouse_ray", "mx my", TO_UNLIMITED, to_mouse_ray, GED_FUNC_PTR_NULL}, {"mouse_rect", "mx my", TO_UNLIMITED, to_mouse_rect, GED_FUNC_PTR_NULL}, {"mouse_rot", "mx my", TO_UNLIMITED, to_mouse_rot, GED_FUNC_PTR_NULL}, {"mouse_rotate_arb_face", "obj face v mx my", TO_UNLIMITED, to_mouse_rotate_arb_face, GED_FUNC_PTR_NULL}, {"mouse_scale", "mx my", TO_UNLIMITED, to_mouse_scale, GED_FUNC_PTR_NULL}, - {"mouse_protate", "obj attribute mx my", TO_UNLIMITED, to_mouse_protate, GED_FUNC_PTR_NULL}, - {"mouse_pscale", "obj attribute mx my", TO_UNLIMITED, to_mouse_pscale, GED_FUNC_PTR_NULL}, - {"mouse_ptranslate", "obj attribute mx my", TO_UNLIMITED, to_mouse_ptranslate, GED_FUNC_PTR_NULL}, {"mouse_trans", "mx my", TO_UNLIMITED, to_mouse_trans, GED_FUNC_PTR_NULL}, + {"move_arb_edge_mode", "obj edge x y", TO_UNLIMITED, to_move_arb_edge_mode, GED_FUNC_PTR_NULL}, + {"move_arb_face_mode", "obj face x y", TO_UNLIMITED, to_move_arb_face_mode, GED_FUNC_PTR_NULL}, {"new_view", "vname type [args]", TO_UNLIMITED, to_new_view, GED_FUNC_PTR_NULL}, {"orotate_mode", "obj x y", TO_UNLIMITED, to_orotate_mode, GED_FUNC_PTR_NULL}, {"oscale_mode", "obj x y", TO_UNLIMITED, to_oscale_mode, GED_FUNC_PTR_NULL}, {"otranslate_mode", "obj x y", TO_UNLIMITED, to_otranslate_mode, GED_FUNC_PTR_NULL}, {"paint_rect_area", "vname", TO_UNLIMITED, to_paint_rect_area, GED_FUNC_PTR_NULL}, + {"pipe_pnt_mode", "obj seg_i mx my", TO_UNLIMITED, to_pipe_move_pnt_mode, GED_FUNC_PTR_NULL}, #ifdef HAVE_GL_GL_H {"pix", "file", TO_UNLIMITED, to_pix, GED_FUNC_PTR_NULL}, {"png", "file", TO_UNLIMITED, to_png, GED_FUNC_PTR_NULL}, @@ -950,10 +950,10 @@ static struct to_cmdtab to_cmds[] = { {"snap_view", "vx vy", 4, to_snap_view, GED_FUNC_PTR_NULL}, {"translate_mode", "x y", TO_UNLIMITED, to_translate_mode, GED_FUNC_PTR_NULL}, {"transparency", "[val]", TO_UNLIMITED, to_transparency, GED_FUNC_PTR_NULL}, + {"view2screen", "", 2, to_view2screen, GED_FUNC_PTR_NULL}, {"view_axes", "vname [args]", TO_UNLIMITED, to_view_axes, GED_FUNC_PTR_NULL}, {"view_callback", "vname [args]", TO_UNLIMITED, to_view_callback, GED_FUNC_PTR_NULL}, {"view_win_size", "[s] | [x y]", 4, to_view_win_size, GED_FUNC_PTR_NULL}, - {"view2screen", "", 2, to_view2screen, GED_FUNC_PTR_NULL}, {"vmake", "pname ptype", TO_UNLIMITED, to_vmake, GED_FUNC_PTR_NULL}, {"vslew", "x y", TO_UNLIMITED, to_vslew, GED_FUNC_PTR_NULL}, {"zbuffer", "[0|1]", TO_UNLIMITED, to_zbuffer, GED_FUNC_PTR_NULL}, diff --git a/src/tclscripts/ged_notfound.txt b/src/tclscripts/ged_notfound.txt index 296d2f0137..20218c4185 100644 --- a/src/tclscripts/ged_notfound.txt +++ b/src/tclscripts/ged_notfound.txt @@ -4,122 +4,18 @@ GED commands - at least, they aren't present on a gsh command line. Not sure if the Tcl Ged object has some alternative means of making these work, but since this is where vslew came from it warrants checking... -base2local -bg -bot_edge_split -bot_face_split -bot_move_pnt -bot_move_pnt_mode -bot_move_pnts -bot_move_pnts_mode -bounds -configure -constrain_rmode -constrain_tmode -data_arrows -data_axes -data_labels -data_move -data_move_object_mode -data_move_point_mode -data_pick -data_polygons -data_scale_mode -data_vZ -dlist_on -edit_motion_delta_callback -faceplate find_botpt -fit_png_image -fontsize -get_prev_mouse -handle_expose -hide_view -idle_mode igraph -init_view_bindings -light -listen -list_views -local2base -metaball_move_pnt_mode -model_axes -more_args_callback mouse_bot_move_pnt -mouse_brep_selection_append -mouse_constrain_rot -mouse_constrain_trans -mouse_find_arb_edge -mouse_find_bot_edge mouse_find_botpt -mouse_find_metaball_pnt mouse_find_pipe_pnt -mouse_joint_select mouse_metaball_add_pnt mouse_metaball_move_pnt -mouse_move_arb_edge -mouse_move_arb_face -mouse_orotate -mouse_oscale -mouse_otranslate mouse_pipe_append_pnt mouse_pipe_move_pnt mouse_pipe_prepend_pnt -mouse_poly_circ -mouse_poly_cont -mouse_poly_ell -mouse_poly_rect -mouse_protate -mouse_pscale -mouse_ptranslate -mouse_rect -mouse_rot -mouse_rotate_arb_face -mouse_scale -mouse_trans -move_arb_edge_mode -move_arb_face_mode -new_view -orotate_mode -oscale_mode -otranslate_mode -paint_rect_area pipe_move_pnt_mode pipe_pnt_delete -pix pmodel2view -poly_circ_mode -poly_cont_build -poly_cont_build_end -poly_ell_mode -poly_rect_mode -protate_mode -pscale_mode -ptranslate_mode -rect_mode -refresh -refresh_all -refresh_on -rotate_arb_face_mode -rotate_mode -rt_end_callback -rt_gettrees -scale_mode -screen2view -sdata_arrows -sdata_axes -sdata_labels -sdata_lines -sdata_polygons -set_coord -set_fb_mode -snap_view translate -translate_mode -transparency -view2screen -view_axes -view_callback -view_win_size -vmake