Перейти к содержанию
Авторизация  
111

Давление, температура, частота вращения -вывод информации на компьютер.

Рекомендуемые сообщения

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

 

для проведения испытаний двигателя необходимо организовать ввод и отображение на экране компьютера информации о давлении, температуре и частоте вращения.

 

С вводом информации о частоте вращения особых проблем нет, если в качестве датчика использовать цифровой датчик хола для шестерёнок

 

Посоветуйте,

1. как завести информацию о температуре с аналогового датчика температуры ТМ106 (системы охлаждения ВАЗовского движка) в USB порт компьютера??? Прошу конкретную принципиальную схему преобразователя для конкретного датчика.

2. Что можно использовать в качестве датчика давления масла, воздуха и схема преобразования для выше указанной цели???

3. Прошу принципиальную схему для организации ввода-вывода многопоточной цифровой информации в USB порт и обратно.

 

Может кто сможет помочь в этом вопросе???

Поделиться сообщением


Ссылка на сообщение

Мои познания в области программирования ограничены только этим:

 

http://www.sciteclibrary.ru/rus/catalog/pages/9453.html

(ввывод из компьютера через порт LPT на 2 лазера инфы)

 

Но мне нужно организовать ввод-вывод через USB порт (для ноутбука)!!!

Поделиться сообщением


Ссылка на сообщение

Купите USB самописец и будет Вам счастье.

Поделиться сообщением


Ссылка на сообщение
1. как завести информацию о температуре с аналогового датчика температуры ТМ106 (системы охлаждения ВАЗовского движка) в USB порт компьютера??? Прошу конкретную принципиальную схему преобразователя для конкретного датчика.

поскольку у нас не страна принципиальных схем, а страна советов...

 

такое Вам не поможет?

правда через эзернет. есть и более дешевые температурные одноканальные. думаю, что заменить датчик несложно

Поделиться сообщением


Ссылка на сообщение

Чего-то мне это напоминает...Типа отлить медаль за 100рублей или чего-то подобное.

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

Если подобный комплекс заказывать у тех ,кто этим занимается,то это обойдется в несколько тысяч евров.А тут вынь да полож...Можно дать совет,но готовые схемы придется искать самому...

Но ... у современного ВАЗа есть диагностический разъем через который вся информация выводится на компьютер.

Если же задается подобный вопрос,то по всей видимости речь идет о древнем ВАЗе.

Поделиться сообщением


Ссылка на сообщение

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

Поделиться сообщением


Ссылка на сообщение

Вы правы - Чего-то мне это напоминает...Типа отлить медаль за 100рублей или чего-то подобное. Самый дешёвый многопоточный USB самописец стоит около 10 тыс рублей (!!!!!!!!!!).

 

Конкретизирую:

 

