a R(,),Q$()a2 I a< Q$(I)aF IbZ ();(E)bn I  bx Q$(I)(b IPb ();(Y);(5);(+);Q$()^b I mb J zb R(I,J)b Jb Ib ();(Y);(5);(!);();(K)b ();(p)b ();(Y);(&);(.);Q$() c" ();(q); c6 ();(F);(c@I1cJJ cc^ ();(Y);()I);(.J);(R(I,J));mcrII}c| I cIIcJJ c J cJJc I ^cc J ^c ();(G);d ();(p);)d ();(Y);(4);(;);Q$()>d ();(q);`d& ();(Y);(Y);(!)fd0d: "THIS PROGRAM DEMOS , ERASE PAGE, GRAPHICS"dD "ERASE TO EOL, REV VIDEO, AND DIRECT CURSOR"dN "ADDRESSING FEATURES OF THE H-19 TERMINAL." eX "START"eb "FINISH"4el "READING DATA LIST"Zev 102,97,100,101,115,97,115,97,97e 97,97,97,115,97,97,97,97,97,99e 118,32,116,102,100,118,115,100e 101,97,99,101,97,97,97,117,99,32,96e 96,32.117,97,115,100,118,98,99f 96,118,97,117,97,116,96,101,32,96Af 118,97,97,100,118,99,101,99,101if 97,100,118,97,32,101,97,98,32,116f 96,102,100,101,100,96,96,118,97f 32,118,100,101,99,118,99,101,97,116f 96,101,99,96,32,96,96,118,97g 97,98,97,100,118,97,117,99,32.96,)g 96,32,96,101,115,97,117,99,118Og 32,98,99,32,100,102,99,96,32,96tg 96,32,101,97,116,101,115,97,98g  32,96,101,98,97,100,96,101,97,116,g 101,97,97,97,117,97,97,117,97g  97,97,97,117,97,97,99,102,97,10015,97,98g  32,96,101,98,97,100,96,101,97,116,g 101,97,97,97,117,97,97,1