[an error occurred while processing this directive]
|
Тоже интересный момент, как я на него "попал" сам не знаю, код выглядит так :
ля-ля-ля, как обычно ...
af = pass 0;
sr = lshift si by -4 (hi);
ar = sr1 + 1;
m3 = ar;
ay0 = 0xFFFF;
modify (i3,m3);
find_scan_page:
ax0 = dm(i3,m3);
ar = ax0 xor ay0;
if ne jump find_free_scan_bit;
if not ce jump find_scan_page;
af = pass 1; ar = pass 0;
rts;
find_free_scan_bit:
cntr = 0;
ну и дальше ля-ля-ля ...
Результаты XOR - если ax0 = 1, то 0х7FFF, если 2, то правильно - 0хFFFD, если 3 то 0x3FFF ....
Выход - "перетусовка" команд, для нахождения рабочего варианта :))
E-mail: info@telesys.ru