RCMANIA.cz

Kód: Vybrat vše

-- bargraf 
   if A1Percent>0 then
   
      if    A1Percent <= 100 then          --Ak je viac ako 100 % potom vykresli 100%         
         lcd.drawGauge(24, riadA1v-2, stlpecKonca-22, 12, A1PercentMin, 100) -- minimalne napetie A1-      
         if A1Percent > A1PercentMin then
         stlpAktual =24+math.ceil((stlpecKonca-22)*(A1PercentMin/100))
            while stlpAktual < 24 + math.ceil((stlpecKonca-22)*(A1Percent/100))
            do
               stlpAktual= stlpAktual+1
                  lcd.drawLine(stlpAktual, riadA1v-1, stlpAktual, riadA1v+9,DOTTED,INVERS)   
               stlpAktual= stlpAktual+1
            end
            lcd.drawLine(stlpAktual, riadA1v-1, stlpAktual, riadA1v+9,SOLID,FORCE)
         end
   
      else   --A1Percent > 100
         lcd.drawGauge(24, riadA1v-2, stlpecKonca-22, 12, 100, 100) -- minimalne napetie A1-
   
      end      -- A1Percent <= 100 then
   
   else      --A1Percent < 0 then
      lcd.drawNumber(18, riadA1v+1, batNap*10, SMLSIZE+PREC1 +BLINK)
      lcd.drawText(18, riadA1v+1, "V",SMLSIZE+BLINK)
      lcd.drawNumber(24+math.ceil((stlpecKonca-22)/2), riadA1v+1, A1Percent, 0 +BLINK)-- vypis hodnotu bat - percenta 
       lcd.drawText(lcd.getLastPos(), riadA1v+1, "%", 0 +BLINK) -- znak % za posledny znak
      lcd.drawGauge(24, riadA1v-2, stlpecKonca-22, 12, A1Percent, 100)

   end
   -- vykresli znacku 25 a 75 percent v+zdy
   lcd.drawLine(24+math.ceil((stlpecKonca-22)/4),riadA1v-2,24+math.ceil((stlpecKonca-22)/4),riadA1v+8,DOTTED  ,BLINK )
   lcd.drawLine(24+(3*math.ceil((stlpecKonca-22)/4)),riadA1v-2,24+(3*math.ceil((stlpecKonca-22)/4)),riadA1v+8,DOTTED  ,BLINK )