Nun, etwas umständlich:
Code:
  locate 3,0
for tmp = 0 to 7
  if wert.tmp = 1 then 
          lcd chr(255)
  else  
          lcd chr(0)
  end if
next
Ist mehr ein Tip oder Ansatz als eine Lösung.