Главная страница | Контакты | Случайная страница Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Пример выполнения программы

Для проведения тестирования программы было взято следующее оборудование – роутер ASUS WL500G:

§ мощность передатчика – 18 дБмВт;

§ мощность антенны – 5 дБи.

Мощность приемной антенны – 5 дБи.

В качестве рабочей частоты был выбран 12 канал с F = 2467 МГц, скорость 54 Mбит/с при которой чувствительность –66 дБмВт.

Потери сигнала в коаксиальном кабеле и разъемах передающего тракта – 1 дБ.

Потери сигнала в коаксиальном кабеле и разъемах приемного тракта – 1 дБ.

Запас в энергетике радиосвязи – 10 дБ.

Найдем суммарное усиление системы:

Y_дБ = P_{t, дБмВт} + G_{t, дБи} + G_{r, дБи} – P_{min, дБмВт} – L_{t, дБ} – L_{r, дБ} = 18 + 5 + 5 + 66 – 1 – 1 = 92 дБ.

FSL = Y_дБ – SOM = 92 – 10 = 82 дБ.

Дальности связи:

.

Дальность действия Wi–Fi сигнала в нашем случае будет равна 114 метрам. Запустив программу с приведенными данными, получим:

Рис. 11. Результат выполнения программы

Как видим он в точности совпал с результатами ручного счета.

Заключение

В данной работе был рассмотрен вопрос о беспроводной технологии Wi–Fi. Все аспекты, касающиеся данной темы нельзя описать в рамках работы, но основные моменты были описаны.

По материалам теоретической части мной была разработана программа на языке Visual Basic для расчета дальности действия Wi–Fi сигнала.

Нельзя не сказать, что технология Wi–Fi преследует в будущем несколько нереальные для нас пока цели. Т.е. для нашего понимания трудно представить, что когда–нибудь возможно будет, просто гуляя по городу, воспользоваться беспроводным выходом в Интернет. Не стоит также забывать о том, что беспроводная технология и технологии спутниковой передачи информации и мобильной связи это разные вещи. Также очень важно понимать, что к тому моменту, когда мы сможем в полной мере ощутить все достоинства данной технологии, в нее может быть внедрено еще много нового и полезного.

Несомненно, за технологией Wi–Fi будущее. Wi–Fi технологии становятся все более совершенными и качество их соединения и безопасность стремительно приближается к возможностям обычного, широко используемого, проводного соединения.

Список использованной литературы

1. Браун С. Visual Basic 6.0 с самого начала. –М.: Питер, 2000. –336 с.

2. Вишневский В.М., Ляхов А.И., Портной С.Л., Шахнович И.В. Широкополосные беспроводные сети передачи информации. –М.: Техносфера, 2005. −592 с.

3. Глушаков С.В. Программирование на Visual Basic 6.0 / С.В. Глушаков, С.А. Сурядный. –М.: ООО «Издательство АСТ»; Харьков: «Фолио», 2003. –497 с.

4. Компьютерные сети. Принципы, технологии, протоколы: Учебник для вузов. /В.Г. Олифер, Н.А. Олифер. –Спб.: Питер, 2003. – 864 с.

5. Максимов Н.В., Попов П.И. Компьютерные сети: Учебное пособие. –М.: Форум: Инфра – М, 2004. – 336 с.

6. Педжман Рошан, Джонатан Лиэри. Основы построения беспроводных локальных сетей стандарта 802.11. Практическое руководство по изучению, разработке и использованию беспроводных ЛВС стандарта 802.11. –М.: Вильямс, 2010. –671 с.

7. Столлингс В. Беспроводные линии связи и сети. Пер. с англ. −М.: Издательский дом «Вильямc», 2011. −653 с.

8. Шахнович И. Современные технологии беспроводной связи. −М.: Техносфера, 2010. −493 с.

9. http://www.citforum.ru/hardware/mobile/city/index.shtml

10. http://www.cnts–net.ru/stati/statia18.dhtml

Приложение. Листинг программы

Option Explicit

Private Sub cmdRaschet_Click()

'расчет дальности действия канала связи

Dim Ydb As Double 'суммарное усиление системы

Dim Pt As Double 'мощность передатчика

