diff --git a/prog/detect/sensors-detect b/prog/detect/sensors-detect
index 72234c1b..a7765ea0 100755
--- a/prog/detect/sensors-detect
+++ b/prog/detect/sensors-detect
@@ -1036,6 +1036,12 @@ use subs qw(mtp008_detect lm78_detect lm78_isa_detect lm78_alias_detect
        i2c_addrs => [0x18..0x1a,0x29..0x2b,0x4c..0x4e],
        i2c_detect => sub { adm1021_detect 6, @_ },
      },
+     {
+       name => "National Semiconductor LM83",
+       driver => "to-be-written",
+       i2c_addrs => [0x18..0x1a,0x29..0x2b,0x4c..0x4e],
+       i2c_detect => sub { adm1021_detect 7, @_ },
+     },
      {
        name => "Analog Devices ADM1022",
        driver => "thmc50",
@@ -2650,7 +2656,8 @@ sub adm1024_detect
 }
 
 # $_[0]: Chip to detect
-#   (0 = ADM1021, 1 = MAX1617, 2 = MAX1617A, 3 = THMC10, 4 = LM84, 5 = GL523, 6 = MC1066)
+#   (0 = ADM1021, 1 = MAX1617, 2 = MAX1617A, 3 = THMC10, 4 = LM84, 5 = GL523, 6 = MC1066,
+#   7 = LM83)
 # $_[1]: A reference to the file descriptor to access this chip.
 #        We may assume an i2c_set_slave_addr was already done.
 # $_[2]: Address
@@ -2669,6 +2676,7 @@ sub adm1021_detect
   return if $chip == 0 and i2c_smbus_read_byte_data($file,0xfe) != 0x41;
   return if $chip == 3 and i2c_smbus_read_byte_data($file,0xfe) != 0x49;
   return if $chip == 4 and i2c_smbus_read_byte_data($file,0x04) != 0x00;
+  return if $chip == 7 and i2c_smbus_read_byte_data($file,0xfe) != 0x01;
   return if $chip == 5 and i2c_smbus_read_byte_data($file,0xfe) != 0x23;
   return if $chip == 2 and i2c_smbus_read_byte_data($file,0xfe) != 0x4d and
                            i2c_smbus_read_byte_data($file,0xff) != 0x01;