procedureRandomLineblock(posX, posY: integer);

procedure RandomLineblock(posX, posY: integer);

Устанавливает начальную позицию для следующего объекта. PosX – позиция по X. PosY – позиция по Y.

RandomLine(Max: integer; direction: string; axis: string);

Рисует линию, прозрачность которой постепенно возрастает. Max – удвоенная длина линии. Direction – направление оси (минус или плюс). Axis – название оси, параллельно которой рисуется линия.

Ограничения значений параметров:

Direction только ‘+’ или ‘-‘.

Axis только ‘X’ или ‘y’.

procedure RandomLineFree(Max, localmoveX, localmoveY: integer);

Рисует линию, прозрачность которой постепенно возрастает. Max – удвоенная длина линии. LocalmoveX – координата вектора по X, параллельно которому будет нарисована прямая. LocalmoveY – координата вектора по Y, параллельно которому будет нарисована прямая.

procedure RandomTerrainFree(Max, localmoveX, localmoveY, numberlines, localterrainmoveX, localterrainmoveY: integer);

Рисует несколько линий, прозрачность которых постепенно возрастает. Max – удвоенная длина линии. LocalmoveX – координата вектора по X, параллельно которому будут нарисованы прямые. LocalmoveY – координата вектора по Y, параллельно которому будут нарисованы прямые. LocalterrainmoveX – сдвиг каждой следующей прямой по X относительно предыдущей (в пикселях). LocalterrainmoveY – сдвиг каждой следующей прямой по Y относительно предыдущей (в пикселях).

procedure RandomNoiseFree(Max, localmoveX, localmoveY, numberlines, localterrainmoveX, localterrainmoveY, noise, noise2: integer);

Рисует несколько линий, прозрачность которых постепенно возрастает. Max – удвоенная длина линии. LocalmoveX – координата вектора по X, параллельно которому будут нарисованы прямые. LocalmoveY – координата вектора по Y, параллельно которому будут нарисованы прямые. LocalterrainmoveX – сдвиг каждой следующей прямой по X относительно предыдущей (в пикселях). LocalterrainmoveY – сдвиг каждой следующей прямой по Y относительно предыдущей (в пикселях). Noise – значение шума по X (в пикселях). Noise2 – значение шума по Y (в пикселях).

procedure RandomPolygon(step, numberofsteps, noise: integer; direction: string);

Рисует ломаную с постоянной прозрачностью. Step – расстояние между двумя ближайшими точками ломаной, измеряемое по той оси, вдоль которой линия расположена (в пикселях). Numberofsteps – количество точек ломанной. Noise – значение шума по X (в пикселях). Direction – имя оси, вдоль которой располагается прямая.

Ограничения значений параметров:

Direction только ‘+X’ или ‘+Y’ или ‘-X’ или ‘-Y’.

procedure RandomCircleFree(rad, rad2, noise, noise2, numberofsteps: integer);

Рисует эллипсы, у которых центры совпадают. Rad – размер радиуса по X (в пикселях). Rad2 – размер радиуса по Y (в пикселях). Noise – значение шума по X (в пикселях). Noise2 – значение шума по Y (в пикселях). Numberofsteps – количество эллипсов.

procedure RandomNoiseFree(Max, localmoveX, localmoveY, numberlines, localterrainmoveX, localterrainmoveY, noise, noise2, speednoisedown, speednoisedown2, throw: integer; direction: string);

Рисует несколько линий, прозрачность которых постепенно возрастает. Max – удвоенная длина линии. LocalmoveX – координата вектора по X, параллельно которому будут нарисованы прямые. LocalmoveY – координата вектора по Y, параллельно которому будут нарисованы прямые. LocalterrainmoveX – сдвиг каждой следующей прямой по X относительно предыдущей (в пикселях). LocalterrainmoveY – сдвиг каждой следующей прямой по Y относительно предыдущей (в пикселях). Noise – значение шума по X (в пикселях). Noise2 – значение шума по Y (в пикселях). Speednoisedown – число, на которое уменьшается или увеличивается значение шума по X за цикл. Speednoisedown2 – число, на которое уменьшается или увеличивается значение шума по Y за цикл. Throw – количество циклов, через которое уменьшается или увеличивается значение шума по двум осям. Direction – направление изменения значения шума (увеличения или уменьшения).

Ограничения значений параметров:

Direction только ‘+’ или ‘-‘.

procedure RandomGrass(StartPosX, StartPosY, XStep, YStep, numberX, numberY, noise, noise2, length: integer; NoiseForStartPosX, NoiseForStartPosY: boolean);

Рисует траву. StartPosX – начальная позиция рисования травы по X (в пикселях). StartPosY – начальная позиция рисования травы по Y (в пикселях). XStep – сдвиг позиции относительно прошлой травинки по X. YStep – сдвиг позиции относительно прошлой травинки по Y. NumberX – количество травинок в ряду. NumberY – количество рядов. Noise – значение шума по X (в пикселях). Noise2 – значение шума по Y (в пикселях). Length – длина травинки. NoiseForStartPosX – возможность влияния шума на начальную позицию по X. NoiseForStartPosY – возможность влияния шума на начальную позицию поY.

procedure RandomGrassFree(StartPosX, StartPosY, XStep, YStep, numberX, numberY, noise, noise2, length, range1border, range2border: integer; NoiseForStartPosX, NoiseForStartPosY: boolean);

Рисует траву. StartPosX – начальная позиция рисования травы по X (в пикселях). StartPosY – начальная позиция рисования травы по Y (в пикселях). XStep – сдвиг позиции относительно прошлой травинки по X. YStep – сдвиг позиции относительно прошлой травинки по Y. NumberX – количество травинок в ряду. NumberY – количество рядов. Noise – значение шума по X (в пикселях). Noise2 – значение шума по Y (в пикселях). Length – длина травинки. NoiseForStartPosX – возможность влияния шума на начальную позицию по X. NoiseForStartPosY – возможность влияния шума на начальную позицию поY.

Дата добавления: 2015-11-04