Dim Gt As Double 'коэффициент усиления передающей антенны

Dim Gr As Double 'коэффициент усиления приемной антенны

Dim Pmin() 'чувствительность приемника на данной скорости

Dim Lt As Double 'потери сигнала в коаксиальном кабеле и разъемах передающего тракта

Dim Lr As Double 'потери сигнала в коаксиальном кабеле и разъемах приемного тракта

Dim FSL As Double 'потери в свободном пространстве

Dim SOM As Double 'запас в энергетике радиосвязи

Dim F() 'центральная частота канала

Dim D As Double 'дальность связи

Pmin = Array(–66, –71, –76, –80, –83, –85, –86, –87) 'инициализация массивов

F = Array(2412, 2417, 2422, 2427, 2432, 2437, 2442, 2447, 2452, 2457, 2462, 2467, 2472, 2484)

Pt = CDbl(Text1.Text) 'чтение данных из полей ввода

Gt = CDbl(Text2.Text)

Gr = CDbl(Text3.Text)

Lt = CDbl(Text4.Text)

Lr = CDbl(Text5.Text)

SOM = CDbl(Text6.Text)

List3.Clear 'очистка списка вывода

Ydb = Pt + Gt + Gr – Pmin(List1.ListIndex) – Lt – Lr 'расчет

FSL = Ydb – SOM

D = 10# ^ (FSL / 20 – 33 / 20 – Log(F(List2.ListIndex)) / Log(10))

'вывод решения

List3.AddItem («Суммарное усиление системы») 'добаляем данные

List3.AddItem («Ydb=«+ Format(Ydb, «0 дБ»))

List3.AddItem («Потери в свободном пространстве») 'добаляем данные

List3.AddItem («FSL=«+ Format(FSL, «0 дБ»))

List3.AddItem («Дальность связи») 'добаляем данные

List3.AddItem («D=«+ Format(D, «0.000 км») + «=«+ Format(1000 * D, «0 м»))

End Sub

Private Sub Combo1_Click()

'изменение списка оборудования

Dim mp() 'массив мощностей передатчиков

Dim ma() 'массив мощностей антенн

mp = Array(18, 17, 19.5, 18, 15, 16, 20, 19, 17, 14, 10, 0) 'зполнили массивы

ma = Array(5, 5, 6, 5, 4, 5, 7, 6, 5, 3, 2, 0)

Text1.Text = Format(mp(Combo1.ListIndex)) 'вывод параметров передатчика в строки ввода

Text2.Text = Format(ma(Combo1.ListIndex))

End Sub

Private Sub Form_Load()

'инициализация списков

Dim i As Integer 'счетчик

List1.Clear 'очистка списка скоростей

List1.AddItem («54») 'добаляем данные

List1.AddItem («48»)

List1.AddItem («36»)

List1.AddItem («24»)

List1.AddItem («18»)

List1.AddItem («12»)

List1.AddItem («9»)

List1.AddItem («6»)

List1.ListIndex = 0

List2.Clear 'очистка списка каналов

For i = 1 To 14

List2.AddItem (i) 'добаляем данные

Next

List2.ListIndex = 0

Combo1.Clear 'очистка списка оборудования

Combo1.AddItem («ASUS WL500G»)

Combo1.AddItem («ZyXEL P–660HN Lite EE»)

Combo1.AddItem («ASUS RT–N16»)

Combo1.AddItem («ASUS RT–N65U»)

Combo1.AddItem («TP–LINK TL–WR720N»)

Combo1.AddItem («ASUS RT–N14U»)

Combo1.AddItem («TP–LINK TL–MR3220»)

Combo1.AddItem («D–Link DIR–140L»)

Combo1.AddItem («D–link DIR–815»)

Combo1.AddItem («D–link DIR–632»)

Combo1.AddItem («TP–LINK TL–WR741ND»)

Combo1.AddItem («другой»)

Combo1.ListIndex = 0

End Sub

[1] 5 МГц между центральными частотами соседних каналов, исключая 14–й

[2] Каждый канал занимает полосу частот 20 МГц, поэтому в этом диапазоне невозможна одновременная работа более чем 3–х каналов без взаимного перекрытия