cls
locate 0,2
print "Auto bateria"
do
  Volts = ReadAD10(porta.0)
  Volts = Volts * 3
  UL = Volts / 100
  TZ = Volts - (UL * 100)
  locate 1,1                           
  print UL
  print ","
  print TZ
  wait 1 s
  print " Voltios  "
loop      

The above program work fine with GCBASIC its produces an formated output and justification to right, but I understand that exist other command like: 'format', 'printusing' and other that I not remember, it is posible to simplify these mess. PCS