( [0+8+FQ(+4)[1 0FO10F"G+Q1 'W+FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) AY"KY F ;,7+5 & Setup SCRLIN LibraryM.M^R Beginning of LineU.A M.M^R End of lineU.E M.M^R Down LineU.N M.M^R Up LineU.P FSRGETTY"G1M.VUse Screen Lines'^R Down Line0FO..QUse Screen LinesF"NW1'[S FS^RPREV-1002"N Q.H-777777."L FS^RHPOSU.H'' 1002FS^RLAST FF"EQS"E@:L' "#1:<0,(FSWIDTH):FM>W' .-Z"EI -2' QS"EL'' "#QS"E@L'"#US'' 1: FSI&DLINE"NFSOSPEEDF"N-1200:"G99F[%CENTER@0V''' 0^R Up Line0FO..QUse Screen LinesF"NW1'[S FS^RPREV-1002"N Q.H-777777."L FS^RHPOSU.H'' 1002FS^RLAST QS"N-F"E-1'US' 1:"N1:<0,Q.H&777777.:FM>' FSI&DLINE"NFSOSPEEDF"N-1200:"G0F[%CENTER@0V''' 0^R Beginning of Line0FO..QUse Screen Lines"E@0L0' FF"N@0L0' FSSAIL"EFS^RHPOS-1"E40.,0A-40."L:R''' FS^RHPOS"E12.,0A-12."NR'' :<0,0@FM fs^HPrint"L 0a-"ER'"#0;''"#0;'>W 0^R End of Line0FO..QUse Screen Lines"E@:L0' FF"N@:L0' FSSAIL"E FS^RHPOS-(FSWIDTH-2)"E 40.,1A-40."L:C''' FS^RHPOS-(FSWIDTH-1)"E @F "E:C'' 1:<0,(FSWIDTH):FM>W 0~FILENAME~SCRLIN~DOC~ ~FILENAME~SCRLIN macros for moving on screen lines ~DOC~ & Setup SCRLIN LibraryS Assign ^A, ^E, ^N, ^P ~DOC~ ^R Down Line^R Move down vertically to next real line. Continuation lines are normally skipped. If given after the last LF in the buffer, makes a new one at the end. If Use Screen Lines is 1, then continuation lines are not skipped. ~DOC~ ^R Up Line^R Move up vertically to next real line. Continuation lines are skipped unless Use Screen Lines is 1 ~DOC~ ^R Beginning of Line^R Go to beginning of line. Normally, this refers to text lines (i.e. go to after the previous CRLF). However, if Use Screen Lines is 1, it refers to the beginning of a screen line (only useful on display consoles). If the cursor is already at the edge of the screen on a continued line, then the cursor is moved to the beginning of the preceeding screen line. With an argument, the cursor is always moved to the beginning of the text line. ~DOC~ ^R End of Line^R Go to end of the line. Normally, this refers to text lines (i.e. go to before the next CRLF). However, if Use Screen Lines is 1, it refers to the end of a screen line (only useful on display consoles). If the cursor is already at the edge of the screen on a continued line, then the cursor is moved to the beginning of the next screen line first. With an argument, the cursor is always moved to the end of the text line. ~DIRECTORY~& Setup SCRLIN Library ^R Down Line ^R Up Line ^R Beginning of Line ^R End of Line ~INVERT~[1Q1