Re: Wow

in reply to Wow

Unrecognized character in execution.

\xBE,\xBA,\x86,\x80,\x92

Æ , ¾ , º , ‡ , … , ƒ

if i replace this characters not show result. obvious.
[download]

Comment on Re: Wow Download Code

Replies are listed 'Best First'.
Re^2: Wow by songahji (Friar) on Apr 28, 2005 at 17:43 UTC
I am on windows NT, please try `@_ = map { [ $!++ => $_ ^ $/ ] } split $╛ => "\@\x7Fy~kde~boxZ +oxfBkiaox"; $\ = "\r"; $\| = ++$; do { ( $# => $= ) = ( rand @_ => rand @_ ); @_[ $#, $= ] = @_[ $=, $# +] } for ( $* .. @_ ); for $: ( $\| .. @_ - $\| ) { for ( $\| .. @_ - $: ) { @_[ $_ - $\|, $_ ] = @_[ $_ => $_ - $* ] if $_[$_][ $║ ] < $_[ $_ - $* ][$╞]; print +map { $_->[$\|] } @_; select $à, $â, $ç, "$[.$\|"; } } print $/` [download] I think the chars don't paste correctly to the form, check mine:Download here	[reply] [d/l]

Replies are listed 'Best First'.

Re^2: Wow
by songahji (Friar) on Apr 28, 2005 at 17:43 UTC

@_ = map { [ $!++ => $_ ^ $/ ] } split $&#9563; => "\@\x7Fy~*kde~box*Z
+oxf*Bkiaox";
$\ = "\r";
$| = ++$*;
do { ( $# => $= ) = ( rand @_ => rand @_ ); @_[ $#, $= ] = @_[ $=, $# 
+] }
  for ( $* .. @_ );
for $: ( $| .. @_ - $| ) {
    for ( $| .. @_ - $: ) {
        @_[ $_ - $|, $_ ] = @_[ $_ => $_ - $* ]
          if $_[$_][ $&#9553; ] < $_[ $_ - $* ][$&#9566;];
        print +map { $_->[$|] } @_;
        select $à, $â, $ç, "$[.$|";
    }
}
print $/
[download]

Download here

[reply]
[d/l]

In Section Obfuscated Code