1 files changed, 123 insertions, 0 deletions
diff --git a/ldmicro/sample/7seg-display.ld b/ldmicro/sample/7seg-display.ld
new file mode 100644
index 0000000..b9d0c9d
--- /dev/null
+++ b/ldmicro/sample/7seg-display.ld
@@ -0,0 +1,123 @@
+LDmicro0.1
+CYCLE=5000
+CRYSTAL=4000000
+BAUD=2400
+
+IO LIST
+    Ycom_digit0 at 0
+    Ycom_digit1 at 0
+    Ycom_digit2 at 0
+    Yseg_a at 0
+    Yseg_b at 0
+    Yseg_c at 0
+    Yseg_d at 0
+    Yseg_e at 0
+    Yseg_f at 0
+    Yseg_g at 0
+END
+
+PROGRAM
+RUNG
+    COMMENT Sample program: how to drive a multiplexed 7-segment LED display. This is\r\nfor a 3-digit common-cathode display but it is easy to modify.
+END
+RUNG
+    COMMENT With a 5 ms cycle time, this will oscillate at 100 Hz, which should be\r\nokay (33 Hz refresh rate, 1/3 duty cycle).
+END
+RUNG
+    CONTACTS Rdosc 1
+    COIL Rdosc 0 0 0
+END
+RUNG
+    CONTACTS Rdosc 0
+    CTC Cdigit 2
+END
+RUNG
+    COMMENT Use the Ycom_digitx lines to drive the base/gate of the NPN transistor/\r\nn-FET used to switch the cathode of digit x.
+END
+RUNG
+    PARALLEL
+        SERIES
+            EQU Cdigit 0
+            PARALLEL
+                COIL Ycom_digit0 0 0 0
+                MOVE digit digit0
+            END
+        END
+        SERIES
+            EQU Cdigit 1
+            PARALLEL
+                COIL Ycom_digit1 0 0 0
+                MOVE digit digit1
+            END
+        END
+        SERIES
+            EQU Cdigit 2
+            PARALLEL
+                COIL Ycom_digit2 0 0 0
+                MOVE digit digit2
+            END
+        END
+    END
+END
+RUNG
+    COMMENT You can drive the segment pins of the display directly from the GPIO pins,\r\nYseg_a to Yseg_b.
+END
+RUNG
+    PARALLEL
+        SERIES
+            NEQ digit 1
+            NEQ digit 4
+            COIL Yseg_a 0 0 0
+        END
+        SERIES
+            NEQ digit 5
+            NEQ digit 6
+            COIL Yseg_b 0 0 0
+        END
+        SERIES
+            NEQ digit 2
+            COIL Yseg_c 0 0 0
+        END
+        SERIES
+            NEQ digit 1
+            NEQ digit 4
+            NEQ digit 7
+            COIL Yseg_d 0 0 0
+        END
+        SERIES
+            PARALLEL
+                EQU digit 0
+                EQU digit 2
+                EQU digit 6
+                EQU digit 8
+            END
+            COIL Yseg_e 0 0 0
+        END
+        SERIES
+            NEQ digit 1
+            NEQ digit 2
+            NEQ digit 3
+            NEQ digit 7
+            COIL Yseg_f 0 0 0
+        END
+        SERIES
+            NEQ digit 0
+            NEQ digit 1
+            NEQ digit 7
+            COIL Yseg_g 0 0 0
+        END
+    END
+END
+RUNG
+    COMMENT Fill in your program here; just set the output that you want on digit0,\r\ndigit1, and digit2.
+END
+RUNG
+    PARALLEL
+        MOVE digit0 1
+        MOVE digit1 8
+        MOVE digit2 5
+    END
+END
+RUNG
+    COMMENT by Jonathan Westhues, June 2005
+END