Logo GenDocs.ru


Поиск по сайту:  


Лабораторная работа №1 - файл Лаба ТСА.doc


Лабораторная работа №1
скачать (5.6 kb.)

Доступные файлы (1):

Лаба ТСА.doc35kb.09.04.2006 16:14скачать

содержание

Лаба ТСА.doc

Реклама MarketGid:
Уфимский Государственный Авиационный технический Университет


Кафедра АТС


Лабораторная работа по дисциплине:

«Технические средства автоматизации»

На тему:

«Сопряжение ПЭВМ IBM PC с информационно-измерительными устройствами систем управления»


Выполнил:

Проверил: Никитин Ю.А.


Уфа-2006


Цель работы:

Лабораторная работа выполняется с целью изучения схемотехники аппаратных средств сопряжения ПЭВМ IBM PC XT/AT с ИИУ систем управления и сбора данных и приобретения практических навыков по программированию изучаемого устройства сопряжения.


^ Задание: запрограммировать АЦП.

Диапазон напряжения: 2 В [-2В...2В].

Погрешность: 0,5 %.

Необходимо использовать 3 и 7 каналы.

Алгоритм:






Установка канала 0 таймера в режим одновибратора









Запуск

АЦП



Управление аттенюатором



Работа

АЦП

























Текст программы:

PROGRAM lab;

USES crt;

VAR x,k,u,p:integer;

s:string;

LABEL 1;

FUNCTION bin(d:integer):string;

var i,l:integer;

st,stp:string;

begin

stp:='';

for i:= 1 to 8 do

begin

l:=d mod 2;

str(l,st);

insert(st,stp,0);

d:=d div 2;

end;

bin:=stp;

end;

BEGIN

port[$303]:=$38;

1: for u:=-2 to 2 do

begin

p:=port[$318];

if (|u|>0) and (|u|<0.16) then port[$300]:=$04;

if (|u|>0.16) and (|u|<0.32) then port[$300]:=$08;

if (|u|>0.32) and (|u|<0.64) then port[$300]:=$10;

if (|u|>0.64) and (|u|<1.28) then port[$300]:=$20;

if (|u|>1.28) and (|u|<2.56) then port[$300]:=$40;

if (|u|>2.56) and (|u|<5.12) then port[$300]:=$80;

x:=port[$309];

s:=bin(x); s:=s[5];

if s:=’0’ then goto 1;

end;

END.


Вывод:

В ходе лабораторной работы с целью изучения схемотехники аппаратных средств сопряжения ПЭВМ IBM PC XT/AT с ИИУ систем управления и сбора данных и приобретения практических навыков по программированию, было запрограммировано устройство АЦП.
Реклама:





Скачать файл (5.6 kb.)

Поиск по сайту:  

© gendocs.ru
При копировании укажите ссылку.
обратиться к администрации
Рейтинг@Mail.ru