[Control] AuthorName=Robert Sheahan CompanyName=Prolink Software DateCreated=06/03/98 Description=Slower but initializes the QC-2000 automatically BaudRate=4800 Parity=0 BitsPerByte=8 StopBits=2 FlowControl=1 NoOfChannels=1 Port=COM2 Phone=(860)659-5928 E-Mail=Prolink@ProlinkSoftware.com GetString= DelayTime= InitString=QUIT{cr}QUIT{cr}QUIT{cr}QUIT{cr}QUIT{cr}{chr$,27}D1{chr$,27}5{cr}ENTER{cr}{chr$,27}D1{chr$,27}2{cr}2{cr}2{cr}ENTER{cr}2{cr}ENTER{cr}{chr$,27}D1{chr$,27}FINISH{cr}2{cr}2{cr}2{cr}2{cr}2{cr}2{cr}ENTER{cr}2{cr}ENTER{cr}2{cr}2{cr}2{cr}CANCEL{cr}{chr$,27}D1{chr$,27}FINISH{cr}2{cr}ENTER{cr}2{cr}2{cr}2{cr}2{cr}2{cr}2{cr}2{cr}2{cr}2{cr}2{cr}CANCEL{cr}{chr$,27}D1{chr$,27}FINISH{cr}FINISH{cr} Parse=13 ParseLines 1=*{MoveFirst} {StartRead} {MoveTo,0,1, } {MoveRel,-1} {StopRead} {R* ParseLines 2=*eadVar,User1}~{SetVar,Action,{if,{var,MoveWarn},1,0}}~{MoveFirst}* ParseLines 3=* {MoveTo,0,1,.}~{SetVar,Action,{if,{var,MoveWarn},1,{Var,Action}}* ParseLines 4=*}~{SetVar,Action,{if,{Compare,=,{UCase$,{var,User1}},ID:},1,{Var,* ParseLines 5=*Action}}}~{SetVar,Action,{if,{Compare,=,{UCase$,{var,User1}},+T},* ParseLines 6=*1,{Var,Action}}}~{SetVar,Action,{if,{Compare,=,{UCase$,{var,User1* ParseLines 7=*}},-T},1,{Var,Action}}}~{MoveLast} {StopRead} {MoveAbs,4} {StartR* ParseLines 8=*ead} {ReadVar,Actual}~{SetVar,Action,{if,{var,MoveWarn},1,{Var,Ac* ParseLines 9=*tion}}}~{If,{Var,Action},,{MoveTo,0,2,.} {If,{var,MoveWarn},, {Se* ParseLines 10=*tVar,ErrNum,2} {SetVar,ErrText,Angle measurements in degrees min* ParseLines 11=*utes seconds mode is not supported. Please switch to Decimal Degr* ParseLines 12=*ees.}}}~{SetVar,MoveWarn,0}{MoveLast} {StopRead} {MoveAbs,15} {St* ParseLines 13=*artRead} ~{If,{var,MoveWarn},, {ReadVar,Units}}* Notes=7 NoteLines 1=*This script filters out lines beginning with ID:, +T, and -T. The* NoteLines 2=* INIT string sets most of the requierd settings. Sets 32 col, Ang* NoteLines 3=*le to DD, no form feed, no POE. You must set anything else includ* NoteLines 4=*ing polar/cart, mm/in, RS232 settings, PreLIne / PostLine / PreFo* NoteLines 5=*rm / PostForm. This script is slower than the "QC-2000 in 32 col * NoteLines 6=*mode" script. The QC-2000 must be on bwfore you run the Spec Plan* NoteLines 7=* for this to work.*