|
|
1.1 ! root 1: ConceptAVT cursor pad interpreter ! 2: ! 3: David W. Goldfarb -- 6/23/82 Version 1 ! 4: Inspired by C. Douglas Blewett's Concept100.pad macro ! 5: ! 6: This routine handles all of the ConceptAVT cursor pad keys. ! 7: This routine assumes that the escape character for the Concept ! 8: has been changed to ^\. This is done in the "cAVT" ! 9: terminal data base file. All escapes are changed to ^\. ! 10: This routine also takes advantage of the different handling of ! 11: the comment character interactively and in macros by EMACS. ! 12: ! 13: Keys handled ACTION ! 14: HOME Go to line arg (M-g) ! 15: PAGE (upper and lower) full page up or down (M-v or ^V) ! 16: SCROL (upper and lower) scroll 1/2 page up or down ! 17: PRINT SCRN Forward Word (M-f) ! 18: shift PRINT SCRN Delete word forward (M-d) ! 19: PRINT Back word (M-b) ! 20: shift PRINT Delete word back (M-bM-d) ! 21: All of the arrowed keys line or character movement ! 22: ! 23: Arguments supplied to these commands multiply the affect. ! 24: ! 25: The first seven programmable function keys (upper and lower) are ! 26: defined in the data base file ! 27: INSRT, DEL CHAR, DEL & INS LINE, CLEAR EOP & EOL, ! 28: SEND (sets mark when unshifted, saves to current file when shifted), ! 29: f6 (beginning of line when unshifted, beginning of sentence when shifted) ! 30: f7 (end of line when unshifted, end of sentence when shifted). ! 31: ! 32: AVT character stream: ^\ [ char , "char" indicates command ! 33: -< ! 34: Above line gets rid of the "[" ! 35: !�-< ! 36: �A Up ! 37: ! 38: � ! 39: �B Down ! 40: ! 41: � ! 42: �D Left ! 43: ! 44: � ! 45: �C Right ! 46: ! 47: � ! 48: �V Page up ! 49: v ! 50: � ! 51: �U Page down ! 52: ! 53: � ! 54: �T Scroll down ! 55: �� ! 56: � ! 57: �S Scroll up ! 58: �� ! 59: � ! 60: �H Home ! 61: � ! 62: � ! 63: �Z Backtab ! 64: ^�3~0 ! 65: �12~1 Loop ! 66: < ! 67: -1 ! 68: � ! 69: � ! 70: �5 print - back a word ! 71: -< ! 72: above line gets rid of "i" ! 73: b ! 74: � ! 75: �4 print shifted - delete word back ! 76: -< ! 77: above line gets rid of "i" ! 78: b ! 79: � ! 80: �i print scrn - forward word ! 81: f ! 82: � ! 83: �= shifted print scrn - delete word forward ! 84: -< ! 85: -< ! 86: above two line get rid of "8i" ! 87: d ! 88: � ! 89: �� Defaults: = break ! 90: ! 91: � ! 92: � ! 93:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.