diff --git a/tcl/airsense.cfg b/tcl/airsense.cfg
index 650fb9b..bb015eb 100644
--- a/tcl/airsense.cfg
+++ b/tcl/airsense.cfg
@@ -70,6 +70,12 @@ proc rcc_fix {} {
 	mww 0x4000286c 0x00000000
 }
 
+proc mrh {reg} {
+       set value ""
+       mem2array value 16 $reg 1
+       return $value(0)
+}
+
 init
 
 set patch [mrh 0x80000f0]