1 files changed, 13 insertions, 0 deletions
diff --git a/msp430/examples/uart.txt b/msp430/examples/uart.txt
new file mode 100644
index 0000000..e090e75
--- /dev/null
+++ b/msp430/examples/uart.txt
@@ -0,0 +1,13 @@
+\ UART example, 19200 baud, pins D0/1
+
+: uart-init ( -- )
+  bit5 bit6 or p2sel0 byte set
+  ucswrst uca1ctlw0 reg set
+  ucssel__smclk uca1ctlw0 reg set
+  52 uca1brw reg!
+  18688 ucos16 or ucbrf0 or uca1mctlw reg!
+  ucswrst uca1ctlw0 reg clear ;
+
+: uart-emit ( n -- )
+  begin uca1ifg reg@ uctxifg and until
+  uca1txbuf byte! ;