60 True False True False 0 0 0 0 "This module communicates with a remote SX10500 \nthermocouple board over Xwire and makes the \nresults available as floating point variables\nvia subroutine calls.\nIt is designed to work with Builder.\n" 0 SX10500 0 0 MZ@ !L!This program cannot be run in DOS mode. $[뙈P՞՚RichPEL"SH   @@ (0( .text `.data  @.rsrc00@@:@MSVBVM60.DLL ffyf.kfLff f__frf f:fd, f; f{eff:_fkfZ f fo_fff f f ?f fi f fb>fff~ fjf%ffqfnfdfjWf< f ftfѸ ffX f6fo fff ffƿ fvfef ff f<fL f7 f f:ffSufQhf f fA^fֻ fBflff f8 f f= fhf> ffBffaf`ff)f/ f|5fOfBfbf6nff fhfqbf@f`fLfmfĊf ffpf' f`f- f3y@:y@@)@@W@^@W@@^@@ @@@6@@@@@@@o@\@@d@CL@@T@@@@@@@@7@@@6@4@;@'@ @@@>@@e@@@@`@b@d@q@v@v@v@x@@@@@@@1@q@@@@@@@@@G@`@@@@#@5@@@@@>@>@@@@o@@@@@ @y@@@@@@@@"@@ @@5J@Q@P@@ @@@@@@@@@%@2@D@@@@%@@@@@@@@@@@ @D@'@@@@@@@0@f@7@@UAA\A&A" Ah A) A%@%@%@%t@%P@%8@%(@%P@%x@%L@%@@%@%@%@%8@%@%|@%@%@%@%@%@%@%@%@%L@%@%l@%D@%@%@@%@%4@%T@%@%|@%@%@%@%,@%@%4@%T@%h@%\@%`@%@%@%@%@%p@%X@%`@%@%t@%@%d@%@%@%@% @%x@%p@%@%@%@%@%@% @%l@%0@%@%<@%\@%d@%@%@%@% @%@%@%$@%@%@%$@%,@% @%@%@%(@%0@%H@%<@%@%D@%@%@%@%@%@%H@%h@%@%@%@%X@h(@08gS@!H% SX105001 cA%OpT5FwCn[%:O3f `ӓGForm1 TCPLB"#lt ( @ wwp p  p www ww p wyww x??~|<$Form1&5-Jf! FchkDoUpdateChecks Update checks,%AAutomatically check for updates. Requires an Internet connection.)GtxtVersionInfo"8g/ Version info (downloaded) s Inet1InetCtlsObjects.Inet-LB :!C4HP<9%:" fraPackingg `Label11Packing and saving. Please waitx%| MS Sans Serif optBuilderBuilder g%Enable generation of Builder tags in the output code. Without these you will have to manually divide the code into individual segments like Initialization, Main Code, NVEM0 etc.)XFrame1Scale@ 97g /Controls whether results are scaled in C or F%optDegCCx#optDegFF$ Text1# w Text1O chkPreviewPreview %Show the generated SPLat code.)Q Frame61Header comment (put your own header comment here)W!  txtHeaderCommentxg  This module communicates with a remote SX10500 thermocouple board over Xwire and makes the results available as floating point variables via subroutine calls. It is designed to work with Builder. ._Fixedsys cmdPackSavepg%uSave the current settings. The file name will reflect your selected name, with the extension .tp1, i.e.: SX10500a.tp1 txtShortNameX3oThis is the name prefix that will start every label in the generated code and form the file name when you save.) cmdUnpackUnpack'W GtxtCode W! Code preview  ._Fixedsys.Frame5Access methodsh8  lstGetTypex Jndexed (MultiTrack)Indexedseparate subroutines!0000;Select how you want to access the data for the two channelsTimer1 (X)Frame4 Filteringh8chkRunTimeFilterChange at runtimex %If checked, generates code to allow the filter values to be changed by your running SPLat program. The above values will be the defaults. lstFilter~ 0: None1: 1s2: 2s3: 5s4: 10s5: 30s6: 60s7: 5m8: 10m! 0123456780Set the filter time constant lstFilter< 0: None1: 1s2: 2s3: 5s4: 10s5: 30s6: 60s7: 5m8: 10m! 0123456780Set the filter time constant&Label1Label1 hg(Frame3Channels97g( opt1Channel1x& opt2Channel2-Frame2 Xwire address97gtxtXwireAddressxG 603Address of the Xwire board. Normally this will be a legal numerical Xwire address in the range 0-253. However, you may also use a symbolic address but no range checking can be done here.8P8&kd!H0 ~ lblWhatItDoes8SX10500 - Xwire driver for SX10500 thermocouple board - /,%| MS Sans Serif'Label4commandp&8 w$Label2Namexgs@E@PcA%OpTn@LVB5!"*~ *@~0t(@\)@@xSX10500SPLat templateSX10500P8H(3HHT HT HT ڴPN^Z#?EELkF9@hE3K&-_$RF"` W  78E1BDD1-9941-11cf-9756-00AA00C00908MSINET.OCXInetCtlsObjects.InetInetMA@`x@ A  A6@ A*\AC:\Documents and Settings\David\My Documents\VB6\VB6 Projects\aaSPLat\Object templates\SX10500\SX10500.vbpd(@A@v@pA@ A`-@`-@\B@d-@l-@h-@!l-@!hl2@#AL$lB@|B@@ DB@3@JB@@HC@d3@J(C@@L0C@ 3@J@C@ @ PB@ 4@JHC@@ TB@l4@JPC@@ XXC@ 4@JhC@ @\C@4@JC@@`D@p5@JD@@dD@5@JD@@hD@86@J(D@@lD@6@J0D@@p8D@7@KHD@@ tB@ `7@J\D@ @xC@ 7@JdD@ @|8D@ $8@KxD@ @8D@8@KD@@C@8@JD@@ B@\9@JD@@C@9@JD@@8D@ :@KD@@D@:@KD@@D@;@(KD@@C@0;@JD@@0C@;@JE@@C@ ;@JpC@ @ B@d<@J E@@C@<@JE@@C@=@J$E@@,E@p=@8K@HK`E@@ B@>@JlE@@C@>@JtE@?@?@?@@@@@@@*@@^@@x@@@@@@@@@@t?@?@?@?@?@?@?@?@7@@D@@Q@@k@@@@@@@@@@@@@@A@A@l-@,@@@@-@,@@@@-@,@@@@I@@-@,@@@@ .@,@@@@4.@,@@@@ A@\.@,@@@@@@.@,@@@@?@.@,@@@@?@.@,@@@@?@.@,@@@@?@$/@,@@@@<@@L/@,@@@@t/@,@@@@@@/@,@@@@/@@/@,@@@@@@/@,@@@@0@,@@@@<0@,@@@@d0@,@@@@l?@0@,@@@@y?@@@}@@0@,@@@@0@,@@@@1@,@@@@c@@,1@,@@@@T1@,@@@@|1@,@@@@1@,@@@@1@,@@@@?@1@,@@@@2@,@@@@?@D2@,@@@@l2@,@@@@@@@@l$8l$9l$@l$Al$Dl$Nl$ Ol$_Ol$cPl$g2Rl$kRl$8Sl$pl$}l$l${Ďl$o金l$K l$l$l$ӧl$l$驫l$|l$l$bl$饱l$Xl$kl$w鮼l$1l$[鴿l$W7, Aw@ Agq%HSfH^ pA@0B@  ,@F@q@(B@"A@E@E@F@ F@F@$F@0F@8F@@F@LF@TF@dF@pF@Form1SX10500SX105005FwCn[%φBL'YcOcA%OpT)DJޕf|N3f `ӓFrame2.=h8+3qC:\Program Files\Microsoft Visual Studio\VB98\VB6.OLBVBB@ B@B@"AN3f `ӓLabel1N3f `ӓcmdPackFrame3Frame59@hE3K&-Inet1Text1@zAB6ȪC:\WINDOWS\system32\MSINET.ocaInetCtlsObjectsxC@C@C@"AN3f `ӓtxtXwireAddressO3f `ӓopt1Channelopt2ChanneloptDegCoptDegFN3f `ӓchkRunTimeFilterFrame6txtHeaderCommentchkPreviewoptBuildertxtVersionInfofraPackingtxtCodechkDoUpdateChecks:O3f `ӓForm*O3f `ӓTimer1Label11cmdUnpackFrame4lblWhatItDoesLabel4O3f `ӓlstFilterLabel2O3f `ӓlstGetTypeFrame1txtShortName shell32.dllShellExecuteAE@E@"A"A thE@@ConditionalUpdateCheckSaveDataPackedDataCodeGeneratorEmitTabulateGetDataPackFileExistsUnPackUnPackheaderPackheaderEmitHeaderComment4<@N3f `ӓN3f `ӓ1.0N3f `ӓO3f `ӓ#=h8+3q"=h8+3qF@ G@yO3f `ӓEMIT *Emit*\.sptbwww.splatco.com/active_templates_version_info.txtGET.dat O3f `ӓ"*Clear*;<INITSEG> GoSub [NAM]_DO_Init ;This MUST be called before any other interface routines in the template;<CODESEG>;======== Thermocouple input from SX-10500 board ========== *** Auto-generated, do not edit *****`;Generated from Active Template: [SOURCE], [NOW]*;Short name: [NAM];f;Methods: (Do a GoSub to the label given to affect); ; [NAM]_DO_Init Initialise. Must be called during program initialisation; [NAM]_GET_fTemp (I) Get the temperature value of channel number in I, to W; (returns a negative value if there is a thermocouple faulty, e.g. open circuit); [NAM]_LET_bFilter (I) Set the filter time constant, index in X|; *NOTE* There are no range checks on the value of I; [NAM]_GET_fTemp (J) Get the temperature value of channel number in J, to W (MultiTrack mode); [NAM]_LET_bFilter Set the filter time constant, index in X; [NAM]_LET_bFilter (J) Set the filter time constant, index in X, of channel number in J (MultiTrack mode); [NAM]_GET_fTemp Get the temperature value to W (Single channel mode)6; 3 - 5 seconds; [NAM]_GET_fTemp0 Get the temperature value of channel number 0, to W; [NAM]_GET_fTemp1 Get the temperature value of channel number 1, to W; [NAM]_LET_bFilter0 Set the filter time constant, index in X, for channel 0; [NAM]_LET_bFilter1 Set the filter time constant, index in X, for channel 1^; Filter time constant index values are:<; 0 - No filtering4; 1 - 1 second6; 2 - 2 seconds8; 4 - 10 seconds8; 5 - 30 seconds4; 6 - 1 minute6; 7 - 5 minutes8; 8 - 10 minutes ;Resource usage:6; [RAMBYTES] bytes of RAM(;-----Initialization<; Alters the register stack.>; Assume W and Q are altered.;-----RAM definitions *** Do not read or write directly to this memory!! ***Hf[NAM]_Rx_[RND]: defFLOAT [CCOUNT]Fb[NAM]_Tx_[RND]: defByte [CCOUNT][NAM]_DO_Init:;<XWIREINIT> XwireMaster XwireTab ;The b1d file should have this XWIREINIT segment listed as ONCEINLINER;<CODESEG> ItoX ;Save I" LoadI 0N IasJ:SetMem b[NAM]_Tx_[RND],[FILT0]" LoadI 1N IasJ:SetMem b[NAM]_Tx_[RND],[FILT1]D XtoI ;Restore IX;<CODESEG> SetMem b[NAM]_Tx_[RND],[FILT0](;<CODESEG> Return:;------Property GET method(s) [NAM]_GET_fTemp:@ fRecallW f[NAM]_Rx_[RND]@ NoJ:fRecallW f[NAM]_Rx_[RND]P IasJ:fRecallW f[NAM]_Rx_[RND]"[NAM]_GET_fTemp0:6 ItoX ;Save I> GoTo [NAM]_GfT_[RND]"[NAM]_GET_fTemp1: ItoX [NAM]_GfT_[RND]:=< XtoI ;Restore IP fGoIfNeg [NAM]_Ret_[RND] ;Fault& fLoadQ 1.8 fMul$ fLoadQ 32 fADD [NAM]_Ret_[RND]: Return:;----- Property LET method(s)$[NAM]_LET_bFilter:> Store b[NAM]_Tx_[RND]> NoJ:Store b[NAM]_Tx_[RND]> iStore b[NAM]_Tx_[RND]&[NAM]_LET_bFilter0:> GoTo [NAM]_LbF_[RND]&[NAM]_LET_bFilter1: [NAM]_LbF_[RND]:@ ;<NVEM0DIR> NVEM0 ;The b1d file should have this NVEM0DIR segment listed as ONEONLY;<XWIREMTAB>XWireTab: ;The b1d file should have this XWIREMTAB segment listed as ONEONLYjThe Xwire address is outside the legal range of 0-253;<;<XWIREMDATA> NV0Byte [XWADDR],b[NAM]_Tx_[RND],[TXCOUNT],f[NAM]_Rx_[RND],[RXCOUNT];<XWIREMEND> NV0Byte 255 ;The b1d file should have this XWIREMEND segment listed as ONEONLY0Unable to generate code!*\\ N3f `ӓX(or is not a properly formed symbolic label)[]6Missing or misplace "]" in NOW SOURCE FILT0 FILT1RNDRAMBYTES105 CCOUNT21NAM XWADDRTXCOUNTRXCOUNT84>jThe template will now be save with a different name, Be aware that if the template is referred to in a Build (*.b1d) file, the name must Vmatch the name you are about to save under.>Click OK to proceed, or Cancel.4Creating new template name.tp1A template with that name already exists. Do you want to overwrite it?&Duplicate file name.exe6No EXE file to build from! fĤIx8< D'Oh!/P(. The latest one is zYour settings have changed. Do you want to save your changes?Save changesruntp1.lckN3f `ӓ:AZ09az\q\n<bThere is a new version of this template available"You have version PDo you want to download the new version?If you click Yes you will be taken to the Active Templates download page online Rwhere you can download the latest version__vbaLateIdCallLdYou can stop automatic update checks via the "Update checks" button at the top of0the main template screen Update availableZwww.splatco.com/active_templates_support1.htm>There are no updates at presentWould like to go to the updates page anyhow and see if there is anything else there of interest, like other Active Templates you can use?No updates VBA6.DLL__vbaSetSystemError__vbaStrToAnsi__vbaLenVar__vbaMidStmtBstr__vbaLsetFixstr__vbaVarTstLe__vbaPutFxStr3__vbaStrFixstr__vbaLsetFixstrFree__vbaVarDup__vbaVarTstNe__vbaGenerateBoundsError__vbaExitProc__vbaI2Var__vbaBoolVar__vbaInputFile__vbaOnError__vbaAryDestruct__vbaI4Var__vbaLenBstr__vbaVarTstGe__vbaUbound__vbaVarCmpEq__vbaVarOr__vbaAryConstruct2__vbaErrorOverflow__vbaVarTstEq__vbaVarMove__vbaInStr__vbaI2I4__vbaStrCmp__vbaStrI2__vbaVarCat__vbaStrVarMove__vbaLateIdCall__vbaEnd__vbaFileClose__vbaPrintFile__vbaFileOpen__vbaFreeVarList__vbaInStrVar__vbaBoolVarNull__vbaNew2F@"A__vbaFreeObjList__vbaFreeStrList__vbaStrCat__vbaStrMove__vbaHresultCheckObj__vbaStrCopy__vbaFreeVar__vbaFreeStr__vbaStrVarVal__vbaFreeObj__vbaObjSetHx@Px@v@Px@Hx@Hx@\x@Tx@\x@`t@  `t@0`t@0#`t@%`t@0!`t@0)`t@ `t@`t@0`t@0#`t@  `t@0`t@,@ w@Hu@t@t@hv@t@ v@u@u@v@v@$u@Dv@lu@u@u@u@A@t@B@B@"AB@C@"AB@0C@"AC@XC@"AB@C@"AB@D@"AB@8D@#AB@D@#AB@D@#A,E@ #AB@PE@#AFylNamesFileNamHU h6@dPd%SVWeE@uƃEVuQ3V]]PEPh@URW;}hhF@WPH@3f9]MfF8@f9^8tV;}hh|B@VPH@]hEy@ M@ËEPREM_^d []U h6@dPd%xSVWeE@uƃEVuQ3VEEE܉E؉EԉEЉẺEEEh@PEPӍMQ}@?UERP@ϋ}PW}hhF@WPH@M@M@M@N4F@D@VlPEPӋVElUPRӋMQWPP}jPhF@WPH@EUN4P:Q<@ЍM@׋}PWRT}jThF@WPH@E܍MPQjH@U̍ERPj0@VPUPRӋMQjWP@}j@hF@WPH@EjP}hhF@WPH@E̍MPQj0@ VPPEPӋURjWQ@}j@hF@WPH@EjP}hhF@WPH@U̍ERPj0@ V@UPRӋjW}hhF@WPH@M@VPUPRӋMQjWP@}j@hF@WPH@EjP}hhF@WPH@E̍MPQj0@ V@PEPӋjW}hhF@W=H@P=H@M@V0PEPӉE"Auh"AhG@(@"AURS Q} jh G@SP׋EЍURPQX} jXh,G@SP׋]MQS}hhF@SP׍M@U̍ERPj0@ V}hh|B@VPס"Auh"AhG@(@"AEPSR} jh G@SP׋EЍURPQX} jXh,G@SP׋MQVPT} jThLB@VP׍M@M@UR@EjMPQUjRE@G@E@P@f؍EMPQj @ fZV}hh|B@VP׺PG@MD@MQV}hh|B@VP׍UERE ,@ME@"Auh"AhG@(@"AMQSP} jh G@SP׋EЍMQPRX} jXh,G@SP׋V@<@RhdG@Ӌ=@ЍMPEPӋЍMPhlG@ӋЍM׋}PWjj$@MԍUQERMPQjH@M@URWh|G@@ W@$@=H@V}hh|B@VPEh3@UR@PV}hhF@VPH@MӋEP@uURV}hh|B@VPH@U̍N<D@M@`@h@@EPMQUREPMQjH@UREPj0@MQURj @0ÍM@ËEPQEMd _^[]U h6@dPd%@SVWeE@uƃEVuQ3V]]]]܉]؉]ԉ] PEPh@URW;}hhF@W=H@P=H@3f9]MfE@f9]ċV$UPRh@؍MQS}hhe@SP׋EPV}hhLB@VP׋URV}hhLB@VP׋V$MPQh@؍EPSRx} jxhe@SPEE܋QEe I$V8UPRh@؍MQS}hhF@SP׋EPV}hhLB@VP׋URV}hhLB@VP׋V8MPQh@؍EPSRp} jphF@SPEE܋QEe ut$V}hhLB@VP׍UERPj0@ Eh@MUQRj0@ ËEPQEM_^d []mCU h6@dPd% SVWeE@uƃEVuQV}hh|B@VPH@EEPQEM_^d []U h6@dPd%(SVWeE@uƃEVuQ3V]]]]0PEPh@URW;}hhF@WPH@UM]@M܍UQRV;}hh|B@VPH@M@M@]hY@EMPQjH@ M@ËEPREM_^d []Uh6@dPd%pASVWeE@EEEURQEEE XDžP@PQUR@="Auh"AhG@(@Dž"A Dž"AURRQ≅}#jh G@PQH@ DžUEPPRX≅ }#jXh,G@Q RH@ DžEEMEURpP@MQpR\@fM@pPMQURj @%EDžhDž` DžxDžp DžXXi@DžPPMh@hg@M R<@ЍM@PhH@<@ЍM@Phh@<@ЍM@Phh@<@ЍM@PhH@<@ЍM@PhH@<@ЍM@Phi@<@EE`PpQURjEPl@MQUREPMQUREPjH@`QpREPMQj @tEE Qhi@<@ЍM@REPMEP}#hh|B@MQRH@ DžffM@EDžhDž` DžxDžp DžH8j@Dž@@Mh@DžXi@DžPPMh@`RpPMQjURl@`PpQUREPj @tE fE4EfE EEE UR,@fEčM@Ejp@E="Auh"AhG@(@Dž"A Dž"AURRQ≅}#jh G@PQH@ DžUEPPRP≅ }#jPh,G@Q RH@ Dž="Auh"AhG@(@Dž"A Dž"AURRQ≅}#jh G@PQH@ DžUEPPRX≅}#jXh,G@QRH@ DžEPhdG@<@ЍM@PMQ<@ЍM@Phdj@<@ЍM@PfURjj$@EPMQUREPMQjH@UREPj0@ ET@EE MQ@fM@4ET@PEPh@MQQP,≅}#j,hj@RPH@ DžDžhDž` DžxDžp DžXj@DžPPMh@htj@MQ<@EE`RpPMQjURl@M@M@`PpQUREPj @E$@EfMQ@Ejp@EU PMEP}#hh|B@MQRH@ DžEEURPEPh@jP≅}&hhe@QRH@ DžM@EEE EP,@fEčM@E="Auh"AhG@(@Dž"A Dž"AEPPR≅}#jh G@QRH@ DžEMQQPP≅ }#jPh,G@R PH@ DžMQhdG@<@ЍM@PU P<@ЍM@PhG@<@ЍM@PfMQjh $@UREPMQURjH@M@EfEP4@ȅuzE fURjEP,@MQ@PURj@M@E!EPMQj@ЍM@P<@ЍM@M@mE#UЉXDžP@PPMQ@UR@ЍM@M@E$fEP@E%MQ@DžXj@DžPjURPPjMQ@P@fE؍UREPj @ E&M؅tzE'UR@EE EPfMfwREPpQ@pR@ЍM@pPMQURj @$E)EH@QhdG@<@ЍM@E+URE Q<@ЍM@Phi@<@ЍM@PfURjh $@EPMQjH@ E,UR@@fEE-fEffDžfEfMfZfMfUf;E.EEEЉXDžP@MQURPPMQ@UR@PEPj@MQURj @ E/fEPMQj@E0JE1jUR@EP@PMQj@M@E2fUREPj@E3EE MQ,@fE܍M@E4="Auh"AhG@(@Dž"A Dž"AMQQP≅}#jh G@RPH@ DžMURRQP≅ }#jPh,G@P QH@ Dž="Auh"AhG@(@Dž|"A Dž|"A|MQQP≅}#jh G@RPH@x DžxMURRQX≅}#jXh,G@PQH@t DžtURhdG@<@ЍM@PEP<@ЍM@Phdj@<@ЍM@PfMQjh $@UREPMQUREPjH@MQURj0@ E5fEP4@ȅu_E6fURjEP,@MQ@PURj@M@E7fEPMQj@E8|@E:fUR@E;fEP@E<fEE=MEPPMQh@jQ≅}&hhe@RPH@p DžpM@h@XMQUREPMQUREPjH@MQURj0@ `PpQUREPj @ÍM@M@ËMEPRMfUfEMd _^[]  @U h6@dPd%SVWeE@uƃEVuQ3V]]0PEPh@URW;}hhF@WPH@MQV;}hh|B@VPH@M@M@]h&@M@M@ËEPREM_^d []Uh6@dPd%<,SVWeE@EEEURQEEEE EP,@fE܍M@Ejp@EM Rjjj$@EfEEfEP@.E jp@E fEE fMQ@`@h\@ M@ËUMQPUfEfEMd _^[] U h6@dPd%SVWeE`@uƃEVuQE3PV]]]܉]̉]]]]|X;}hh|B@VPH@N