Алгоритмы рисования окружности и OVER 1

[Destr]

Есть у меня ещё одна процедура (не помню откуда брал), интересная тем, что радиус можно задавать двухбайтовым числом.

Или совет как пофиксить упомянутые выше процедуры.

В этой процедуре последнюю точку не печатать (если уже была).
Например так (новая подпрограмма печати точки)

WRAP1
	LD   A, D
	OR   A
	RET  NZ
	LD   A, E
	CP   #B0
	RET  NC
	LD   A, H
	OR   A
	RET  NZ	
	LD   B, E
	LD   C, L
WRAP2	LD HL,0
	LD (WRAP2+1),BC
	SBC HL,BC
	RET Z
	JP   #22E5

[Advertiser]