ld a,0ffh out (1),a ;met à 0 le clavier ld a,0fdh out (1),a ;actif in a,(1) cp kClear jp z,quit cp KEnter jr nz,appuis_pas_sur_la_touche_entrer ld a,(flag_entrer) cp 1 jr nz,entrer_a_deja_appuye ld a,2 ld (flag_entrer),a entrer_a_deja_appuye: cp 0 jr nz,entrer_vien_dappuyer ld a,1 ld (flag_entrer),a ld hl,(heros_y) ld de,7 add hl,de ld de,(heros_x) call divise_coord_8 cp 54+128 jr nz,heros_ouvre_coffre ld (hl),58+128 call drawcarte ld a,254 ld (a_reboucher3),a ld hl,parole_trouve_epee ld (dialogue),hl call bulle_de_parole heros_ouvre_coffre: entrer_vien_dappuyer: jr appuis_sur_la_touche_entrer appuis_pas_sur_la_touche_entrer: xor a ld (flag_entrer),a appuis_sur_la_touche_entrer: