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

[Meby]

Подскажите как подситать контрольную суму на VB.NET, заранее благодарен...

[Дмитрий Егоренков]

как-то так:

Function owenCRC16(ByVal buffer As Byte()) As UInt16

        Dim crc As UInt16

        Dim i As Integer
        For i = 0 To buffer.Length - 1

            Dim b As Byte = buffer(i)

            Dim j As Integer
            For j = 1 To 8
                If (0 <> ((b Xor (crc >> 8)) And &H80)) Then
                    crc <<= 1
                    crc = crc Xor &H8F57
                Else
                    crc <<= 1
                End If

                b <<= 1
            Next
        Next

        owenCRC16 = crc

    End Function

[maks]

Добрый день!

Сбросьте мне, пожалуйста, примеры программирования приборов ТРМ201 и МДВВ для delphi

очень надо!!!!
Моя почта: maks1515@gmail.com

[maks]

Добрый день!

Сбросьте мне, пожалуйста, примеры программирования приборов ТРМ201, и МДВВ для delphi.

Моя почта: maks1515@gmail.com

[Дмитрий Егоренков]

примеры есть в составе библиотеки. работа с приборами ТРМ201 и МДВВ ничем не отличается от работы с другими приборами.

функции для работы с конкретными параметрами каждого прибора можно посмотреть в файле tags.txt.

[maks]

Спасибо, уже разобрался....

[Wiz]

Доброго времени суток!

Киньте пример опроса МВА8 через АС3
интересует Delphi 7.

Заранее благодарен.
spider_80@rambler.ru

[Paul Clever]

Здравствуйте!

Мне бы хотелось узнать, что конкретно означает каждый параметр в tags.txt. Например, при работе с прибором МВА-8 для считывания температуры используется функция ReadIEEE32 с параметром rEAd. А что используется для записи?

Заранее спасибо, с уважением Павел.(zpa14@mail.ru)

[Малышев Олег]

Вообще то, записать в параметер возможно функцией WriteNNN, а узнать какой параметр нужно записать для изменения режима работы можно из РЭ и паспорта прибора.

[Дмитрий Егоренков]

ничего не используется. этот параметр только для чтения. назначение параметров описано в руководстве по эксплуатации прибора либо в списке программируемых параметров, доступном здесь - http://www.owen.ru/support/40691149