From 10957d4cd5cf9ff5de387f27f292a8dc0bfa2c14 Mon Sep 17 00:00:00 2001
From: NeilFraser <neil.fraser@gmail.com>
Date: Mon, 30 Mar 2026 12:25:45 +0200
Subject: [PATCH] Add operator demo of MASK

---
 Operators/MASK.agc | 15 +++++++++++++++
 Operators/MP.agc   |  2 +-
 2 files changed, 16 insertions(+), 1 deletion(-)
 create mode 100644 Operators/MASK.agc

diff --git a/Operators/MASK.agc b/Operators/MASK.agc
new file mode 100644
index 0000000..1969827
--- /dev/null
+++ b/Operators/MASK.agc
@@ -0,0 +1,15 @@
+# Minimal demo of the MASK operator.
+
+		SETLOC	4000
+		INHINT
+
+				# MASK bitwise ANDs the 'A' register with another number.
+
+		CAF NINE		# Load 9 into 'A' register.
+		MASK TWELVE		# AND 9, 12.
+		NOOP		# 'A' register now contains 8 (1000).
+
+END		TCF END
+
+NINE		DEC	9	# 1001
+TWELVE		DEC	12	# 1100
diff --git a/Operators/MP.agc b/Operators/MP.agc
index 5c418cd..9f4ba2d 100644
--- a/Operators/MP.agc
+++ b/Operators/MP.agc
@@ -5,7 +5,7 @@
 
 				# MP multiplies the 'A' register with another number.
 
-		CAF SIX		# Load 5 into 'A' register.
+		CAF SIX		# Load 6 into 'A' register.
 		EXTEND
 		MP SEVEN		# Multiply 6 * 7.
 		NOOP		# 'L' register now contains 42.