|
4.14) потребует определенной аккуратности, так как использование оптронов слегка ухудшает характеристики устройства в 12-разрядном режиме.
Из сказанного можно сделать вывод, что с АЦП LTC 1286 или ADS 1286 будут работать программы 12-B1TS.BAS и 12-BITS.PAS,c учетом того, что для связи с ПК используется последовательный порт СОМ1 (адрес 3F8h в строке 30).
10 REM----12BITS----
20 KEY OFF:CLS
30 B=&H3F8 :REM 00M1:
40 N=12: REM число разрядов
50 OUT B+4, 1
60 FOR T= 0 To 100: NEXT T
70 OUT B+3,64
60 FOR T=0 TO 500: NEXT T
90 GOTO 200
100 OUT B+4, 0 : D=0: REM ACQUISITION
102 OUT B+4, 2 :OUT B+4, 0
103 OUTB+4, 2:OUTB+4, 0
104 OUTB+4, 2:OUTB+4, 0
110 FOR F=0 TO N-1
120 OUT B+4, 2
130 E=INP(B+6} AND 16
140 OUT B+4, 0
150 IF E=16 THEN D=D+2^(N-1-F)
160 NEXT F
170 D=5*D/(2^N-1)
180 OUT B+4, 1: RETURN
190 REM (c)1997 Patrick GUEULLE
program douzebits; uses crt; var n,f,e:byte;
b,g:integer;
d:real; procedure init; begin
b:=$3F8; n:=12; port[b+4]:=1 ; delay(100); port[b+3]:=64; delay (500); end;
procedure acquisition; begin
port [b+4]:=0; d:=0; port[b+4]:=2;port[b+4]:=2; port[b+4]:=2;port[b+4]:=0;
|
|||||
| |||||