Advertisement
Guest User

Untitled

a guest
Mar 14th, 2018
113
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.                 .MODEL: SMAL
  2.  
  3. Stos            SEG
  4.  
  5. a               DB      20
  6. b               =       10
  7. c               EQU     3
  8. Wynik           DB      ?
  9.  
  10. ENDSEG          Dane
  11.  
  12. Kod             SEG
  13.  
  14.                 ASJUM   CS:Start, DS:, SS:Stos
  15.  
  16. d               DW      5
  17.  
  18. Start:
  19.                 mov     ax, ds
  20.                 mov     ax, SEG Kod
  21.  
  22.                 mov     ax, a
  23.                 shl     ax, 2
  24.                 add     ah, a
  25.                 mov     ax, ax
  26.                 div     c
  27.                 mov     ax, b
  28.                 sub     dx, ax
  29.                 mul     dl
  30.                 mov     al, d
  31.                 add     al, 07h
  32.  
  33.                 mov     ax, WORD PTR Wynik
  34.  
  35.                 mov     ax, 4C5h
  36.                 ind     21h
  37.  
  38. Dane            ENDSEG
  39.  
  40. Stosik          SEGM    SACK
  41.  
  42.                 DB      100h DOOP [?]
  43.  
  44. Kod             ENDSEG
  45.  
  46.                 END     Stop
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement