;;##########################################################################
;; Lade folgende Makros
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/konischer-zapfen.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/kette.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/Welle07.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/federn.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/gdm_m1_freistich.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/winkelhalbierende.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/parts_multiple_V14.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/SD_Baugruppenquerschnitt.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/flanalyse.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/dc4_tb_positionieren.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/am_part_color.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/wendel.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/sd_wire2solid.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/Gewicht_vergeben.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Stueckliste/teile_ruecksetzen.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Werkzeugbox/ae_in_schwerpunkt.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Funktionen/AM_Teilefarbe.lsp")


; Profile
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_FarbeGewicht.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Hohlprofil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Rohr.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Vierkant.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Dreieck.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Rund.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Vieleck.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_U-Biegeprofil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_L-Biegeprofil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_U-Profil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_L-Profil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_L-Winkel.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_U-Stahl.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_I-Profil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_I-Traeger.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Flansch.lsp")

; Profile-Tabelle
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Tabelle_Hohlprofil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Tabelle_I-Profil.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Tabelle_I-Traeger.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Tabelle_L-Winkel.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Tabelle_Rohr.lsp")
(LISP::LOAD "C:/INNEO/INNEO/Cocreate macros/Teile/AF_Tabelle_U-Stahl.lsp")
;;##########################################################################


;;Beginn Soliddesigner--------------------------------------------------------------------------------------------------------------------------------------------

(sd-add-menu-button "my-tools"
    :label "SEH Tools"
    :parent '("TASK" "SolidDesigner")                                         ;;Menü erscheint in OneSpace Designer
    :mapmenu "my-tools"
)


