simple GUI app which generates random passphrases from the EFF dice word list

dicewords.red

Red [
    Title: "Diceword passphrase generator"
    Needs: 'View
]

word-list: https://www.eff.org/files/2016/07/18/eff_large_wordlist.txt
words: parse load-thru word-list [collect some [keep word! | skip]]
random/seed now/precise

view [
    text "generate" num: field 50x23 default 5 text "words"
    return
    text "passphrase:" output: field 300x23 ""
    button 23x23 "📋" [write-clipboard output/text]
    button 23x23 "🔄" [
        output/text: form collect [loop num/data [keep random/only words]]
    ]
]