# Pastebin YMxhnzRb
Account = Object clone
Account total = 0
Account limit = 0

Account donate: = (amount|
  self total = self total + amount
)

Account withdraw: = (amount|
  new-total = self total - amount
  ((new-total + (self limit)) >= 0) if: [|
    self total = new-total
    amount
  ] else: [|
    self total = (self total) - (self limit)
    (self limit)
  ]
)

# you can only withdraw until you reach -50 on the account
account = Account clone
account limit = 50

account donate: 100
account total to-s puts
# 100
account donate: 333
account total to-s puts
# 433
(account withdraw: 500) to-s puts
account total to-s puts