10  DIM A$[72]
20  FILES $NEWS1
30  READ #1,1
40  IF  END #1 THEN 140
50  READ #1;A$
60  IF A$="+" THEN 100
70  IF A$="++" THEN 50
80  PRINT A$
90  GOTO 40
100  PRINT "Press return to continue";
110  ENTER 255,X,A
120  PRINT 
130  GOTO 40
140  PRINT LIN(2)"********* END OF NEWS ************"
150  PRINT '7
160  END 
