Rube Goldberg REBOL
[1/3] 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' `' *'
)
[2/3] from: lmecir::mbox::vol::cz at: 10-Nov-2001 12:43
Hi,
tried to cut&paste this to console and saw that it didn't work (parens do
not cause the interpreter to continue on the next line). Is that
intentional?
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' `' *'
)
[3/3] from: carl:cybercraft at: 11-Nov-2001 1:05
On 10-Nov-01, Ladislav Mecir wrote:
> Hi,
> tried to cut&paste this to console and saw that it didn't work
> (parens do not cause the interpreter to continue on the next line).
> Is that intentional?
Quite possibly. (;
Save your email, edit out any non-REBOL guff, load it into REBOL and
it should work. Assuming that what I got was what I was meant to
get....
--
Carl Read