;  plot a line at 10,10 to 50,50

; x = 10
; y = 10
; while x <= 50
;   plot x, y
;   x++
;   y++

.symbol
  x  1
  y  2
  plot 15
.code 0
  mov x #10
  mov y #10
:while
  le r3 x #50
  jf r3 exit
  st x 1010
  st y 1011
  trap r3 #plot
  add x x #1
  add y y #1
  jmp while
:exit
  trap r0 #0

.data 100
 0
.end
  