From a493bd91d6366113178633b86dfd4703f73b520d Mon Sep 17 00:00:00 2001
From: "B. Watson" <urchlay@slackware.uk>
Date: Wed, 10 Jul 2024 16:28:06 -0400
Subject: chkbas: add missing left-paren to LEFT$/RIGHT$/MID$ for BXL/BXE; warn
about ATASCII and mention a8cat in man page.
---
jindroush/README.txt | 7 ++++---
jindroush/chkbas/basic_xe.h | 6 +++---
jindroush/chkbas/basic_xl.h | 6 +++---
jindroush/man/chkbas.1 | 18 +++++++++++++++++-
jindroush/man/chkbas.rst | 8 ++++++++
5 files changed, 35 insertions(+), 10 deletions(-)
(limited to 'jindroush')
diff --git a/jindroush/README.txt b/jindroush/README.txt
index 31d9af9..a085003 100644
--- a/jindroush/README.txt
+++ b/jindroush/README.txt
@@ -29,9 +29,10 @@ I've made to Jindroush's code:
with mode 0600; changed this to 0666 (which will still be affected
by the user's umask).
-- Added "listbas" symlink, to save typing "chkbas -short" over and over
- again.
-
- adir's -dir option now creates the directory if it doesn't exist.
- Wrote man pages for all the utilities.
+
+- Fixed a bug in chkbas: BASIC XL and XE's LEFT$ RIGHT$ MID$ were
+ being printed without the left parenthesis (e.g Left$(A$,3) was
+ coming out as Left$A$,3).
diff --git a/jindroush/chkbas/basic_xe.h b/jindroush/chkbas/basic_xe.h
index fc86131..56e0276 100644
--- a/jindroush/chkbas/basic_xe.h
+++ b/jindroush/chkbas/basic_xe.h
@@ -209,9 +209,9 @@ char* aOpsBasicXe[] = {
"ERR", //63
"TAB", //64
"PEN", //65
- "LEFT$", //66
- "RIGHT$", //67
- "MID$", //68
+ "LEFT$(", //66
+ "RIGHT$(", //67
+ "MID$(", //68
};
#define BASICXE_CMD_NUM ( sizeof( aCmdsBasicXe ) / sizeof( aCmdsBasicXe[ 0 ] ) )
diff --git a/jindroush/chkbas/basic_xl.h b/jindroush/chkbas/basic_xl.h
index a97f8a7..97dd627 100644
--- a/jindroush/chkbas/basic_xl.h
+++ b/jindroush/chkbas/basic_xl.h
@@ -203,9 +203,9 @@ char* aOpsBasicXl[] = {
"ERR", //63
"TAB", //64
"PEN", //65
- "LEFT$", //66
- "RIGHT$", //67
- "MID$", //68
+ "LEFT$(", //66
+ "RIGHT$(", //67
+ "MID$(", //68
};
#define BASICXL_CMD_NUM ( sizeof( aCmdsBasicXl ) / sizeof( aCmdsBasicXl[ 0 ] ) )
diff --git a/jindroush/man/chkbas.1 b/jindroush/man/chkbas.1
index 1f5313a..f2664f3 100644
--- a/jindroush/man/chkbas.1
+++ b/jindroush/man/chkbas.1
@@ -27,7 +27,7 @@ level margin: \\n[rst2man-indent\\n[rst2man-indent-level]]
.\" new: \\n[rst2man-indent\\n[rst2man-indent-level]]
.in \\n[rst2man-indent\\n[rst2man-indent-level]]u
..
-.TH "CHKBAS" 1 "2024-06-25" "1.10" "Jindroush's Atari 8-bit tools"
+.TH "CHKBAS" 1 "2024-07-10" "1.10" "Jindroush's Atari 8-bit tools"
.SH NAME
chkbas \- check and detokenize Atari BASIC SAVEd files
.SH SYNOPSIS
@@ -45,6 +45,22 @@ standard output. If \fBbasic\-file\fP is anything other than standard
Atari BASIC, the BASIC dialect must be specified (see \fBOPTIONS\fP,
below).
.sp
+It\(aqs highly recommended to avoid running \fBchkbas\fP without
+redirecting or piping its output: If the program contains ATASCII
+graphics or inverse characters, they will be printed as\-is to the
+terminal, which can confuse the terminal. For simply reading the code,
+pipe to \fBa8cat\fP(1), thus:
+.INDENT 0.0
+.INDENT 3.5
+.sp
+.nf
+.ft C
+$ chkbas \-atari PROGRAM.BAS | a8cat
+.ft P
+.fi
+.UNINDENT
+.UNINDENT
+.sp
Sample run, with no options:
.INDENT 0.0
.INDENT 3.5
diff --git a/jindroush/man/chkbas.rst b/jindroush/man/chkbas.rst
index e16f475..b6c678f 100644
--- a/jindroush/man/chkbas.rst
+++ b/jindroush/man/chkbas.rst
@@ -28,6 +28,14 @@ standard output. If **basic-file** is anything other than standard
Atari BASIC, the BASIC dialect must be specified (see **OPTIONS**,
below).
+It's highly recommended to avoid running **chkbas** without
+redirecting or piping its output: If the program contains ATASCII
+graphics or inverse characters, they will be printed as-is to the
+terminal, which can confuse the terminal. For simply reading the code,
+pipe to **a8cat**\(1), thus::
+
+ $ chkbas -atari PROGRAM.BAS | a8cat
+
Sample run, with no options::
$ chkbas HELLO.BAS
--
cgit v1.2.3