source-git / motif

Clone
Source Code
GIT

Files

c8 master
  1.   c8
  2.   tests
  3.   Toolkit
  4.   Text
  5.   ScrollText3e.scr
Blob Blame History Raw 
# $XConsortium: ScrollText3e.scr /main/5 1995/07/17 20:40:49 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
# 

#  #) Clipboard and Primary Transfer:
#  
#  @)    Ctrl KInsert       -- copy primary selection to clipboard
#  @)    KCopy              -- copy primary selection to clipboard
#  @)    Shift KDelete      -- cut primary selection to clipboard
#  @)    KCut               -- cut primary selection to clipboard
#  @)    Shift KInsert      -- paste clipboard to insertion cursor
#  @)    KPaste             -- paste clipboard to insertion cursor
#   
LocatePointer Text1 RTextChar 5
ClickMB Btn1 2
ClickKey <Ctrl> KInsert
CompareVisual Text1
LocatePointer Text1 RTextChar 20
ClickMB Btn1
ClickKey <Shift> KInsert
CompareVisual Text1
LocatePointer Text4 RTextChar 20
ClickMB Btn1
ClickKey <Shift> KInsert
CompareVisual Text1
CompareVisual Text4

LocatePointer Text1 RTextChar 5
ClickMB Btn1 2
ClickKey KCopy
CompareVisual Text1
LocatePointer Text1 RTextChar 18
ClickMB Btn1
ClickKey KPaste
CompareVisual Text1
LocatePointer Text4 RTextChar 18
ClickMB Btn1
ClickKey KPaste
CompareVisual Text1
CompareVisual Text4

LocatePointer Text1 RTextChar 5
DragComponent Text1 RTextChar 12
ClickKey <Shift> KDelete
CompareVisual Text1
LocatePointer Text1 RTextChar 16
ClickMB Btn1
ClickKey KPaste
CompareVisual Text1
LocatePointer Text4 RTextChar 16
ClickMB Btn1
ClickKey KPaste
CompareVisual Text1
CompareVisual Text4

LocatePointer Text1 RTextChar 5
DragComponent Text1 RTextChar 12
ClickKey KCut
CompareVisual Text1
LocatePointer Text1 RTextChar 14
ClickMB Btn1
ClickKey KPaste
CompareVisual Text1
LocatePointer Text4 RTextChar 14
ClickMB Btn1
ClickKey KPaste
CompareVisual Text1
CompareVisual Text4

LocatePointer Text2 RTextChar 5
ClickMB Btn1 2
ClickKey <Ctrl> KInsert
CompareVisual Text2
LocatePointer Text2 RTextChar 20
ClickMB Btn1
ClickKey <Shift> KInsert
CompareVisual Text2

LocatePointer Text2 RTextChar 5
ClickMB Btn1 2
ClickKey KCopy
CompareVisual Text2
LocatePointer Text2 RTextChar 18
ClickMB Btn1
ClickKey KPaste
CompareVisual Text2

LocatePointer Text2 RTextChar 5
DragComponent Text2 RTextChar 12
ClickKey <Shift> KDelete
CompareVisual Text2
LocatePointer Text2 RTextChar 16
ClickMB Btn1
ClickKey KPaste
CompareVisual Text2

LocatePointer Text2 RTextChar 5
DragComponent Text2 RTextChar 12
ClickKey KCut
CompareVisual Text2
LocatePointer Text2 RTextChar 14
ClickMB Btn1
ClickKey KPaste
CompareVisual Text2

LocatePointer Text3 RTextChar 5
ClickMB Btn1 2
ClickKey <Ctrl> KInsert
CompareVisual Text3
LocatePointer Text3 RTextChar 20
ClickMB Btn1
ClickKey <Shift> KInsert
CompareVisual Text3

LocatePointer Text3 RTextChar 5
ClickMB Btn1 2
ClickKey KCopy
CompareVisual Text3
LocatePointer Text3 RTextChar 18
ClickMB Btn1
ClickKey KPaste
CompareVisual Text3

LocatePointer Text3 RTextChar 5
DragComponent Text3 RTextChar 12
ClickKey <Shift> KDelete
CompareVisual Text3
LocatePointer Text3 RTextChar 16
ClickMB Btn1
ClickKey KPaste
CompareVisual Text3

LocatePointer Text3 RTextChar 5
DragComponent Text3 RTextChar 12
ClickKey KCut
CompareVisual Text3
LocatePointer Text3 RTextChar 14
ClickMB Btn1
ClickKey KPaste
CompareVisual Text3

## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

LocatePointer Text4 RTextChar 5
ClickMB Btn1 2
ClickKey <Ctrl> KInsert
CompareVisual Text4
LocatePointer Text4 RTextChar 20
ClickMB Btn1
ClickKey <Shift> KInsert
CompareVisual Text4
LocatePointer Text2 RTextChar 20
ClickMB Btn1
ClickKey <Shift> KInsert
CompareVisual Text4
CompareVisual Text2

