From 9e62379b46041a3d053bafd6a65abf2c55777662 Mon Sep 17 00:00:00 2001
From: dschmenk <dschmenk@gmail.com>
Date: Sat, 25 Feb 2023 20:32:56 -0800
Subject: [PATCH] Update strings to BETA

---
 src/toolsrc/ed.pla            | 2 +-
 src/toolsrc/plasm.pla         | 2 +-
 src/utilsrc/tftpd.pla         | 6 +++---
 src/vmsrc/apple/a1cmd.pla     | 2 +-
 src/vmsrc/apple/cmd.pla       | 2 +-
 src/vmsrc/apple/cmdjit.pla    | 2 +-
 src/vmsrc/apple/sossys.pla    | 2 +-
 src/vmsrc/apple/sossysjit.pla | 2 +-
 8 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/src/toolsrc/ed.pla b/src/toolsrc/ed.pla
index a139f28..09c512e 100755
--- a/src/toolsrc/ed.pla
+++ b/src/toolsrc/ed.pla
@@ -1615,7 +1615,7 @@ def cmdmode#0
     word cmdptr, line
 
     clrscrn
-    puts("PLASMA Editor, Version 2.0 ALPHA2\n")
+    puts("PLASMA Editor, Version 2.0 BETA\n")
     while not exit
         puts(@filename)
         cmdptr = gets($BA)
diff --git a/src/toolsrc/plasm.pla b/src/toolsrc/plasm.pla
index fb9eda9..95564d6 100755
--- a/src/toolsrc/plasm.pla
+++ b/src/toolsrc/plasm.pla
@@ -508,7 +508,7 @@ include "toolsrc/parse.pla"
 //
 // Look at command line arguments and compile module
 //
-puts("PLASMA Compiler, Version 2.0 ALPHA2\n")
+puts("PLASMA Compiler, Version 2.0 BETA\n")
 arg = argNext(argFirst)
 if ^arg and ^(arg + 1) == '-'
     opt = arg + 2
diff --git a/src/utilsrc/tftpd.pla b/src/utilsrc/tftpd.pla
index 1e7b076..c807d4d 100644
--- a/src/utilsrc/tftpd.pla
+++ b/src/utilsrc/tftpd.pla
@@ -357,9 +357,9 @@ end
 def volumes#0
     word strbuf
     byte i
-    
+
     strbuf   = heapmark()
-    fileio:online(0, strbuf)    
+    fileio:online(0, strbuf)
     for i = 0 to 15
         ^strbuf = ^strbuf & $0F
         if ^strbuf
@@ -369,7 +369,7 @@ def volumes#0
     next
 end
 
-puts("TFTP Server Version 2.0 ALPHA1\n")
+puts("TFTP Server,Version 2.0\n")
 if !iNet:initIP()
     return -1
 fin
diff --git a/src/vmsrc/apple/a1cmd.pla b/src/vmsrc/apple/a1cmd.pla
index 096f30f..5e4e0b7 100755
--- a/src/vmsrc/apple/a1cmd.pla
+++ b/src/vmsrc/apple/a1cmd.pla
@@ -52,7 +52,7 @@ byte perr, refauto
 // String pool.
 //
 byte autorun[]    = "AUTORUN"
-byte verstr[]     = "\nPLASMA ALPHA2"
+byte verstr[]     = "\nPLASMA BETA"
 byte freestr[]    = "MEM FREE:$"
 byte errorstr[]   = "ERR:$"
 byte prompt[]     = "PLASMA"
diff --git a/src/vmsrc/apple/cmd.pla b/src/vmsrc/apple/cmd.pla
index 3ac051d..254f489 100755
--- a/src/vmsrc/apple/cmd.pla
+++ b/src/vmsrc/apple/cmd.pla
@@ -1377,7 +1377,7 @@ heap = @lastdef
 //
 // Print PLASMA version
 //
-prstr("PLASMA 2.0 ALPHA2 64K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout
+prstr("PLASMA 2.0 BETA 64K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout
 //
 // Init symbol table.
 //
diff --git a/src/vmsrc/apple/cmdjit.pla b/src/vmsrc/apple/cmdjit.pla
index 576a747..a6ee6d8 100755
--- a/src/vmsrc/apple/cmdjit.pla
+++ b/src/vmsrc/apple/cmdjit.pla
@@ -1454,7 +1454,7 @@ heap = @lastdef
 //
 // Print PLASMA version
 //
-prstr("PLASMA 2.0 ALPHA2 128K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout
+prstr("PLASMA 2.0 BETA 128K\n")//; prbyte(version.1); cout('.'); prbyte(version.0); crout
 //
 // Init symbol table.
 //
diff --git a/src/vmsrc/apple/sossys.pla b/src/vmsrc/apple/sossys.pla
index 61acf4b..0d4bcf2 100755
--- a/src/vmsrc/apple/sossys.pla
+++ b/src/vmsrc/apple/sossys.pla
@@ -1263,7 +1263,7 @@ cmdlnptr = @cmdln
 // Print PLASMA version
 //
 init_cons
-prstr("PLASMA 2.0 ALPHA2\n")//; putb(version.1); putc('.'); putb(version.0); putln
+prstr("PLASMA 2.0 BETA\n")//; putb(version.1); putc('.'); putb(version.0); putln
 prstr("MEM:$"); prword(availheap); crout
 //
 // Exec command line parser
diff --git a/src/vmsrc/apple/sossysjit.pla b/src/vmsrc/apple/sossysjit.pla
index adf36ea..9ef6a15 100755
--- a/src/vmsrc/apple/sossysjit.pla
+++ b/src/vmsrc/apple/sossysjit.pla
@@ -1286,7 +1286,7 @@ cmdlnptr = @cmdln
 // Print PLASMA version
 //
 init_cons
-prstr("PLASMA 2.0 ALPHA2 JITC\n")//; putb(version.1); putc('.'); putb(version.0); putln
+prstr("PLASMA 2.0 BETA JITC\n")//; putb(version.1); putc('.'); putb(version.0); putln
 prstr("MEM:$"); prword(availheap); crout
 //
 // Exec command line parser