From 05d8caf8a6243c7a2019be140a476fe5db2f416d Mon Sep 17 00:00:00 2001
From: Joshua Bell <inexorabletash@gmail.com>
Date: Mon, 18 Sep 2017 21:43:35 -0700
Subject: [PATCH] Identify DRAW_LINE

---
 desk.acc/a2d.inc  |  7 +++++--
 desk.acc/puzzle.s | 17 +++++++++++------
 2 files changed, 16 insertions(+), 8 deletions(-)

diff --git a/desk.acc/a2d.inc b/desk.acc/a2d.inc
index 161f6aa..f007601 100644
--- a/desk.acc/a2d.inc
+++ b/desk.acc/a2d.inc
@@ -113,11 +113,14 @@ A2D_UNK_0C      := $0C          ; Unknown - used in calculator
 
 A2D_SET_POS     := $0E
         ;; (input length 4 bytes)
-        ;; .word x
-        ;; .word y
+        ;; .word xcoord
+        ;; .word ycoord
 
+A2D_DRAW_LINE   := $0F          ; Draw line (from SET_POS)
         ;; $0F used in puzzle
         ;; (input length 4 bytes)
+        ;; .word xdelta         signed, delta in pixels
+        ;; .word ydelta
 
 A2D_FILL_RECT   := $11          ; With selected simple pattern (SET_PATTERN)
         ;; (input length 8 bytes)
diff --git a/desk.acc/puzzle.s b/desk.acc/puzzle.s
index 0444286..787d968 100644
--- a/desk.acc/puzzle.s
+++ b/desk.acc/puzzle.s
@@ -533,12 +533,15 @@ piece16:
         .res    8, $FF
         .byte   $00
 
-.proc set_pos_params            ; for what ??? (board is at 5,3)
-        .word   5, 2
+;; line across top of puzzle (bitmaps include bottom edges)
+.proc set_pos_params
+xcoord: .word   5
+ycoord: .word   2
+.endproc
+.proc draw_line_params
+xdelta: .word   112
+ydelta: .word   0
 .endproc
-
-        ;; Param block for $0F call (4 bytes)
-L0D91:  .byte   $70,$00,$00,$00 ; ???
 
         ;; hole position (0..3, 0..3)
 hole_x: .byte   0
@@ -974,8 +977,10 @@ draw_window:
         A2D_CALL A2D_SET_PATTERN, pattern_speckles
         A2D_CALL A2D_FILL_RECT, fill_rect_params
         A2D_CALL A2D_SET_PATTERN, pattern_black
+
         A2D_CALL A2D_SET_POS, set_pos_params
-        A2D_CALL $0F, L0D91     ; ???
+        A2D_CALL A2D_DRAW_LINE, draw_line_params
+
         jsr     draw_all
 
         lda     #window_id