
Dim major As Integer
Dim minor As Integer
Dim build As Integer
Dim machpath as string

machpath = getmainfolder()


wizardpath=machpath & "addons\probeit\"


If (GetMachVersion(Major, Minor, Build) <> true) Then
MsgBox("Unable to get Mach3 Version info, ProbeIt is likely incompatible with this version of Mach3!")
Else

'MsgBox("Mach3 version = " & Major & "." & Minor & "." & Build )
If Major < 3 then
msgbox("ProbeIt is likely incompatible with this version of Mach3!")
end if
If Minor < 43 then
msgbox("ProbeIt is likely incompatible with this version of Mach3!")
end if
If Build < 19 then
msgbox("ProbeIt is likely incompatible with this version of Mach3!")
end if

End If


Ver = "version 1.1.4"
'#expand "c:\mach3\addons\probeit\PIversion.m1s"

call runscript("addons\probeit\liccheck")
call runscript("addons\probeit\licstatus")
SetUserLED(1874,0) 'default auto Z updown to off
SetUserLED(1878,0) 'default auto Z updown to off
message "Welcome to Probe-It!" & ver