LocatePointer Text4 RTextChar 5
ClickMB Btn1 2
ClickKey KCopy
CompareVisual Text4
LocatePointer Text4 RTextChar 18
ClickMB Btn1
ClickKey KPaste
CompareVisual Text4
LocatePointer Text2 RTextChar 18
ClickMB Btn1
ClickKey KPaste
CompareVisual Text4
CompareVisual Text2

LocatePointer Text4 RTextChar 5
DragComponent Text4 RTextChar 12
ClickKey <Shift> KDelete
CompareVisual Text4
LocatePointer Text4 RTextChar 16
ClickMB Btn1
ClickKey KPaste
CompareVisual Text4
LocatePointer Text2 RTextChar 16
ClickMB Btn1
ClickKey KPaste
CompareVisual Text4
CompareVisual Text2

LocatePointer Text4 RTextChar 5
DragComponent Text4 RTextChar 12
ClickKey KCut
CompareVisual Text4
LocatePointer Text4 RTextChar 14
ClickMB Btn1
ClickKey KPaste
CompareVisual Text4
LocatePointer Text2 RTextChar 14
ClickMB Btn1
ClickKey KPaste
CompareVisual Text4
CompareVisual Text2

#  @)    Btn2 Click         -- copy primary selection to pointer
#  @)    Ctrl Btn2 Click    -- copy primary selection to pointer
#  #ifdef	MOTIF1_1
#  @)    MAlt Btn2 Click    -- cut primary selection to pointer
#  #endif	MOTIF1_1
#  #ifdef	MOTIF1_2
#  @)    Shift Btn2 Click   -- cut primary selection to pointer
#  #endif	MOTIF1_2
## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

LocatePointer Text1 RTextChar 3
DragComponent Text1 RTextChar 7
LocatePointer Text1 RTextChar 18
ClickMB Btn2
CompareVisual Text1
LocatePointer Text1 RTextChar 16
ClickMB <Alt> Btn2
CompareVisual Text1
LocatePointer Text1 RTextChar 14
ClickMB <Shift> Btn2
CompareVisual Text1
LocatePointer Text4 RTextChar 18
ClickMB Btn2
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 16
ClickKey KPrimaryCut
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 14
ClickKey KPrimaryCut
CompareVisual Text1
CompareVisual Text4

LocatePointer Text2 RTextChar 3
DragComponent Text2 RTextChar 7
LocatePointer Text2 RTextChar 18
ClickMB Btn2
CompareVisual Text2
LocatePointer Text2 RTextChar 16
ClickMB <Ctrl> Btn2
CompareVisual Text2
LocatePointer Text2 RTextChar 14
ClickKey KPrimaryCut
CompareVisual Text2

LocatePointer Text3 RTextChar 3
DragComponent Text3 RTextChar 7
LocatePointer Text3 RTextChar 18
ClickMB Btn2
CompareVisual Text3
LocatePointer Text3 RTextChar 16
ClickMB <Ctrl> Btn2
CompareVisual Text3
LocatePointer Text3 RTextChar 14
ClickKey KPrimaryCut
CompareVisual Text3

## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

LocatePointer Text4 RTextChar 3
DragComponent Text4 RTextChar 7
LocatePointer Text4 RTextChar 18
ClickMB Btn2
CompareVisual Text4
## need to make another selection due to PIR 3768
LocatePointer Text4 RTextChar 3
DragComponent Text4 RTextChar 7
## for PIR 3768
LocatePointer Text4 RTextChar 16
ClickMB <Ctrl> Btn2
CompareVisual Text4
## need to make another selection due to PIR 3768
LocatePointer Text4 RTextChar 3
DragComponent Text4 RTextChar 7
## for PIR 3768
LocatePointer Text4 RTextChar 14
ClickKey KPrimaryCut
CompareVisual Text4
LocatePointer Text2 RTextChar 18
ClickMB Btn2
CompareVisual Text4
CompareVisual Text2
LocatePointer Text2 RTextChar 16
ClickMB <Ctrl> Btn2
CompareVisual Text4
CompareVisual Text2
LocatePointer Text2 RTextChar 14
ClickKey KPrimaryCut
CompareVisual Text4
CompareVisual Text2

#  @)    KPrimaryPaste      -- copy primary selection to cursor
#  @)    Ctrl KPrimaryPaste -- copy primary selection to cursor
#  @)    Alt Ctrl KInsert   -- copy primary selection to cursor
#  @)    Alt KCopy          -- copy primary selection to cursor
## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

## make a selection
LocatePointer Text1 RTextChar 1
ClickMB Btn1 2

LocatePointer Text1 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey KPrimaryPaste
CompareVisual Text1
LocatePointer Text1 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Ctrl> KPrimaryPaste
CompareVisual Text1
LocatePointer Text1 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Meta> <Ctrl> KInsert
CompareVisual Text1
LocatePointer Text1 RTextChar 14
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCopy
CompareVisual Text1
LocatePointer Text4 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey KPrimaryPaste
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Ctrl> KPrimaryPaste
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Ctrl> KInsert
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 14
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCopy
CompareVisual Text1
CompareVisual Text4

## make a selection
LocatePointer Text2 RTextChar 1
ClickMB Btn1 2

