Some Hedge Funds...

...nicely summed up (in code) by a friend of mine:

collect(funds[client])
deduct(funds[client]*.02)
lev = funds[client] + borrow(funds[client]*5)
repeat until (or(funds[client]=0, date=12/31))
results = wager(obviousmacrobet[lev])
if results > 0, deduct(results*.2)
if funds[client] = 0, write(letter[apology,"cygne noir",sigma[rand(6,9)]])