; =====================================================================
; BOOT/Keystone-derived bank-call bridge plus nonblocking INKEY precedent.
; This is platform scaffold, not new Chapter 11 algorithm logic.
; =====================================================================
        ORG     &H0C20

RCS_TOP:
        GST     UA,$6
        PHS     $6
        LDW     $6,SETBK-1
        PHSW    $7
        PST     UA,&H54
        JP      $28

_SYSCAL:
        PST     UA,&H45
        LDW     $6,&H0C10
        ST      $31,($6)
        CAL     RCS
        PST     UA,&H45
        LDW     $6,&H0C10
        LD      $28,3
        ST      $28,($6)
        PST     UA,&H54
        RTN
RCS_END:

        ORG     &H0C50

SYSCAL:
        PST     UA,&H55
        JP      RCS+(_SYSCAL-RCS_TOP)

; Historical numerical window 0C5E..0D3F is reserved by numeric_constants.s.
; Legacy scanner moved to platform/inkey_relocated.s without editing instructions.