# $XConsortium: Scale6.prt /main/3 1995/07/19 20:31:48 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
TRACE:(1) LocatePointer Scale1 RScrollBarSlider 
TRACE:(2) DragSliderValue Down 60 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 60
TRACE:(3) CompareVisual Scale1 
TRACE:(4) DragSliderValue Up 15 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 15
TRACE:(5) CompareVisual Scale1 
TRACE:(6) DragSliderValue Down 85 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 85
TRACE:(7) CompareVisual Scale1 
TRACE:(8) LocatePointer Scale1 RScrollBarUpOrLeftSliderArea 
TRACE:(9) ClickMB Btn1 
Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 75
TRACE:(10) CompareVisual Scale1 
TRACE:(11) WindowResize Shell1 SouthEast 250 500
TRACE:(12) CompareVisual Shell1 
TRACE:(13) WindowResize Shell1 SouthEast 50 150
TRACE:(14) CompareVisual Shell1 
TRACE:(15) Continue
TRACE:(16) LocatePointer Scale1 RScrollBarSlider 
TRACE:(17) DragSliderValue Right 85 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 85
TRACE:(18) CompareVisual Scale1 
TRACE:(19) DragSliderValue Left 55 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 55
TRACE:(20) CompareVisual Scale1 
TRACE:(21) DragSliderValue Left 10 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 10
TRACE:(22) CompareVisual Scale1 
TRACE:(23) DragSliderValue Right 60 

Test dragCallback called

Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 60
TRACE:(24) CompareVisual Scale1 
TRACE:(25) LocatePointer Scale1 RScrollBarUpOrLeftSliderArea 
TRACE:(26) ClickMB Btn1 
Generic Callback called:  Reason - XmCR_VALUE_CHANGED
Test valueChangedCallback called
    Value = 50
TRACE:(27) CompareVisual Scale1 
TRACE:(28) WindowResize Shell1 SouthEast 500 250
TRACE:(29) CompareVisual Shell1 
TRACE:(30) WindowResize Shell1 SouthEast 150 50
TRACE:(31) CompareVisual Shell1 
TRACE:(32) Exit
Exiting Test...Please Standby...