テキストエリア作成して、平文に代入 「完了」のボタン作成して完了に代入 乱＝（29の乱数）＋20 数＝0-乱 ＃変換 完了をクリックした時には、 表示ログクリアする N1=平文からテキスト取得する N2=N1を乱でシフト処理。 N3=N2を数でシフト処理。 「暗号化: {乱}{N2} 元文章: {N1} 復号: {N3}」を表示。 コピー用＝N2をURLエンコードする コピー＝「{乱}{コピー用}」 コピーをクリップボード設定する 「コピーできました」と言う ここまで ●(SをNOで)シフト処理とは R=「」 Iを1から(Sの文字数)まで繰り返す SでIから1を文字抜出して、CHに代入。 R = R & CHR(ASC(CH) + NO) ここまで。 Rを戻す。 ここまで。