Librerias
/
LibS7Adv
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add project files.

This commit is contained in:
Miguel 2024-06-22 19:08:27 +02:00
parent f04e6a28b2
commit 2addea3c17
5 changed files with 558 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
LibS7Adv.csproj Normal file
View File

@ -0,0 +1,21 @@
<Project Sdk="Microsoft.NET.Sdk">
<PropertyGroup>
<TargetFramework>net8.0-windows</TargetFramework>
<Nullable>enable</Nullable>
<UseWPF>true</UseWPF>
<ImplicitUsings>enable</ImplicitUsings>
</PropertyGroup>
<ItemGroup>
<PackageReference Include="CommunityToolkit.Mvvm" Version="8.2.2" />
<PackageReference Include="Newtonsoft.Json" Version="13.0.3" />
</ItemGroup>
<ItemGroup>
<Reference Include="Siemens.Simatic.Simulation.Runtime.Api.x64">
<HintPath>C:\Program Files (x86)\Common Files\Siemens\PLCSIMADV\API\6.0\Siemens.Simatic.Simulation.Runtime.Api.x64.dll</HintPath>
</Reference>
</ItemGroup>
</Project>

25
LibS7Adv.sln Normal file
View File

@ -0,0 +1,25 @@

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio Version 17
VisualStudioVersion = 17.10.34928.147
MinimumVisualStudioVersion = 10.0.40219.1
Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "LibS7Adv", "LibS7Adv.csproj", "{02E544B3-E0CE-41E1-9A8D-2E5952E7956A}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Release|Any CPU = Release|Any CPU
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{02E544B3-E0CE-41E1-9A8D-2E5952E7956A}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{02E544B3-E0CE-41E1-9A8D-2E5952E7956A}.Debug|Any CPU.Build.0 = Debug|Any CPU
{02E544B3-E0CE-41E1-9A8D-2E5952E7956A}.Release|Any CPU.ActiveCfg = Release|Any CPU
{02E544B3-E0CE-41E1-9A8D-2E5952E7956A}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
SolutionGuid = {515ED789-204D-4870-889B-B4DED80646D9}
EndGlobalSection
EndGlobal

44
PLCControl.xaml Normal file
View File

@ -0,0 +1,44 @@
<UserControl x:Class="LibS7Adv.PLCControl" xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:local="clr-namespace:LibS7Adv">
<UserControl.DataContext>
<local:PLCViewModel />
</UserControl.DataContext>
<Grid>
<Grid.RowDefinitions>
<RowDefinition Height="*" />
<RowDefinition Height="*" />
<RowDefinition Height="*" />
<RowDefinition Height="*" />
<RowDefinition Height="*" />
</Grid.RowDefinitions>
<Grid.ColumnDefinitions>
<ColumnDefinition Width="*" />
<ColumnDefinition Width="2*" />
</Grid.ColumnDefinitions>
<Label Content="IP:" Grid.Row="0" Grid.Column="0" Margin="1" VerticalAlignment="Center" />
<TextBox Text="{Binding IP}" Grid.Row="0" Grid.Column="1" Margin="1"
VerticalAlignment="Center" />
<Label Content="Name:" Grid.Row="1" Grid.Column="0" Margin="1" VerticalAlignment="Center" />
<TextBox Text="{Binding Name}" Grid.Row="1" Grid.Column="1" Margin="1"
VerticalAlignment="Center" />
<Button Content="Connect" Command="{Binding ConnectCommand}" Grid.Row="2" Grid.Column="0" Margin="1"
VerticalAlignment="Center" />
<Button Content="Disconnect" Command="{Binding DisconnectCommand}" Grid.Row="2" Grid.Column="1" Margin="1"
VerticalAlignment="Center" />
<Label Content="Status:" Grid.Row="3" Grid.Column="0" Margin="1" VerticalAlignment="Center" />
<Label Content="{Binding ConnectionStatus}" Grid.Row="3" Grid.Column="1" Margin="1" VerticalAlignment="Center" />
<Label Grid.Row="4" Grid.Column="0" Margin="1" VerticalAlignment="Center">
Last Error:
</Label>
<Label Grid.Row="4" Grid.Column="1" Margin="1" VerticalAlignment="Center" HorizontalAlignment="Stretch">
<TextBlock Text="{Binding LastError}" TextWrapping="Wrap" Padding="3" />
</Label>
</Grid>
</UserControl>

