Преобразование и кодирование информации. 
Код Хемминга

ЛАБОРАТОРНАЯ РАБОТА № 2

Преобразование и кодирование информации. Код Хемминга

Цель работы: изучить метод преобразования и кодирования информации «код Хемминга», используемый для передачи данных по физическим каналам вычислительных сетей и телекоммуникаций.

Задание: разработать и реализовать диалоговую программу, формирующую сообщение в виде классического кода Хемминга (7,4). Смоделировать ситуацию возникновения ошибки в коде при передачи, проанализировать полученный код при приеме.

Ход работы:

1. На рис. 1 изображено окно рабочей программы. Программа моделирует работу передатчика сообщения -> модулятора -> демодулятора -> приемника сообщения. При передаче сообщения может произойти ошибка, в случае которой, по результатом сравнения синдрома кода, выводится сообщение о неверной передаче сообщения.

Рисунок 1

код хемминг кодирование информация

2. Листинг программы

using System;

using System.Collections.Generic;

using System. ComponentModel;

using System. Data;

using System. Drawing;

using System. Linq;

using System. Text;

using System.Windows.Forms;

namespace SETI_LABA1

{

public partial class Form1: Form

{

public bool AddMod2(bool a, bool b)

{

if (a ≠ b) return true;

else return false;

}

public string ToStr (bool a)

{

if (a == true) return «1» ;

else return «0» ;

}

public bool ToBool (int a)

{

if (a == 1) return true;

else return false;

}

public bool ToBool (string a)

{

if (a == «1») return true;

else return false;

}

public string Invert (string a)

{

if (a == «1») return «0» ;

else return «1» ;

}

public Form1()

{

InitializeComponent ();

}

private void button1_Click (object sender, EventArgs e)

{

}

private void button1_Click₁(object sender, EventArgs e)

{

textBox12.Text = textBox1. Text;

textBox11.Text = textBox2. Text;

textBox10.Text = textBox3. Text;

textBox9.Text = textBox4. Text;

textBox16.Text = ToStr (AddMod2(AddMod2(ToBool (textBox1.Text), ToBool (textBox2.Text)), ToBool (textBox3.Text)));

textBox15.Text = ToStr (AddMod2(AddMod2(ToBool (textBox2.Text), ToBool (textBox3.Text)), ToBool (textBox4.Text)));

textBox14.Text = ToStr (AddMod2(AddMod2(ToBool (textBox1.Text), ToBool (textBox2.Text)), ToBool (textBox4.Text)));

textBox22.Text = textBox12. Text;

textBox21.Text = textBox11. Text;

textBox20.Text = textBox10. Text;

textBox19.Text = textBox9. Text;

Random r = new Random ();

if (r.Next (2) == 0)

{

int rand = r. Next (5);

if (rand == 0) textBox22. Text = Invert (textBox22.Text);

else if (rand == 1) textBox21. Text = Invert (textBox21.Text);

else if (rand == 2) textBox20. Text = Invert (textBox20.Text);

else if (rand == 3) textBox19. Text = Invert (textBox19.Text);

}

textBox18.Text = ToStr (AddMod2(AddMod2(AddMod2(ToBool (textBox22.Text), ToBool (textBox21.Text)), ToBool (textBox20.Text)), ToBool (textBox16.Text)));

textBox17.Text = ToStr (AddMod2(AddMod2(AddMod2(ToBool (textBox21.Text), ToBool (textBox20.Text)), ToBool (textBox19.Text)), ToBool (textBox15.Text)));

textBox13.Text = ToStr (AddMod2(AddMod2(AddMod2(ToBool (textBox22.Text), ToBool (textBox21.Text)), ToBool (textBox19.Text)), ToBool (textBox14.Text)));

textBox8.Text = textBox22. Text;

textBox7.Text = textBox21. Text;

textBox6.Text = textBox20. Text;

textBox5.Text = textBox19. Text;

if (textBox18.Text == «0» && textBox17. Text == «0» && textBox13. Text == «0») label1. Text = «Сообщение передано верно» ;

else label1. Text = «Ошибка при передаче!!!» ;

}

}

}

Вывод В ходе проделанной работы мы изучили метод преобразования и кодирования информации «код Хемминга», используемый для передачи данных по физическим каналам вычислительных сетей и телекоммуникаций.