First Release 1.0.0.93 - 1.0.93
This commit is contained in:
parent
9d71ff4e34
commit
fb37976482
Binary file not shown.
Binary file not shown.
|
@ -0,0 +1,87 @@
|
||||||
|
//
|
||||||
|
// Modified by Dan Near LtDanNear for use with FreeLog
|
||||||
|
//
|
||||||
|
// Added extra logging routines for commands I use
|
||||||
|
//
|
||||||
|
// 25h=0210=VTP&PSP, 26h=0211=VTS,ACS,ATP,Brake, 27h=021B=TPSTipIn, 28h=0220=ACC&PCS,
|
||||||
|
// 29h=0221=VTS?, 2Ah=0222=ATLockupSol, 2Bh=024F=Gear=Maybe RPM*VSS div 65535?
|
||||||
|
// 2Ch=03C2=Unused Analog Input?, 2Dh=03C5=IACV, 2Eh=ELD, 2Fh=Extra Input(0066) memory location
|
||||||
|
//
|
||||||
|
// Hi. Thanks for your interest in my 'Quick Datalogger +RTP' code.
|
||||||
|
// Feel free to look around and give me any comments.
|
||||||
|
// This is a highly optimized Datalog and RTP code used to improve
|
||||||
|
// the performance of ECU to PC communication. The datalog code
|
||||||
|
// used is an improvement upon Doc's original datalog code. It removes
|
||||||
|
// redundant or unnecessary lines of code, saving space and CPU cycles.
|
||||||
|
// The datalog code is also optimized.
|
||||||
|
// Probably the most important feature of this RTP/Datalog code is it's
|
||||||
|
// overall size. It is actually smaller than the original Honda serial_rx
|
||||||
|
// code so it fits comfortably in the same spot. The advantage of this
|
||||||
|
// is that converting to RTP/Datalog will not take up any extra bytes that
|
||||||
|
// can be used for other features instead (like dual maps). And since
|
||||||
|
// it doesn't compete for space with all other feature codes out there,
|
||||||
|
// it is compatible for use with almost every feature tool.
|
||||||
|
//
|
||||||
|
// Well.. that's just me rambling. Go on, try it out already.
|
||||||
|
//
|
||||||
|
// -John Cui, (CROME Lead Developer)
|
||||||
|
//
|
||||||
|
function __addFreeLogDLRTP () {
|
||||||
|
if (rom.base != rtP30) {
|
||||||
|
alert('This rom is not supported by this plugin.');
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
// Start Group Undo Point
|
||||||
|
rom.gup();
|
||||||
|
// */
|
||||||
|
// Add Dan's DL-RTP+
|
||||||
|
//
|
||||||
|
rom.byteAt(0x2565) = 0xF8;
|
||||||
|
rom.byteAt(0x38D5) = 0xF8;
|
||||||
|
|
||||||
|
rom.wordAt(0x000A) = 0x01FD;
|
||||||
|
_rom_write(0x01FD,
|
||||||
|
new Array(0xE5,0xF4,0xD5,0x1A,0xB5,0x04,0x98,0x02,
|
||||||
|
0x01,0x57,0x6F,0x00,0xF9,0xF5,0x55,0x23,
|
||||||
|
0xC0,0x00,0xCE,0x48,0xC6,0x07,0xC9,0x33,
|
||||||
|
0xC6,0x08,0xC9,0x34,0xC6,0xAB,0xC9,0x33,
|
||||||
|
0x8A,0xC6,0x30,0xC8,0x32,0xA6,0x10,0xCD,
|
||||||
|
0x03,0xAB,0xCB,0x17,0xE5,0x06,0x95,0x53,
|
||||||
|
0x62,0x97,0x02,0x92,0x81,0x92,0xA8,0x52,
|
||||||
|
0xB2,0x4A,0xF2,0x92,0x15,0x44,0x15,0x45,
|
||||||
|
0x15,0xD5,0x51,0xE5,0xF2,0xA2,0xD0,0xFE,
|
||||||
|
0xD5,0x1A,0x02,0x92,0xAA,0x72,0xCB,0xF1,
|
||||||
|
0x7D,0xCB,0xE8,0x77,0xCD,0xCB,0xE4,0x67,
|
||||||
|
0x55,0x00,0xCB,0xDF,0x23,0xC0,0x01,0xCE,
|
||||||
|
0x04,0x89,0xAB,0xCB,0xDE,0x23,0xC0,0x02,
|
||||||
|
0xCE,0x10,0x88,0x44,0x7A,0x22,0xC0,0x01,
|
||||||
|
0xC9,0x1A,0x22,0xC0,0x03,0xC9,0x1F,0xAB,
|
||||||
|
0xCB,0xC9,0x23,0xC0,0x03,0xCE,0xD8,0x22,
|
||||||
|
0xC0,0x02,0xC9,0x07,0x22,0xC0,0x04,0xC9,
|
||||||
|
0x06,0xCB,0xCC,0xD2,0xF2,0xCB,0xAC,0x92,
|
||||||
|
0x80,0x00,0x80,0xD2,0x44,0x7A,0x92,0xAA,
|
||||||
|
0xCB,0xA1,0xC8,0x03,0xC0,0x03,0xBE,0x03,
|
||||||
|
0xC1,0x03,0xA3,0x00,0x92,0x03,0xAC,0x00,
|
||||||
|
0xAD,0x00,0x1F,0x01,0xD8,0x01,0xD9,0x01,
|
||||||
|
0xD2,0x01,0x12,0x01,0x13,0x01,0x14,0x01,
|
||||||
|
0x15,0x01,0xB4,0x00,0xD4,0x03,0xD5,0x03,
|
||||||
|
0x44,0x02,0x43,0x02,0x3A,0x01,0x3C,0x43,
|
||||||
|
0x52,0x4F,0x4D,0x45,0x3E),
|
||||||
|
0xCD);
|
||||||
|
_rom_write(0x02C1,
|
||||||
|
new Array(0x10,0x02,0x11,0x02,0x1B,0x02,0x20,0x02,
|
||||||
|
0x21,0x02,0x22,0x02,0x4F,0x02,0xC2,0x03,
|
||||||
|
0xC5,0x03,0x66,0x00),
|
||||||
|
0x14);
|
||||||
|
_rom_fill(0x02D6, 0x02DC, 0xFF);
|
||||||
|
// */
|
||||||
|
// End Group Undo Point
|
||||||
|
rom.gup();
|
||||||
|
alert('FreeLog DL+RTP Added!');
|
||||||
|
}
|
||||||
|
|
||||||
|
function __aboutFDLRTP() {
|
||||||
|
alert("FreeLog DL+RTP version 1.0\nby Dan Near");
|
||||||
|
}
|
||||||
|
|
||||||
|
addPlugin('Dan Near', 'FreeLog DL+RTP', '__addFreeLogDLRTP(1)', '__aboutFDLRTP()', 1);
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
@ -0,0 +1,46 @@
|
||||||
|
@ECHO OFF
|
||||||
|
|
||||||
|
ECHO Freelog Support File Installation
|
||||||
|
ECHO pgmfi.org
|
||||||
|
|
||||||
|
ECHO.
|
||||||
|
ECHO Removing FreeLog entry from the registry
|
||||||
|
REGEDIT /s clear_registry.reg
|
||||||
|
ECHO done...
|
||||||
|
|
||||||
|
ECHO.
|
||||||
|
ECHO Copying important dlls / ocx
|
||||||
|
Copy /-Y mscomm32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y comdlg32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y flexwiz32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y mscomctl32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y msdatgrd32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y msflxgrd32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y msscript32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y tabctl32.ocx c:\windows\system32\
|
||||||
|
Copy /-Y msstdfmt.dll c:\windows\system32\
|
||||||
|
Copy /-Y msvcrt.dll c:\windows\system32\
|
||||||
|
Copy /-Y scrrun.dll c:\windows\system32\
|
||||||
|
Copy /-Y vb6stkit.dll c:\windows\system32\
|
||||||
|
ECHO done...
|
||||||
|
|
||||||
|
ECHO.
|
||||||
|
ECHO Registrying dlls/ocx
|
||||||
|
regsvr32 /s c:\windows\system32\mscomm32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\comdlg32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\flexwiz32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\mscomctl32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\msdatgrd32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\msflxgrd32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\msscript32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\tabctl32.ocx
|
||||||
|
regsvr32 /s c:\windows\system32\msstdfmt.dll
|
||||||
|
regsvr32 /s c:\windows\system32\msvcrt.dll
|
||||||
|
regsvr32 /s c:\windows\system32\scrrun.dll
|
||||||
|
regsvr32 /s c:\windows\system32\vb6stkit.dll
|
||||||
|
ECHO done..
|
||||||
|
|
||||||
|
ECHO.
|
||||||
|
ECHO Try running Freelog now and report any bugs to the forum (pgmfi.org)
|
||||||
|
ECHO Goodluck !!
|
||||||
|
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
@ -0,0 +1,81 @@
|
||||||
|
[Bootstrap]
|
||||||
|
SetupTitle=Install
|
||||||
|
SetupText=Copying Files, please stand by.
|
||||||
|
CabFile=Datalogger.CAB
|
||||||
|
Spawn=Setup1.exe
|
||||||
|
Uninstal=st6unst.exe
|
||||||
|
TmpDir=msftqws.pdw
|
||||||
|
Cabs=1
|
||||||
|
|
||||||
|
[Bootstrap Files]
|
||||||
|
File1=@VB6STKIT.DLL,$(WinSysPathSysFile),,,3/26/99 1:00:00 AM,101888,6.0.84.50
|
||||||
|
|
||||||
|
[IconGroups]
|
||||||
|
Group0=FreeLog
|
||||||
|
PrivateGroup0=True
|
||||||
|
Parent0=$(Programs)
|
||||||
|
|
||||||
|
[FreeLog]
|
||||||
|
Icon1="Datalogger.exe"
|
||||||
|
Title1=FreeLog
|
||||||
|
StartIn1=$(AppPath)
|
||||||
|
|
||||||
|
[Setup]
|
||||||
|
Title=FreeLog 1.0.93 Beta
|
||||||
|
DefaultDir=$(ProgramFiles)\FreeLog Beta
|
||||||
|
AppExe=Datalogger.exe
|
||||||
|
AppToUninstall=Datalogger.exe
|
||||||
|
|
||||||
|
[Setup1 Files]
|
||||||
|
File1=@GridColors.Dat,$(AppPath),,$(Shared),10/31/05 11:37:21 PM,7456,0.0.0.0
|
||||||
|
File2=@FreeLogDLRTP.js,$(AppPath),,$(Shared),10/30/05 1:40:58 PM,3967,0.0.0.0
|
||||||
|
File3=@datalog.mod,$(AppPath),,$(Shared),3/11/07 10:03:05 PM,3486,0.0.0.0
|
||||||
|
File4=@MSSTDFMT.DLL,$(WinSysPath),$(DLLSelfRegister),$(Shared),2/23/04 12:00:00 AM,119808,6.1.97.82
|
||||||
|
File5=@MSDATGRD.OCX,$(WinSysPath),$(DLLSelfRegister),$(Shared),5/7/99 12:00:00 AM,262152,6.0.84.18
|
||||||
|
File6=@tabctl32.ocx,$(WinSysPath),$(DLLSelfRegister),$(Shared),12/6/00 1:02:36 PM,209608,6.0.90.43
|
||||||
|
File7=@msflxgrd.ocx,$(WinSysPath),$(DLLSelfRegister),$(Shared),5/22/00 4:58:12 PM,244416,6.0.84.18
|
||||||
|
File8=@MSCOMCTL.OCX,$(WinSysPath),$(DLLSelfRegister),$(Shared),3/9/04 5:45:46 AM,1081616,6.1.97.82
|
||||||
|
File9=@FLEXWIZ.OCX,$(WinSysPath),$(DLLSelfRegister),$(Shared),6/24/98 12:00:00 AM,226328,6.0.0.8169
|
||||||
|
File10=@Mscomm32.ocx,$(WinSysPath),$(DLLSelfRegister),$(Shared),6/30/99 11:04:32 AM,103744,6.0.81.69
|
||||||
|
File11=@COMDLG32.OCX,$(WinSysPath),$(DLLSelfRegister),$(Shared),11/22/06 10:10:52 PM,152848,6.1.97.82
|
||||||
|
File12=@msscript.ocx,$(WinSysPath),$(DLLSelfRegister),$(Shared),4/13/08 8:10:20 PM,110592,1.0.0.16599
|
||||||
|
File13=@Datalogger.exe,$(AppPath),,,8/28/08 10:18:30 PM,1286144,1.0.0.93
|
||||||
|
|
||||||
|
; The following lines may be deleted in order to obtain extra
|
||||||
|
; space for customizing this file on a full installation diskette.
|
||||||
|
;
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
||||||
|
; XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
|
Binary file not shown.
|
@ -0,0 +1,3 @@
|
||||||
|
REGEDIT4
|
||||||
|
|
||||||
|
[-HKEY_CURRENT_USER\Software\VB and VBA Program Settings\Open Source Datalogger]
|
|
@ -0,0 +1,4 @@
|
||||||
|
Run Install.bat or copy all files to c:\windows\system32\
|
||||||
|
|
||||||
|
Daniel Near
|
||||||
|
pgmfi.org
|
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
@ -0,0 +1,171 @@
|
||||||
|
'FreeLog 1.0
|
||||||
|
'VBScript Engine
|
||||||
|
'Note: Below are important functions of datalogger that you can customize.
|
||||||
|
' DO NOT CHANGE THE NAME OF FUNCTIONS OR THE NUMBER OF ARGUMENT
|
||||||
|
' DO NOT CHANGE THE NAME OF FUNCTIONS OR THE NUMBER OF ARGUMENT
|
||||||
|
'
|
||||||
|
' Start at the bottom of the page for custom functions
|
||||||
|
|
||||||
|
Sub CalcFuelTbl(rxlcr, rxhcr, rxcol)
|
||||||
|
Call setFT(rxlcr, rxhcr, rxcol)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Function CalcBaro(rxbaro)
|
||||||
|
CalcBaro=round( ( (rxbaro/51) * -11.49) - 33.6 ,1)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcEct(rxect)
|
||||||
|
CalcEct = MakeTemp(rxect)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function Calciat(rxiat)
|
||||||
|
CalcIat = MakeTemp(rxiat)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function MakeTemp(Index)
|
||||||
|
V = index / 51
|
||||||
|
R6 = 0.1423 * V ^ 6
|
||||||
|
R5 = 2.4938 * V ^ 5
|
||||||
|
R4 = 17.837 * V ^ 4
|
||||||
|
R3 = 68.698 * V ^ 3
|
||||||
|
R2 = 154.69 * V ^ 2
|
||||||
|
R1 = 232.75 * V
|
||||||
|
MakeTemp = Round( (R6 - R5 + R4 - R3 + R2 - R1 + 284.24) , 0)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcMap(rxmap)
|
||||||
|
CalcMap=round( ( (rxmap/51) * -11.49) - 33.6 ,1)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra1(rxextra1)
|
||||||
|
CalcExtra1=rxextra1+5
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra2(rxextra2)
|
||||||
|
CalcExtra2=rxextra * 2
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra3(rxextra3)
|
||||||
|
CalcExtra3=rxextra *3
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra4(rxextra4)
|
||||||
|
CalcExtra4=4
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra5(rxextra5)
|
||||||
|
CalcExtra5=round(rxextra5/5,1)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra6(rxextra6)
|
||||||
|
CalcExtra6=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra7(rxextra7)
|
||||||
|
CalcExtra7=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra8(rxextra8)
|
||||||
|
CalcExtra8=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra9(rxextra9)
|
||||||
|
CalcExtra9=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra10(rxextra10)
|
||||||
|
CalcExtra10=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra11(rxextra11)
|
||||||
|
CalcExtra11=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra12(rxextra12)
|
||||||
|
CalcExtra12=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra13(rxextra13)
|
||||||
|
CalcExtra13=0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra14(rxextra14)
|
||||||
|
CalcExtra14 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra15(rxextra15)
|
||||||
|
CalcExtra15 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra16(rxextra16)
|
||||||
|
CalcExtra16 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra17(rxextra17)
|
||||||
|
CalcExtra17 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra18(rxextra18)
|
||||||
|
CalcExtra18 = 0
|
||||||
|
End Function
|
||||||
|
Function CalcExtra19(rxextra18)
|
||||||
|
CalcExtra19 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra20(rxextra18)
|
||||||
|
CalcExtra20 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra21(rxextra18)
|
||||||
|
CalcExtra21 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra22(rxextra18)
|
||||||
|
CalcExtra22 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra23(rxextra18)
|
||||||
|
CalcExtra23 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra24(rxextra18)
|
||||||
|
CalcExtra24 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcExtra25(rxextra18)
|
||||||
|
CalcExtra25 = 0
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
Function CalcO2( rxo2 )
|
||||||
|
CalcO2=round( ( 2 * rxo2 ) + 10 , 1 )
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcTps( rxtps )
|
||||||
|
CalcTps=( 0.4716 * rxtps ) - 11.3184
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcSpd(rxspd)
|
||||||
|
CalcSpeed=round(rxspd*.6213,0)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcRpm(rpmhi, rpmlo)
|
||||||
|
temp=(rpmhi*256)+rpmlo
|
||||||
|
if temp=0 then
|
||||||
|
calcrpm=0
|
||||||
|
else
|
||||||
|
CalcRpm=round(1875000/temp,0)
|
||||||
|
end if
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function CalcVtec(rxvtec)
|
||||||
|
if rxvtec=2 or rxvtec=6 then
|
||||||
|
CalcVtec=1
|
||||||
|
else
|
||||||
|
CalcVtec=0
|
||||||
|
End If
|
||||||
|
End Function
|
||||||
|
|
||||||
|
'****************************************************************************
|
||||||
|
'CUSTOM FUNCTIONS AND VARIABLES START HERE
|
||||||
|
'****************************************************************************
|
Loading…
Reference in New Issue