Hi,

in deinem Fall könntest du das so schreiben:

Code:
Dim Lcdstring As String * 4
Dim Lcdarray(5) As Byte At Lcdstring Overlay

Sub Showversion
    Lcd " Mc_Firmware"
    Locate 2 , 1
    Lcdstring = Str(vers)
    Lcdarray(4) = Lcdarray(3) : Lcdarray(3) = Lcdarray(2)
    Lcdarray(2) = "." 
    Lcd "Vers. " ; Lcdstring
    Wait 2
End Sub