ファイルを読み書き 暗号化 1

前にやった書き出しの基礎に味付けをして
応用編、暗号化に挑戦だ！
あっはっはっは
とわ言っても、簡単簡単

–ファイル書き出し基礎
(
local saveName = getSaveFileName types:”Text(*.txt)|*.txt”

 saveTransform = $.transform
saveFile = createFile “$Scripts//temp.tmp”
 format “%\n” saveTransform to:saveFile
 close saveFile

encryptFile “$Scripts//temp.tmp” saveName 123456789
deleteFile “$Scripts//temp.tmp”
)

赤字の部分が暗号化に必要な部分
一度、仮ファイルを作っておいてから、encryptFileで中身を暗号化
123456789は暗号キー

んで読み込み

–ファイル書き出し基礎
(
local loadName = getOpenFileName types:”Text(*.txt)|*.txt”

 if loadName != undefined do
 (
  loadFile = openEncryptedFile loadName 123456789
  while not eof loadFile do
  (
   temp = (readValue loadFile)
   $.transform = temp
   print temp
  )
 )
close loadFile
)

多分簡単に暗号化できるってことは、簡単に解読できるのかも
まぁ、素人はコレで中身が見られなくなる

でも、Maxスクリプトの中身を見ると一発でばれるよねコレ