summaryrefslogtreecommitdiff
path: root/macros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci
diff options
context:
space:
mode:
authorBrijeshcr2017-07-20 19:39:55 +0530
committerBrijeshcr2017-07-20 19:39:55 +0530
commit95ba66169e2f30d87694703b6162c58d371fceda (patch)
tree701adbda6608b3a8274e45ca5a5fe82039a50a66 /macros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci
parentc70a50ed3df714fc52f18b41539c7f0ac2734f32 (diff)
parent38f1fb926d82f9144a5e9a28595d2d21dcc08f8e (diff)
downloadScilab2C_fossee_old-95ba66169e2f30d87694703b6162c58d371fceda.tar.gz
Scilab2C_fossee_old-95ba66169e2f30d87694703b6162c58d371fceda.tar.bz2
Scilab2C_fossee_old-95ba66169e2f30d87694703b6162c58d371fceda.zip
Added RPI demo and lcd128x64 fixed
Diffstat (limited to 'macros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci')
-rwxr-xr-xmacros/Hardware/RasberryPi/Shift/RPI_shiftIn.sci42
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 0000000..2bdb89b
--- /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