I Like BlitzMAX (notes on the win32 beta)

If you're bored, bradford, maybe you could do a third example using Classic Blitz style OOP (ie just Types and nothing else)... =]