ВУЗ:
Составители:
Рубрика:
53
Рис. 11
Вывод результатов работы программы
Вывод на дисплей ЭВМ графика введенного сигнала (т. е. содержимо-
го массива d[i]) является тривиальной задачей. Главная особенность этой
процедуры будет состоять в том, чтобы предотвратить «вылезание» графи-
ка за пределы экрана. О том, как это сделать, рассказывалось в руководстве
к работе «Программирование ЦАП». Упрощенный текст этой
процедуры
представлен ниже:
procedure draw_gr;
var j:integer;
begin
j:=detect;
initgraph(j,j,'');
for i:=1 to n do putpixel(i,round(400.0-d[i] shr 6),white);
readkey;
end;
При n=500 график не выходит за горизонтальные пределы экрана при
масштабе по оси Х 1:1, поэтому в качестве координаты Х можно использо-
вать номер элемента в массиве (он обозначен i).
По оси Y график путем выполнения операции d[i] shr 6 (сдвиг вправо
на 6 бит) сжимается в 2
6
=64 раза.
ПОРЯДОК ВЫПОЛНЕНИЯ РАБОТЫ
П
РЕДВАРИТЕЛЬНАЯ ПОДГОТОВКА
1. Изучите основные операторы и принципы составления программ на
языке Паскаль, пользуясь соответствующей литературой.
Вход АЦП
оцифровка F(25)
ОЗУ АЦП
Магистраль КАМАК F(0)
Регистры контроллера СС-08
a:=port[$104]
ОЗУ ЭВМ b:=port[$105]
Страницы
- « первая
- ‹ предыдущая
- …
- 51
- 52
- 53
- 54
- 55
- …
- следующая ›
- последняя »