initial version
This commit is contained in:
3
.gitignore
vendored
Normal file
3
.gitignore
vendored
Normal file
@@ -0,0 +1,3 @@
|
||||
.vs
|
||||
.git
|
||||
.bin
|
||||
6
App.config
Normal file
6
App.config
Normal file
@@ -0,0 +1,6 @@
|
||||
<?xml version="1.0" encoding="utf-8" ?>
|
||||
<configuration>
|
||||
<startup>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8" />
|
||||
</startup>
|
||||
</configuration>
|
||||
166
Form1.Designer.cs
generated
Normal file
166
Form1.Designer.cs
generated
Normal file
@@ -0,0 +1,166 @@
|
||||
namespace Gidrolock_Modbus_Scanner
|
||||
{
|
||||
partial class App
|
||||
{
|
||||
/// <summary>
|
||||
/// Required designer variable.
|
||||
/// </summary>
|
||||
private System.ComponentModel.IContainer components = null;
|
||||
|
||||
/// <summary>
|
||||
/// Clean up any resources being used.
|
||||
/// </summary>
|
||||
/// <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
|
||||
protected override void Dispose(bool disposing)
|
||||
{
|
||||
if (disposing && (components != null))
|
||||
{
|
||||
components.Dispose();
|
||||
}
|
||||
base.Dispose(disposing);
|
||||
}
|
||||
|
||||
#region Windows Form Designer generated code
|
||||
|
||||
/// <summary>
|
||||
/// Required method for Designer support - do not modify
|
||||
/// the contents of this method with the code editor.
|
||||
/// </summary>
|
||||
private void InitializeComponent()
|
||||
{
|
||||
System.ComponentModel.ComponentResourceManager resources = new System.ComponentModel.ComponentResourceManager(typeof(App));
|
||||
this.groupBox1 = new System.Windows.Forms.GroupBox();
|
||||
this.ButtonConnect = new System.Windows.Forms.Button();
|
||||
this.panel2 = new System.Windows.Forms.Panel();
|
||||
this.UpDown_ModbusID = new System.Windows.Forms.NumericUpDown();
|
||||
this.label2 = new System.Windows.Forms.Label();
|
||||
this.panel1 = new System.Windows.Forms.Panel();
|
||||
this.CBox_Ports = new System.Windows.Forms.ComboBox();
|
||||
this.label1 = new System.Windows.Forms.Label();
|
||||
this.Label_Status = new System.Windows.Forms.Label();
|
||||
this.groupBox1.SuspendLayout();
|
||||
this.panel2.SuspendLayout();
|
||||
((System.ComponentModel.ISupportInitialize)(this.UpDown_ModbusID)).BeginInit();
|
||||
this.panel1.SuspendLayout();
|
||||
this.SuspendLayout();
|
||||
//
|
||||
// groupBox1
|
||||
//
|
||||
this.groupBox1.Controls.Add(this.ButtonConnect);
|
||||
this.groupBox1.Controls.Add(this.panel2);
|
||||
this.groupBox1.Controls.Add(this.panel1);
|
||||
this.groupBox1.Location = new System.Drawing.Point(12, 12);
|
||||
this.groupBox1.Name = "groupBox1";
|
||||
this.groupBox1.Size = new System.Drawing.Size(310, 63);
|
||||
this.groupBox1.TabIndex = 0;
|
||||
this.groupBox1.TabStop = false;
|
||||
this.groupBox1.Text = "Подключение";
|
||||
//
|
||||
// ButtonConnect
|
||||
//
|
||||
this.ButtonConnect.Location = new System.Drawing.Point(162, 34);
|
||||
this.ButtonConnect.Name = "ButtonConnect";
|
||||
this.ButtonConnect.Size = new System.Drawing.Size(146, 23);
|
||||
this.ButtonConnect.TabIndex = 4;
|
||||
this.ButtonConnect.Text = "Подключиться";
|
||||
this.ButtonConnect.UseVisualStyleBackColor = true;
|
||||
this.ButtonConnect.Click += new System.EventHandler(this.ButtonConnect_Click);
|
||||
//
|
||||
// panel2
|
||||
//
|
||||
this.panel2.Controls.Add(this.UpDown_ModbusID);
|
||||
this.panel2.Controls.Add(this.label2);
|
||||
this.panel2.Location = new System.Drawing.Point(81, 19);
|
||||
this.panel2.Name = "panel2";
|
||||
this.panel2.Size = new System.Drawing.Size(75, 43);
|
||||
this.panel2.TabIndex = 2;
|
||||
//
|
||||
// UpDown_ModbusID
|
||||
//
|
||||
this.UpDown_ModbusID.Location = new System.Drawing.Point(6, 17);
|
||||
this.UpDown_ModbusID.Name = "UpDown_ModbusID";
|
||||
this.UpDown_ModbusID.Size = new System.Drawing.Size(66, 20);
|
||||
this.UpDown_ModbusID.TabIndex = 1;
|
||||
//
|
||||
// label2
|
||||
//
|
||||
this.label2.AutoSize = true;
|
||||
this.label2.Location = new System.Drawing.Point(3, 0);
|
||||
this.label2.Name = "label2";
|
||||
this.label2.Size = new System.Drawing.Size(59, 13);
|
||||
this.label2.TabIndex = 0;
|
||||
this.label2.Text = "Modbus ID";
|
||||
//
|
||||
// panel1
|
||||
//
|
||||
this.panel1.Controls.Add(this.CBox_Ports);
|
||||
this.panel1.Controls.Add(this.label1);
|
||||
this.panel1.Location = new System.Drawing.Point(0, 19);
|
||||
this.panel1.Name = "panel1";
|
||||
this.panel1.Size = new System.Drawing.Size(75, 43);
|
||||
this.panel1.TabIndex = 0;
|
||||
//
|
||||
// CBox_Ports
|
||||
//
|
||||
this.CBox_Ports.FormattingEnabled = true;
|
||||
this.CBox_Ports.Location = new System.Drawing.Point(6, 17);
|
||||
this.CBox_Ports.Name = "CBox_Ports";
|
||||
this.CBox_Ports.Size = new System.Drawing.Size(65, 21);
|
||||
this.CBox_Ports.TabIndex = 1;
|
||||
this.CBox_Ports.Text = "COM 1";
|
||||
this.CBox_Ports.MouseClick += new System.Windows.Forms.MouseEventHandler(this.CBox_Ports_Click);
|
||||
//
|
||||
// label1
|
||||
//
|
||||
this.label1.AutoSize = true;
|
||||
this.label1.Location = new System.Drawing.Point(3, 0);
|
||||
this.label1.Name = "label1";
|
||||
this.label1.Size = new System.Drawing.Size(32, 13);
|
||||
this.label1.TabIndex = 0;
|
||||
this.label1.Text = "Порт";
|
||||
//
|
||||
// Label_Status
|
||||
//
|
||||
this.Label_Status.Location = new System.Drawing.Point(15, 87);
|
||||
this.Label_Status.Name = "Label_Status";
|
||||
this.Label_Status.Size = new System.Drawing.Size(307, 40);
|
||||
this.Label_Status.TabIndex = 5;
|
||||
this.Label_Status.Text = "Статус: истекло время ожидания ответа. Проверьте указаный порт, Modbus ID и стату" +
|
||||
"с устройства.";
|
||||
//
|
||||
// App
|
||||
//
|
||||
this.AutoScaleDimensions = new System.Drawing.SizeF(6F, 13F);
|
||||
this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font;
|
||||
this.ClientSize = new System.Drawing.Size(333, 84);
|
||||
this.Controls.Add(this.Label_Status);
|
||||
this.Controls.Add(this.groupBox1);
|
||||
this.Icon = ((System.Drawing.Icon)(resources.GetObject("$this.Icon")));
|
||||
this.Name = "App";
|
||||
this.Text = "Gidrolock Modbus Scanner";
|
||||
this.FormClosed += new System.Windows.Forms.FormClosedEventHandler(this.App_FormClosed);
|
||||
this.Load += new System.EventHandler(this.Form1_Load);
|
||||
this.groupBox1.ResumeLayout(false);
|
||||
this.panel2.ResumeLayout(false);
|
||||
this.panel2.PerformLayout();
|
||||
((System.ComponentModel.ISupportInitialize)(this.UpDown_ModbusID)).EndInit();
|
||||
this.panel1.ResumeLayout(false);
|
||||
this.panel1.PerformLayout();
|
||||
this.ResumeLayout(false);
|
||||
|
||||
}
|
||||
|
||||
#endregion
|
||||
|
||||
private System.Windows.Forms.GroupBox groupBox1;
|
||||
private System.Windows.Forms.Panel panel2;
|
||||
private System.Windows.Forms.NumericUpDown UpDown_ModbusID;
|
||||
private System.Windows.Forms.Label label2;
|
||||
private System.Windows.Forms.Panel panel1;
|
||||
private System.Windows.Forms.ComboBox CBox_Ports;
|
||||
private System.Windows.Forms.Label label1;
|
||||
private System.Windows.Forms.Button ButtonConnect;
|
||||
private System.Windows.Forms.Label Label_Status;
|
||||
}
|
||||
}
|
||||
|
||||
141
Form1.cs
Normal file
141
Form1.cs
Normal file
@@ -0,0 +1,141 @@
|
||||
using System;
|
||||
using System.Collections.Generic;
|
||||
using System.ComponentModel;
|
||||
using System.Data;
|
||||
using System.Drawing;
|
||||
using System.Linq;
|
||||
using System.Text;
|
||||
using System.Threading.Tasks;
|
||||
using System.Windows.Forms;
|
||||
using System.IO.Ports;
|
||||
using System.Drawing.Drawing2D;
|
||||
using System.Threading;
|
||||
using System.Runtime;
|
||||
using System.Web;
|
||||
|
||||
namespace Gidrolock_Modbus_Scanner
|
||||
{
|
||||
public partial class App : Form
|
||||
{
|
||||
public bool isAwaitingResponse = false;
|
||||
public short[] res = new short[12];
|
||||
public SerialPort port = new SerialPort();
|
||||
|
||||
public App()
|
||||
{
|
||||
InitializeComponent();
|
||||
this.port.DataReceived += new System.IO.Ports.SerialDataReceivedEventHandler(PortDataReceived);
|
||||
this.UpDown_ModbusID.Value = 30;
|
||||
}
|
||||
void App_FormClosed(object sender, FormClosedEventArgs e)
|
||||
{
|
||||
port.Close();
|
||||
if (!port.IsOpen)
|
||||
Application.Exit();
|
||||
}
|
||||
|
||||
void Form1_Load(object sender, EventArgs e)
|
||||
{
|
||||
CBox_Ports.Items.AddRange(SerialPort.GetPortNames());
|
||||
if (CBox_Ports.Items.Count > 0)
|
||||
CBox_Ports.SelectedIndex = 0;
|
||||
Init();
|
||||
}
|
||||
|
||||
void Init()
|
||||
{
|
||||
if (UpDown_ModbusID.Value == 0)
|
||||
ButtonConnect.Text = "Найти адрес";
|
||||
else ButtonConnect.Text = "Подключиться";
|
||||
}
|
||||
|
||||
private async void ButtonConnect_Click(object sender, EventArgs e)
|
||||
{
|
||||
if (CBox_Ports.Text == "")
|
||||
MessageBox.Show("Необходимо выбрать COM порт.", "Ошибка", MessageBoxButtons.OK);
|
||||
if (UpDown_ModbusID.Value == 0)
|
||||
MessageBox.Show("Глобальное вещание пока не поддерживается");
|
||||
try
|
||||
{
|
||||
if (port.IsOpen)
|
||||
port.Close();
|
||||
|
||||
port.Handshake = Handshake.None;
|
||||
port.PortName = CBox_Ports.Text;
|
||||
port.BaudRate = 9600;
|
||||
port.Parity = Parity.None;
|
||||
port.DataBits = 8;
|
||||
port.StopBits = StopBits.One;
|
||||
|
||||
port.ReadTimeout = 10;
|
||||
port.WriteTimeout = 10;
|
||||
|
||||
|
||||
|
||||
port.Open();
|
||||
var send = await Modbus.ReadRegAsync(port, (byte)FunctionCode.HoldingRegister, (byte)UpDown_ModbusID.Value, 128, 1);
|
||||
isAwaitingResponse = true;
|
||||
Task timer = Task.Delay(2000);
|
||||
await timer.ContinueWith( _ =>
|
||||
{
|
||||
if (isAwaitingResponse)
|
||||
MessageBox.Show("Истекло время ожидания ответа.", "Ошибка");
|
||||
});
|
||||
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
port.Close();
|
||||
MessageBox.Show(err.Message, "Ошибка", MessageBoxButtons.OK, MessageBoxIcon.Error);
|
||||
}
|
||||
}
|
||||
|
||||
void CBox_Ports_Click(object sender, EventArgs e)
|
||||
{
|
||||
CBox_Ports.Items.Clear();
|
||||
CBox_Ports.Items.AddRange(SerialPort.GetPortNames());
|
||||
}
|
||||
|
||||
void PortDataReceived(object sender, EventArgs e)
|
||||
{
|
||||
Console.WriteLine("Data receieved on Serial Port");
|
||||
isAwaitingResponse = false;
|
||||
int len;
|
||||
byte rdxLen = 0;
|
||||
|
||||
try
|
||||
{
|
||||
len = port.BytesToRead;
|
||||
byte[] data = new byte[len];
|
||||
port.Read(data, rdxLen, len);
|
||||
rdxLen += (byte)len;
|
||||
int lastByte = len - 1;
|
||||
for (int i = len - 1; i >= 0; i--)
|
||||
{
|
||||
if (data[i] != 0)
|
||||
{
|
||||
lastByte = i;
|
||||
break;
|
||||
}
|
||||
}
|
||||
string dataString = BitConverter.ToString(data);
|
||||
string dataCleaned = "";
|
||||
for (int i = 0; i < dataString.Length; i++)
|
||||
{
|
||||
if (dataString[i] == '-')
|
||||
dataCleaned += " ";
|
||||
else dataCleaned += dataString[i];
|
||||
}
|
||||
MessageBox.Show("Получен ответ от устройства: " + dataCleaned, "Успех", MessageBoxButtons.OK);
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
MessageBox.Show(err.Message);
|
||||
}
|
||||
|
||||
port.Close();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
public enum FunctionCode { Coil, DiscreteInput, HoldingRegister, InputRegister}
|
||||
1253
Form1.resx
Normal file
1253
Form1.resx
Normal file
File diff suppressed because it is too large
Load Diff
BIN
Gidrolock Logo.ico
Normal file
BIN
Gidrolock Logo.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 66 KiB |
112
Gidrolock Modbus Scanner.csproj
Normal file
112
Gidrolock Modbus Scanner.csproj
Normal file
@@ -0,0 +1,112 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProjectGuid>{47A399D3-30C1-4EF4-9E94-F3518919A59C}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<RootNamespace>Gidrolock_Modbus_Scanner</RootNamespace>
|
||||
<AssemblyName>Gidrolock Modbus Scanner</AssemblyName>
|
||||
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
||||
<Deterministic>true</Deterministic>
|
||||
<PublishUrl>publish\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Disk</InstallFrom>
|
||||
<UpdateEnabled>false</UpdateEnabled>
|
||||
<UpdateMode>Foreground</UpdateMode>
|
||||
<UpdateInterval>7</UpdateInterval>
|
||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
||||
<UpdatePeriodically>false</UpdatePeriodically>
|
||||
<UpdateRequired>false</UpdateRequired>
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<ApplicationRevision>0</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<Optimize>false</Optimize>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DefineConstants>DEBUG;TRACE</DefineConstants>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
<WarningLevel>4</WarningLevel>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DefineConstants>TRACE</DefineConstants>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
<WarningLevel>4</WarningLevel>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Core" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
<Reference Include="Microsoft.CSharp" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Net.Http" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="Modbus.cs" />
|
||||
<Compile Include="Form1.cs">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Form1.Designer.cs">
|
||||
<DependentUpon>Form1.cs</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Program.cs" />
|
||||
<Compile Include="Properties\AssemblyInfo.cs" />
|
||||
<Compile Include="Timeout.cs" />
|
||||
<EmbeddedResource Include="Form1.resx">
|
||||
<DependentUpon>Form1.cs</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Properties\Resources.resx">
|
||||
<Generator>ResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.cs</LastGenOutput>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<Compile Include="Properties\Resources.Designer.cs">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
</Compile>
|
||||
<None Include="Properties\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<LastGenOutput>Settings.Designer.cs</LastGenOutput>
|
||||
</None>
|
||||
<Compile Include="Properties\Settings.Designer.cs">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="App.config" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include=".NETFramework,Version=v4.8">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>Microsoft .NET Framework 4.8 %28x86 and x64%29</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.5 SP1</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.CSharp.targets" />
|
||||
</Project>
|
||||
14
Gidrolock Modbus Scanner.csproj.user
Normal file
14
Gidrolock Modbus Scanner.csproj.user
Normal file
@@ -0,0 +1,14 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="Current" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<ProjectView>ShowAllFiles</ProjectView>
|
||||
<PublishUrlHistory />
|
||||
<InstallUrlHistory />
|
||||
<SupportUrlHistory />
|
||||
<UpdateUrlHistory />
|
||||
<BootstrapperUrlHistory />
|
||||
<ErrorReportUrlHistory />
|
||||
<FallbackCulture>en-US</FallbackCulture>
|
||||
<VerifyUploadedFiles>false</VerifyUploadedFiles>
|
||||
</PropertyGroup>
|
||||
</Project>
|
||||
25
Gidrolock Modbus Scanner.sln
Normal file
25
Gidrolock Modbus Scanner.sln
Normal file
@@ -0,0 +1,25 @@
|
||||
|
||||
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||
# Visual Studio Version 17
|
||||
VisualStudioVersion = 17.11.35327.3
|
||||
MinimumVisualStudioVersion = 10.0.40219.1
|
||||
Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "Gidrolock Modbus Scanner", "Gidrolock Modbus Scanner.csproj", "{47A399D3-30C1-4EF4-9E94-F3518919A59C}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|Any CPU = Debug|Any CPU
|
||||
Release|Any CPU = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||
{47A399D3-30C1-4EF4-9E94-F3518919A59C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||
{47A399D3-30C1-4EF4-9E94-F3518919A59C}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||
{47A399D3-30C1-4EF4-9E94-F3518919A59C}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||
{47A399D3-30C1-4EF4-9E94-F3518919A59C}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
EndGlobalSection
|
||||
GlobalSection(ExtensibilityGlobals) = postSolution
|
||||
SolutionGuid = {0E1BD686-7D89-4CE2-B2A0-B82DDB9008DE}
|
||||
EndGlobalSection
|
||||
EndGlobal
|
||||
134
Modbus.cs
Normal file
134
Modbus.cs
Normal file
@@ -0,0 +1,134 @@
|
||||
using System;
|
||||
using System.IO.Ports;
|
||||
using System.Runtime;
|
||||
using System.Collections.Generic;
|
||||
using System.Linq;
|
||||
using System.Text;
|
||||
using System.Threading.Tasks;
|
||||
using System.Windows.Forms;
|
||||
using System.Threading;
|
||||
|
||||
namespace Gidrolock_Modbus_Scanner
|
||||
{
|
||||
public static class Modbus
|
||||
{
|
||||
|
||||
#region CRC Computation
|
||||
static void GetCRC(byte[] message, ref byte[] CRC)
|
||||
{
|
||||
//Function expects a modbus message of any length as well as a 2 byte CRC array in which to
|
||||
//return the CRC values:
|
||||
|
||||
ushort CRCFull = 0xFFFF;
|
||||
byte CRCHigh = 0xFF, CRCLow = 0xFF;
|
||||
char CRCLSB;
|
||||
|
||||
for (int i = 0; i < (message.Length) - 2; i++)
|
||||
{
|
||||
CRCFull = (ushort)(CRCFull ^ message[i]);
|
||||
|
||||
for (int j = 0; j < 8; j++)
|
||||
{
|
||||
CRCLSB = (char)(CRCFull & 0x0001);
|
||||
CRCFull = (ushort)((CRCFull >> 1) & 0x7FFF);
|
||||
|
||||
if (CRCLSB == 1)
|
||||
CRCFull = (ushort)(CRCFull ^ 0xA001);
|
||||
}
|
||||
}
|
||||
CRC[1] = CRCHigh = (byte)((CRCFull >> 8) & 0xFF);
|
||||
CRC[0] = CRCLow = (byte)(CRCFull & 0xFF);
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Build Message
|
||||
static void BuildMessage(byte address, byte type, ushort start, ushort registers, ref byte[] message)
|
||||
{
|
||||
//Array to receive CRC bytes:
|
||||
byte[] CRC = new byte[2];
|
||||
|
||||
message[0] = address;
|
||||
message[1] = type;
|
||||
message[2] = (byte)(start >> 8);
|
||||
message[3] = (byte)start;
|
||||
message[4] = (byte)(registers >> 8);
|
||||
message[5] = (byte)registers;
|
||||
|
||||
GetCRC(message, ref CRC);
|
||||
message[message.Length - 2] = CRC[0];
|
||||
message[message.Length - 1] = CRC[1];
|
||||
string msg = BitConverter.ToString(message);
|
||||
Console.WriteLine("Message: " + msg);
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Check Response
|
||||
static bool CheckResponse(byte[] response)
|
||||
{
|
||||
//Perform a basic CRC check:
|
||||
byte[] CRC = new byte[2];
|
||||
GetCRC(response, ref CRC);
|
||||
if (CRC[0] == response[response.Length - 2] && CRC[1] == response[response.Length - 1])
|
||||
return true;
|
||||
else
|
||||
return false;
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Get Response
|
||||
static void GetResponse(SerialPort port, ref byte[] response)
|
||||
{
|
||||
Console.WriteLine("Got response from port");
|
||||
if (port.BytesToRead == 0)
|
||||
return;
|
||||
//There is a bug in .Net 2.0 DataReceived Event that prevents people from using this
|
||||
//event as an interrupt to handle data (it doesn't fire all of the time). Therefore
|
||||
//we have to use the ReadByte command for a fixed length as it's been shown to be reliable.
|
||||
for (int i = 0; i < response.Length; i++)
|
||||
{
|
||||
response[i] = (byte)(port.ReadByte());
|
||||
}
|
||||
}
|
||||
#endregion
|
||||
|
||||
#region Function 3 - Read Holding Registers
|
||||
public static async Task<bool> ReadRegAsync(SerialPort port, byte regType, byte address, ushort start, ushort registers)
|
||||
{
|
||||
short[] values = new short[8];
|
||||
//Ensure port is open:
|
||||
if (port.IsOpen)
|
||||
{
|
||||
//Clear in/out buffers:
|
||||
port.DiscardOutBuffer();
|
||||
port.DiscardInBuffer();
|
||||
//Function 3 request is always 8 bytes:
|
||||
byte[] message = new byte[8];
|
||||
//Function 3 response buffer:
|
||||
byte[] response = new byte[5 + 2 * registers];
|
||||
//Build outgoing modbus message:
|
||||
BuildMessage(address, (byte)3, start, registers, ref message);
|
||||
//Send modbus message to Serial Port:
|
||||
try
|
||||
{
|
||||
await Task.Run(() => { port.Write(message, 0, message.Length); });
|
||||
return true;
|
||||
}
|
||||
catch (Exception err)
|
||||
{
|
||||
MessageBox.Show(err.Message);
|
||||
port.Close();
|
||||
return false;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
MessageBox.Show("Порт не открыт");
|
||||
return false;
|
||||
}
|
||||
|
||||
}
|
||||
#endregion
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
22
Program.cs
Normal file
22
Program.cs
Normal file
@@ -0,0 +1,22 @@
|
||||
using System;
|
||||
using System.Collections.Generic;
|
||||
using System.Linq;
|
||||
using System.Threading.Tasks;
|
||||
using System.Windows.Forms;
|
||||
|
||||
namespace Gidrolock_Modbus_Scanner
|
||||
{
|
||||
internal static class Program
|
||||
{
|
||||
/// <summary>
|
||||
/// The main entry point for the application.
|
||||
/// </summary>
|
||||
[STAThread]
|
||||
static void Main()
|
||||
{
|
||||
Application.EnableVisualStyles();
|
||||
Application.SetCompatibleTextRenderingDefault(false);
|
||||
Application.Run(new App());
|
||||
}
|
||||
}
|
||||
}
|
||||
33
Properties/AssemblyInfo.cs
Normal file
33
Properties/AssemblyInfo.cs
Normal file
@@ -0,0 +1,33 @@
|
||||
using System.Reflection;
|
||||
using System.Runtime.CompilerServices;
|
||||
using System.Runtime.InteropServices;
|
||||
|
||||
// General Information about an assembly is controlled through the following
|
||||
// set of attributes. Change these attribute values to modify the information
|
||||
// associated with an assembly.
|
||||
[assembly: AssemblyTitle("Gidrolock Modbus Scanner")]
|
||||
[assembly: AssemblyDescription("")]
|
||||
[assembly: AssemblyConfiguration("")]
|
||||
[assembly: AssemblyCompany("")]
|
||||
[assembly: AssemblyProduct("Gidrolock Modbus Scanner")]
|
||||
[assembly: AssemblyCopyright("Copyright © 2024")]
|
||||
[assembly: AssemblyTrademark("")]
|
||||
[assembly: AssemblyCulture("")]
|
||||
|
||||
// Setting ComVisible to false makes the types in this assembly not visible
|
||||
// to COM components. If you need to access a type in this assembly from
|
||||
// COM, set the ComVisible attribute to true on that type.
|
||||
[assembly: ComVisible(false)]
|
||||
|
||||
// The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
[assembly: Guid("47a399d3-30c1-4ef4-9e94-f3518919a59c")]
|
||||
|
||||
// Version information for an assembly consists of the following four values:
|
||||
//
|
||||
// Major Version
|
||||
// Minor Version
|
||||
// Build Number
|
||||
// Revision
|
||||
//
|
||||
[assembly: AssemblyVersion("1.0.0.0")]
|
||||
[assembly: AssemblyFileVersion("1.0.0.0")]
|
||||
71
Properties/Resources.Designer.cs
generated
Normal file
71
Properties/Resources.Designer.cs
generated
Normal file
@@ -0,0 +1,71 @@
|
||||
//------------------------------------------------------------------------------
|
||||
// <auto-generated>
|
||||
// This code was generated by a tool.
|
||||
// Runtime Version:4.0.30319.42000
|
||||
//
|
||||
// Changes to this file may cause incorrect behavior and will be lost if
|
||||
// the code is regenerated.
|
||||
// </auto-generated>
|
||||
//------------------------------------------------------------------------------
|
||||
|
||||
namespace Gidrolock_Modbus_Scanner.Properties
|
||||
{
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// A strongly-typed resource class, for looking up localized strings, etc.
|
||||
/// </summary>
|
||||
// This class was auto-generated by the StronglyTypedResourceBuilder
|
||||
// class via a tool like ResGen or Visual Studio.
|
||||
// To add or remove a member, edit your .ResX file then rerun ResGen
|
||||
// with the /str option, or rebuild your VS project.
|
||||
[global::System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0")]
|
||||
[global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
|
||||
[global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
|
||||
internal class Resources
|
||||
{
|
||||
|
||||
private static global::System.Resources.ResourceManager resourceMan;
|
||||
|
||||
private static global::System.Globalization.CultureInfo resourceCulture;
|
||||
|
||||
[global::System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")]
|
||||
internal Resources()
|
||||
{
|
||||
}
|
||||
|
||||
/// <summary>
|
||||
/// Returns the cached ResourceManager instance used by this class.
|
||||
/// </summary>
|
||||
[global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
|
||||
internal static global::System.Resources.ResourceManager ResourceManager
|
||||
{
|
||||
get
|
||||
{
|
||||
if ((resourceMan == null))
|
||||
{
|
||||
global::System.Resources.ResourceManager temp = new global::System.Resources.ResourceManager("Gidrolock_Modbus_Scanner.Properties.Resources", typeof(Resources).Assembly);
|
||||
resourceMan = temp;
|
||||
}
|
||||
return resourceMan;
|
||||
}
|
||||
}
|
||||
|
||||
/// <summary>
|
||||
/// Overrides the current thread's CurrentUICulture property for all
|
||||
/// resource lookups using this strongly typed resource class.
|
||||
/// </summary>
|
||||
[global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
|
||||
internal static global::System.Globalization.CultureInfo Culture
|
||||
{
|
||||
get
|
||||
{
|
||||
return resourceCulture;
|
||||
}
|
||||
set
|
||||
{
|
||||
resourceCulture = value;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
117
Properties/Resources.resx
Normal file
117
Properties/Resources.resx
Normal file
@@ -0,0 +1,117 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
30
Properties/Settings.Designer.cs
generated
Normal file
30
Properties/Settings.Designer.cs
generated
Normal file
@@ -0,0 +1,30 @@
|
||||
//------------------------------------------------------------------------------
|
||||
// <auto-generated>
|
||||
// This code was generated by a tool.
|
||||
// Runtime Version:4.0.30319.42000
|
||||
//
|
||||
// Changes to this file may cause incorrect behavior and will be lost if
|
||||
// the code is regenerated.
|
||||
// </auto-generated>
|
||||
//------------------------------------------------------------------------------
|
||||
|
||||
namespace Gidrolock_Modbus_Scanner.Properties
|
||||
{
|
||||
|
||||
|
||||
[global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
|
||||
[global::System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0")]
|
||||
internal sealed partial class Settings : global::System.Configuration.ApplicationSettingsBase
|
||||
{
|
||||
|
||||
private static Settings defaultInstance = ((Settings)(global::System.Configuration.ApplicationSettingsBase.Synchronized(new Settings())));
|
||||
|
||||
public static Settings Default
|
||||
{
|
||||
get
|
||||
{
|
||||
return defaultInstance;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
7
Properties/Settings.settings
Normal file
7
Properties/Settings.settings
Normal file
@@ -0,0 +1,7 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)">
|
||||
<Profiles>
|
||||
<Profile Name="(Default)" />
|
||||
</Profiles>
|
||||
<Settings />
|
||||
</SettingsFile>
|
||||
10
Timeout.cs
Normal file
10
Timeout.cs
Normal file
@@ -0,0 +1,10 @@
|
||||
using System;
|
||||
using System.Collections.Generic;
|
||||
using System.Linq;
|
||||
using System.Text;
|
||||
using System.Threading.Tasks;
|
||||
|
||||
namespace Gidrolock_Modbus_Scanner
|
||||
{
|
||||
|
||||
}
|
||||
BIN
bin/Debug/Gidrolock Modbus Scanner v0.1.zip
Normal file
BIN
bin/Debug/Gidrolock Modbus Scanner v0.1.zip
Normal file
Binary file not shown.
Binary file not shown.
1
bin/Debug/Gidrolock Modbus Scanner v0.1/readme.txt
Normal file
1
bin/Debug/Gidrolock Modbus Scanner v0.1/readme.txt
Normal file
@@ -0,0 +1 @@
|
||||
Простой сканнер Modbus для устройств Gidrolock. При нажатии кнопки "Подключиться" запросит 128-ой Holding Register у устройства.
|
||||
BIN
bin/Debug/Gidrolock Modbus Scanner.exe
Normal file
BIN
bin/Debug/Gidrolock Modbus Scanner.exe
Normal file
Binary file not shown.
6
bin/Debug/Gidrolock Modbus Scanner.exe.config
Normal file
6
bin/Debug/Gidrolock Modbus Scanner.exe.config
Normal file
@@ -0,0 +1,6 @@
|
||||
<?xml version="1.0" encoding="utf-8" ?>
|
||||
<configuration>
|
||||
<startup>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8" />
|
||||
</startup>
|
||||
</configuration>
|
||||
BIN
bin/Debug/Gidrolock Modbus Scanner.pdb
Normal file
BIN
bin/Debug/Gidrolock Modbus Scanner.pdb
Normal file
Binary file not shown.
@@ -0,0 +1,4 @@
|
||||
// <autogenerated />
|
||||
using System;
|
||||
using System.Reflection;
|
||||
[assembly: global::System.Runtime.Versioning.TargetFrameworkAttribute(".NETFramework,Version=v4.8", FrameworkDisplayName = ".NET Framework 4.8")]
|
||||
BIN
obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache
Normal file
BIN
obj/Debug/DesignTimeResolveAssemblyReferencesInput.cache
Normal file
Binary file not shown.
Binary file not shown.
@@ -0,0 +1 @@
|
||||
115cbc9e39e475497a57d5163d81c77d23c17d5a6216414609e487b56921862f
|
||||
@@ -0,0 +1,10 @@
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\bin\Debug\Gidrolock Modbus Scanner.exe.config
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\bin\Debug\Gidrolock Modbus Scanner.exe
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\bin\Debug\Gidrolock Modbus Scanner.pdb
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock Modbus Scanner.csproj.AssemblyReference.cache
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock_Modbus_Scanner.App.resources
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock_Modbus_Scanner.Properties.Resources.resources
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock Modbus Scanner.csproj.GenerateResource.cache
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock Modbus Scanner.csproj.CoreCompileInputs.cache
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock Modbus Scanner.exe
|
||||
C:\Users\U3B8\Project\Desktop\Gidrolock Modbus Scanner\obj\Debug\Gidrolock Modbus Scanner.pdb
|
||||
BIN
obj/Debug/Gidrolock Modbus Scanner.csproj.GenerateResource.cache
Normal file
BIN
obj/Debug/Gidrolock Modbus Scanner.csproj.GenerateResource.cache
Normal file
Binary file not shown.
BIN
obj/Debug/Gidrolock Modbus Scanner.exe
Normal file
BIN
obj/Debug/Gidrolock Modbus Scanner.exe
Normal file
Binary file not shown.
BIN
obj/Debug/Gidrolock Modbus Scanner.pdb
Normal file
BIN
obj/Debug/Gidrolock Modbus Scanner.pdb
Normal file
Binary file not shown.
BIN
obj/Debug/Gidrolock_Modbus_Scanner.App.resources
Normal file
BIN
obj/Debug/Gidrolock_Modbus_Scanner.App.resources
Normal file
Binary file not shown.
Binary file not shown.
Reference in New Issue
Block a user