; IP - DEP Interface Commissioning Sequence
;
; Version 0.4
;
; The sequence carries out forward and backward scans across the wavelength 
; range. Five images are taken during each scan. During each scan the motors
; are turned in the same direction to reach each step. At the end of the scan 
; the motors are moved a small distance in the direction of the movement to
; compansate the positioning differences between clockwise and counterclockwise
; motor movements.
;
;
; 
IPDEP:  .SEQ   99 0
;
         SET R0 500
         SET R1 0
         SET R2 48
;
         EXP R0
;
L0:      SRT
         SET R3 R1               
;
L1:      CO1 &OCVDOP0 &DMWRIM2 &IP0
         TIM R3                  ;  0.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP1 &DMWRIM0 &IP0
         TIM R3                  ;  3.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP2 &DMWRIM1 &IP0
         TIM R3                  ;  6.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP3 &DMSUBM0 &IP0
         TIM R3                  ;  9.0 s 
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP4 &DMSUBM1 &IP0
         TIM R3                  ; 12.0 s
         TAP
;
         SET R4 R3
         ADD R4 16               ; Add 1 sec delay
         TIM R4                  ; 13.0 seconds
         DC2 0x0050 103
         DC2 0x0051  93 
         ADD R4 16
         TIM R4                  ; 14.0 seconds
;
         ADD R3 R2
         CO1 &OCVDOP5 &DMSUBM1 &IP0
         TIM R3                  ; 15.0 seconds
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP6 &DMSUBM0 &IP0
         TIM R3                  ; 18.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP7 &DMADDM1 &IP0
         TIM R3                  ; 21.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP8 &DMADDM0 &IP0
         TIM R3                  ; 24.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP9 &DMADDM2 &IP0
         TIM R3                  ; 27.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP0 &DMADDM2 &IP0
         TIM R3                  ; 30.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP1 &DMADDM0 &IP0
         TIM R3                  ; 33.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP2 &DMADDM1 &IP0
         TIM R3                  ; 36.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP3 &DMSUBM0 &IP0
         TIM R3                  ; 39.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP4 &DMSUBM1 &IP0
         TIM R3                  ; 42.0 s
         TAP
;
         SET R4 R3
         ADD R4 16 
         TIM R4                  ; 43.0 s
         DC2 0x0050 103
         DC2 0x0051  93 
         ADD R4 16
         TIM R4                  ; 43.0 + Exp s
;
         ADD R3 R2
         CO1 &OCVDOP5 &DMSUBM1 &IP0
         TIM R3                  ; 45.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP6 &DMSUBM0 &IP0
         TIM R3                  ; 48.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP7 &DMADDM1 &IP0
         TIM R3                  ; 51.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP8 &DMADDM0 &IP0
         TIM R3                  ; 54.0 s
         TAP
;
         ADD R3 R2
         CO1 &OCVDOP9 &DMADDM2 &IP1
         TIM R3                  ; 57.0 s
         TAP
;
         UBR &L0
         RET
;
;
OCVDOP0:  .OCB  0x14o   125o  26o   52o  
OCVDOP1:  .OCB  0x14o   125o  44o   61o
OCVDOP2:  .OCB  0x14o   125o  62o   70o  
OCVDOP3:  .OCB  0x14o   125o  80o   79o  
OCVDOP4:  .OCB  0x14o   125o  98o   88o  
OCVDOP5:  .OCB  0x28o   125o  98o   88o  
OCVDOP6:  .OCB  0x28o   125o  80o   79o  
OCVDOP7:  .OCB  0x28o   125o  62o   70o
OCVDOP8:  .OCB  0x28o   125o  44o   61o 
OCVDOP9:  .OCB  0x28o   125o  26o   52o  
;
DMWRIM2:  .DMB  0x42o  0x42o  0x42o  0x42o
DMWRIM0:  .DMB  0x40o  0x40o  0x40o  0x40o
DMWRIM1:  .DMB  0x41o  0x41o  0x41o  0x41o
DMSUBM0:  .DMB  0xC0o  0xC0o  0xC0o  0xC0o
DMSUBM1:  .DMB  0xC1o  0xC1o  0xC1o  0xC1o
DMADDM1:  .DMB  0x81o  0x81o  0x81o  0x81o
DMADDM0:  .DMB  0x80o  0x80o  0x80o  0x80o
DMADDM2:  .DMB  0x82o  0x82o  0x82o  0x82o
;
IP0:     .IPB  0x00o  0x00o  0x00o  0x00o  0x00o  0x00o
IP1:     .IPB  0x00o  0x00o  0x01o  0x00o  0x00o  0x00o