Restored from previous forum. Originally posted by cor.
Take e.g. the following sample
StartDrawing(WindowOutput())
FrontColour(255,255,255)
Box(10,10,250,200)
FrontColour(0,0,0)
xpos=50
xwidth=100
yheight=100
; box
For y= 35 To 37
Line(50,y,xwidth,0)
Next
For y= 40 To 40
Line(50,y,xwidth,0)
Line(50,y+20,xwidth,0)
Line(50,y+40,xwidth,0)
Line(50,y+60,xwidth,0)
Line(50,y+80,xwidth,0)
Line(50,y+100,xwidth,0)
Next
For x = 50 To 50
Line(x,40,0,yheight)
Line(x+20,40,0,yheight)
Line(x+40,40,0,yheight)
Line(x+60,40,0,yheight)
Line(x+80,40,0,yheight)
Line(x+100,40,0,yheight)
Next
StopDrawing()
Registered user of PB
C. de Visser
Author of Super Guitar Chord Finder
http://www.ready4music.com