Первые два модуля уже известны, а в качестве третьего может быть использована либо программа CDIRECT.BAS (с экраном CGA), либо VDIRECT.BAS (с экраном VGA).

85 GOSUB 300
200 REM ----CDIRECT----
210 GOSUB 100:PSET(0,0)
220 FOR G=1 TO 639
230 GOSUB 100
240 Y=D:GOSUB 500
250 FOR T=0 TO 2000:NEXT T:REM развертка
260 NEXT G
270 END
415 X=0:RETURN
500 Y=199-INT(Y*199/5)
510 LINE -(X,Y)
520 X=X+1
530 RETURN
540 REM (c)1997 Patrick GUEULLE
85 GOSUB 300
200 REM ----VDIRECT----
210 GOSUB 100:PSET(0,0)
220 FOR G=1 TO 639
230 GOSUB 100
240 Y=D:GOSUB 500
250 FOR T=0 TO 2000:NEXT T:REM развертка
260 NEXT G
270 END
415 X=0:RETURN
500 Y=349-INT(Y*349/5)
510 LINE -(X,Y)
520 X=X+1
530 RETURN
540 REM (c)1997 Patrick GUEULLE

Потребуются следующие команды:

LOAD "MAXIM10" (загрузка драйвера для MAX 1243);

MERGE "VGA" (добавление драйвера для экрана VGA);

MERGE "VDIRECT" (добавление модуля осциллографа VGA).

На рис. 5.13 приведена полученная таким образом осциллограмма синусоидального сигнала с амплитудой 1 В и частотой 4 Гц на выходе функционального генератора, выполненного на базе широко распространенной микросхемы МАХ038. В данном случае 10-разрядный АЦП работал с ПК модели 486/133 МГц с экраном VGA.

Рис. 5.13, Осциллограмма, полученная в режиме VGA.

Чтобы приспособить осциллограф к той или иной практической задаче, в программу достаточно внести минимальные изменения. Для получения непрерывной развертки без очистки экрана (режим длительного послесвечения) следует исправить строку 270:

Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32

Измеритильные приборы, 2010