finding primes with dcpu-16

  set a,0 ;atmtocheck
  set b, 0  ;current modulo
  set c,100  ; border to check
  set i,1 ;index of tochecking prim
  set j,0 ;number of found prims
  :outerloop add i,1
  set a,i
  :innerloop sub a,1     ;donewithchecking
  ife a,1
  set pc ,donewithchecking
  set b,i
  mod b,a
  ife b,0   ;!isprim()
  set pc, aftersaving
  ifn b,0
  set pc,innerloop
  :donewithchecking set push,i;set [j],i
  add j,1
  :aftersaving
  ;set x, 0xffff
  ;sub x,sp
  ifn j,c
  set pc,outerloop
  :crash set pc, crash