# $XConsortium: ToggleBGad3.scr /main/6 1995/07/17 20:07:17 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
# 


# A client with a radio box with 6 toggle buttons should appear. 
# Click MB1 in all the toggle buttons. You should not be able to
#  make more than one button appear ON at any time. ToggleG2 will
#  not fill on select.  Indicator for ToggleButtonG3 is not
#  visible when not selected. 

CompareVisual RowColumn1 
LocatePointer ToggleButtonG1
ClickMB Btn1 
LocatePointer ToggleButtonG2
ClickMB Btn1 
CompareVisual ToggleButtonG2
LocatePointer ToggleButtonG3
ClickMB Btn1
CompareVisual ToggleButtonG3
LocatePointer ToggleButtonG4
ClickMB Btn1 
LocatePointer ToggleButtonG5
ClickMB Btn1 
LocatePointer ToggleButtonG6
ClickMB Btn1 
Continue

# Click MB1 in all toggle buttons. You can now turn on more than one
#  toggle button at a time. ToggleButtonG2 will not fill on select. 

LocatePointer ToggleButtonG1
ClickMB Btn1 
LocatePointer ToggleButtonG2
ClickMB Btn1 
CompareVisual ToggleButtonG2
LocatePointer ToggleButtonG3
ClickMB Btn1
CompareVisual ToggleButtonG3
LocatePointer ToggleButtonG4
ClickMB Btn1 
LocatePointer ToggleButtonG5
ClickMB Btn1 
LocatePointer ToggleButtonG6
ClickMB Btn1
CompareVisual ToggleButtonG6
Continue

# Toggle buttons 1 and 2 have changed their indicators from the
#  diamond shape to a square shape. 

CompareVisual RowColumn1
Continue

# Two radio boxes will appear.  One should have colors of black and orange
#  and the other magenta and blue.  The diamond indicators should be their
#  appropriate colors.  For example, the black and orange radio box should 
#  NOT have magenta colored indicators.

CompareVisual RowColumn1
Exit