#!「WordXOR.nako」を取り込む //暗号化 A=「これはテストです」を「XOR」で文字XOR。 Aを言う。 //復号化 Aを「XOR」で文字XOR。 それを言う。
●文字XOR (AをBで) 結果は空 Eは0 Dで1から(Bのバイト数)まで繰り返す BのDから1バイト抜き出して対象文字に代入。 対象文字=MIDB(B,D,1) 番号=ASC(対象文字) E=E+番号 Cで1から(Aのバイト数)まで繰り返す AのCから1バイト抜き出して対象文字に代入。 対象文字=MIDB(A,C,1) 番号=ASC(対象文字) 番号=XOR(番号, E)。 結果=結果&CHR(番号) それは結果