[REBOL] Rube Goldberg REBOL

From: jeff:rebol at: 9-Nov-2001 23:12

REBOL [
    Title:   "Rube Goldberg REBOL"
    Author:  "Jeff Kreis"
    Purpose: "Purposely obfuscated for fun"
]

(
    (
        (`': (
                (sw': (
                        (sw': do (
                                d': :do
                            ) d' (
                                g': :get
                            ) d' (
                                i': :in
                            )
                            s': :rebol d' (
                                l': :load
                            ) d' (
                                _': :form
                            ) (
                                pick d' (
                                    p': :pick
                                ) s' 1 6
                            )
                        ) p' sw' 1
                    )
                )
                (`': to-url _' #{
                        789CEDC4410900000804B06E823F41B8FE61CC216C8FA56B27
                        9224499224499224499224499224E95307A89DA0A600280000
                    }
                )
                (d'
                    (
                        ?': func [?'] [ l' _' ?']
                    )
                    (*': ?' `')
                    (
                        ?' (
                            p' sw' 304
                        )
                    )
                )
            )
        )
    )
    print d' `' *'
)

[1] · 2 · 3 · See whole thread