200byteDemoChallenge!

BlitzMax Forums/BlitzMax Programming/200byteDemoChallenge!

Here's my entry. It's a StarWars-ish scrolling.
a=512;Graphics a,a;DrawText AppArgs[1],0,0;p=GrabPixmap(0,0,a,a);a:-1;SetColor a,a,0;#L;Cls;For x=0To a;For y=0To a;u#=5*(((x-256)/(y+50.0))+3);v#=t#-(a/(y+50.0));r=u*15;s=v*75;If ReadPixel(p,(r+(s/16)*64)&a,s&15)&1 Plot x,y;
Next;Next;Flip;t:+0.01Goto L



Run it with the following command line argument:
" Once upon a time in a galaxy far far away ..." (copy and paste, WITH quotes).
EDIT: I just figured that HTML would make series of spaces become a single space, so the text you see is wrong, and become badly aligned. The right text was:
"_Once___upon____a_time__in___a__galaxy__far_far__away_____..."

Just replace the underscores ith spaces.

(255 if you must!)
That's fortunate because my entry is exactly 255 bytes :)
Though if you don't mind having the text in pure white rather than yellow you can remove the call to SetColor.