RosettaCodeData/Task/Bifid-cipher/Uiua/bifid-cipher-2.uiua
2024-07-13 15:19:22 -07:00

9 lines
308 B
Text

S ← "GLYPHABCDEFIJKMNOQRSTUVWXZ0123456789"
P ← ↯⊟.√⧻.S
Prep ← ▽∊:S.⌵
Bifid ← setinv(
⊡:⟜(↯∞_2/⊂⇌⍉≡(⊢⊚⌕)Prep:¤)P
| ⊡:⟜(⍉⇌↯2_∞/⊂≡(⊢⊚⌕):¤)P
)
°Bifid.Bifid. "This is it"
°Bifid.Bifid. "The invasion will start at 0600 on the 1st of January"