; https://cpcrulez.fr ;                 ORG #9000                       ;                 DI                              ;                 LD HL,#C9FB                     ;                 LD (#0038),HL                   ; A MORT LES INTERRUPTS                 EI                              ; WSYNCHRO        LD B,#F5                        ; ATTENDRE SYNCHRO WSYNCH          IN A,(C)                        ;                 RRA                             ;                 JR NC, VSYNCH                   ;                                                 ;                 LD BC, #7F9D                    ; DIVISEUR D'INTERRUPT A 1                 OUT (C),C                       ; NOUVELLE SEQUENCE D'INTERRUPTS                                                 ;                 LD HL, #008C                    ; H=00 et L=8C                 LD DE, #8D8E                    ; D=8D et E=8E                 LD C,#10                        ; C=10                 LD B,#7F                        ; ADRESSAGE DU GATE ARRAY                 OUT (C), C                      ; Selection du border (BC=#7F10)                 LD A,12+64                      ; Rouge vif (voir tableau)                 OUT (C),A                       ; 64=BIT 6 A 1 DONC CHARGEMENT DE PALETTE                 HALT                            ; HALT !!! INTERRUPTION !!!                                                 ;                 OUT (C),C                       ; BC=#7F10 Selection Border                 LD A,14+64                      ; Selection de la couleur Orange                 OUT (C),A                       ; Envoie couleur                 OUT (C),L                       ; Selection MODE 0 (l=#0C=%10001100)                 HALT                            ; IDEM                 LD A,10+64                      ; Border en jaune vif                 OUT (C),C                       ; Devinez ??                 OUT (C),A                       ; Et la ?                 OUT (C),D                       ; MODE 1                 HALT                            ; Hein ?                                                 ;                 LD A,15+64                      ; MIR Couleur                 OUT (C),C                       ; Border ?                 OUT (C),A                       ; Envoie de la couleur                 OUT (C),B                       ; Selection paper (B=0)                                                 ;                 LD A,31+64                      ; DASH 3                 OUT (C),A                       ; Facile !                 OUT (C),E                       ; Nouveau mode !!!!                 HALT                            ; Hummm !?!                 LD A,13+64                      ; A vous  de jouer !                 OUT (C),C                       ; JE SUIS FATIGUE                 OUT (C),A                       ; CF PLUS HAUT                 LD A,28+64                      ; J'AI PEUR DU NOIR !!!                 OUT (C),H                       ; ET BIEN                 OUT (C),A                       ; ...                 OUT (C),D                       ; !                 HALT                            ; ?!?!?!                                                 ;                 LD A,24+64                      ; C'est trop facile cette fois ...                 OUT (C),C                       ;                 OUT (C),A                       ;                 HALT                            ; Dernier HALT ( ==> 6 Halt PAR SYNCHRO                 JP WSYNCHRO                     ; et bien alors boucle la haut !!!)