ИФК: письмо на тему: "магнитофонный загрузчик с индикатором загрузки" пришло к нам от Артемьева Богдана из г. Жердевка.
КОРР: мне часто встречаются игры без рисунка при загрузке и, согласитесь, надоедает сидеть перед таким экраном и гадать: скоро ли конец загрузки. В одно из таких ожиданий я и задумал программу, которую и предлагаю сейчас вашему вниманию. Это ленточный индикатор загрузки. Он загружает блок кодов без заголовка, и по мере загрузки "заполняет" шкалу на экране. Перед вызовом программы необходимо ввести длину (LONG) и адрес загрузки блока (NACH.). При желании, можно добавить в начале программы блок загрузки заголовка и расчет LONG и NACH. относительно него.
|
LD |
(IY+83),6 |
|
LD |
(IY+14),6 |
|
LD |
A,2 |
|
CALL |
5633 |
|
CALL |
3435 |
|
LD |
HL,LONG+1 |
|
INC |
(HL) |
|
LD |
BC,12343 |
|
CALL |
8933 |
|
LD |
B, 0 |
|
LD |
A,(LONG+1) |
|
LD |
C,A |
|
PUSH |
BC |
|
LD |
DE,65281 |
|
CALL |
9402 |
|
LD |
BC,512 |
|
PUSH |
BC |
|
CALL |
9402 |
|
LD |
E, D |
|
PUSH |
DE |
|
LD |
A,(LONG+1) |
|
INC |
A |
|
INC |
A |
|
LD |
C,A |
|
LD |
B, 0 |
|
PUSH |
BC |
|
CALL |
9402 |
|
LD |
BC,2816 |
|
LD |
DE,257 |
|
CALL |
9402 |
|
POP |
BC |
|
CALL |
9402 |
|
POP |
DE |
|
POP |
BC |
|
CALL |
9402 |
|
POP |
BC |
|
CALL |
9402 |
|
LD |
BC,1792 |
;адрес левого верхнего угла шкалы.
:длина шкалы.
LOOP
L1
P1
P2
LONG DEFW ; длина блока.
NACH DEFW ; начальный адрес загрузки.
ИФК: Мы протестировали эту программу, и она нам понравилась. По нашему мнению такого типа загрузчиками желательно оснащать все магнитофонные версии программ.
