From 4e0fd9244b327fc74c205d703e43aac6f579430d Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Sat, 30 Nov 2024 01:18:46 -0500
Subject: Added some donation links for when you run the software.

---
 gwfetch.bas | 19 ++++++++++++++++---
 1 file changed, 16 insertions(+), 3 deletions(-)

diff --git a/gwfetch.bas b/gwfetch.bas
index dc71cae..f2d394a 100644
--- a/gwfetch.bas
+++ b/gwfetch.bas
@@ -6,8 +6,22 @@
 29 REM battery or the time has been set
 30 SHOWUPTIME = 1
 
-199 PRINT "GWFetch 0.1 (c) 2024 J.Armstrong - See LICENSE.txt"
-200 PRINT "Working..."
+150 PRINT "GWFetch 0.1 (c) 2024 J.Armstrong - See LICENSE.txt"
+151 PRINT
+152 PRINT "While we have some time, please consider donating if you"
+153 PRINT "like this software.  I suggest:"
+154 PRINT
+155 IF INT(TIMER) MOD 2 = 0 THEN GOTO 165
+160 PRINT "The Greater Cleveland Food Bank"
+161 PRINT "https://greaterclevelandfoodbank.org/"
+162 GOTO 190
+165 PRINT "Colors+ Youth Center"
+166 PRINT "https://colorsplus.org/"
+167 GOTO 190
+
+190 PRINT:PRINT "(The author of GWFetch has no affiliation with the above org."
+191 PRINT "Please consider donating if you like this software.)"
+200 PRINT:PRINT "Working..."
 210 TMPFILE$ = "TEST.TMP"
 211 REM The array for our asm routines
 212 DIM Q%(400)
@@ -278,7 +292,6 @@
 12530 NEXT I
 12540 DOSVER = 1 + VARPTR(Q%(1))
 12550 CALL DOSVER(DVER%, OEM%)
-12565 print "okay: ";oem%
 12570 TOTRIM$ = STR$(DVER% MOD 256):GOSUB 30000:DVERMAJOR$ = TOTRIM$
 12580 TOTRIM$ = STR$(INT(DVER% / 256)):GOSUB 30000:DVERMINOR$ = TOTRIM$
 12600 DATA &H55 : REM         push bp
-- 
cgit v1.2.3