Advertisement
Guest User

Untitled

a guest
Mar 31st, 2020
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.93 KB | None | 0 0
  1. TITLE Exe style skeleton
  2.  
  3. .486
  4.  
  5. STCK SEGMENT PARA STACK 'stack' use16
  6. DB 64 DUP ('my_stack') ; reserve 256 bytes for stack
  7. STCK ENDS
  8.  
  9.  
  10. DATA1 SEGMENT PARA PUBLIC 'DATA' use16
  11.  
  12. sir1 db "anaaremere"
  13. len1 db $-sir1
  14. i db 0
  15.  
  16. DATA1 ENDS
  17. DATA2 SEGMENT PARA PUBLIC 'DATA' use16
  18.  
  19. sir2 db 12 dup(?)
  20.  
  21.  
  22. DATA2 ENDS
  23. COD1 SEGMENT PARA PUBLIC 'CODE' use16
  24.  
  25. MAIN PROC FAR ; main proc MUST be FAR
  26.  
  27. ASSUME CS:COD1,DS:DATA1,SS:STCK,ES:DATA2
  28.  
  29. PUSH DS ;save DS on stack for OS return
  30. XOR AX,AX ;
  31. PUSH AX ;put 0 on stack for OS return
  32. MOV AX,DATA1
  33. MOV DS,AX ;load data Segement register
  34. MOV AX,DATA2
  35. MOV ES,AX
  36.  
  37. mov cl,len1
  38. mov ch,0
  39. mov si,0
  40. copiere:
  41. mov al,sir1[si]
  42. mov sir2[si],al
  43. inc si
  44. loop copiere
  45.  
  46.  
  47.  
  48.  
  49.  
  50. ;place your code here
  51.  
  52. RET ; return to OS
  53.  
  54. MAIN ENDP
  55.  
  56. COD1 ENDS
  57. END MAIN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement