# $XConsortium: ScrollText3c.scr /main/5 1995/07/17 20:40:37 drk $ # # Motif # # Copyright (c) 1987-2012, The Open Group. All rights reserved. # # These libraries and programs are free software; you can # redistribute them and/or modify them under the terms of the GNU # Lesser General Public License as published by the Free Software # Foundation; either version 2 of the License, or (at your option) # any later version. # # These libraries and programs are distributed in the hope that # they will be useful, but WITHOUT ANY WARRANTY; without even the # implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR # PURPOSE. See the GNU Lesser General Public License for more # details. # # You should have received a copy of the GNU Lesser General Public # License along with these librararies and programs; if not, write # to the Free Software Foundation, Inc., 51 Franklin Street, Fifth # Floor, Boston, MA 02110-1301 USA # # # HISTORY # # #) Keyboard Selection -- Add Mode & Normal Mode: # # @) KSelect -- clears the current selection and sets the # anchor LocatePointer Text1 ClickMB Btn1 ClickKey KBeginData LocatePointer Text1 RTextChar 5 DragComponent Text1 RTextChar 12 ClickKey KSelect CompareVisual Text1 LocatePointer Text2 ClickMB Btn1 ClickKey KBeginData LocatePointer Text2 RTextChar 5 DragComponent Text2 RTextChar 12 ClickKey KSelect CompareVisual Text2 LocatePointer Text3 ClickMB Btn1 ClickKey KBeginData LocatePointer Text3 RTextChar 5 DragComponent Text3 RTextChar 12 ClickKey KSelect CompareVisual Text3 LocatePointer Text4 ClickMB Btn1 ClickKey KBeginData LocatePointer Text4 RTextChar 5 DragComponent Text4 RTextChar 12 ClickKey KSelect CompareVisual Text4 # #ifdef MOTIF1_1 # @) Ctrl KSelect -- Same as KSelect (Ctrl SELECT is allowed to # have no effect) # #endif MOTIF1_1 # #ifdef MOTIF1_2 # @) Ctrl KSelect -- no effect # #endif MOTIF1_2 # LocatePointer Text1 RTextChar 5 DragComponent Text1 RTextChar 12 ClickKey KSelect CompareVisual Text1 LocatePointer Text2 RTextChar 5 DragComponent Text2 RTextChar 12 ClickKey KSelect CompareVisual Text2 LocatePointer Text3 RTextChar 5 DragComponent Text3 RTextChar 12 ClickKey KSelect CompareVisual Text3 LocatePointer Text4 RTextChar 5 DragComponent Text4 RTextChar 12 ClickKey KSelect CompareVisual Text4 # @) Shift KSelect -- selects the text between the anchor and the # cursor, takes ownership of primary selection # @) Ctrl Shift KSelect -- no effect # LocatePointer Text1 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text1 ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text1 LocatePointer Text2 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text2 ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text2 LocatePointer Text3 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text3 ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text3 LocatePointer Text4 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text4 ClickKey KRight ClickKey KRight ClickKey KSelect CompareVisual Text4 # @) Shift -- moves the cursor as indicated, # selects the text between the anchor and the # cursor, takes ownership of primary selection # (Rebalances the anchor if necessary) # #ifdef MOTIF1_2 # Includes Shift PageUp/PageDown ## ## NOTE: these are tested at the end of the file. ## # #endif MOTIF1_2 # LocatePointer Text1 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight CompareVisual Text1 LocatePointer Text2 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight CompareVisual Text2 LocatePointer Text3 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight CompareVisual Text3 LocatePointer Text4 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight CompareVisual Text4 # @) KSelectAll -- selects entire text and takes ownership of # primary selection # # @) KDeselectAll -- deselects everything in that widget # LocatePointer Text1 RTextChar 5 ClickMB Btn1 ClickKey KSelectAll CompareVisual Text1 LocatePointer Text1 RTextChar 5 ClickMB Btn1 2 ClickKey KDeselectAll CompareVisual Text1 LocatePointer Text2 RTextChar 5 ClickMB Btn1 ClickKey KSelectAll CompareVisual Text2 LocatePointer Text2 RTextChar 5 ClickMB Btn1 2 ClickKey KDeselectAll CompareVisual Text2 LocatePointer Text3 RTextChar 5 ClickMB Btn1 ClickKey KSelectAll CompareVisual Text3 LocatePointer Text3 RTextChar 5 ClickMB Btn1 2 ClickKey KDeselectAll CompareVisual Text3 LocatePointer Text4 RTextChar 5 ClickMB Btn1 ClickKey KSelectAll CompareVisual Text4 LocatePointer Text4 RTextChar 5 ClickMB Btn1 2 ClickKey KDeselectAll CompareVisual Text4 ## New tests for Motif 1.2, have to be at end so Visuals stay in ## synch for the rest of the compares. # #) Keyboard Selection -- Add Mode & Normal Mode: # ## ... # @) Ctrl Space -- same as KSelect ## Reset Strings to original value LocatePointer PushB1 ClickMB Btn1 LocatePointer Text1 ClickMB Btn1 ClickKey KBeginData LocatePointer Text1 RTextChar 5 DragComponent Text1 RTextChar 12 ClickKey KSpace CompareVisual Text1 LocatePointer Text2 ClickMB Btn1 ClickKey KBeginData LocatePointer Text2 RTextChar 5 DragComponent Text2 RTextChar 12 ClickKey KSpace CompareVisual Text2 LocatePointer Text3 ClickMB Btn1 ClickKey KBeginData LocatePointer Text3 RTextChar 5 DragComponent Text3 RTextChar 12 ClickKey KSpace CompareVisual Text3 LocatePointer Text4 ClickMB Btn1 ClickKey KBeginData LocatePointer Text4 RTextChar 5 DragComponent Text4 RTextChar 12 ClickKey KSpace CompareVisual Text4 # @) Ctrl Shift Space -- same as Shift KSelect ## Reset Strings to original value LocatePointer PushB1 ClickMB Btn1 LocatePointer Text1 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSpace CompareVisual Text1 LocatePointer Text2 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSpace CompareVisual Text2 LocatePointer Text3 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSpace CompareVisual Text3 LocatePointer Text4 RTextChar 5 ClickMB Btn1 ClickKey KSelect ClickKey KRight ClickKey KRight ClickKey KSpace CompareVisual Text4 # @) Shift -- moves the cursor as indicated, # selects the text between the anchor and the # cursor, takes ownership of primary selection # (Rebalances the anchor if necessary) # Includes Shift PageUp/PageDown # ## Reset Strings to original value LocatePointer PushB1 ClickMB Btn1 LocatePointer Text1 RTextChar 5 ClickMB Btn1 ClickKey KPageDown ClickKey KPageDown ClickKey KAddMode ClickKey KUp ClickKey KUp ClickKey KUp CompareVisual Text1 ClickKey KPageUp ClickKey KUp CompareVisual Text1 LocatePointer Text3 RTextChar 5 ClickMB Btn1 ClickKey KPageDown ClickKey KPageDown ClickKey KAddMode ClickKey KUp ClickKey KUp ClickKey KUp CompareVisual Text3 ClickKey KPageUp ClickKey KUp CompareVisual Text3 # C) Exit