split up ISCNTC

apple_iscntc.s

@@ -0,0 +1,10 @@
+.segment "CODE"
+ISCNTC:
+        lda     $C000
+        cmp     #$83
+        beq     L0ECC
+        rts
+L0ECC:
+        jsr     RDKEY
+        cmp     #$03
+;!!! runs into "STOP"

cbm_iscntc.s

@@ -0,0 +1 @@
+; nothing - ISCNTC is a KERNAL function

iscntc.s

@@ -3,55 +3,21 @@
 ; SEE IF CONTROL-C TYPED
 ; ----------------------------------------------------------------------------
 .ifndef CONFIG_CBM_ALL
-ISCNTC:
+.include "cbm_iscntc.s"
 .endif
 .ifdef KBD
-        jsr     LE8F3
-        bcc     RET1
-LE633:
-        jsr     LDE7F
-        beq     STOP
-        cmp     #$03
-        bne     LE633
+.include "kbd_iscntc.s"
 .endif
 .ifdef OSI
-        jmp     MONISCNTC
-        nop
-        nop
-        nop
-        nop
-        lsr     a
-        bcc     RET2
-        jsr     GETLN
-        cmp     #$03
+.include "osi_iscntc.s"
 .endif
 .ifdef APPLE
-        lda     $C000
-        cmp     #$83
-        beq     L0ECC
-        rts
-L0ECC:
-        jsr     RDKEY
-        cmp     #$03
+.include "apple_iscntc.s"
 .endif
 .ifdef KIM
-        lda     #$01
-        bit     $1740
-        bmi     RET2
-        ldx     #$08
-        lda     #$03
-        clc
-        cmp     #$03
+.include "kim_iscntc.s"
 .endif
 .ifdef MICROTAN
-        lda     $01
-        cmp     #$03
-        beq     LC6EF
-        lda     #$01
-        rts
-LC6EF:
-        nop
-        nop
-        cmp     #$03
+.include "microtan_iscntc.s"
 .endif
 ;!!! runs into "STOP"

kbd_iscntc.s

@@ -0,0 +1,10 @@
+.segment "CODE"
+ISCNTC:
+        jsr     LE8F3
+        bcc     RET1
+LE633:
+        jsr     LDE7F
+        beq     STOP
+        cmp     #$03
+        bne     LE633
+;!!! runs into "STOP"

kim_iscntc.s

@@ -0,0 +1,10 @@
+.segment "CODE"
+ISCNTC:
+        lda     #$01
+        bit     $1740
+        bmi     RET2
+        ldx     #$08
+        lda     #$03
+        clc
+        cmp     #$03
+;!!! runs into "STOP"

microtan_iscntc.s

@@ -0,0 +1,12 @@
+.segment "CODE"
+ISCNTC:
+        lda     $01
+        cmp     #$03
+        beq     LC6EF
+        lda     #$01
+        rts
+LC6EF:
+        nop
+        nop
+        cmp     #$03
+;!!! runs into "STOP"

msbasic.s

@@ -17,7 +17,7 @@
 .include "program.s"
 .include "flow1.s"
 .include "loadsave.s"
-.include "flow3.s"
+.include "flow2.s"
 .include "misc1.s"
 .include "print.s"
 .include "input.s"

osi_iscntc.s

@@ -0,0 +1,12 @@
+.segment "CODE"
+ISCNTC:
+        jmp     MONISCNTC
+        nop
+        nop
+        nop
+        nop
+        lsr     a
+        bcc     RET2
+        jsr     GETLN
+        cmp     #$03
+;!!! runs into "STOP"