L
Lydia87
Guest
Zdravím všechny,
Může někdo pomoci přeložit tento kód mikroC Pro.
'''''''''''''''''''''''''''''''''''''''''''''''''' '''
'CMPS03 I2C s pořadovým LCD03'
'Například v PicBasic PRO'
'Čte rotace jako 0 - 255'
'''''''''''''''''''''''''''''''''''''''''''''''''' '''
DEFINE OSC 8 '8MHz oscilátor
DEFINE I2C_SLOW 1
DEFINE I2C_HOLD 1
DEFINE CHAR_PACING 102 '1 stop bit čas, aby se 2 pro LCD03
ver VAR BYTE 'Chcete-li uložit software revize
W0 VAR slovo 'pro ukládání dat obsahující data
B0 VAR w0.byte0 'b0 je nízká byte slova W0
b1 VAR w0.byte1 'B1 je vysoká byte slova W0
b2 var byte 'Byte pro ukládání desetinnou čárku ložisek
OUTPUT PORTC.1 'RC1 tristate produkce pro lcd03
SEROUT PORTC.1, 2, [12,4,1] 'Smazat displej a skrýt kurzor na LCD03
pauza 1000
smyčky:
I2CREAD PORTC.4, PORTC.3, $ C0, 0, [ver] 'Přečtěte si číslo verze z CMPS03
SEROUT PORTC.1, 2, [1, "v Software:", # ver, 13] 'Dejte ji na obrazovce
pauza 100
I2CREAD PORTC.4, PORTC.3, $ C0, 2, [b1, b0] 'Získat ložisko jako hodnota 0 až 3600
b2 = W0 / / 10 'Získat zbývající rozsah tohoto nám dává jedno desetinné místo řady hodnoty
W0 = w0/10 'Convert W0 do 0 - 360 Rozsah údajů
SEROUT PORTC.1, 2, ["s:", # W0 ,".",# B2, ""] 'Display nesoucí data na obrazovku
goto smyčka
Nejlepší Wish
Lydia
Může někdo pomoci přeložit tento kód mikroC Pro.
'''''''''''''''''''''''''''''''''''''''''''''''''' '''
'CMPS03 I2C s pořadovým LCD03'
'Například v PicBasic PRO'
'Čte rotace jako 0 - 255'
'''''''''''''''''''''''''''''''''''''''''''''''''' '''
DEFINE OSC 8 '8MHz oscilátor
DEFINE I2C_SLOW 1
DEFINE I2C_HOLD 1
DEFINE CHAR_PACING 102 '1 stop bit čas, aby se 2 pro LCD03
ver VAR BYTE 'Chcete-li uložit software revize
W0 VAR slovo 'pro ukládání dat obsahující data
B0 VAR w0.byte0 'b0 je nízká byte slova W0
b1 VAR w0.byte1 'B1 je vysoká byte slova W0
b2 var byte 'Byte pro ukládání desetinnou čárku ložisek
OUTPUT PORTC.1 'RC1 tristate produkce pro lcd03
SEROUT PORTC.1, 2, [12,4,1] 'Smazat displej a skrýt kurzor na LCD03
pauza 1000
smyčky:
I2CREAD PORTC.4, PORTC.3, $ C0, 0, [ver] 'Přečtěte si číslo verze z CMPS03
SEROUT PORTC.1, 2, [1, "v Software:", # ver, 13] 'Dejte ji na obrazovce
pauza 100
I2CREAD PORTC.4, PORTC.3, $ C0, 2, [b1, b0] 'Získat ložisko jako hodnota 0 až 3600
b2 = W0 / / 10 'Získat zbývající rozsah tohoto nám dává jedno desetinné místo řady hodnoty
W0 = w0/10 'Convert W0 do 0 - 360 Rozsah údajů
SEROUT PORTC.1, 2, ["s:", # W0 ,".",# B2, ""] 'Display nesoucí data na obrazovku
goto smyčka
Nejlepší Wish
Lydia