! regression/common/checkreply - start
VIEW_SETPOS 400 300
! regression/common/checkreply "VIEW_SETPOS" "303 O.K. View Main moved to (400,300)"
! regression/common/checkreply - stop
USLEEP 1000000

! regression/common/checkreply - start
VIEW_ORIENT LEFT TestView
! regression/common/checkreply "VIEW_ORIENT LEFT" "300 Orientation=LEFT of TestView"
! regression/common/checkreply - stop
DECLARE int $i
CECHO ${$i=0}
{ spacex ${$i<40}
  VIEW_SPACEX ${$i}
  VIEW_REORIENT
  USLEEP 200000
} spacex ${$i+=5} 1

VIEW_SPACEX 10

! regression/common/checkreply - start
VIEW_ORIENT ABOVE TestView
! regression/common/checkreply "VIEW_ORIENT ABOVE" "300 Orientation=ABOVE of TestView"
! regression/common/checkreply - stop
CECHO ${$i=0}
{ spacey ${$i<70}
  VIEW_SPACEY ${$i}
  VIEW_REORIENT
  USLEEP 200000
} spacey ${$i+=7} 1

VIEW_SPACEY 40
VIEW_REORIENT
USLEEP 200000

! regression/common/checkreply - start
VIEW_ORIENT RIGHT TestView
! regression/common/checkreply "VIEW_ORIENT RIGHT" "300 Orientation=RIGHT of TestView"
! regression/common/checkreply - stop
VIEW_REORIENT
USLEEP 1000000

! regression/common/checkreply - start
VIEW_ORIENT BELOW TestView
! regression/common/checkreply "VIEW_ORIENT BELOW" "300 Orientation=BELOW of TestView"
! regression/common/checkreply - stop
VIEW_REORIENT
USLEEP 1000000

! regression/common/checkreply - start
VIEW_ORIENT BEFORE TestView
! regression/common/checkreply "VIEW_ORIENT BEFORE" "300 Orientation=BEFORE of TestView"
! regression/common/checkreply - stop
VIEW_REORIENT
USLEEP 1000000

! regression/common/checkreply - start
VIEW_LOWER Main
! regression/common/checkreply "VIEW_LOWER" "303 O.K. Lowering view Main."
! regression/common/checkreply - stop
USLEEP 1000000

! regression/common/checkreply - start
VIEW_RAISE Main
! regression/common/checkreply "VIEW_RAISE" "303 O.K. Raising view Main."
! regression/common/checkreply - stop
USLEEP 1000000

! regression/common/checkreply - start
VIEW_ORIENT BEHIND TestView
! regression/common/checkreply "VIEW_ORIENT BEHIND" "300 Orientation=BEHIND of TestView"
! regression/common/checkreply - stop
VIEW_REORIENT
USLEEP 1000000

VIEW_ORIENT LEFT TestView
VIEW_REORIENT

! regression/common/checkreply - start
VIEW_DEL TestView
! regression/common/checkreply "VIEW_DEL" "303 O.K. Destroying view (rc=0)."
! regression/common/checkreply - stop
VIEW_SET Main

! regression/common/checkreply - start
VIEW_SCALE 2
! regression/common/checkreply "VIEW_SCALE" "303 O.K. New value VIEW_SCALE=2"
! regression/common/checkreply - stop
USLEEP 1000000
VIEW_SCALE 1
VIEW_RENDER
! regression/common/checkreply - start
VIEW_DATALINE 0 TestDataLine
! regression/common/checkreply "VIEW_DATALINE" "302 O.K. Dataline 0 set to TestDataLine"
VIEW_DISP 0
! regression/common/checkreply "VIEW_DISP" "303 O.K. New value VIEW_DISP=0"
VIEW_DRAWWHENFLAGS |0
! regression/common/checkreply "VIEW_DRAWWHENFLAGS" "303 O.K. New value VIEW_DRAWWHENFLAGS=0"
#
# VIEW_RESET does much - can't really check it, and it isn't used much 
# anymore.
#
VIEW_RESET
! regression/common/checkreply "VIEW_RESET" "301 O.K."
! regression/common/checkreply - stop
VIEW_DATALINE 0

QUIT
