Update and license

src/1802mc/blinkqslow.asm

@@ -1,25 +0,0 @@
-R1 EQU 01H
-R2 EQU 02H
-RS EQU 0CH
-
-	ORG 00H
-BEGIN	SEQ		; announce running
-INKEY	BN4 INKEY
-	REQ		; ack "IN" pushed.
-
-RUN	LDI 162
-	PHI R2
-DECR	DEC R2
-	GHI R2
-	BNZ DECR
-	LSQ
-	SEQ
-	SKP
-	REQ
-	INP 4
-	BZ DONE
-	BR RUN
-
-DONE	SEP R1
-	END
-

src/1802mc/blinkqslowwithescape.asm

@@ -0,0 +1,45 @@
+; blinkqslowwithescape.asm
+; Copyright (C) 2023  William R. Moore
+;
+; This program is free software: you can redistribute it and/or modify
+; it under the terms of the GNU General Public License as published by
+; the Free Software Foundation, either version 3 of the License, or
+; (at your option) any later version.
+;
+; This program is distributed in the hope that it will be useful,
+; but WITHOUT ANY WARRANTY; without even the implied warranty of
+; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+; GNU General Public License for more details.
+;
+; You should have received a copy of the GNU General Public License
+; along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+R1	EQU	1
+R2	EQU	2
+R7	EQU 7
+
+	ORG 0000H
+BEGIN
+	SEQ		; announce running
+	SEX 1
+INKEY
+	BN4 INKEY
+	REQ
+START	
+	LDI 162
+	PHI R2
+DECR
+	DEC R2
+	GHI R2
+	BNZ DECR
+	LSQ
+	SEQ
+	SKP
+	REQ
+	INP 4
+	BZ	DONE
+	BR	START
+DONE
+	SEX 2
+	SEP 1
+	END