Add STR @-code, to display the current Baja/PCMS command string value.

3c70c894 · rswindell · 650f66e5 · 3c70c894
Commit 3c70c894 authored Apr 20, 2020 by rswindell
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 0 deletions

src/sbbs3/atcodes.cpp src/sbbs3/atcodes.cpp +4 -0

No files found.
--- a/src/sbbs3/atcodes.cpp
+++ b/src/sbbs3/atcodes.cpp
@@ -939,6 +939,10 @@ const char* sbbs_t::atcode(char* sp, char* str, size_t maxlen, long* pmode)
 		return(nulstr);
 	}

+	if(strcmp(sp,"STR") == 0) {
+		return main_csi.str;
+	}
+
 	if(!strncmp(sp,"EXEC:",5)) {
 		exec_bin(sp+5,&main_csi);
 		return(nulstr);