11/12/24 12:20:12.38 .net
1文字ずつxorするならこんなかんじ？結果が0になると言語の仕様でどうしようもないけど。
src = "ABC"
strlen src
len = result
; srcは2文字以上を前提とする
strcopy src 1 1 tmp
str2code c tmp
res = c
for i 2 len
strcopy src i 1 tmp
str2code c tmp
res = res xor c
next
code2str x res