| TITLE TO-DEMO: |
| * ------------------------------ |
| PAGE |
| |
| **************************************** |
| * * |
| * Démonstration de l'utilisation des * |
| * routines TO-FEN * |
| * * |
| * Création du squelette d'une applica * |
| * tion .CHG de 32ko * |
| * * |
| **************************************** |
| * * |
| * Sources: * |
| * * |
| * FEN-EQU.ASM Equates du fenêtrage * |
| * DEMO-EQ.ASM Equates * |
| * DEMO-CN.ASM Constantes * |
| * DEMO-B1.ASM Traitement BANK 1 * |
| * DEMO-TR.ASM Traitements * |
| * DEMO-SP.ASM Gestion S/P * |
| * DEMO-PR.ASM Programme principal * |
| * DEMO .ASM Structure * |
| * * |
| **************************************** |
| * * |
| * Exécutable destiné à être chargé en * |
| * aplication avec le module de * |
| * fenêtrage FEN.BIN * |
| * * |
| **************************************** |
| * * |
| * Carte mémoire: * |
| * * |
| ** Banks RAM cartouche * |
| * * |
| * No 1 : Soft, constantes et données * |
| * pseudo statique (motifs...) * |
| * No 2 : En $1800, S/P de fenêtrage * |
| * * |
| ** Banks données : * |
| * * |
| * bank 2 : Manoeuvre * |
| * bank 3 * |
| * .. 6 : Pile des fenêtres * |
| * (moins ou plus selon les * |
| * niveaux d'empilement max. * |
| * bank 7 * |
| * ... : Pour application !!! * |
| * * |
| ** RAM "en ligne" * |
| * * |
| * $0000..$3FFF: Soft, constantes et * |
| * données pseudo stati- * |
| * ques (cartouche) * |
| * $6000..$62FF: RAM moniteur/extramon * |
| * $6300..$67FF: Pile (#1ko) * |
| * $6800..$6FFF: RAM appli. non commut. * |
| * (#2ko) * |
| * $7000..$77FF: Zones DOS 5 dsk 2fic. * |
| * $7800..$9FFF: Copie active des S/P * |
| * de fenêtrage (10ko) * |
| * pour que les S/P de * |
| * fenetrage puissent etre* |
| * appelés à partir de * |
| * les banks de l'appli ! * |
| * $A000..$DFFF: Manoeuvre sur les bank * |
| * de donnée * |
| * * |
| **************************************** |
| * PRODUCTION: * |
| **************************************** |
| * * |
| * Sous 6809 ASM * |
| * * |
| * - L DEMO (deja fait si vous lisez* |
| * - A DEMO (/NL/NS si sup listing) * |
| * * |
| * Sous CR-APPLI: * |
| * * |
| * - Charger DEMO.BIN (base $0000) * |
| * - Charger FEN.BIN (base $5800) * |
| * - Créer TO-DEMO.CHG * |
| * * |
| **************************************** |
| |
| * Definition de l'implantation finale |
| * des sous-programmes de TO-FEN |
| |
| BASEF EQU $7800 implant. soft |
| * fenêtrage !!! |
| |
| INCLUD FEN-EQU équates FEN |
| |
| INCLUD DEMO-EQ |
| |
| * Page 0 dee l'application |
| SETDP PAGE0/256 |
| |
| **************************************** |
| |
| |
| * |
| * Cartouche No 1 |
| * L'en-tete (34oc)sera cree par CR-APPLI |
| * L'assemblage se fait selon l'adressage |
| * réel $0000-$3FFF |
| * L'appel d'un S/P du bank 1 se fait par |
| * JSR adr ou par |
| * LBSR adr |
| * L'appel d'un S/P du bank 2 se fait par |
| * LDU #adr.S/P (fourni par ASM) |
| * JSR COMBK2 (ou LBSR ...) |
| * L'appel d'un S/P moniteur se fait par |
| * JSR adr ou par |
| * LBSR adr |
| *--------------------------------------- |
| |
| ORG $22 |
| |
| LBRA DEBUT ------> |
| |
| |
| * Séquence de commutation vers les S/P |
| * en cartouche no 2 |
| *--------------------------------------- |
| |
| COMBK2 INC >$E7E6 |
| LEAU -$4000,U |
| JSR ,U |
| PSHS CC |
| DEC >$E7E6 |
| PULS CC |
| RTS |
| |
| * Séquence de commutation vers les S/P |
| * en cartouche no 1 |
| *--------------------------------------- |
| |
| DEC >$E7E6 |
| JSR ,U |
| PSHS CC |
| INC >$E7E6 |
| PULS CC |
| RTS |
| |
| **** Code du premier bank ************** |
| |
| INCLUD DEMO-CN |
| |
| INCLUD DEMO-TR |
| |
| INCLUD DEMO-SP |
| |
| **************************************** |
| |
| INCLUD DEMO-PR |
| |
| **************************************** |
| |
| |
| * |
| * En tête cartouche No 2 |
| * L'en-tete (34oc)sera cree par CR-APPLI |
| * L'assemblage se fait selon l'adressage |
| * simulé $4000-$7FFF au lieu de |
| * $0000-$3FFF |
| * L'appel d'un S/P du bank 2 se fait par |
| * LBSR adr |
| * L'appel d'un S/P du bank 1 se fait par |
| * LDU #adr.S/P (fourni par ASM) |
| * LBSR COMBK2 |
| * L'appel d'un S/P moniteur se fait par |
| * JSR adr |
| *--------------------------------------- |
| |
| ORG $4022 |
| |
| LBRA DEBUT ------> |
| |
| |
| * Séquence de commutation vers les S/P |
| * en cartouche no 2 |
| *--------------------------------------- |
| |
| INC >$E7E6 |
| LEAU -$4000,U |
| JSR ,U |
| PSHS CC |
| DEC >$E7E6 |
| PULS CC |
| RTS |
| |
| * Séquence de commutation vers les S/P |
| * en cartouche no 1 |
| *--------------------------------------- |
| |
| COMBK1 DEC >$E7E6 |
| JSR ,U |
| PSHS CC |
| INC >$E7E6 |
| PULS CC |
| RTS |
| |
| |
| **** Code du deuxieme bank ************* |
| |
| |
| INCLUD DEMO-B1 |
| |
| END |