Macro to move mail from inbox to folder

Hello,

I am looking for a macro that will move an email item from the inbox of a mail account to a folder in that mail account's inbox.

The trick of it is, the mail must remain in the inbox UNTIL it is marked as read. So this makes it so I can't just use a rule to move it to an appropriate folder.

This also must be automated, potentially scanning the inbox every few minutes for a mail item that meets a criteria, then moving it.

Any helpful tips would be greatly appreciated!

--Thanks in advanced!