LD DE,08FEH		D conta i bit per byte.
NXTFADE:			E e' una maschera rotante
	LD A,E			con un bit a zero.
	RLCA
	RLCA
	RLCA
	LD E,A
	LD HL,4000H		HL=inizio della memoria
	LD BC,0018H		video.
NXT:	LD A,(HL)		prendi un byte,
	AND E			AND con la maschera.
	LD (HL),A		rimpiazza il byte.
	INC HL
	DJNZ NXT		ripeti 6143 volte
	DEC C			C = 18H = 24 dec
	JR NZ,NXT		(256*24=6143).
	DEC D			prossimo bit.
	JR NZ,NXTFADE
	LD A,(5C8DH)		prendo la variabile di
	LD (HL),A		sistema ATTR-P e riempio	
	LD D,H			le prime 22 linee con
	LD E,L			essa.
	INC DE
	LD BC,02C0H
	LDIR
	LD A,(5C48H)		prendi il colore del bordo	
	LD (HL),A		e riempi le ultime due
	LD C,3FH		linee con esso.
	LDIR
	RET			ritorna al Basic.
	END