LocatePointer Text2 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey KPrimaryPaste
CompareVisual Text2
LocatePointer Text2 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Ctrl> KPrimaryPaste
CompareVisual Text2
LocatePointer Text2 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Ctrl> KInsert
CompareVisual Text2
LocatePointer Text2 RTextChar 14
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCopy
CompareVisual Text2

## make a selection
LocatePointer Text3 RTextChar 1
ClickMB Btn1 2

LocatePointer Text3 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey KPrimaryPaste
CompareVisual Text3
LocatePointer Text3 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Ctrl> KPrimaryPaste
CompareVisual Text3
LocatePointer Text3 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Ctrl> KInsert
CompareVisual Text3
LocatePointer Text3 RTextChar 14
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCopy
CompareVisual Text3

## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

## make a selection
LocatePointer Text4 RTextChar 1
ClickMB Btn1 2

LocatePointer Text4 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey KPrimaryPaste
CompareVisual Text4
LocatePointer Text4 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Ctrl> KPrimaryPaste
CompareVisual Text4
LocatePointer Text4 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Ctrl> KInsert
CompareVisual Text4
LocatePointer Text4 RTextChar 14
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCopy
CompareVisual Text4
LocatePointer Text2 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey KPrimaryPaste
CompareVisual Text4
CompareVisual Text2
LocatePointer Text2 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Ctrl> KPrimaryPaste
CompareVisual Text4
CompareVisual Text2
LocatePointer Text2 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Ctrl> KInsert
CompareVisual Text4
CompareVisual Text2
LocatePointer Text2 RTextChar 14
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCopy
CompareVisual Text4
CompareVisual Text2

#  @)    Alt KPrimaryPaste  -- cut primary selection to cursor
#  @)    Alt Shift KDelete  -- cut primary selection to cursor
#  @)    Alt KCut           -- cut primary selection to cursor
#   
## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

LocatePointer Text1 RTextChar 3
DragComponent Text1 RTextChar 7
LocatePointer Text1 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey <Alt> KPrimaryPaste
CompareVisual Text1
LocatePointer Text4 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey <Alt> KPrimaryPaste
CompareVisual Text1
CompareVisual Text4
LocatePointer Text1 RTextChar 3
DragComponent Text1 RTextChar 7
LocatePointer Text1 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Shift> KDelete
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Shift> KDelete
CompareVisual Text1
CompareVisual Text4
LocatePointer Text1 RTextChar 3
DragComponent Text1 RTextChar 7
LocatePointer Text1 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCut
CompareVisual Text1
CompareVisual Text4
LocatePointer Text4 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCut
CompareVisual Text1
CompareVisual Text4

LocatePointer Text2 RTextChar 3
DragComponent Text2 RTextChar 7
LocatePointer Text2 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey <Alt> KPrimaryPaste
CompareVisual Text2
LocatePointer Text2 RTextChar 3
DragComponent Text2 RTextChar 7
LocatePointer Text2 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Shift> KDelete
CompareVisual Text2
LocatePointer Text2 RTextChar 3
DragComponent Text2 RTextChar 7
LocatePointer Text2 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCut
CompareVisual Text2

LocatePointer Text3 RTextChar 3
DragComponent Text3 RTextChar 7
LocatePointer Text3 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey <Alt> KPrimaryPaste
CompareVisual Text3
LocatePointer Text3 RTextChar 3
DragComponent Text3 RTextChar 7
LocatePointer Text3 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Shift> KDelete
CompareVisual Text3
LocatePointer Text3 RTextChar 3
DragComponent Text3 RTextChar 7
LocatePointer Text3 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCut
CompareVisual Text3

## Reset Strings to original value
LocatePointer PushB1
ClickMB Btn1

LocatePointer Text4 RTextChar 3
DragComponent Text4 RTextChar 7
LocatePointer Text4 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey <Alt> KPrimaryPaste
CompareVisual Text4
LocatePointer Text3 RTextChar 20
ClickMB <Ctrl> Btn1
ClickKey <Alt> KPrimaryPaste
CompareVisual Text4
LocatePointer Text4 RTextChar 3
DragComponent Text4 RTextChar 7
LocatePointer Text4 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Shift> KDelete
CompareVisual Text4
LocatePointer Text3 RTextChar 18
ClickMB <Ctrl> Btn1
ClickKey <Alt> <Shift> KDelete
CompareVisual Text4
CompareVisual Text3
LocatePointer Text4 RTextChar 3
DragComponent Text4 RTextChar 7
LocatePointer Text4 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCut
CompareVisual Text4
CompareVisual Text3
LocatePointer Text3 RTextChar 16
ClickMB <Ctrl> Btn1
ClickKey <Alt> KCut
CompareVisual Text4
CompareVisual Text3

#  !)
#  #) Try all the above with: 
#  @)      - source and destination in same widget
## Done above.
#  @)      - source and destination in different widgets in same window
## Done above.
#  @)      - source and destination in different windows in same application
## No Can Do!
#  @)      - source and destination in different applications
## No Can Do!
#  C)
Exit

Powered by Pagure 5.14.1

SSH Hostkey/Fingerprint | Documentation