Custom Plotting Toolbar

I am currently using AutoCAD 2015 and at a previous company I used to work at they had a customized toolbar that had a drop down menu that you can pick, let's say "11 x 17 PDF Standard" and it would pop of with the print preview screen and then you could right click and hit print and it would print to PDF with all the correct plot styles to an 11 x 17 sheet. They had this setup for a bunch of separate plotting types to different printers within the office. I was wondering if anyone knows how I would be able to set that up?

Thanks

Easy done using a partial menu 1st question do you have the plot lisps vba .net code ?

Here is a link to auto plotting layouts for one printer, the second is menu code

; plotpdf2 ver 2 with filename and directory as output oct 2011

(PROMPT ".....PRINTING DRAWING TO pdf's....")

(setvar "cmddia" 0)
(setvar "filedia" 0)
(setq plotabs nil) ; in case run before

(setq doc (vla-get-activedocument (vlax-get-acad-object)))
(vlax-for lay (vla-get-Layouts doc)
 (setq plotabs (cons (vla-get-name lay) plotabs))
)

(setq dwgname (GETVAR "dwgname"))
(setq len (strlen dwgname))
(setq dwgname (substr dwgname 1 (- len 4)))

(setq plottablist (acad_strlsort plotabs))

(setq len (length plottablist))
(setq x 0)

(repeat len
 (setq name (nth x plottablist))
 (princ name)
(setq pdfname (strcat (getvar "dwgprefix") dwgname "-" name))

 (if (/= name "Model")
   (progn
     (setvar "ctab" name)
(setvar "textfill" 1)
    
     (COMMAND "-PLOT"  "Y"  "" "dwg to Pdf"
       "Iso full bleed A3 (420.00 x 297.00 MM)" "m"    "LANDSCAPE"  "N"   "W"  "-6,-6"    "807,560" "1=2"  "C"
       "y"	  "Designlasercolour.ctb" "Y"	"n"    "n"    "n"   pdfName "N" "y"      )
   )
 )
 (setq x (+ x 1))

)
(setvar "cmddia" 1)
(setvar "filedia" 1)
(setq DWGNAME nil
     LEN nil
     NAME nil
     PLOTTABLIST nil) 
(princ)

***MENUGROUP=BIGAL
***POP15
[->LISP4 L-P]
            [Labelstn]^c^c^p(load "labelstn")
            [PlotPdf]^c^c^p(load "plotpdf")
            [PlotA0]^c^c^p(load "plotplotter")
            [PlotA3col]^c^c^p(load "plotA3COLOUR")
            [PlotA3B-W]^c^c^p(load "plotA3Black-white")
            [plot tiff]^c^c^p(load "plotiff") 
            [Pt z label]^c^c^p(load "point z label")
            [PramXcurv]^c^c^p(load "pramcross1")
            [Purgelays]^c^c^pscript purgelays
[<-]

Unfortunately I am don't know a whole lot about lisp routines, so what you wrote might as well be French. And I don't know a lick of French. I'm sorry. This may be too involved but could you walk me through the steps to get this working. It's an awesome tool to have.