ник: snipe
Как вариант.....
вариант 1
переделайте функцию Remote()...
в конечном итоге она должна выдавать в тексте весь сигнал Data (т.е. в одном слове все 24 символа)......(в первых вариантах вашей проги я это видел - правда вы тогда там сигнал в поле собирали )
далее в функции LPT убрать описание массива, убрать цикл заполнения массива (убрать все что напоминает о массиве) - он там вообще не нужен
с формы убрать поля где прописывались биты сигнала Data (тоже не нужны)
теперь для начала некой переменной uio( String) присваиваем значение функции Remote()
в функции LPT вот эту строку
If asd(fgh) = "0" Then signalinteger = 1 Else signalinteger = 3
|
заменить примерно на вот это
If Mid(uio,fgh,1) = "0" Then signalinteger = 1 Else signalinteger = 3
|
возможно что вот на это
If Mid(uio,25-fgh,1) = "0" Then signalinteger = 1 Else signalinteger = 3
|
вариант 2
тоже самое переделать функцию Remote()
в цикле заполнения массива обращайтесь не к полю, а к переменной uio (см.выше) выдергивая по биту
примерно так
или вот так
ну соответственно поля на форме придется убрать-они не нужны
в обоих вариантах дано по две строчки кода по причине того что я не знаю что у вас получится, т.е не знаю в какой последовательности нужно выдергивать символы слево-направо или справа-налево
По моему мышлению во втором варианте будет более четкий сигнал, но это только догадки