How do I implement an escrow service using Bitcoin contracts? I can see that Bitocin can provide escrow contracts. https://en.bitcoin.it/wiki/Contracts#Example_2:_Escrow_and_dispute_mediation

Can someone provide a worked example or even better a pointer to a code example.
The functionality is not yet implemented in Bitcoin. On October 18 Gavin created 3 Bitcoin Improvement Proposals that would support the functionality, Bitcointalk:OP_EVAL proposal.


M-of-N Standard Transactions
OP_EVAL
Address Format for OP_EVAL