LCD без нулева Mikrobasic код за радио-честотен контрол

[aduri]

Привет,
Този код (Mikrobasic) преобразува аналогичен стойност в двоичен за контрол на радиочестотите.Това е код:

Код:

cod_fine:

byteAdcbin1 = Dec2Bcd16 (ValoreAdc1) "conversione decimale DA един binario

IF (ValoreAdc1 = 0), тогава portb = 255 "довело или contraves в очакване от 32 до 40

в противен случай

IF (ValoreAdc1 <100), тогава portb = не byteAdcbin1

крайна сметка, ако

крайна сметка, акоIF (ValoreAdc1> 99), след това ValoreAdc1 = 99 "

крайна сметка, ако

IF (ValoreAdc1 <10) след това LCD_out (1,11, "0") "

крайна сметка, ако

bytetostr (ValoreAdc1, txt1)

LCD_out (1,10, txt1)

 

[Guest]

Вашият "0" става заменена от своя окончателен LCD_out изявление.

Опитай промяна на низ txt1, преди да го изход:Код:

bytetostr (ValoreAdc1, txt1)

IF (ValoreAdc1 <10) след това txt1 [1] = "0"

endif

LCD_out (1,10, txt1)

 

[aduri]

Благодаря,
Аз решен с вашия код.

Ciao
Антонио