SET DIRECTIONAL LIGHT This command will set an existing light to that of a directional light.
Syntax
    SET DIRECTIONAL LIGHT Light Number, NX, NY, NZ
Parameters
    Light Number
Integer The light number
    NX
Float The x direction is specified using directional values assuming that the origin of the light is 0,0,0
    NY
Float The y direction is specified using directional values assuming that the origin of the light is 0,0,0
    NZ
Float The z direction is specified using directional values assuming that the origin of the light is 0,0,0
Returns
This command does not return a value.
Description
The direction is specified using directional values assuming that the origin of the light is 0,0,0. The light number must be specified using an integer value. The directional values must be specified using real values.
Example Code
    sync on

    autocam off

    color backdrop rgb(0,0,0)

    load image "ground.jpg",1

    make matrix 1,1000,1000,100,100

    prepare matrix texture 1,1,1,1

    position matrix 1,-500,0,-500

    position camera 0,100,0

    make object sphere 1,20

    position object 1,0,0,500

    set ambient light 20

    color ambient light rgb(64,64,128)

    set directional light 0,0,-1,0

    color light 0,192,192,192

    while inkey$()<>"x"

    set cursor 0,0

    print "LIGHT COMMANDS (X to Exit)"

    sync

    endwhile

    delete light 1

    delete object 1

    end
See also
LIGHT Commands Menu Index