SHARE
TWEET

Untitled

a guest Nov 19th, 2019 91 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.         org 100h
  2. start:                                                 
  3. mov ah, 2
  4. mov dl,10
  5. int 21h
  6. mov dl, 13
  7. int 21h
  8. xor dx, dx ;dx 0 aktualnie i uzywane do dzielenia
  9.  
  10. mov ax,50269   
  11. mov SI, 0
  12.  
  13. dzielenie:
  14. div word [dzielniki+SI]
  15. mov [reszta], dx
  16. mov [wynik], ax
  17. xor ax, ax
  18. xor dx, dx
  19.  
  20. add SI, 2
  21. cmp  word [wynik], 0
  22. je czyzeroprzod
  23. call zmienzero
  24.  
  25.  
  26. Wypisz:
  27. mov dx, [wynik]
  28. add dx, 48
  29. mov ah, 2
  30. int 21h
  31. xor dx, dx
  32. xor ax, ax
  33. mov ax, [reszta]
  34.  
  35. cmp SI, 10
  36.  
  37. jne dzielenie
  38. je koniec
  39.  
  40. czyzeroprzod:
  41. mov ax, [reszta]
  42.  cmp word   [zeroprzod], 0
  43. jne dzielenie
  44. je Wypisz
  45.  
  46. zmienzero:
  47. pop bx
  48. mov word [zeroprzod],0
  49. push bx
  50. ret
  51.  
  52. koniec:
  53. mov ax, 4c00h
  54. int 21h
  55.  
  56. dzielniki dw 10000,1000,100,10,1
  57. wynik dw 0
  58. reszta dw 0
  59. zeroprzod dw 1
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top