I noticed that with FW I missed the auto-increment of the lease EEPROM .. or is there an elegant way to do it?
Swordfish mode..
- Code: Select all
EEPROM(@EEMACAddr) = ($00, $04, $A3, $00, $00, $00) // 6 Byte MAC address
EEPROM(@EEDefaultHostName) = ("swordfish", 0) // NetBIOS name
EEPROM(@EEDefaultIPAddr) = (192, 168, 254, 100) // IP address
EEPROM(@EEDefaultMask) = (255, 255, 255, 0) // Mask
EEPROM(@EEDefaultGateway) = (0, 0, 0, 0) // Gateway
EEPROM(@EEPrimaryDNS) = (0, 0, 0, 0) // Primary DNS
EEPROM(@EESecondaryDNS) = (0, 0, 0, 0) // Secondary DNS
EEPROM(@EEPortAddr) = (0)
Firewing mode..
- Code: Select all
private Const EEMACAddr as byte = 0
private Const EEDefaultHostName as byte = EEMACAddr + 6
private Const EEDefaultIPAddr as byte = EEDefaultHostName + 12
private Const EEDefaultMask as byte = EEDefaultIPAddr + 6
private Const EEDefaultGateway as byte = EEDefaultMask + 6
private Const EEPrimaryDNS as byte = EEDefaultGateway + 6
private Const EESecondaryDNS as byte = EEPrimaryDNS + 6
private Const EEPortAddr as byte = EESecondaryDNS + 6
EEPROM(EEMACAddr) = {$00, $04, $A3, $00, $00, $00} // 6 Byte MAC address
EEPROM(EEDefaultHostName) = {"swordfish", 0} // NetBIOS name
EEPROM(EEDefaultIPAddr) = {192, 168, 254, 100} // IP address
EEPROM(EEDefaultMask) = {255, 255, 255, 0} // Mask
EEPROM(EEDefaultGateway) = {0, 0, 0, 0} // Gateway
EEPROM(EEPrimaryDNS) = {0, 0, 0, 0} // Primary DNS
EEPROM(EESecondaryDNS) = {0, 0, 0, 0} // Secondary DNS
EEPROM(EEPortAddr) = {0 as ushort}