MoveEntriesFromOneProjectToAnother

tell application "TaskPaper"
    tell front document
        set move_entry_ids to {}

        set f to project named "From"
        repeat with each in entries of f
            set move_entry_ids to move_entry_ids & id of each
        end repeat

        set t to project named "To"
        repeat with each in move_entry_ids
            move entry id each to end of entries of t
        end repeat
    end tell
end tell