From 1edd26243bde242f0de78c947c94cf3d73e6070b Mon Sep 17 00:00:00 2001
From: Andreas Grois <andi@grois.info>
Date: Thu, 4 Dec 2025 00:13:00 +0100
Subject: Day2

---
 day2/part1.TXT | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 day2/part1.TXT

(limited to 'day2/part1.TXT')

diff --git a/day2/part1.TXT b/day2/part1.TXT
new file mode 100644
index 0000000..82b0cda
--- /dev/null
+++ b/day2/part1.TXT
@@ -0,0 +1,24 @@
+\START92\
+\COMMENT=Single file dated Wed Dec  3 21:00:53 20
+\NAME=part1
+\FILE=day2.part1.92f
+(str)
+Func
+Local p1,p2,dimstr,curr,result
+0\->\result
+1\->\p1
+dim(str)\->\dimstr
+
+While p1<dimstr
+ inString(str,",",p1)\->\p2
+ If p2\<=\0 Then
+  dimstr+1\->\p2
+ EndIf
+ mid(str,p1,p2-p1)\->\curr
+ p2+1\->\p1
+ result+invids(curr)\->\result
+EndWhile
+Return result
+EndFunc
+
+\STOP92\
-- 
cgit v1.2.3