ir EEPROMstart_convert: b0 = $ EE' $ EE er 1.620 stjórn bæti 'til að byrja conversionshigh RST" velja 1620gosub shift_out 'senda það til 1620low RST "afvelja 1620" Þetta er helsta lykkja' - les og birtir hitastig hverjum secondmain_loop: hár RST "velja 1620 b0 = $ AA '$ AA er 1.620 stjórn bæti' fyrir lestur hitastig gosub shift_out 'senda það til 1620 gosub shift_in' lesa hitastig 'úr 1620 lágu RST "afvelja DS1620. gosub sýna 'birta afleysingamanneskja í gráður C hlé 1000 "bíddu secondgoto main_loop' The shift_out subroutine sendir hvað er í" the B0 bæti við 1620shift_out: framleiðsla DQ "stilla DQ pinna til 'framleiðslu modefor b2 = 1 til 8 lágu CLK 'undirbúa að klukka sem bita "í 1620 DQ_PIN = bit0 Senda gögn ríflegar CLK' latch gögn svolítið í 1620 b0 = b0 /2 'vakt alla bita rétt' til bita 0nextreturn" The shift_in subroutine fær 9 bita 'hitastig frá 1620shift_in: inntak DQ "stilla DQ pinna til 'inntak modew0 = 0' ljóst w0for b5 = 1 til 9 w0 = w0 /2 'vakt inntak hægri. lítil CLK 'spyrja 1620 fyrir næsta bita bit8 = DQ_PIN' lesa bita hár CLK 'Víxla klukka pinnextreturn' Sýnir hitastig í gráðum Cdisplay: ef bit8 = 0 þá POS "ef bit8 = 1 'þá er afleysingamanneskja neikvæð b0 = b0 & /b0 "invert b0 með Nanding það 'við sig B0 = b0 + 1pos: serout LCD, n2400, (254, 1)" hreinsa LCDserout LCD, n2400, (" Temp = ")' sýna " Temp = " "Á displaybit9 = bit0 'spara hálf degreeb0 = b0 /2' breyta til degreesif bit8 = 1 þá neg" hvort afleysingamanneskja er neikvæð serout LCD, n2400, (# b0) "sýna jákvæð afleysingamanneskja goto halfneg: serout LCD, n2400 , (" - ", # b0) "sýna neikvæð temphalf: ef bit9 = 0 þá jafnvel serout LCD, n2400, (" 0,5 C ")" sýna helmingur gráðu goto doneeven: serout LCD, n2400, (" 0,0 C ") "sýna hálfa degreedone: aftur
Ef þú keyrir þetta forrit, þú munt komast að því að það birtir á celsíus hitastig með nákvæmni hálfan leyti
DS1620 ráðstafanir hitastig. í centigrade hálf-gráður. Það skilar hitastig í 9 bita 2s-viðbót tala með ýmsum -110 til 250 F (-55 til 125 C). Þú skiptir fjöldi þú færð með 2 til að fá raunverulegt hitastig. 2s-Sty tvöfaldur tölur eru þægileg leið til að tákna neikvæð gildi. Eftirfarandi listi sýnir gildi fyrir 4 bita 2s-viðbót númer:
0111: 70.110: 60101: 50100: 40011: 30010: 20001: 10000: 01111: -11.110: -21.101: -31.100: - 41011: -51.010: -61.001: -71.000: -8 Hægt er að sjá að í stað 4 bita alþingismaður gildi frá 0 til 15, 4 bitar í 2
Page
<< 
[11] [12] 
