DnHEXMLPROADDHLA6Ag@ ""++++++++++++++++++++++++++++ BASIC PROGRAM TO SET UP MACHINE LANGUAGE ROUTINETHAT WILL TRAP SCREEN INPUT / OUTPUT& JOURNAL IT TO A PRINTER""JOHN ELLIOTT MAY 81 COMPUTE.""++++++++++++++++++++++++++++;@, 6-A6 PAGE 6 ADDRESS +"AR@"CURSOR OFF((LOADING JOURNAL(% SETUP MACHINE LANGUAGE PGM(-%A$-%"%2&@@2 4END' @7%%6-@:7@<@,,&@H<!@ 6-&@A%%6-@:7@<@,,&@HF!@ 6-&@K$@% P!!++++++++++++++++++++++++++*RDISPLAY INSTRUCTIONSU+(JOURNAL LOADED(+ARZ%%(TO INITIATE JOURNALLING TYPE:_((X=USR()dfHEXADECIMAL M/L PROGRAMiA0,0F,B9,00,E4,99,83,06n88,10,F7,A9,83,8D,21,03sA9,06,8D,22,03,A9,4Ax8D,89,06,8D,46,03,A9,06}8D,8A,06,8D,47,03,A9,338D,87,06,A9,06,8D,88,0685,08,6C,FA,BF,8D,92,0620,3F,06,20,60,06,D0,17AD,05,E4,48,AD,04,E4,48AD,92,06,60,20,60,06AD,07,E4,48,AD,06,E4,48AD,92,06,AE,93,06AC,94,06,60,8D,92,068E,93,06,8C,94,06,C9,20 90,15,AD,37,E4,48,AD,36,E448,AD,92,06,C9,7D,F0,04C9,9C,D0,02,A9,9B,60 END D:JOURNAL