#!/usr/bin/perl -lw
for $sale ( # SCORE 907 HI 287185
', . ',
', . Y ',
', y Y ',
', . Y ',
', y Y ',
', . ',
', . Y ',
', . Y ',
', M Y ',
', Y ',
', Y ',
', Y ',
', Y ',
', ',
', Y ',
', Ymmmmmm ',
', @mmm Y ',
', Y ',
', ',
', Y mm* m@ ',
', Y ! ',
', Y ! ',
', Y ! ',
', Y ',
' ^ Y '
){$_.=chr index # CENTIPERL!
($sale,'Y')+90} #
s!Y(.)! \u$1!g; # LIVES: 4
s!^ |SCORE|!!g; # CREDITS: 1
print
I admit the code is straightforward. I relied on spatial representation, a red herring, and (as it turns out) folks' assumption that i'm capable of packing a working video game into 65 characters :)
Hey I think this thing is some kind of virus! The game never loads and it says something about breaking into systems! :)
--
lmoran@wtsg.com
There's more than one way to do it, just don't use my way.
