Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 04.09.2013, 10:14   #11
_Night_Scream_
 
Регистрация: 08.11.2012
Сообщений: 7
Репутация: 8
По умолчанию

Не подскажете почему не работает с массивом в 20 байт.
Не правильно расcчитывается FCS.
Что то нужно менять?

Код:
 
var y: byte;
begin
aAvtorise[0]:=$FD;
aAvtorise[1]:=RANDOM(200);
aAvtorise[2]:=$50;                     
aAvtorise[3]:=$02;                      
aAvtorise[4]:=$00;    
aAvtorise[5]:=$ff;
aAvtorise[6]:=$00;
aAvtorise[7]:=$ff;
aAvtorise[8]:=$00;
aAvtorise[9]:=$ff;
aAvtorise[10]:=$00;
aAvtorise[11]:=$ff;
aAvtorise[12]:=$00;
aAvtorise[13]:=$ff;
aAvtorise[14]:=$00;
aAvtorise[15]:=$ff;
aAvtorise[16]:=$00;
FCS := $FFFF;
  for y := 1 to SizeOf(aAvtorise) - SizeOf(FCS) - 2 do
    X_FCS(aAvtorise[y]);
fcs:=not fcs;
aAvtorise[17]:=lo(FCS);
aAvtorise[18]:=hi(FCS);
aAvtorise[19]:=$fe;
_Night_Scream_ вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как у Frame сделать закругленные края? pavellyba Общие вопросы Delphi 1 16.04.2011 03:13
Как научить программу создавать несколько Frame? pavellyba Общие вопросы Delphi 3 05.04.2011 00:18
Как рассчитать возраст sql запрос slai БД в Delphi 5 28.09.2010 11:02
Как рассчитать периметр фигуры Kuzia Microsoft Office Excel 4 24.12.2009 08:51
Как рассчитать значения в табеле? fs444 Microsoft Office Excel 2 16.11.2009 14:10


09:45.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.