blob: c6fe8f5fdc743dfcedbfbbc3adc28987d41f4d32 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
model led_green_blink "This will turn on and turn off the green LED for every second for 5 times"
extends Modelica.Icons.Example;
import sComm = Arduino.SerialCommunication.Functions;
import strm = Modelica.Utilities.Streams;
Integer ok(fixed = false);
Integer digital_out(fixed = false);
Integer c_ok(fixed = false);
algorithm
when initial() then
ok := sComm.open_serial(1, 2, 115200) "At port 2 with baudrate of 115200";
sComm.delay(2000);
if ok <> 0 then
strm.print("Check the serial port and try again");
else
for i in 1:5 loop
digital_out := sComm.cmd_digital_out(1, 10, 1) "This will turn ON the green LED";
sComm.delay(1000) "Delay for 1 second";
digital_out := sComm.cmd_digital_out(1, 10, 0) "This will turn OFF the green LED";
sComm.delay(1000) "Delay for 1 second";
end for;
end if;
c_ok := sComm.close_serial(1) "To close the connection safely";
end when;
// strm.print(String(time));
annotation(
experiment(StartTime = 0, StopTime = 10, Tolerance = 1e-6, Interval = 10));
end led_green_blink;
|
