Simple display of the point command to nicely shade text

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    `	------------------------------------------------------------------------
`	Colour Text                                 DarkForge Snippet (6/8/2000)
`	------------------------------------------------------------------------
`
`	Simple display of the point command to nicely shade text

sync rate 0
sync on
hide mouse

ink rgb(255,255,255),1
set text font "Courier"
set text size 12
set text to bold
text 0,0,"DARKFORGE"

ink rgb(80,80,0),1

for a=2 to 16
	for b=0 to 100
		if point(b,a)=16777215 then dot b,a
	next b
	ink rgb(80+10*a,80+a*10,0),1
next a

wait key