нужно, как на примере LPT порта (выше приведена ссылка на мою программу одновременного управления двумя лазерами. Программа и схема подключения примитивные, любой, кто дружит с паяльником и компьютером - разберётся ) снимать в реальном масштабе времени информацию от нескольких датчиков, только через последовательный USB порт (компьютер с места на место проблематично перетаскивать, ноутбук - без проблем.

Есть книжка по программированию LPT и USB портов: Магадан Ф.С. Компьютер в домашней лаборатории.

Там есть примеры программ и схемы подключения датчиков только к LPT порту - почти то, что надо, а вот "железа" - простенькой схемы сопряжения многопоточных паралелиных данных в USB порт к сожалению нет.

Может у кого какая литература по этому поводу есть???

Поделиться сообщением


Ссылка на сообщение
нужно, как на примере LPT порта (выше приведена ссылка на мою программу одновременного управления двумя лазерами. Программа и схема подключения примитивные, любой, кто дружит с паяльником и компьютером - разберётся ) снимать в реальном масштабе времени информацию от нескольких датчиков, только через последовательный USB порт (компьютер с места на место проблематично перетаскивать, ноутбук - без проблем.

Если вся проблема в таскании компьютера. Можно просто купить к лэптопу контроллер типа такого http://shop.key.ru/shop/goods/86840/, чтобы Ваши наработки и опыт работы с ним не пропадал зря.

Поделиться сообщением


Ссылка на сообщение

Благодарю за отличную идею,

почему она мне сама в лолову не пришла, наверное старею.

 

И переделывать ничего не надо!!!

Поделиться сообщением


Ссылка на сообщение

http://ru.wikipedia.org/wiki/Arduino

 

обязательно прочитайте !!!вещица занятная

при самостоятельном изготовлении обойдеться рублей в 200

 

 

програмировать ее ну очень просто!

Изменено пользователем Ton87

Поделиться сообщением


Ссылка на сообщение

Arduino Mini - заманчивая вещь , Вы с ней работали???

Поделиться сообщением


Ссылка на сообщение

http://arduino.cc/en/Main/ArduinoBoardSerialSingleSided3

 

собрал прошил

 

залил прогу вольтметр, написал прогу для компа заработало!

точность как у китайского мультиметра(ни хорошо ни плохо ! просто с ним сравнивал))

потом времени не было да и сейчас с ним напряженка

 

вообще посмотрите тут http://www.compcar.ru/forum/forumdisplay.php?f=57

у ребят хорошие проекты и поспрашать ежели что можно!

Поделиться сообщением


Ссылка на сообщение

Измерительный комплекс.

 

Позволяет выводить на экран компьютера в реальном масштабе времени информацию с цифровых и аналоговых датчиков двигателя (частота вращения, температуры, давления), с одновременной записью информации в электронной таблице.

Программное обеспечение:

1. на DELPHI c подпрограммой на ASSEMLER,

2. драйвер снятия защиты WINDOWS с LPT – PortTalk

 

В WINDOWS XP прямое программирование порта LPT невозможно, поэтому необходимо использовать драйвер, основная функция которого – снять защиту с порта LPT. Для этого необходимо следующее:

1. Скачиваем с любого сайта бесплатно распространяемую программу PortTalk

2. Копируем в каталог программы измерительного комплекса файлы драйвера – porttalk.sys и allowio.exe

3. Создаём новый текстовый файл - *.txt и записываем в него следующие команды:

 

@echo off

Allowio 0x378 0x379 Project1.exe

 

4. Сохраняем файл в каталоге программы измерительного комплекса под именем start.bat . Это будет запускающая программа измерительного комплекса. Project1.exe в запускающем файле start.bat - имя запускающего файла на DELPHI.

При компиляции программы на DELPHI не запускайте программу непосредственно через *.exe файл (например Project1.exe). DELPHI выдаст ошибку и это правильно, т.к защита с порта LPT не снята, поэтому измерительный комплекс нужно запускать только через START.BAT

 

5. Текст программы: (кидаем на форму 2-е кнопки, 2 окна ввода информации, таймер и метки)

 

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, ExtCtrls, comobj;

type

TForm1 = class(TForm)

Button1: TButton;

Edit1: TEdit;

Timer1: TTimer;

Button2: TButton;

Edit2: TEdit;

Label1: TLabel;

Label2: TLabel;

procedure Timer1Timer(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure FormDestroy(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

type

TThread1 = class(TThread)

public

procedure Execute; override;

end;

var

Form1: TForm1;

binResult: Word;

total: Real;

Thread1: TThread1;

Done: Byte;

cnt: Integer;

freq: Real;

Stop: Word;

XLApp: OleVariant;

i1:Integer;

implementation

{$R *.dfm}

procedure TThread1.Execute;

begin

sleep(1000);

Done:=1;

end;

procedure TForm1.Timer1Timer(Sender: TObject);

const

DATA = #$378;

STATUS = #$379;

begin

cnt:=0;

Done:=0;

asm

push EBX

mov DX, DATA

xor AX, AX

btr AX, 6

out DX, AL

mov BX, 8

@next:

xor AX, AX

mov DX, DATA

btr AX, 5

out DX, AL

bts AX, 5

out DX, AL

mov DX, STATUS

in AL, DX

bt AX, 6

rcl CX, 1

dec BX

jnz @next

mov DX, DATA

bts AX, 6

out DX, AL

pop EBX

and CX, 00FFh

mov word ptr binResult, CX

end;

total:=binResult*5/256;

Edit1.Text:= FloatToStr(total);

XLApp.ActiveSheet.cells.item[i1,1].value:=total;

Inc(i1);

Thread1:= TThread1.Create(False);

asm

clc

mov DX, 379h

@wait_1:

in AL, DX

bt AX, 7

jnc @wait_1

//

@wait_0:

in AL, DX

bt AX, 7

jc @wait_0

inc dword ptr cnt

cmp byte ptr Done, 1

jne @wait_1

end;

Thread1.Terminate();

freq:= cnt / 1000;

Edit2.Text:= FloatToStr(freq);

XLApp.ActiveSheet.cells.item[i1,2].value:=freq;

Inc(i1);

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Button1.Enabled:= false;

Button2.Enabled:= true;

timer1.Enabled:= true;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Button1.Enabled:= true;

Button2.Enabled:= false;

timer1.Enabled:= false;

end;

procedure TForm1.FormCreate(Sender: TObject);

begin

timer1.Enabled:=false;

Button1.Enabled:= true;

Button2.Enabled:= false;

XLApp:= CreateOleObject('Excel.Application');

XLApp.Workbooks.Add;

XLApp.Visible:= True;

i1:=1;

end;

procedure TForm1.FormDestroy(Sender: TObject);

begin

if not VarIsEmpty(XLApp) then

begin

XLApp.DisplayAlerts:= False; // Discard unsaved files...

XLApp.Quit;

end;

end;

end.

post-3657-1267160457_thumb.jpg

post-3657-1267160509_thumb.jpg

Поделиться сообщением


Ссылка на сообщение

Для публикации сообщений создайте учётную запись или авторизуйтесь

Вы должны быть пользователем, чтобы оставить комментарий

Создать учетную запись

Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!

Регистрация нового пользователя

Войти

Уже есть аккаунт? Войти в систему.

Войти
Авторизация  

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу


×
×
  • Создать...

Важная информация

Мы разместили cookie-файлы на ваше устройство, чтобы помочь сделать этот сайт лучше. Вы можете изменить свои настройки cookie-файлов, или продолжить без изменения настроек.