diff options
| author | Jeffrey Armstrong <jeff@approximatrix.com> | 2024-11-24 16:16:56 -0500 |
|---|---|---|
| committer | Jeffrey Armstrong <jeff@approximatrix.com> | 2024-11-24 16:16:56 -0500 |
| commit | 365c48e0e50957f6f38ebb3bb6b39aa1f5584ea9 (patch) | |
| tree | 8518ea99cad5bdc864c22801872fcc57987f942b /gwfetch.bas | |
| parent | 5168986ac89e4f5109356760a5a356a56500c65a (diff) | |
| download | GWFetch-365c48e0e50957f6f38ebb3bb6b39aa1f5584ea9.tar.gz GWFetch-365c48e0e50957f6f38ebb3bb6b39aa1f5584ea9.zip | |
Fixed some typos that apparently effected DR DOS detection
Diffstat (limited to 'gwfetch.bas')
| -rw-r--r-- | gwfetch.bas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gwfetch.bas b/gwfetch.bas index aaf9041..e1818d2 100644 --- a/gwfetch.bas +++ b/gwfetch.bas @@ -39,7 +39,7 @@ 510 DIM LOGO$(25)
520 IF DOSBOX = 1 THEN GOSUB 20050:GOTO 1000
530 IF OEM% = &HEE OR OEM% = &HEF THEN GOSUB 20100:GOTO 1000
-530 GOSUB 20000
+540 GOSUB 20000
1000 REM Output time
1001 CLS
@@ -92,7 +92,7 @@ 10020 OPEN TMPFILE$ FOR INPUT AS #2
10030 IF EOF(2) THEN GOTO 10060
10040 INPUT#2, VERLINE$
-10050 IF LEN(G$) = 0 THEN GOTO 10030 ELSE GOTO 10060
+10050 IF LEN(VERLINE$) = 0 THEN GOTO 10030 ELSE GOTO 10060
10060 CLOSE#2
10070 REM VERLINE$ now contains the first non-blank version
10080 REM output. Technically it is just the command
|