Advertisement
Guest User

Untitled

a guest
Feb 8th, 2019
203
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. .dseg
  2. mass: .db 1, 2, 3, 4, 5
  3. N: .db 5
  4. min: .byte 1
  5.  
  6. .cseg
  7. rjmp Start
  8. nop ; x10
  9.  
  10. Start:
  11.     LDI YL, low(mass)
  12.     LDI YH, high(mass)
  13.  
  14.     LD r0, N ; Количество элементов
  15.    
  16.     LD r1, Y+
  17.     ST min, r1 ; Записали минимум
  18.  
  19. search_min:
  20.     LD r1, Y+
  21.     LD r2, min
  22.  
  23.     SUB r1, r2
  24.  
  25.     SBIC SREG, 2 ; Пропускаем след команду, если результат отрицательный
  26.     ST min, r1
  27.  
  28.     DEC r0
  29.     brbc 1, search_min ; Если r0 = 0, то SREG.Z установится
  30.  
  31.     ; в min минимум
  32.  
  33. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement