10 ' LETRAPLA par B.L.B. 20 ' cree sur 6128 le 19/02/89 30 MODE 1:SYMBOL AFTER 32:h=HIMEM+1 40 LOCATE 11,8:a$="ALI-GATOR FREEWARE":GOSUB 60 50 LOCATE 12,11:a$="TRUCS ET ASTUCES":GOSUB 60:CALL &BB06:END 60 FOR m=1 TO LEN(a$):a=ASC(MID$(a$,m,1)):c=h+((a-32)*8):d=h+1784 70 POKE d,0:POKE d+1,0:POKE d+2,PEEK(c):POKE d+3,PEEK(c+2):POKE d+4,PEEK(c+3):POKE d+5,PEEK(c+4):POKE d+6,PEEK(c+6):POKE d+7,0 80 PRINTCHR$(255);:NEXT:RETURN