diff --git a/library/sensors.dcm b/library/sensors.dcm
index 14529b53..d7321796 100644
--- a/library/sensors.dcm
+++ b/library/sensors.dcm
@@ -264,6 +264,18 @@ K digital temperature humidity sensor
 F http://akizukidenshi.com/download/ds/aosong/DHT11.pdf
 $ENDCMP
 #
+$CMP INA138
+D Unipolar high-side current shunt monitor, 36V common mode
+K current sensor shunt monitor
+F http://www.ti.com/lit/ds/symlink/ina138.pdf
+$ENDCMP
+#
+$CMP INA168
+D Unipolar high-side current shunt monitor, 60V common mode
+K current sensor shunt monitor
+F http://www.ti.com/lit/ds/symlink/ina138.pdf
+$ENDCMP
+#
 $CMP INA193
 D 20V/V Current shunt monitor with independent supply, -16V to +80V common mode range
 K Current sensor shunt monitor high low side
diff --git a/library/sensors.lib b/library/sensors.lib
index 00d3b0bf..c7dd2feb 100644
--- a/library/sensors.lib
+++ b/library/sensors.lib
@@ -428,14 +428,47 @@ X GND 4 -100 -300 100 U 40 40 1 1 W
 ENDDRAW
 ENDDEF
 #
+# INA138
+#
+DEF INA138 U 0 20 Y Y 1 F N
+F0 "U" 100 350 50 H V L CNN
+F1 "INA138" 100 250 50 H V L CNN
+F2 "TO_SOT_Packages_SMD:SOT-23-5" 100 -250 50 H I L CNN
+F3 "" 0 0 50 H V C CNN
+ALIAS INA168
+$FPLIST
+ SOT-23-*
+$ENDFPLIST
+DRAW
+S -250 200 300 -200 0 1 10 f
+P 2 0 1 0 0 0 70 0 N
+P 2 0 1 0 70 -10 100 -40 N
+P 2 0 1 0 70 30 70 -30 N
+P 4 0 1 10 -100 50 -100 -50 0 0 -100 50 N
+P 4 0 1 0 100 -40 90 -20 80 -30 100 -40 N
+P 4 0 1 0 100 -40 270 -40 270 0 300 0 N
+P 5 0 1 0 70 10 100 40 100 70 -110 70 -110 30 N
+P 10 0 1 0 -100 -20 -120 -20 -130 -30 -140 -10 -150 -30 -160 -10 -170 -30 -180 -20 -200 -20 -200 -50 N
+P 10 0 1 0 -100 30 -120 30 -130 40 -140 20 -150 40 -160 20 -170 40 -180 30 -200 30 -200 60 N
+X OUT 1 400 0 100 L 50 50 1 1 O
+X GND 2 0 -300 100 U 50 50 1 1 W
+X V+ 3 0 300 100 D 50 50 1 1 W
+X +IN 4 -400 100 150 R 50 50 1 1 I
+X -IN 5 -400 -100 150 R 50 50 1 1 I
+ENDDRAW
+ENDDEF
+#
 # INA193
 #
 DEF INA193 U 0 40 Y Y 1 F N
 F0 "U" 250 250 50 H V L CNN
 F1 "INA193" 250 150 50 H V L CNN
-F2 "SOT23-5" 250 -200 50 H I L CNN
+F2 "TO_SOT_Packages_SMD:SOT-23-5" 250 -200 50 H I L CNN
 F3 "" 100 0 50 H V C CNN
 ALIAS INA194 INA195
+$FPLIST
+ SOT-23
+$ENDFPLIST
 DRAW
 P 4 0 1 10 400 0 -150 350 -150 -350 400 0 f
 X OUT 1 500 0 100 L 50 50 1 1 O
@@ -451,9 +484,12 @@ ENDDEF
 DEF INA196 U 0 40 Y Y 1 F N
 F0 "U" 150 250 50 H V L CNN
 F1 "INA196" 150 150 50 H V L CNN
-F2 "SOT23-5" 150 -200 50 H V L CNN
+F2 "TO_SOT_Packages_SMD:SOT-23-5" 150 -200 50 H I L CNN
 F3 "" 0 0 50 H V C CNN
 ALIAS INA197 INA198
+$FPLIST
+ SOT-23
+$ENDFPLIST
 DRAW
 P 4 0 1 10 300 0 -250 350 -250 -350 300 0 f
 X OUT 1 400 0 100 L 50 50 1 1 O