Code:
Do 
   B = Encoder(pind.3 , Pind.2 , Links , Rechts , 1) 
                      --- 1 means wait for change which blocks programflow 
   Lcd B 
   Locate 4 , 1 
   Lcd "" ; Wert ; "  " 
 Loop 
End
Probier's mal mit "WAIT" beim "ENCODE"