Guest User

Untitled

a guest
Jul 19th, 2018
88
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.58 KB | None | 0 0
  1. MOV R0, #50h
  2. JMP actie
  3. lus: INC R0
  4. actie: CJNE @R0, #0xFF, zet
  5. POP ACC
  6. MOV 70h, A
  7. einde: JMP $
  8.  
  9. overflow:
  10. MOV A, PSW
  11. JB ACC.2, setOV
  12. JB ACC.7, setOV
  13. JMP lus
  14.  
  15. setOV: MOV 70h, #0xFF
  16. JMP einde
  17.  
  18. zet: CJNE @R0, #0xFB, check2
  19. POP ACC
  20. POP B
  21. ADD A,B
  22. PUSH ACC
  23. JMP overflow
  24. check2: CJNE @R0, #0xFC, check3
  25. POP ACC
  26. POP B
  27. MUL AB
  28. PUSH ACC
  29. JMP overflow
  30. check3: CJNE @R0, #0xFD, check4
  31. POP B
  32. POP ACC
  33. DIV AB
  34. PUSH ACC
  35. JMP overflow
  36. check4: CJNE @R0, #0xFE, else
  37. POP B
  38. POP ACC
  39. DIV AB
  40. PUSH B
  41. JMP overflow
  42. else: MOV A, @R0
  43. PUSH ACC
  44. JMP lus
Add Comment
Please, Sign In to add comment