# $XConsortium: PopupMenu1.scr /main/6 1995/07/17 20:27:27 drk $
# 
# @OPENGROUP_COPYRIGHT@
# COPYRIGHT NOTICE
# Copyright (c) 1990, 1991, 1992, 1993 Open Software Foundation, Inc.
# Copyright (c) 1996, 1997, 1998, 1999, 2000 The Open Group
# ALL RIGHTS RESERVED (MOTIF). See the file named COPYRIGHT.MOTIF for
# the full copyright text.
# 
# This software is subject to an open license. It may only be
# used on, with or for operating systems which are themselves open
# source systems. You must contact The Open Group for a license
# allowing distribution and sublicensing of this software on, with,
# or for operating systems which are not Open Source programs.
# 
# See http://www.opengroup.org/openmotif/license for full
# details of the license agreement. Any use, reproduction, or
# distribution of the program constitutes recipient's acceptance of
# this agreement.
# 
# EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE PROGRAM IS
# PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
# KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT LIMITATION, ANY
# WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT, MERCHANTABILITY
# OR FITNESS FOR A PARTICULAR PURPOSE
# 
# EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER RECIPIENT
# NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY DIRECT,
# INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
# DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED
# AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
# ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE
# EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGES.
# 
# 
# HISTORY
# 


# A client with CascadeButton labeled "Select Me" will appear. 

CompareVisual SelectMe

# Press Alt<Key>KRight. The Popup menu should post. Press escape. 
# The menu should unpost. 

WindowFocus Shell1
ClickKey <Alt> KRight
ClickKey KCancel
CompareVisual SelectMe

# Press and hold down MB3 in the client window.  A PulldownMenu
#  labeled "Menu1" will appear. 

LocatePointer SelectMe
PressMB Btn3
CompareVisual popMenu

# Drag the pointer down to "PushButton1".  "PushButton1" will
#  appear raised. 

LocatePointer PushButton1
CompareVisual PushButton1

# Drag the pointer down to "Toggle1".  "Toggle1" will appear
#  raised. 

LocatePointer Toggle1
CompareVisual Toggle1

# Release MB3.  The PulldownMenu will disappear. 

ReleaseMB Btn3

Continue

# Press and hold down MB3 in the client window.  The PulldownMenu
#  will appear with a filled square to the left of "Toggle1". 

LocatePointer SelectMe
PressMB Btn3
CompareVisual popMenu

# Drag the pointer down to "Toggle1" and release MB3.  The
#  PulldownMenu will disappear. 

LocatePointer Toggle1
ReleaseMB Btn3

Continue

# Press and hold down MB3 in the client window.  The PulldownMenu
#  will appear with NO filled sqaure to the left of "Toggle1". 

LocatePointer SelectMe
PressMB Btn3
CompareVisual popMenu

# Drag the pointer down to "Cascade1".  A second PulldownMenu
#  labeled "Menu2" will appear. 

LocatePointer Cascade1 
CompareVisual Pulldown2

# Drag the pointer down to "Cascade2".  A third PulldownMenu
#  labeled "Menu3" will appear. 

LocatePointer Menu2
LocatePointer Cascade2
CompareVisual PullDown3

# Drag the pointer down to "Cascade3".  A fourth PulldownMenu
#  labeled "Menu4" will appear.  It will be empty. 

LocatePointer Menu3
LocatePointer Cascade3
CompareVisual PullDown4

# Drag the pointer into "Menu4" and release MB3.  All
#  PulldownMenus will disappear. 

LocatePointer Menu4
ReleaseMB Btn3
Continue

# Press and hold down MB3 in the client window.  The PulldownMenu
#  "Menu1" will appear. 

# Drag the pointer down to "Cascade1" and release MB3. 

LocatePointer SelectMe
PressMB Btn3
LocatePointer Cascade1
ReleaseMB Btn3

# Press the down arrow key once.  "Cascade2" will appear raised. 

ClickKey KDown
CompareVisual Cascade2

# Press the right arrow key once.  "Menu3" will appear. 

ClickKey KRight
CompareVisual Menu3

# Press the return key.  "Menu4" will appear. 

ClickKey KReturn
CompareVisual PullDown4

# Press the escape key.  "Menu4" will disappear. 

ClickKey KCancel

CompareVisual Menu3

# Move the pointer into the "Select Me" window and click MB3.
#  All menus will disappear. 

LocatePointer SelectMe
ClickMB Btn3
CompareVisual SelectMe

Exit