سوال در دستورات برنامه بیسیک سنسور دمای DS18B20

[امیر مسعود مقدم]

سلام دوستان
من تا به حال با پروتکل تک سیمه کار نکردم واسه همین ستوراتش واسم مبهمه اگه میتونید یکم شفاف سازی کنید واسم چند خط اصل این برنامه رو که جلوش علامت سوال گذاشتم .ممنونم

Cls

Config 1wire = Porta.0


Dim Temperature As String * 6
Dim Buffer As Integer


Deflcdchar 0 , 232 , 244 , 232 , 227 , 228 , 228 , 227 , 224


Do
؟؟؟؟ 1wreset
؟؟؟؟ 1wwrite &HCC
؟؟؟؟ 1wwrite &H44
؟؟چرا ؟؟؟ Waitms 100


؟؟؟؟ 1wreset
؟؟؟؟ 1wwrite &HCC
؟؟؟؟ 1wwrite &HBE
؟؟؟؟ Buffer = 1wread(2)
؟؟؟؟ Buffer = Buffer * 10 : Buffer = Buffer \ 16
Temperature = Str(buffer) : Temperature = Format(temperature , "0.0")
Locate 1 , 1 : Lcd "Temp: " ; Temperature ; Chr(0) ; " "
Locate 2,1: lcd "www.M32.ir"
Loop
[LEFT][/LEFT]