fy"> je end_tst; якщо збігаються - кінець тесту
103 error_rom:
104 mov si, 1
105 mov ds: [si], FFFEh; помістити в область виведення знач. коду помилки
106 int 32; виклик п/програми виведення
107 jmp error_rom
108 end_tst: ret
test_rom endp
110 test_ram PROC NEAR; підпрограма тестування озу
111 mov cx, 1000h; спочатку - тест старшого банку ОЗУ
112 test_bank:
mov ds, cx
mov di, 0ffffh; лічильник повторень
115 test_cell: mov ax, СONST1
116 mov [di], ax; записати в пам'ять
117 mov bx, [di]; вважати з пам'яті
cmp ax, bx; порівняти записане і лічений
119 jne error_ram; перейти на обробник помилок
120 mov ax, СONST2; продовжити тест з іншого константою
mov [di], ax; записати в пам'ять
122 mov bx, [di]; вважати з пам'яті
cmp ax, bx; порівняти записане і лічений
jne error_ram; перейти на обробник помилок
dec di; перейти до наступного адресою
126 jnz test_cell
127 test cx, 0; молодший банк протестований?
128 jz end_test_ram
129 mov cx, 0; перехід до тестування молодшого банку ОЗП
130 jmp test_bank
error_ram:
132 mov si, 1
133 mov ds: [si], FFFDh; помістити в обл. виводу значення коду помилки
134 int 32; виклик п/програми виведення
135 jmp error_ram
136 end_test_ram: ret
137 test_ram ENDP
138 input PROC NEAR; обробник перери...
