Nicolet FTIR Support via OMNIC

Notes on this video:

• Supplementing its unmatched compatibility with various grating spectrophotometers, FilmStar MEASURE (Scantraq for chemists) controls and acquires data from rapid-scan spectrometers including Nicolet FTIR.

• OMNIC is required. MEASURE uses it as a server.

• The curves in the video are built-in OMNIC test simulations.

• Other videos of interest: One Program - Many Instruments, Ocean Optics

• For further information contact FTG Software for an online demonstration at your convenience.

Technical information for FilmStar/Scantraq users

BASIC macros transfer data from Omnic (server) to FilmStar MEASURE/Scantraq (client). As indicated above the macros are assigned to the Scan button.

Support files:

OmnicMeas.zip Extract to c:\Winfilm\Measure (c:\Scantraq\Data)
OmnicBas32.zip Extract to c:\Winfilm\Basic32 (c:\Scantraq\Basic32)

As can be seen in the BASIC code, much use is made of Omnic's ExecuteCommand function:

' Omnic Reference (background) scan
Option Explicit
Dim OmApp As OmnicComLib.OmnicApp
Const qe$ = Chr$(34)
Sub Main
    Const fData$ = "C:\Winfilm\Measure\OmnicTemp.spc"
    'Const fData$ = "C:\Scantraq\Data\OmnicTemp.spc"
    Const fParam$ = "C:\Winfilm\Measure\SingleBeam.exp"
    'Const fParam$ = "C:\Scantraq\Data\SingleBeam.exp"
    Set OmApp = New OmnicComLib.OmnicApp
    AxesDraw  ' clear graph axes
    StatusLabel "Omnic scanning - please wait": Busy True
    With OmApp
        .ExecuteCommand "RestoreWindow"
        .ExecuteCommand "ShowToolbar Off"
        .ExecuteCommand "LoadParameters " & qe$ & fParam$ & qe$
        .ExecuteCommand "Invoke CollectBackground Auto"
        .ExecuteCommand "Export " & qe$ & fData$ & qe$
        .ExecuteCommand "Clear"
        .ExecuteCommand "MinimizeWindow"
    End With
    StatusLabel "": FileOpen fData$, 1: Replot: Busy False
End Sub