fondue_au_noir:
	ld b,64-1
	ld hl,buffer_ecran+12
	ld de,second_buffer+768d-12
	push hl
	push de
affiche_passage_noir:
	ld (dessine_hl),bc
	ld b,12
	ld a,%11111111
	pop de
	pop hl
remplie_noir:
	ld (hl),a
	ld (de),a
	inc hl
	dec de
	djnz remplie_noir
	push hl
	push de
;							EFFET DE GRIS PAR REMANENCE
	ld a,(reman_flag)
	cp 0
	jr z,noir_remanence_0
	ld	hl,buffer_ecran-12-(-(12*64)+1)
	ld a,0
	jr noir_remanence_1
noir_remanence_0:
	ld	hl,second_buffer-12-(-(12*64)+1)
	ld a,1
noir_remanence_1:
	ld (reman_flag),a

	ld de,1000
	ld (fixe_fps),de
	call affiche

	ld bc,(dessine_hl)
	djnz affiche_passage_noir
	pop de
	pop hl
	ld a,1
	ld (flag_fondue_noir),a
	ret
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
fondue_au_blanc:
	ld hl,ecran3
	ld b,8
ecran3_noir:
	push bc
	ld b,192
ecran3_noir2:
	ld (hl),%11111111
	inc hl
	djnz ecran3_noir2
	pop bc
	djnz ecran3_noir
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
	ld b,64-1
	ld hl,ecran3+12
	ld de,ecran4+768-12
	push hl
	push de
	ld hl,buffer_ecran
	ld (dessine_hl),hl
	ld hl,second_buffer+768
	ld (dessine_ix),hl

affiche_passage_blanc:
	ld (hauteur_bulle),bc
	ld b,12
remplie_blanc:

	ld hl,(dessine_ix)
	ld a,(hl)
	dec hl
	ld (dessine_ix),hl
	pop de
	ld (de),a
	ld hl,(dessine_hl)
	ld a,(hl)
	inc hl
	ld (dessine_hl),hl
	pop hl
	ld (hl),a

	inc hl
	dec de
	push hl
	push de
	djnz remplie_blanc
;							EFFET DE GRIS PAR REMANENCE
	ld a,(reman_flag)
	cp 0
	jr z,blanc_remanence_0
	ld	hl,ecran3-12-(-(12*64)+1)
	ld a,0
	jr blanc_remanence_1
blanc_remanence_0:
	ld	hl,ecran4-12-(-(12*64)+1)
	ld a,1
blanc_remanence_1:
	ld (reman_flag),a

	ld de,1000
	ld (fixe_fps),de
	call affiche

	ld bc,(hauteur_bulle)
	djnz affiche_passage_blanc
	pop de
	pop hl
	xor a
	ld (flag_fondue_noir),a

	ret