10 PRINT"[147]":POKE53280,6:POKE53281,6
50 A$="[208]LEASE READ THE ACCOMPANYING":GOSUB500
70 A$="DOCUMENTATION IN THIS MONTH'S ISSUE OF":GOSUB500
90 A$="[195][207][205][208][213][212][197]'S [199]AZETTE":GOSUB500
100 A$="FOR INFORMATION ON RUNNING THE":GOSUB500
110 A$="[210][193][205][196][201][211][203][160]PROGRAM.":GOSUB500
200 END
500 Y= (40-LEN(A$))/2
510 FOR X=1 TO Y:PRINTCHR$(32);:NEXT
520 PRINTA$
530 RETURN