(sd-add-menu-button "Loedige4"
    :label "Loedige Tools Druck"
    :parent '("TASK" "Annotation")
    :mapmenu "Loedige4"
    :image (format nil "Z:/sd_customize_17_macros/Druck/Print.bmp")
)
(sd-create-menu "Loedige4"
	:title "Loedige Tools 4"
    :contents `
(
(
	:buttonBox "Laserjet auf A4"
    :title "Laserjet A4..."
    :buttons
     (
;;--------------------------------------------------------------------------*
;;Macro Plott_Loedige.lsp
        (Laser_A4_auf_A4_Hu								:label "A4 auf A4")
        (Laser_A3_auf_A4_Hu								:label "A3 auf A4")
        (Laser_A2_auf_A4_Hu								:label "A2 auf A4")
        (Laser_A1_auf_A4_Hu								:label "A1 auf A4")
        (Laser_A0_auf_A4_Hu								:label "A0 auf A4")
	  )
)

(
	:buttonBox "Laserjet auf A3"
    :title "Laserjet A3..."
    :buttons
     (
;;--------------------------------------------------------------------------*
;;Macro Plott_Loedige.lsp
        (Laser_A3_auf_A3_Hu								:label "A3 auf A3")
        (Laser_A2_auf_A3_Hu								:label "A2 auf A3")
        (Laser_A1_auf_A3_Hu								:label "A1 auf A3")
        (Laser_A0_auf_A3_Hu								:label "A0 auf A3")
	  )
)

(
	:buttonBox "PDF- Drucker..."
    :title "PDF- Drucker..."
    :buttons
     (
;;--------------------------------------------------------------------------*
;;  Macro Plott_Loedige.lsp
        (Laser_A4_auf_A4_Hu								:label "A4 auf A4")
	  )
)

(
	:buttonBox "OCE- Drucker..."
    :title "OCE- Drucker..."
    :buttons
     (
;;--------------------------------------------------------------------------*
;;  Macro Plott_Loedige.lsp
        (Laser_A4_auf_A4_Hu								:label "noch nicht..")
	  )
)
)
)