home *** CD-ROM | disk | FTP | other *** search
- * From rectangles to pyramids
- * Before running this demo you should copy the GreySprite 'cbpGRS' of
- * the supplementary disk to the image directory of AIM.
- readf cbpGRS a * Brochure of 'Centrum voor Beeldbew. en Patroonh.'
- thresh a b 1 * Make binary by thresholding
- remove * remove the 'noise'
- invert * object pixels should be white
- bcopy 1 2 b b * save in bitplane 2
- eros 2 1 6 0 b i * 2 erosionsteps removes the thin lines
- propag 3 1 2 6 0 b * restore the shape: propagate bit 1 into bit2
- dist 1 b c * distance transform, greyvalue image in C
- contrast c c * do a contrast stretch