From 20fc76e36d4e11d2cf949229841d31f504b6e154 Mon Sep 17 00:00:00 2001
From: Ketmar Dark <ketmar@ketmar.no-ip.org>
Date: Sun, 16 Aug 2020 01:16:17 +0300
Subject: [PATCH] example driver: show current pass number

---
 main.zas | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/main.zas b/main.zas
index 5641c31..cec7d8d 100644
--- a/main.zas
+++ b/main.zas
@@ -48,6 +48,14 @@ main:
 
   ; two-pass assemling
 asm_another_pass:
+  ld    hl,msg_pass_header
+  call  printstr
+  ld    a,(LABMAN_PASS)
+  add   '0'+1
+  call  EMIT
+  ld    hl,msg_pass_footer
+  call  printstrnl
+
   ld    ix,asmdest
   ld    (BZ80ASM.PC),ix
   ld    iy,strbuf
@@ -218,6 +226,13 @@ list_and_error_no_label_check:
 errline: defx "---------"
 
 
+msg_pass_header:
+  defm "***************",13
+  defx "*** PASS #"
+msg_pass_footer:
+  defm " ***",13
+  defx "***************"
+
 strbuf:
   defm  "or   c:inc a ; comment",13
   defm  "and  (hl)",13
-- 
2.11.4.GIT