; Simple example machine language program to print all even
; letters (using repetition)
;
; Peter Christen, 4 April 2003

START a10   ; start address of the program, initialise PC to this

AT a10                  ; store these instructions from a10 onwards
000 001 0 001 000 010   ; a10: load 'B' (=102_8), immediate mode
110101  0 000 000 011   ; a11: trap 3 (put)
000 111 0 001 011 010   ; a12: comp 'Z' (=132_8), immediate mode
101001  0 000 001 110   ; a13: branch equal (to a16, if EQ=1)
000 011 0 000 000 010   ; a14: add 2, immediate mode
101000  0 000 001 001   ; a15: jump a11
110101  0 000 000 001   ; a16: trap 1 (halt)