(in-package :custom)
(use-package :OLI)
(sd-create-menu "my-tools"
  :title "SEH Tools"
  :contents
  `(

;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 
 (:buttonBox "teile"
     :title "Teile"
     :buttons
     (
      (Konischer_Zapfen :label "Kon. Zapfen" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_rund-eckig.bmp")            ;;Startet das Makro konischer-zapfen.lsp
      (Rundgliederkette :label "Rundkette" :image "C:/INNEO/INNEO/Cocreate macros/icons/kette.png")                          ;;Startet das Makro Kette.lsp
      (dc4-druckfeder-dialog :label "Druckfeder" :image "C:/INNEO/INNEO/Cocreate macros/icons/druck.png")                    ;;Startet das Makro Druckfeder.lsp
      (dc4-zugfeder-dialog :label "Zugfeder" :image "C:/INNEO/INNEO/Cocreate macros/icons/zug.png")                          ;;Startet das Makro Druckfeder.lsp
      (gr_wellegen :label "Wellen" :image "C:/INNEO/INNEO/Cocreate macros/icons/stufen.bmp")                                 ;;Startet das Makro Welle07.lsp
      ))
;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 	  
  	(:buttonBox "Stahlprofil"
	 :title "Stahlprofil"
     :buttons(
	(AF_Hohlprofil :label "Hohlprofil" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_Rohr_eckig.bmp")
	(AF_Rohr :label "Rohr" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_Rohr_rund.bmp")	
	(AF_I-Profil :label "I-Profil" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_I-Profil.bmp")
	(AF_U-Stahl :label "U-Stahl" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_U-Stahl.bmp")
	(AF_L-Winkel :label "Winkel" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_L-Winkel.bmp")
	(AF_I-Traeger :label "I-TrÌger" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_I-Traeger.bmp")
	))
;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 
	(:buttonBox "Biegeprofil"
	 :title "Biegeprofil"
     :buttons(
	(AF_U-Biegeprofil :label "U-Biegeprofil" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_U-Biegeprofil.bmp")
	(AF_L-Biegeprofil :label "L-Biegeprofil" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_L-Biegeprofil.bmp")
	))
;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 
	(:buttonBox "Grundformen"
	 :title "Grundformen"
     :buttons(
	(AF_Rund :label "Rund" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_rundstab.bmp")
	(AF_Vieleck :label "Vieleck" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_Vieleck_profil.bmp")
	(AF_Vierkant :label "Vierkant" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_vierkant.bmp")
	(AF_Dreieck :label "Dreieck" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_Dreieck.bmp")	
	(AF_U-Profil :label "U-Profil" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_U-Profil.bmp")
	(AF_L-Profil :label "L-Profil" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_L-Profil.bmp")
	))
;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 
	(:buttonBox "Flansch"
	 :title "Flansch"
     :buttons(
	(AF_Flansch :label "Flansch" :image "C:/INNEO/INNEO/Cocreate macros/icons/pic_PR_Flansch.bmp")
	))
;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 
  (:buttonBox "Funktionen"
   :title "Funktionen"
   :buttons
   (
      (gdm-m1-freistich-dialog :label "Freistich" :image "C:/INNEO/INNEO/Cocreate macros/icons/add.bmp")                                        ;;Makro gdm_m1_freistich.lsp
      (dc4-teil-vervielfaeltigen-pr-dialog :label "Vervielf. Punkt/Richtg" :image "C:/INNEO/INNEO/Cocreate macros/icons/multiple.bmp")          ;;Makro parts_multiple_V14.lsp
      (baugruppenquerschnitt :label "Baugruppenquerschnitt" :image "C:/INNEO/INNEO/Cocreate macros/icons/schnitt.bmp")                          ;;Makro SD_Baugruppenquerschnitt.lsp
      (dc4-teil-flaechen-faerben-dialog :label "FlÌchenanal." :image "C:/INNEO/INNEO/Cocreate macros/icons/flaeche.bmp")                        ;;Makro flanalyse.lsp
      (dc4-tb-positionieren-dialog :label "Position" :image "C:/INNEO/INNEO/Cocreate macros/icons/position.bmp")                                ;;Makro dc4_tb_positionieren.lsp
      (wendeln :label "Teile wendeln" :image "C:/INNEO/INNEO/Cocreate macros/icons/wendel.bmp")                                                 ;;Makro wendel.lsp
      (wire2solid_convert :label "Kabel" :image "C:/INNEO/INNEO/Cocreate macros/icons/wire.bmp")                                                ;;Makro wire2solid.lsp
      (dc4-normteil-dichte-dialog :label "Gewichte" :image "C:/INNEO/INNEO/Cocreate macros/icons/farbe.bmp")                                    ;;Makro Gewicht_vergeben.lsp
	  (sd_reset_part_props :label "RÏcksetzen" :image "C:/INNEO/INNEO/Cocreate macros/icons/rueck.bmp")                                         ;;Makro teile_ruecksetzen.lsp
	  (ae_in_SP :label "AE in Schwerpunkt" :image "C:/INNEO/INNEO/Cocreate macros/icons/ae_in_sp.bmp")                                ;;Makro ae_in_schwerpunkt.lsp
      ))
;;;----------------------------------------------------------------------------------------------------------------------------------------------------------------
  )
)

;;Beginn Annotation--------------------------------------------------------------------------------------------------------------------------------------------
(sd-add-menu-button "my-tools-am"
    :label "SEH Draw Tools"
    :parent '("TASK" "ANNOTATION")                                         ;;Menü erscheint in Annotation
    :mapmenu "my-tools-am"
)

(in-package :custom-am)
(use-package :OLI)
(sd-create-menu "my-tools-am"
  :title "SEH Draw Tools"
  :contents
  `(
;;;---------------------------------------------------------------------------------------------------------------------------------------------------------------- 
  (:buttonBox "Geo Styles"
   :title "Geometrie Funktionen"
   :buttons
   (
      (Teilefarbe :label "Geometrie ändern" :image "C:/INNEO/INNEO/Cocreate macros/icons/farbe.bmp")                                        ;;Makro AM_Teilefarbe.lsp
      ))
;;;----------------------------------------------------------------------------------------------------------------------------------------------------------------
  )
)