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
* Change les couleurs forme, fond et bord de l'écran.
************************************************************************************************************
SCREEN SET *
LDA #3 ; 3 paramètres
LDU #COLORS
SCRLP JSR PRSINT ; Décode un nombre entier
BEQ SCREND
BCS SCREND
CMPY #16 ; Si supérieur à 15, on arrête là
BCC SCREND
LDB #ESC ; Compose et envoie la séquence correspondante
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
* Ignore la ligne (commentaire dans un script)
************************************************************************************************************
REM SET *
CLR CLTOGO ; Ignore la fin de la ligne de commande
RTS
cmdp1.asm.1765214934.txt.gz · Last modified: by fool-duplex