PRG     LD B,#F5        ; Selection du PPI port B SYNC    INC A,(C)       ; Retirer Byte         RRA             ; Bit 0=1 pour indiquer la fin de la VBL                         ; (Début du balayage vertical tous les 1/50eme)         JP NC,SYNC      ; Attente de la Synchro Verticale         LD BC,#BC04     ; Selection du registre 4         OUT (C),C         LD BC,#BD00+19  ; Envoi de la vleur 19         OUT (C),C       ;         LD BC,#BC09     ; Selection du registre 9         OUT (C),C       ;         LD BC,#BD00+7   ; Envoi de la valeur 7         OUT (C),C       ;         LD BC,#BC05     ; Selection du registre 5         OUT (C),C       ;         LD BC,#BD00     ; Envoi de la valeur 0         OUT (C),C       ;         LD BC,#BC0C     ; Selection du registre 12         OUT (C),C       ;         LD BC,#BD30     ; Envoi de la valeur binaire 00110000         OUT (C),C       ; Encran en #C000         LD BC,#BC0D     ; Selection du registre 13         OUT (C),C       ;         LD BC,#BD00     ; Envoi de lma valeur 0         OUT (C),C       ; (Reste de l'adresse Video)