diff --git a/eg/rudiments/cmp.60p b/eg/rudiments/cmp.60p
new file mode 100644
index 0000000..23ec7ee
--- /dev/null
+++ b/eg/rudiments/cmp.60p
@@ -0,0 +1,74 @@
+// Should print ENLGG
+
+word w1
+word w2
+
+define chrout routine
+  inputs a
+  trashes a
+  @ 65490
+
+define main routine
+  outputs w1, w2
+  trashes a, x, y, z, n, c, v
+{
+    copy 4000, w1
+    copy 4000, w2
+
+    cmp w1, w2
+    if z {
+        ld a, 69  // E
+        call chrout
+    } else {
+        ld a, 78  // N
+        call chrout
+    }
+
+    copy 4000, w1
+    copy 4001, w2
+
+    cmp w1, w2
+    if z {
+        ld a, 69  // E
+        call chrout
+    } else {
+        ld a, 78  // N
+        call chrout
+    }
+
+    copy 20000, w1
+    copy 20001, w2
+
+    cmp w1, w2
+    if c {
+        ld a, 71  // G
+        call chrout
+    } else {
+        ld a, 76  // L
+        call chrout
+    }
+
+    copy 20001, w1
+    copy 20001, w2
+
+    cmp w1, w2
+    if c {
+        ld a, 71  // G
+        call chrout
+    } else {
+        ld a, 76  // L
+        call chrout
+    }
+
+    copy 20002, w1
+    copy 20001, w2
+
+    cmp w1, w2
+    if c {
+        ld a, 71  // G
+        call chrout
+    } else {
+        ld a, 76  // L
+        call chrout
+    }
+}