Generates this pixel art of Rainbow Dash (it will be named "$0.bmp"). Requires Perl v5.14 (see below for a more compatible version). Can't be run from the command line, must be stored in a file (without trailing newlines). Strict and warning compliant. Only tested under Strawberry Perl.eval'op e PnY+0;opPen *XP PYH,">$0.bmp" ;XprPiYnt(KHY+pack "XsxPY8Kl2s4a*(YH24 )X*PXPYL",19K778,7Y4, 1X2,PXPL24,32,K1,4,uYn pXaPXcPLk("u",uKc"p_/ sX[PX^-Pj=L0d7l3K+i?,v _Xrko3[aruPe=LanzgK%7=u )X<=y;/RXR RL_"),sPort {X1}grepRN{ RLs/P.\n /X\t/;Rs N RP/\ HX/\t/R; N RX0u ntXil!sR/(N RX.) [JPX!-I RZO X-~] /JP$X1$R1QO X/}< 0J>PX)&&NQ XqqP: |J&&PX::; X'=~s/ |[JfhPX\uj-\uyPX:| qw`&JAPX]//gr#xP/ #MP[\J]PEFXGHIP/ #MP{}JP P__/ #MZPAC| #MPDB/ #MZP| #MP| #Mw| #Mw| #M/ #/ #
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Pixel art
by FloydATC (Deacon) on May 19, 2012 at 19:41 UTC | |
by Grimy (Pilgrim) on May 19, 2012 at 21:18 UTC | |
by Anonymous Monk on May 19, 2012 at 22:47 UTC | |
by Grimy (Pilgrim) on May 19, 2012 at 23:20 UTC |
Back to
Obfuscated Code