GUICheckBoxGestion cp CODE_MORT : ret z
cp CODE_INIT : jr z,GUICheckBoxAffiche
cp ' ' : jr z,GUICheckBoxFlip ; on a une entrée clavier et c'est Espace, alors on permute la coche
cp CODE_TAB : jp z,GUIObjetSuivant
ret
GUICheckBoxFlip push af : ld a,(ix+s_checkbox.valeur) : inc a : and 1 : ld (ix+s_checkbox.valeur),a : call GUICheckBoxAffiche : pop af : ret

GUICheckBoxAffiche ld a,(ix+s_gui.selectionne) : add a : add (ix+s_checkbox.valeur) ; numéro de sprite de 0 à 3
add checkboxSprites : ld (ix+s_checkbox.checkboxchar),a
ld de,ix : ld hl,s_checkbox.checkboxchar : add hl,de : ld (hl),a : exx
ld de,(ix+s_checkbox.adresse_ecran)
jp GUIDisplayString