Code:
'HEAD UNIT EEPROM ALLOCATIONS FOR MENU AND GENERAL CONDITIONING OF ALL OUTPUT !!!
'ALL USE WORDS as far simpler for lookup conversion !
'NB *************** CHANGE CHANNEL ORDER IN MAIN AND HEAD SO V1 = VCC - NOT !! V4
'CONFIRM HERE WHEN COMPLETED - NOT YET 20 08 2011 -
'EDATA index pointers !
'eChannel_Active_Flag EData As Word 255 'all channels active - could be byte, but allow for more than 8 channels !
eSCR EData As Word 0 '0 = on full, 1 = V only, 2 = Temps only, 3 = off (Manual step) - active channels
'Voltage Channel High Alarm Limit 0 = off
eHAL EData As Word 65535, 600, 051 'actual value off, high limit max 30.0 low limit min 5.1 (V1)
EData As Word 65535, 600, 051 'actual value off, high limit max 60.0 low limit min 5.1 (V2)
EData As Word 65535, 600, 051 'actual value off, high limit max 60.0 low limit min 5.1 (V3)
EData As Word 65535, 320, 051 'actual value off, high limit max 60.0 low limit min 5.1 (V4 VCC !!!)
EData As Word 65535, 490, 005 'actual value off, high limit min 00.5, low limit max 4.90 (V5 LV 5V)
'Voltage Channel Low Alarm Limit 0 = off
eLAL EData As Word 65535, 600, 051 'actual value off, high limit max 30.0 low limit min 30.0
EData As Word 65535, 600, 051 'actual value off, high limit max 60.0 low limit min 5.1
EData As Word 65535, 600, 051 'actual value off, high limit max 60.0 low limit min 5.1
EData As Word 65535, 320, 051 'actual value off, high limit max 60.0 low limit min 5.1
EData As Word 65535, 490, 005 'actual value off, high limit max 4.90 low limit min 00.5
'Temeperature Channel High Limit >99.9 = off as we use 0 to read 0 C ! NOTE !
eTAL EData As Word 65535, 099, 000 'actual value 85, high limit max 99 , low limit min 0
EData As Word 65535, 099, 000 'actual value 85, high limit max 99 , low limit min 0
EData As Word 65535, 099, 000 'actual value 85, high limit max 99 , low limit min 0
eDIS EData As Word 255'143'15
eTCF EData As Word 0 '0 = degrees C , 1 = Degrees F Convertion needed
eBLC EData As Word 1 '0 = Auto, 1 = Grn, 2 = Red, 3 = Blu, 4 = Off
eBLT EData As Word 20 'in seconds
eLED EData As Word 10 'in seconds Button Backlight Time !
eALA EData As Word 0 '0 OFF - 1 ON
;testing of new relay only !!
eRRS EData As Word 1 ;relay reset after max time exceded -flag -
eRES EData As Word 0 ;relay state /status?
eREL EData As Word 256't3 'v5 '256 ' t3 'v1 'bit set points to channel !!! bit 0 = 1 = OFF ,bit 1 = 1 = chann 1 etc
eRON EData As Word 4 ;trigger on value
eROF EData As Word 5 ;trigger off value
eRTO EData As Word 10 ' minutes time relay is on after off
eRTM EData As Word 15 ' minutes timeout if off value nver reached '
eSLP EData As Word 0 '0 off - 1 on
eCON EData As Word 6 'Contrast TEST from 05 01 2012 )1 to 8 where 1 is min and 8 is max -
eUID EData As Word 11 'Unit ID From Main ? - check with Kai !
eUSV EData As Word 100 'HEAD Firmware Version Number
eRSV EData As Word 101 'Main Firmware Version Number
eLOC EData As Word 65535 'Lock off = 65535, otherwise (001 - 999)
eRST EData As Word 0 ' 0 = ok, 1 = factory reset needed !!!
eFTO EData As Byte 0 ' first time on ! else 1 - reset to 0 on factory reset
eVCC EData As Byte 0 ' 0 = 12 , 1 = 24
Menu_Lookup EData As Word Menu_0, Menu_1, Menu_2, Menu_3, Menu_4, Menu_5, Menu_6 'SEL
EData As Word Menu_7, Menu_8, Menu_9, Menu_10,Menu_11,Menu_12,Menu_13,Menu_14,Menu_15,Menu_16,Menu_17 'BLT
EData As Word Menu_18,Menu_19,Menu_20,Menu_21,Menu_22,Menu_23,Menu_24,Menu_25,Menu_26 'BOTH
Edata_Lookup EData As Byte eSCR,eLAL,eHAL,eTAL,eDIS,eTCF,0 'Sel
EData As Byte eBLC,eBLT,eLED,eALA,eRRS,eRES,eREL,eRON,eROF,eRTO,eRTM,0 'Blt
EData As Byte eSLP,eCON,eUID,eUSV,eRSV,eLOC,eRST,0 'Sel + Blt
Edata_End EData As Byte 0 ' 204 bytes used so far as of build 2_99 ! ' for testing only ! to see eeprom space used !
;New rel 1939 V2 edata end
And some sample use -