Don't like ads? PRO users don't see any ads ;-)
Guest

rasp- numeri primi

By: a guest on Jun 21st, 2012  |  syntax: Bash  |  size: 0.37 KB  |  hits: 34  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. READ X
  2. LOAD X
  3. JLEZ NEG
  4. SUB # 3
  5. JLEZ PRIMO
  6. LOAD X
  7. DIV # 2
  8. MUL # 2
  9. SUB X
  10. JZ NONPRIMO
  11. LOAD # 3
  12. STORE D
  13. LOAD X
  14. DIV # 2
  15. STORE XM
  16.  
  17. FOR:
  18.  
  19. LOAD D
  20. SUB XM
  21. JLEZ PRIMO
  22. LOAD X
  23. DIV D
  24. MUL D
  25. SUB X
  26. JZ NONPRIMO
  27. LOAD D
  28. ADD # 2
  29. STORE D
  30. JUMP FOR
  31.  
  32. NEG:
  33.  
  34. WRITE # -1
  35. JUMP FINE
  36.  
  37. PRIMO:
  38.  
  39. WRITE # 1
  40. JUMP FINE
  41.  
  42. NONPRIMO:
  43.  
  44. WRITE # 0
  45. JUMP FINE
  46.  
  47. FINE:
  48. HALT