User Tools

Site Tools


cmdp1.asm

This is an old revision of the document!


Retourner à la liste des fichiers

* NRDOS.MO5 version 3.5
* CMDP1.ASM (Commandes internes, première partie)

************************************************************************************************************
* SCREEN
************************************************************************************************************
SCREEN SET    *
       LDA    #3
       LDU    #COLORS

SCRLP  JSR    PRSINT
       BEQ    SCREND
       BCS    SCREND
       CMPY   #16
       BCC    SCREND
       LDB    #ESC
       JSR    PCHAR
       CMPA   #1
       BEQ    SCRSKP
       LDB    #SPACE
       JSR    PCHAR

SCRSKP PSHS   A
       TFR    Y, D
       ADDB   ,U+
       JSR    PCHAR
       PULS   A
       DECA
       BNE    SCRLP

SCREND RTS

COLORS FCB    $40             ; FORME
       FCB    $50             ; FOND
       FCB    $60             ; TOUR

************************************************************************************************************
* REM
************************************************************************************************************
REM    SET    *
       CLR    CLTOGO
       RTS
cmdp1.asm.1765214538.txt.gz · Last modified: by fool-duplex

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki