RosettaCodeData/Task/String-concatenation/M2000-Interpreter/string-concatenation.m2000

17 lines
415 B
Plaintext

Module CheckString {
s$ = "hello"
PRINT s$;" literal" 'or s$ + " literal"
s2$ = s$ + " literal"
PRINT s2$
Print Len(s2$)=13
\\ get an ansi string
k$=Str$("Hello")
Print Len(k$)=2.5 ' 2.5 words or 5 bytes
Print Chr$(k$)
k2$=k$+Str$(" literal")
Print Len(k2$)=6.5 ' 13 bytes
Print Chr$(k2$)
Print Len(Chr$(k2$))=13 ' words
}
CheckString