Stringmainipulation mit Chr-Array als Overlay?

[Rofo88]

funzt bei mir mit nem Mega32

$regfile = "m32def.dat"
$crystal = 16000000
$baud = 9600

Dim Test As String * 48
Dim S_char(48) As Byte At Test Overlay

Test = "Das ist ein Teststring"

S_char(1) = Asc( "!")
S_char(2) = Asc( "!")

Print Test

End

MfG