From ff14ec096f249b66dde25f2be591dd7cb6a4af70 Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Mon, 3 Apr 2023 09:21:38 -0600
Subject: [PATCH] prepend scene labels with number

---
 src/kiss/AsyncEmbeddedScript.hx | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/kiss/AsyncEmbeddedScript.hx b/src/kiss/AsyncEmbeddedScript.hx
index 0736eb3..fca4688 100644
--- a/src/kiss/AsyncEmbeddedScript.hx
+++ b/src/kiss/AsyncEmbeddedScript.hx
@@ -13,6 +13,7 @@ import kiss.Kiss;
 import kiss.ReaderExp;
 import kiss.Prelude;
 import kiss.cloner.Cloner;
+using StringTools;
 
 typedef Continuation = () -> Void;
 typedef AsyncCommand = (AsyncEmbeddedScript, Continuation) -> Void;
@@ -147,9 +148,11 @@ class AsyncEmbeddedScript {
         var labelsList:Array<Expr> = [];
         var noSkipList:Array<Expr> = [];
 
+        var labelNum = 0;
         k.macros["label"] = (wholeExp:ReaderExp, args:Array<ReaderExp>, k:KissState) -> {
             wholeExp.checkNumArgs(1, 1, '(label <label>)');
             var label = Prelude.symbolNameValue(args[0]);
+            label = '${++labelNum}. '.lpad("0", 5) + label;
             labelsList.push(macro labels[$v{label}] = $v{commandList.length});
             
             wholeExp.expBuilder().callSymbol("cc", []);