program "%Z% MODULE: %M% RELEASE: %R%.%L% CREATED: %G% %U%"
source "/mdisw/cfl/dev/src/run_iss_test2.src"
descr "iss_test2 - PAW and CAL wheel motion for ISS mode"

## Created 9-Sep-96 by M.Morrison
##	Assumes "start_iss" has already been perfed.

queue on
open d
tcblock mbltclsl			## Close the ISS loop

tcb mbdpml 0x1000 0x4c64 0x79 0x79      ## 5x,5x (?)
perf iss_test_moves_v03

tcb mbdpml 0x1000 0x4c64 0x7c 0x7c      ## 3x,3x
perf iss_test_moves_v03

tcb mbdpml 0x1000 0x4c64 0x7c 0x7e      ## 3x,0.7x
perf iss_test_moves_v03

tcb mbdpml 0x1000 0x4c64 0x7f 0x7f	## 0x,0x
perf iss_test_moves_v03

tcb mbdpml 0x1000 0x4c64 0x7e 0x7e	## 0.7x,0.7x
perf iss_test_moves_v03

tcb mbdpml 0x1000 0x4c64 0x7e 0x7e	## Back to original
tcblock mbltopnl			## Opening the ISS loop

close d
queue off
