NEW FEATURES AND NEW FUNCTIONS

1 files changed, 42 insertions, 0 deletions

diff --git a/macros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci b/macros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci
new file mode 100755
index 00000000..2bdb89b8
--- /dev/null
+++ b/macros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci
@@ -0,0 +1,42 @@
+// Copyright (C) 2017 - IIT Bombay - FOSSEE
+//
+// This file must be used under the terms of the CeCILL.
+// This source file is licensed as described in the file COPYING, which
+// you should have received as part of this distribution.  The terms
+// are also available at
+// http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
+// Organization: FOSSEE, IIT Bombay
+// Email: toolbox@scilab.in
+
+function RPI_shiftIn(dpin,cpin,order)
+// Function to shift 8-bit value appearing on dpin
+//
+// Calling Sequence
+//  RPI_shiftIn(dpin,cpin,order)
+//
+// Parameters
+//  dpin : datapin
+//  cpin : clockpin
+//  order: integer, 0 (LSB first) or 1 (MSB first)
+//
+// Description
+//  This shifts an 8-bit data value in with the data appearing on the dPin and the clock being sent out on the cPin. Order is either LSBFIRST or MSBFIRST. The data is sampled after the cPin goes high. (So cPin high, sample data, cPin low, repeat for 8 bits) The 8-bit value is returned by the function.
+//
+// Examples
+//  RPI_shiftIn(0,2,0)
+// See also
+//  RPI_shiftOut
+//
+// Authors
+//  Jorawar Singh
+//
+// Bibliography
+//  http://wiringpi.com/reference/
+
+    commande="shI#3#"+string(dpin)+"#"+string(cpin)+"#"+string(order)+"#";
+    if getos=="Linux" then
+        unix_w("python -c ""import socket;s=socket.socket();s.connect((''"+RPI_piAdress+"'',9077));s.send(''"+commande+"'');print(s.recv(1024));s.close()""");
+    elseif getos=="Windows" then
+        RPI_winR=dos("python -c ""import socket;s=socket.socket();s.connect((''"+RPI_piAdress+"'',9077));s.send(''"+commande+"'');print(s.recv(1024));s.close()""");
+    end
+endfunction