From 3cc80610c8a163dcb76faf68996934958fb785e6 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sun, 12 Dec 2021 13:08:26 -0800 Subject: playing with Paul Batchelor's Trikufic tileset https://pbat.ch/wiki/trikuf https://merveilles.town/@akkartik/107432999019092669 --- 507line.mu | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to '507line.mu') diff --git a/507line.mu b/507line.mu index fadd6639..d9992747 100644 --- a/507line.mu +++ b/507line.mu @@ -94,6 +94,14 @@ fn draw-rect screen: (addr screen), xmin: int, ymin: int, xmax: int, ymax: int, } } +fn draw-rect2 screen: (addr screen), xmin: int, ymin: int, w: int, h: int, color: int { + var xmax/eax: int <- copy xmin + xmax <- add w + var ymax/ecx: int <- copy ymin + ymax <- add h + draw-rect screen, xmin ymin, xmax ymax, color +} + # 0 <= u <= 1 fn line-point u: float, x0: int, x1: int -> _/eax: int { var one/eax: int <- copy 1 -- cgit 1.4.1-2-gfad0