From 83561b1acfb603967f0f598adb6f315db0608c33 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Fri, 20 Jun 2025 08:21:28 -0400
Subject: Added convenience routine for looking up a label-replacement pair
 that remains unused.  Fixed the RSS feed a bit for conformance.  Added batch
 commands on windows to strip BASIC EOF character from files after building
 during the lowercasing step.

---
 config.bas | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

(limited to 'config.bas')

diff --git a/config.bas b/config.bas
index 9459e74..d141223 100644
--- a/config.bas
+++ b/config.bas
@@ -39,4 +39,20 @@
 24210 WEND
 24220 CLOSE #9
 24230 RETURN
-
+24300 REM =============================
+24301 REM Retrieve one config string
+24302 REM index
+24303 REM
+24304 REM INPUT - LBL$ List of labels
+24305 REM         ILBL # of labels
+24306 REM              already set
+24307 REM         SEARCH$ Label to
+24308 REM                 find
+24309 REM OUTPUT - IFOUND Index of 
+24310 REM                 label or -1
+24311 REM =============================
+24320 FOR IFOUND=1 TO ILBL
+24330    IF LBL$(IFOUND) = SEARCH$ THEN GOTO 24360
+24340 NEXT IFOUND
+24350 IFOUND = -1
+24360 RETURN
-- 
cgit v1.2.3