SetDraw Command

Purpose

Sets the start position of the command Draw.

Syntax

SetDraw x, y, angle

x, y:Single exp
angle:iexp

Description

SetDraw x, y sets the initial position (x, y) and angle (degrees) to start drawing using Draw.

Example

Example 1:

OpenW 1

Local x%

SetDraw 100, 100, 0

'Draw "MA100,100,TT90"

// a little square

Draw"fd10rt90fd10rt90fd10rt90fd10rt90"

Example 2:

OpenW 1

Local x%, i%

SetDraw 100, 100, 0

For i% = 0 To 180

SetDraw 320, 200, i%

Draw "fd45rt90fd45rt90fd45rt90fd45"

Draw "bk90rt90bk90rt90bk90rt90bk90"

Draw "fd45rt90fd45rt90fd45rt90fd45"

Draw "bk90rt90bk90rt90bk90rt90bk90"

If i% = 180 Then i% = 0

If i% = 0 Then Cls

If i% = 0 Then x%++

If x% > 80 Then Exit For

Next

Remarks

SetDraw 100, 100, 90 is a shortcut for Draw "MA100,100,TT90".

See Also

Draw, Line, Plot, PolyLine, Preset, Pset, QBDraw

{Created by Sjouke Hamstra; Last updated: 23/10/2014 by James Gaite}