Advertisement
Guest User

Untitled

a guest
Jan 22nd, 2018
55
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.97 KB | None | 0 0
  1. TITLE MASM Template (main.asm)
  2.  
  3. INCLUDE Irvine32.inc
  4.  
  5. ; Zadanie
  6. ; V herni je hraci automat. Funguje takto: Najprv zadáte do automatu nejaké 4-ciferné číslo.
  7. ; Automat ho zmení tak, že ho vypíše odzadu.
  8. ; Každú párnu číslicu zväčší o 2.
  9. ; Každú nepárnu číslicu zmenší o 3.
  10.  
  11. .data
  12. dlzka EQU 5
  13. stringIn DB dlzka dup(0)
  14. message1 DB "Zadajte 4-ciferne cislo: ",13,10,0
  15.  
  16.  
  17. .code
  18. main PROC
  19. call Clrscr
  20.  
  21. mov edx, offset message1
  22. call WriteString
  23. mov edx, offset stringIn
  24. mov ecx, length stringIn
  25. call ReadString ;//Reads number from user
  26. ;call WriteString ;//Testing purposes
  27.  
  28. xor edi,edi
  29. xor esi,esi
  30. dec ecx
  31. mov esi, 3
  32. Cyklus:
  33. mov al,[edx + esi]
  34. mov [ebx + edi],al
  35. inc edi
  36. dec esi
  37. loop Cyklus
  38.  
  39. mov edx, ebx
  40. call WriteString
  41.  
  42. call ReadChar
  43.  
  44. exit
  45. main ENDP
  46.  
  47. END main
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement