RELOAD validate_amount
MAP validate_amount
CATCH invalid_amount 17 1
RELOAD get_recipient
MAP get_recipient
RELOAD get_sender
MAP get_sender
MOUT back 0
MOUT quit 9
HALT
INCMP _ 0
INCMP quit 9