set recipient_address to "recipient@example.com"
set email_subject to "Enter subject here"
set email_body to ""
set send_immediately to false

set all_attachments to {}

repeat with i from 1 to number of items in draggedFiles
    set draggedFile to item i of draggedFiles
    set the_attachment to POSIX path of draggedFile
    set end of all_attachments to the_attachment
end repeat

tell application "Mail"
    activate
    set new_message to make new outgoing message with properties {subject:email_subject, visible:true}
    tell new_message
        make new to recipient at end of to recipients with properties {address:recipient_address}
        set content to email_body
        repeat with the_attachment in all_attachments
            make new attachment with properties {file name:the_attachment} at after the last paragraph
        end repeat
    end tell
    if send_immediately then send new_message
end tell
