C Control PRO-BOT128 + C-Control PRO 128 Unit + Voltcraft® USB programming cable Kit 190406 User Manual
Product codes
190406
172
Bibliotheken
© 2008 Conrad Electronic
}
OneWire_Write(
0xcc
);
// ROM überspringen Kommando
OneWire_Write(
0x44
);
// starte Temperatur Messung Kommando
AbsDelay(
3000
);
OneWire_Reset(
7
);
// PortA.7
OneWire_Write(
0xcc
);
// ROM überspringen
OneWire_Write(
0xbe
);
// lese scratch_pad Kommando
for(i=
0
;i<
9
;i++)
// komplettes scratchpad lesen
{
scratch_pad[i]= OneWire_Read();
Msg_WriteHex(scratch_pad[i]);
}
Msg_WriteChar(
'\r'
);
text=
"Temperatur: "
;
Msg_WriteText(text);
temp= scratch_pad[
1
]*
256
+ scratch_pad[
0
];
Msg_WriteFloat(temp*
0
.
5
);
Msg_WriteChar(
'C'
);
Msg_WriteChar(
'\r'
);
end:
}
BASIC
' Beispielprogramm um den DS18S20 Temperatur Sensor von Dallas Maxim zu lesen
Dim Text(40) As Char
Dim ret,i As Integer
Dim temp As Integer
Dim rom_code(8) As Byte
Dim scratch_pad(9) As Byte
Sub main()
ret = OneWire_Reset(7)
' PortA.7
If ret = 0 Then
Text= "Kein Sensor gefunden"
Msg_WriteText(Text)
GoTo Ende
End If
OneWire_Write(0xcc)
' ROM überspringen Kommando
OneWire_Write(0x44)
' starte Temperatur Messung Kommando
AbsDelay(3000)