diff --git a/PDP10/ka10_defs.h b/PDP10/ka10_defs.h
index ad70b54..fcf2344 100644
--- a/PDP10/ka10_defs.h
+++ b/PDP10/ka10_defs.h
@@ -321,6 +321,7 @@ extern DEVICE   dt_dev;
 extern DEVICE   dk_dev;
 extern DEVICE   pd_dev;
 extern DEVICE   dpy_dev;
+extern DEVICE   imx_dev;
 extern DEVICE   wcnsls_dev;             /* MIT Spacewar Consoles */
 
 extern t_stat (*dev_tab[128])(uint32 dev, uint64 *data);
@@ -383,6 +384,7 @@ int  df10_write(struct df10 *df);
 #define NUM_DEVS_RS     1
 #define NUM_DEVS_TU     1
 #define NUM_DEVS_PD     ITS
+#define NUM_DEVS_IMX    ITS
 #define NUM_DEVS_DPY    USE_DISPLAY
 #define NUM_DEVS_WCNSLS USE_DISPLAY
 #define NUM_DEVS_IMP    0
diff --git a/PDP10/ka10_imx.c b/PDP10/ka10_imx.c
new file mode 100644
index 0000000..57539b9
--- /dev/null
+++ b/PDP10/ka10_imx.c
@@ -0,0 +1,111 @@
+/* ka10_imx.c: Input multplexor for A/D.
+
+   Copyright (c) 2018, Lars Brinkhoff
+
+   Permission is hereby granted, free of charge, to any person obtaining a
+   copy of this software and associated documentation files (the "Software"),
+   to deal in the Software without restriction, including without limitation
+   the rights to use, copy, modify, merge, publish, distribute, sublicense,
+   and/or sell copies of the Software, and to permit persons to whom the
+   Software is furnished to do so, subject to the following conditions:
+
+   The above copyright notice and this permission notice shall be included in
+   all copies or substantial portions of the Software.
+
+   THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+   IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+   FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
+   RICHARD CORNWELL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
+   IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+   CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+   This is a device which has 128 A/D channels.  It's specific to the MIT
+   AI lab PDP-10.
+*/
+
+#include <time.h>
+#include "ka10_defs.h"
+
+#define IMX_DEVNUM      0574
+
+#define IMX_PIA         0000007
+#define IMX_DONE        0000010
+#define IMX_PACK        0000040
+#define IMX_SEQUENCE    0000100
+#define IMX_TEST        0000200
+#define IMX_RATE        0377000
+#define IMX_ASSIGNED    0400000000000LL
+
+#define IMX_CONO        (IMX_PIA | IMX_PACK | IMX_SEQUENCE | IMX_RATE)
+#define IMX_CONI        (IMX_PIA | IMX_DONE | IMX_PACK | IMX_SEQUENCE | IMX_TEST | IMX_ASSIGNED)
+
+#define IMX_CHANNEL     0000177
+
+t_stat         imx_devio(uint32 dev, uint64 *data);
+const char     *imx_description (DEVICE *dptr);
+
+static uint64 status = IMX_ASSIGNED;
+static int initial_channel = 0;
+static int current_channel = 0;
+
+UNIT                imx_unit[] = {
+    {UDATA(NULL, UNIT_DISABLE, 0)},  /* 0 */
+};
+DIB imx_dib = {IMX_DEVNUM, 1, &imx_devio, NULL};
+
+MTAB imx_mod[] = {
+    { 0 }
+    };
+
+DEVICE              imx_dev = {
+    "IMX", imx_unit, NULL, imx_mod,
+    1, 8, 0, 1, 8, 36,
+    NULL, NULL, NULL, NULL, NULL, NULL,
+    &imx_dib, DEV_DISABLE | DEV_DIS | DEV_DEBUG, 0, NULL,
+    NULL, NULL, NULL, NULL, NULL, &imx_description
+};
+
+static int imx_sample (void)
+{
+    int sample = 2048;
+    if (status & IMX_SEQUENCE)
+        current_channel = (current_channel + 1) & IMX_CHANNEL;
+    else
+        current_channel = initial_channel;
+    return sample;
+}
+
+t_stat imx_devio(uint32 dev, uint64 *data)
+{
+    DEVICE *dptr = &imx_dev;
+
+    switch(dev & 07) {
+    case CONO|4:
+        status &= ~IMX_CONO;
+        status |= *data & IMX_CONO;
+        current_channel = initial_channel;
+        break;
+    case CONI|4:
+        status |= IMX_DONE;
+        *data = status & IMX_CONI;
+        break;
+    case DATAO|4:
+        initial_channel = *data & IMX_CHANNEL;
+        break;
+    case DATAI|4:
+        *data = imx_sample();
+        if (status & IMX_PACK) {
+            *data <<= 24;
+            *data |= imx_sample() << 12;
+            *data |= imx_sample();
+        }
+        break;
+    }
+
+    return SCPE_OK;
+}
+
+const char *imx_description (DEVICE *dptr)
+{
+    return "A/D input multiplexor";
+}
diff --git a/PDP10/ka10_sys.c b/PDP10/ka10_sys.c
index 5af67a4..9fb8b68 100644
--- a/PDP10/ka10_sys.c
+++ b/PDP10/ka10_sys.c
@@ -137,6 +137,9 @@ DEVICE *sim_devices[] = {
 #endif
 #if NUM_DEVS_IMP > 0
     &imp_dev,
+#endif
+#if NUM_DEVS_IMX > 0
+    &imx_dev,
 #endif
     NULL
     };
diff --git a/makefile b/makefile
index 6d37364..60749da 100644
--- a/makefile
+++ b/makefile
@@ -1104,7 +1104,8 @@ KA10 = ${KA10D}/ka10_cpu.c ${KA10D}/ka10_sys.c ${KA10D}/ka10_df.c \
 	${KA10D}/ka10_lp.c ${KA10D}/ka10_pt.c ${KA10D}/ka10_dc.c \
 	${KA10D}/ka10_rp.c ${KA10D}/ka10_rc.c ${KA10D}/ka10_dt.c \
 	${KA10D}/ka10_dk.c ${KA10D}/ka10_cr.c ${KA10D}/ka10_cp.c \
-	${KA10D}/ka10_tu.c ${KA10D}/ka10_rs.c ${KA10D}/ka10_pd.c 
+	${KA10D}/ka10_tu.c ${KA10D}/ka10_rs.c ${KA10D}/ka10_pd.c \
+	${KA10D}/ka10_imx.c
 KA10_OPT = -DKA=1 -DUSE_INT64 -I $(KA10D) -DUSE_SIM_CARD
 #	${KA10D}/ka10_imp.c sim_imp.c sim_ncp.c sim_tun.c