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

Размещено на http://www.allbest.ru/

ЛАБОРАТОРНАЯ РАБОТА №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_1(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 = "Ошибка при передаче!!!";

}

}

}

Вывод

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

Размещено на Allbest.ru