From 396fca26025555dc76706377bf2b72e3b24b50da Mon Sep 17 00:00:00 2001 From: William Moore Date: Sat, 26 Aug 2023 02:50:41 -0500 Subject: [PATCH] Update and license --- src/1802mc/blinkqslow.asm | 25 ---------------- src/1802mc/blinkqslowwithescape.asm | 45 +++++++++++++++++++++++++++++ 2 files changed, 45 insertions(+), 25 deletions(-) delete mode 100644 src/1802mc/blinkqslow.asm create mode 100644 src/1802mc/blinkqslowwithescape.asm diff --git a/src/1802mc/blinkqslow.asm b/src/1802mc/blinkqslow.asm deleted file mode 100644 index 92836b6..0000000 --- a/src/1802mc/blinkqslow.asm +++ /dev/null @@ -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 - diff --git a/src/1802mc/blinkqslowwithescape.asm b/src/1802mc/blinkqslowwithescape.asm new file mode 100644 index 0000000..82828b6 --- /dev/null +++ b/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 . + +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