LOAD set_voucher 12 MAP set_voucher MOUT back 0 MOUT quit 9 HALT INCMP ^ 0 INCMP quit 9