Wednesday, August 18, 2004

More horror code 

Stumbled across this code today when attemting to tidy up the hundreds of hints/warnings in the app I maintain (a rant best left for another blog post). All I can say is yuck with a capital Y :-(

if Bpp=16 then Base:=$FFFF else Base:=-1;
n:=0; b:=fMask mod 10; Inc(n,b); fMask:=fMask div 10;
bMask:=Base shr(Bpp-n); bshr:=8-b; gshl:=b;
b:=fMask mod 10; Inc(n,b); fMask:=fMask div 10;
gMask:=Base shr(Bpp-n)and not bMask; rshl:=n; gshr:=8-b;
b:=fMask mod 10; Inc(n,b); fMask:=fMask div 10;
rMask:=Base shr(Bpp-n)and not(bMask or gMask); rshr:=8-b;

No formatting was lost when posting this code snippet, BTW. It has been accurately presented in all its...ahem...glory.

Be sure to look at this article on hints/warnings. :-) Oh, and you have my sympathies...

Dan Miser
Hello. I found some interesting offers about loans. It would be desirable to discuss with
knowing people. What do you think?

refinance loan
payday loan
equity loan
secured loan
college loan consolidation
[color=#999999]Are [url=http://baby-sling.awardspace.co.uk/]baby-sling[/url] any good?
I know this is not the most serious query in the world but here goes!...
[url=http://mapssi.ja-nee.de/]map[/url] [url=http://uic.aqhhhh.info/]UIC[/url] [url=http://gypsy.slsae.org/]gypsy[/url] [url=http://care.sitesfree.com/]Health care issues[/url]
[url=http://www.freewebs.com/montanawig/]Hannah montana wig[/url]
~You are alive, so live.~
Michelle & Lydia (3 months) [/color]
Post a Comment

This page is powered by Blogger. Isn't yours?