سلام دوستان
من تا به حال با پروتکل تک سیمه کار نکردم واسه همین ستوراتش واسم مبهمه اگه میتونید یکم شفاف سازی کنید واسم چند خط اصل این برنامه رو که جلوش علامت سوال گذاشتم .ممنونم
من تا به حال با پروتکل تک سیمه کار نکردم واسه همین ستوراتش واسم مبهمه اگه میتونید یکم شفاف سازی کنید واسم چند خط اصل این برنامه رو که جلوش علامت سوال گذاشتم .ممنونم
کد:
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]