ZX Like Pascal

[ALKO]

Итак, вернёмся к нашым атрибутам.

Паскаль:

For attrx:=0 to 23 do begin
attry:=attrx;
asm(ATTR);

end;

Асм:

ATTR
LD B, _ATTRX
LD C, _ATTRY
LD A,B
RRCA
RRCA
RRCA
LD L,A
AND 31
OR 88
LD H,A
LD A,L
AND 252
OR C
LD L,A
LD (HL),0
RET

Теоретически должна появиться диагональная полосочка из квадратиков.
Но ничего так и не появилось. Компилится без ошибок, и сама прога стартует, а вот эта процедура никак себя не проявляет.

[Advertiser]

[blackmirror]

LD B, _ATTRX
LD C, _ATTRY

Есть подозрение, что здесь загружаются не значения, а младшие части адресов данных переменных.