Help with script to make PDFs

Hi

I have an Applescript that will pdf an indesign file but I want to improve it.

I want it to be a droplet that can process multiple files.

Here is the script and thanks in advance to anyone who can help.

    tell application "Adobe InDesign CS5.5"

        set user interaction level of script preferences to never interact

        activate

        set My_Pdf_Presets to name of every PDF export preset

        set MyPdfPreset to choose from list My_Pdf_Presets with prompt "Choose a preset"

        if MyPdfPreset is false then

            display dialog "User Cancelled!" buttons "OK" giving up after 60

            error number -128

        end if

        set properties of PDF export preferences to properties of PDF export preset (item 1 of MyPdfPreset)

        set page range of PDF export preferences to all pages

        set MyFolder to file path of active document

        tell application "Finder"

            if (exists folder "PDFs" of folder MyFolder) is false then

                make new folder at MyFolder with properties {name:"PDFs"}

            end if

        end tell

        set MyDocName to name of active document

        set OrigDelims to text item delimiters of AppleScript

        set text item delimiters of AppleScript to {"."}

        set MyShortName to text item 1 of MyDocName

        set text item delimiters of AppleScript to OrigDelims

        set MyFilePath to MyFolder & "PDFs" & ":" & MyShortName & ".pdf" as string

        tell active document

            export format PDF type to MyFilePath without showing options

            close saving no

        end tell

        set user interaction level of script preferences to interact with all

        activate

        display dialog "Your PDFs are ready" with icon 1 buttons {"OK"} default button "OK"

    end tell