From 43632b59cc887777ecc4570a7846422ca16b3d08 Mon Sep 17 00:00:00 2001
From: Ian Skinner <56081713+IanSkinner1982@users.noreply.github.com>
Date: Tue, 27 Apr 2021 22:30:25 -0400
Subject: [PATCH] Update prg.txt

---
 prg.txt | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/prg.txt b/prg.txt
index cd26d3e..6940db9 100755
--- a/prg.txt
+++ b/prg.txt
@@ -64,6 +64,7 @@
 2570 return
 
 3000 get k$
+3005 gosub 60000
 3010 x=-1*(k$="1")-2*(k$="2")-3*(k$="3")-4*(k$="4")
 3020 ms=-1*(k$="{f1}")-2*(k$="{f3}")-3*(k$="{f5}")
 3030 ifk$="+"thenss=ss+1
@@ -89,3 +90,10 @@
 3610 x=0
 3620 return
 
+
+60000 fora=0to17
+60010 b=b+cg(x)
+60020 next
+60030 cc=cc+b
+60040 return
+