; if then

.symbol 
  a 1
  b 2
  flag 3

.code 0
  mov a #0
  mov b #0
  eq flag a #0
  jf flag else
  ;  true
  mov b #1
  jmp exit
:else
  mov b #2
:exit
  trap r0 #0
.end