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 :-(
No formatting was lost when posting this code snippet, BTW. It has been accurately presented in all its...ahem...glory.
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.
Comments:
[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
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]