Advertisement
awsmpshk

Asm Test

Oct 5th, 2020
68
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. stak segment stack 'stack'
  2. db 100h dup (?)
  3. stak ends
  4. data segment 'data'
  5. Text db 'Kuzichkin Pavel, 241 group$'
  6. Space db 20h
  7. M1 db 32h
  8. M2 db 38h
  9. data ends
  10. code segment 'code'
  11. assume CS:code,DS:data,SS:stak
  12.  
  13. start:
  14. mov AX, data
  15. mov DS, AX
  16. call Print_Text
  17. mov AL, M1
  18. mov BL, M2
  19. call Out_string
  20. XCHG AL, BL
  21. call Out_string
  22. mov AX, 4C00h
  23. int 21h
  24. Out_string proc
  25. mov DL, AL
  26. mov AH, 09h
  27. int 21h
  28. mov DL, Space
  29. int 21h
  30. mov DL, BL
  31. int 21h
  32. mov DL, 0Ah
  33. int 21h
  34. ret
  35. Out_string endp
  36. Print_Text proc
  37. mov DX, offset Text
  38. mov AH, 09h
  39. int 21h
  40. ret
  41. Print_Text endp
  42.  
  43. code ends
  44. end start
Advertisement
RAW Paste Data Copied
Advertisement