2lignes ( pas de programme )
tiré du magazine Hebdogiciel N°114

	Bruno de la Boisserie vous envoie de quoi assouvrir pleinement votre mégalomanie galopante avec raison.

Programme :
1 CLS:LPRINT[1,0]:INPUT "message (<13 car) ";A$:CLS:PRINT A$:FOR B=0 TO 7:FOR A=0 TO 79
2 IF POINT(A,B) THEN LPRINT CHR$(SCREEN(A\6,B\8));:NEXT A,B ELSE LPRINT " ";:NEXT A,B