Delta Tau GEO BRICK LV User Manual

 

  STData=0 
  MTData=0 
  If (STRes!>24) ; Single Turn Res<=24 
   //===========SINGLE TURN DATA===========// 
   Two2STDec=exp(STRes*ln(2))  

 

   Two2STHex=Two2STDec-1 

 

 

 

 

  

   STData=SerialRegA&Two2STHex 

 

  

   //===========MULTI TURN DATA============// 
   Two2MTDec=exp(MTRes*ln(2)) 
   Two2MTHex=Two2MTDec-1 
   If (MTRes=0) 
    LowerMTBits=0 
    UpperMTBits=0 
    Two2MTDec=0 
    Two2MTHex=0 

 

    MTData=0 
   Else 
    LowerMTBits=24-STRes 
    STTemp1=exp(LowerMTBits*ln(2)) 
    STTemp2=0 
    UpperMTBits=MTRes-LowerMTBits 
    MTTemp1=exp(LowerMTBits*ln(2)) 
    MTTemp2=exp(UpperMTBits*ln(2)) 
    Temp1=(SerialRegA/Two2STDec)&(MTTemp1-1) 
    Temp2=SerialRegB&(MTTemp2-1) 
    MTData=Temp2*STTemp1+Temp1 
   EndIf 
   Else ; Single Turn Res>24 
    //===========SINGLE TURN DATA===========// 
    LowerSTBits=24 
    UpperSTBits=STRes-24 
    STTemp1=exp(UpperSTBits*ln(2)) 
    STTemp2=STTemp1-1 
    Two2STDec=16777216*STTemp1 
    Two2STHex=Two2STDec-1 
    STData=(SerialRegB&STTemp2)*16777216+SerialRegA 
    //===========MULTI TURN DATA============// 
    If (MTRes=0) 
     LowerMTBits=0 
     UpperMTBits=0 
     Two2MTDec=0 
     Two2MTHex=0 

 

     MTData=0 
    Else 
     Two2MTDec=exp(MTRes*ln(2)) 
     Two2MTHex=Two2MTDec-1 
     LowerMTBits=0 
     UpperMTBits=MTRes 
     MTTemp1=exp(UpperMTBits*ln(2)) 
     MTTemp2=MTTemp1-1 
     MTData=(SerialRegB/STTemp1)&MTTemp2 
    EndIf 
   EndIf 
  //======ASSEMBLING ACTUAL POSITION======// 
  ChBase=162+(ChNo-1)*100 
  PsfBase=108+(ChNo-1)*100 

 

  NegTh=Two2MTDec/2 
  If (MTData!>NegTh) 
   M(ChBase)=(MTData*Two2STDec+STData)*32*I(PsfBase) 
  Else 
   M(ChBase)=-(((Two2MTHex-MTData)*Two2STDec)+(Two2STDec-STData))*32*I(PsfBase) 
  EndIf 
 EndIf 
EndW 
ChNo=0 
Dis plc 1 
Close