34
PLCControl.xaml.cs Normal file
View File

@ -0,0 +1,34 @@
using CommunityToolkit.Mvvm.Input;
using System.ComponentModel;
using System.Runtime.CompilerServices;
using System.Text.Json.Serialization;
using System.Windows.Controls;
using System.Windows.Input;
using System.Windows.Threading;
using Siemens.Simatic.Simulation.Runtime;
using CommunityToolkit.Mvvm.ComponentModel;
using static System.Runtime.InteropServices.JavaScript.JSType;
using System.Windows;
namespace LibS7Adv
{
/// <summary>
/// Interaction logic for PLCControl.xaml
/// </summary>
///
public partial class PLCControl : UserControl
{
public PLCControl()
{
InitializeComponent();
this.Loaded += OnLoaded;
}
private void OnLoaded(object sender, RoutedEventArgs e)
{
if (DataContext != null && DataContext is PLCViewModel viewModel)
viewModel.ucLoaded();
}
}
}

434
PLCViewModel.cs Normal file
View File

@ -0,0 +1,434 @@
using CommunityToolkit.Mvvm.ComponentModel;
using CommunityToolkit.Mvvm.Input;
using Siemens.Simatic.Simulation.Runtime;
using Newtonsoft.Json;
using System.Text.RegularExpressions;
using System.Text.RegularExpressions;
using System.Threading.Tasks;
using Siemens.Simatic.Simulation.Runtime;
namespace LibS7Adv
{
public partial class PLCViewModel : ObservableObject
{
[JsonIgnore]
private IInstance Instance { get; set; }
private bool IsConfigured { get; set; }
public PLCViewModel()
{
}
public void ucLoaded()
{
IsConnected = false;
lastError = "";
connectionStatus = "offline";
}
[ObservableProperty]
string iP = "10.1.30.11";
[ObservableProperty]
string name = "PLC Name";
[ObservableProperty]
string cpuTime;
[ObservableProperty]
string connectionStatus;
[ObservableProperty]
string lastError;
[ObservableProperty]
[property: JsonIgnore]
bool isConnected;
[RelayCommand]
[property: JsonIgnore]
public void Connect()
{
try
{
// Implementa la conexión utilizando PLCModel
Instance = SimulationRuntimeManager.CreateInterface(Name);
Instance.OnSoftwareConfigurationChanged += Instance_OnSoftwareConfigurationChanged;
//_plcModel.Instance.CommunicationInterface = ECommunicationInterface.Softbus;
if (Instance != null)
{
UpdateTagList();
ConnectionStatus = Instance.OperatingState.ToString();
IsConnected = true;
}
}
catch (Exception ex)
{
LastError = ex.Message;
ConnectionStatus = "offline";
}
}
private void Instance_OnSoftwareConfigurationChanged(IInstance instance, SOnSoftwareConfigChangedParameter event_param)
{
UpdateTagList();
}
[RelayCommand]
[property: JsonIgnore]
public void Disconnect()
{
IsConnected = false;
ConnectionStatus = "offline";
Instance = null;
}
public void UpdateTagList()
{
IsConfigured = false;
try
{
Instance?.UpdateTagList(ETagListDetails.IO | ETagListDetails.DB | ETagListDetails.M, true); // ETagListDetails.IO | ETagListDetails.DB
IsConfigured = true;
}
catch (Exception ex)
{
LastError = ex.Message;
}
}
public bool? LeerBool(string sTag)
{
try
{
if (!isConnected)
{
LastError = "Not Connected";
return false;
}
if (sTag == null)
{ return false; }
var tag = ParseTagAddress(sTag);
if (tag.tagType == EDataType.Unknown) // Normal Tag?
{
return Instance?.ReadBool(sTag);
}
else if (tag.tagType == EDataType.Bool)
{
// Read not Work for ImputArea
if (tag.areaType == EArea.Output)
return Instance?.OutputArea.ReadBit(tag.word_offset, tag.bit);
if (tag.areaType == EArea.Marker)
return Instance?.MarkerArea.ReadBit(tag.word_offset, tag.bit);
}
return false;
}
catch (Exception ex)
{
LastError = sTag + ":" + ex.Message;
return false;
}
}
public bool? EscribirBool(string sTag, bool Value)
{
try
{
if (!isConnected)
{
LastError = "Not Connected";
return false;
}
if (sTag == null)
{ return false; }
var tag = ParseTagAddress(sTag);
if (tag.tagType == EDataType.Unknown) // Normal Tag?
{
Instance?.WriteBool(sTag, Value);
}
else if (tag.tagType == EDataType.Bool)
{
if (tag.areaType == EArea.Input)
Instance?.OutputArea.WriteBit(tag.word_offset, tag.bit, Value);
if (tag.areaType == EArea.Output)
Instance?.OutputArea.WriteBit(tag.word_offset, tag.bit, Value);
if (tag.areaType == EArea.Marker)
Instance?.MarkerArea.WriteBit(tag.word_offset, tag.bit, Value);
}
return false;
}
catch (Exception ex)
{
LastError = sTag + ":" + ex.Message;
return false;
}
}
public string? LeerNumber(string sTag)
{
try
{
if (!isConnected)
{
LastError = "Not Connected";
return "";
}
if (sTag == null)
{ return ""; }
var tag = ParseTagAddress(sTag.Trim());
if (tag.tagType == EDataType.Unknown) // Normal Tag?
{
var data = Instance?.Read(sTag);
return data.Value.ToString();
}
else if (tag.tagType == EDataType.Byte)
{
// Read not Work for ImputArea
if (tag.areaType == EArea.Output)
return Instance?.OutputArea.ReadByte(tag.word_offset).ToString();
if (tag.areaType == EArea.Marker)
return Instance?.MarkerArea.ReadByte(tag.word_offset).ToString();
}
else if (tag.tagType == EDataType.Word)
{
// Read not Work for ImputArea
if (tag.areaType == EArea.Output)
return Instance?.OutputArea.ReadBytes(tag.word_offset,2).ToString();
if (tag.areaType == EArea.Marker)
{
byte[] bytes = Instance?.MarkerArea.ReadBytes(tag.word_offset, 2);
return (bytes[0] + bytes[1]*256).ToString();
}
}
return "";
}
catch (Exception ex)
{
LastError = sTag + ":" + ex.Message;
return "";
}
}
public bool LeerSalidaBool(byte pByte, int pBit)
{
try
{
return Instance?.OutputArea.ReadBit(pByte, (byte)pBit) ?? false;
}
catch (Exception ex)
{
LastError = ex.Message;
return false;
}
}
public void EscribirInputBool(byte pByte, int pBit, bool pValue)
{
try
{
Instance?.InputArea.WriteBit(pByte, (byte)pBit, pValue);
}
catch (Exception ex)
{
LastError = ex.Message;
}
}
public void EscribirTag(string pTag, SDataValue Value)
{
try
{
Instance?.Write(pTag, Value);
}
catch (Exception ex)
{
LastError = pTag + ":" + ex.Message;
}
}
public SDataValue LeerTag(string pTag)
{
try
{
return Instance.Read(pTag);
}
catch (Exception ex)
{
LastError = pTag + ":" + ex.Message;
return new SDataValue();
}
}
public void EscribirTagBool(string pTag, bool pValue)
{
try
{
Instance?.WriteBool(pTag, pValue);
}
catch (Exception ex)
{
LastError = pTag + ":" + ex.Message;
}
}
public void EscribirTagInt16(string pTag, int pValue)
{
try
{
Instance?.WriteInt16(pTag, (short)pValue);
}
catch (Exception ex)
{
LastError = pTag + ":" + ex.Message;
}
}
public bool LeerTagBool(string pTag)
{
try
{
return Instance?.ReadBool(pTag) ?? false;
}
catch (Exception ex)
{
LastError = pTag + ":" + ex.Message;
return false;
}
}
public int? LeerTagInt16(string pTag)
{
try
{
return Instance?.ReadInt16(pTag);
}
catch (Exception ex)
{
LastError = pTag + ":" + ex.Message;
return 0;
}
}
public static TagAddress ParseTagAddress(string tag)
{
TagAddress tagAddress = new TagAddress();
if (tag==null)
return null;
if (tag.StartsWith("%"))
{
if (tag.StartsWith("%DB"))
{
tagAddress.areaType = EArea.DataBlock;
var match = Regex.Match(tag, @"^%DB(\d+)\.DB([X|B|W|D])(\d+)\.(\d+)$");
if (match.Success)
{
tagAddress.DB = int.Parse(match.Groups[1].Value);
char dataTypeChar = match.Groups[2].Value[0];
tagAddress.word_offset = uint.Parse(match.Groups[3].Value);
tagAddress.bit = byte.Parse(match.Groups[4].Value);
switch (dataTypeChar)
{
case 'X':
tagAddress.tagType = EDataType.Bool;
break;
case 'B':
tagAddress.tagType = EDataType.Byte;
break;
case 'W':
tagAddress.tagType = EDataType.Word;
break;
case 'D':
tagAddress.tagType = EDataType.DWord;
break;
default:
tagAddress.tagType = EDataType.Unknown;
break;
}
}
}
else if (tag.StartsWith("%M"))
{
tagAddress.areaType = EArea.Marker;
ParseNonDBAddress(tag, tagAddress);
}
else if (tag.StartsWith("%E"))
{
tagAddress.areaType = EArea.Input;
ParseNonDBAddress(tag, tagAddress);
}
else if (tag.StartsWith("%A"))
{
tagAddress.areaType = EArea.Output;
ParseNonDBAddress(tag, tagAddress);
}
else
{
tagAddress.areaType = EArea.InvalidArea;
}
}
else
{
// If it's not a direct address, treat it as a tag name
tagAddress.areaType = EArea.InvalidArea;
tagAddress.tagType = EDataType.Unknown;
}
return tagAddress;
}
private static void ParseNonDBAddress(string tag, TagAddress tagAddress)
{
var match = Regex.Match(tag, @"^%[EMA](\d+)\.(\d+)$");
if (match.Success)
{
tagAddress.word_offset = uint.Parse(match.Groups[1].Value);
tagAddress.bit = byte.Parse(match.Groups[2].Value);
tagAddress.tagType = EDataType.Bool;
}
else
{
match = Regex.Match(tag, @"^%[EMA]([XBWDF])(\d+)$");
if (match.Success)
{
char dataTypeChar = match.Groups[1].Value[0];
tagAddress.word_offset = uint.Parse(match.Groups[2].Value);
switch (dataTypeChar)
{
case 'X':
tagAddress.tagType = EDataType.Bool;
break;
case 'B':
tagAddress.tagType = EDataType.Byte;
break;
case 'W':
tagAddress.tagType = EDataType.Word;
break;
case 'D':
tagAddress.tagType = EDataType.DWord;
break;
default:
tagAddress.tagType = EDataType.Unknown;
break;
}
}
}
}
}
public class TagAddress
{
public EArea areaType;
public EDataType tagType;
public int DB;
public uint word_offset;
public byte bit;
}
}