Advertisement
green1ant

var7 working+

Mar 15th, 2019
234
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.         org 100h
  2.  
  3. Start:
  4.         mov     si, 0
  5.         mov     di, 0
  6.  
  7.  
  8.        
  9. Fill1:
  10.         movsx bx, [arr1 + si]
  11.         mov [res + si], bl
  12.  
  13.         inc si
  14.         cmp si, 4
  15.         jne Fill1
  16.  
  17.         xor si, si
  18. Fill2:
  19.         movsx bx, [arr2 + si + 1]
  20.         mov [res + si], bl;bl
  21.  
  22.         inc si
  23.         cmp si, 4
  24.         jne Fill2
  25.  
  26.  
  27.         xor     ax, ax
  28.         mov     si, 0
  29.         mov     di, 0
  30. ReviewRes:
  31.         movsx   bx, [res + si]
  32.         mov      di, 0
  33.  
  34.         WatchFurther:
  35.                 movsx   cx, [res + di]
  36.  
  37.                 cmp     si, di
  38.                 je      Continue
  39.  
  40.                 cmp     bx, cx
  41.                 je      BreakInnerLoop
  42.  
  43.                 cmp     di, 8
  44.                 je      @F
  45.                 jmp     Continue
  46.  
  47.                 @@:
  48.                 inc     ax
  49.                 jmp     BreakInnerLoop
  50.  
  51.                 Continue:
  52.                 inc     di
  53.                 cmp     di, 8
  54.                 jbe     WatchFurther
  55.  
  56.         BreakInnerLoop:
  57.  
  58.         inc     si
  59.         cmp     si, 8
  60.         jbe     ReviewRes
  61.  
  62.  
  63. PrintRes:
  64.  
  65.         ;print ax
  66.         mov     bx, ax
  67.         add     bx, '0'
  68.  
  69.         mov     ah, $02
  70.         mov     dx, bx
  71.         int 21h
  72.  
  73.         mov     ah, $09
  74.         mov     dx, pak
  75.         int 21h
  76.         mov     ah, $08
  77.         int 21h
  78.  
  79.         ret
  80.  
  81.  
  82. pak  db 13, 10, 'Press any key to exit...$'
  83. arr1 db 1, 2, 3, 4
  84. arr2 db 5, 1, 1, 7
  85.  
  86. ;res  db 1, 2, 3, 4, 5, 1, 1, 1
  87. res  db 8 dup (?)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement