Campbell TDR Dokumentacja Pobierz pdf (Strona 23)

Appendix B. Correcting Electrical Conductivity Measurements for System Losses

if Shorted=high then

TDR

For I=1 To 20

vector(I)=wave(I+9)

AvgSpa (rho(2),20,vector(1))

Shorted=low

endif

'write results to output storage

If WriteToOutput=high Then

CallTable rhoTable

WriteToOutput=low

EndIf

'setting SDMports high will configure control ports 1 thru 3 to allow connection

'of TDR100 to PC using PCTDR

If SDMports=high Then

PortsConfig (&B00000111,&B00000000)

SDMports=low

EndIf

NextScan

EndProg

B-5

1 2 ... 18 19 20 21 22 23 24 25 26

Brak uwag

Campbell TDR Dokumentacja Strona 23