Advertisement
Guest User

Untitled

a guest
Feb 6th, 2016
54
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.27 KB | None | 0 0
  1. TITLE MASM Template (main.asm)
  2.  
  3. INCLUDE Irvine32.inc
  4. .data
  5. R DB 15 DUP(?),0dh,0ah,0
  6. S DB 15 DUP(?),0dh,0ah,0
  7. HV DB "***",0
  8.  
  9. .code
  10. main PROC
  11. call Clrscr
  12.  
  13. mov edx, offset R
  14. mov ecx, sizeof R
  15. call ReadString
  16. mov ebx, eax
  17. mov edx, offset S
  18. mov ecx, sizeof S
  19. call ReadString
  20. mov esi, eax
  21. mov ecx, ebx
  22.  
  23. mov ebx,0
  24. mov edx,0
  25. mov edi,0
  26.  
  27. Nacitanie1:
  28. cmp edi, ecx
  29. je DruhaPolka
  30. mov al, [R+edi]
  31. mov bl, [S+edi]
  32. cmp al, bl
  33. je Vypis1
  34. jmp Hviezdicky1
  35.  
  36. Vypis1:
  37. mov al, [R+edi]
  38. call WriteChar
  39. inc edi
  40. jmp Nacitanie1
  41.  
  42. Hviezdicky1:
  43. mov edx, offset HV
  44. call WriteString
  45. inc edi
  46. jmp Dokoncenie1
  47.  
  48. Dokoncenie1:
  49.  
  50. cmp edi, ecx
  51. je DruhaPolka
  52. mov al, [R+edi]
  53. call WriteChar
  54. inc edi
  55. jmp Dokoncenie1
  56.  
  57.  
  58. DruhaPolka:
  59. mov al, 0ah
  60. call WriteChar
  61. mov al, 0dh
  62. call WriteChar
  63. mov edi,0
  64. mov esi, ecx
  65.  
  66. Nacitanie2:
  67. cmp edi, ecx
  68. je Koniec
  69. mov al, [S+edi]
  70. mov bl, [R+edi]
  71. cmp al, bl
  72. je Vypis2
  73. jmp Hviezdicky2
  74.  
  75. Vypis2:
  76. mov al, [S+edi]
  77. call WriteChar
  78. inc edi
  79. jmp Nacitanie2
  80.  
  81. Hviezdicky2:
  82. mov edx, offset HV
  83. call WriteString
  84. inc edi
  85. jmp Dokoncenie2
  86.  
  87. Dokoncenie2:
  88. cmp edi, ecx
  89. je Koniec
  90. mov al, [S+edi]
  91. call WriteChar
  92. inc edi
  93. jmp Dokoncenie2
  94.  
  95. Koniec:
  96. exit
  97. main ENDP
  98.  
  99. END main
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement