add example

diff --git a/Tasks/Examples.icl b/Tasks/Examples.icl
index 103862c..b0ae530 100644 (file)
--- a/Tasks/Examples.icl
+++ b/Tasks/Examples.icl
@@ -50,7 +50,7 @@ ledtOff :: UserLED -> Main (ByteCode () Stmt)
 ledtOff d = {main = ledOff (lit d) :. noOp}
 
 readDPin :: DigitalPin -> Main (ByteCode () Stmt)
-readDPin d = sds \pin=False In {main=pin =. digitalRead d :. noOp}
+readDPin d = sds \pin=False In {main=pin =. digitalRead d :. pub pin :. noOp}
 
 ledSelection :: Task UserLED
 ledSelection = enterInformation "Select LED" []

diff --git a/client/interface.c b/client/interface.c
index 8afac28..432671c 100644 (file)
--- a/client/interface.c
+++ b/client/interface.c
@@ -31,6 +31,7 @@ uint64_t dpins[] = {LINE_ARD_D0, LINE_ARD_D1, LINE_ARD_D2, LINE_ARD_D3,
        LINE_ARD_D4, LINE_ARD_D5, LINE_ARD_D6, LINE_ARD_D7, LINE_ARD_D8,
        LINE_ARD_D9, LINE_ARD_D10, LINE_ARD_D11, LINE_ARD_D12, LINE_ARD_D13,
        LINE_ARD_D14, LINE_ARD_D15};
+
 void write_dpin(uint8_t i, bool b)
 {
        palWriteLine(dpins[i], b ? PAL_HIGH : PAL_LOW);
@@ -38,6 +39,7 @@ void write_dpin(uint8_t i, bool b)
 
 bool read_dpin(uint8_t i)
 {
+       debug("readpin: %d", i);
        return palReadLine(dpins[i]) == PAL_HIGH;
 }
 

diff --git a/client/sds.c b/client/sds.c
index 66bcb16..e6bf3b5 100644 (file)
--- a/client/sds.c
+++ b/client/sds.c
@@ -85,7 +85,21 @@ void sds_publish(int id)
                        write_byte('p');
                        write16(sdss[cs].id);
                        write_byte(sdss[cs].type);
-                       write16(sdss[cs].value);
+
+                       switch(sdss[cs].type){
+                       //Long
+                       case 'l':
+                       //Int
+                       case 'i':
+                               write16(sdss[cs].value);
+                               break;
+                       case 'b': //Bool
+                       case 'c': //Character
+                       case 'B': //Button
+                       case 'L': //UserLED
+                               write_byte(sdss[cs].value);
+                               break;
+                       }
                        write_byte('\n');
                        return;
                }