From 44c4cc3a116f6459f882c30f2dcc11d234a059df Mon Sep 17 00:00:00 2001 From: Roman Boykov Date: Sat, 24 Oct 2026 10:22:38 +0300 Subject: [PATCH] Refactoring --- main.asm | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/main.asm b/main.asm index fa05e1c..709d3f7 100644 --- a/main.asm +++ b/main.asm @@ -5009,7 +5009,10 @@ NOCLRPAR: RET ; -------------------------------------------------- -; Get parameters X, Y and Color, and check +; Get parameters X, Y, and check Y<256 +; Out: BC - Y coordinate (0..255) +; DE - X coordinate +; A - Y coordinate (0..255) ; -------------------------------------------------- GET_XYC_CHK: CALL GET_XYC @@ -5073,9 +5076,8 @@ PSETMONO: LD A, (HL) OR C LD (HL), A - DB LD_HL_nn -OPSTPOS: - DW 0x0000 +OPSTPOS EQU $+1 + LD HL, 0 RET ; -------------------------------------------------- @@ -5112,7 +5114,7 @@ GET_WHC: RET ; -------------------------------------------------- -; BOX [(X, Y)] W, H[, forecolr, bgcolr] statement +; BOX [(X, Y)] W, H[, forecolor, bgcolor] statement ; -------------------------------------------------- BOX: LD A, (CUR_VMODE)