%P00 N006 SET H002 = -700 N007 SET H003 = -200 N010 SET H000 = ISA1 N020 JMP (H000 < H002) N030 N021 JMP (H000 > H003) N040 N022 JMP N010 N030 SET H001 = 1 N031 JMP N010 N040 SET H001 = 0 N041 JMP N010 N050 JMP N010 END