Случайный вывод спрайтов

[JACUK]

Нужна помощь!! Есть 6 спрайтов, каждый из них может выводится в 3-ох вариантах, нужно организовать этот вывод случайным образом!!! Как не пробовал что то не выходит! Дайте примерчик а???

[odd]

Покажи спрайты, я тебе напишу пример.

[JACUK]

Ты сделай вывод одного спрайта в случайном порядке, так как этих спрайтов толком то нету!! Какие то катинки набросаные за пару минут!!

[odd]

Если я тебя правильно понял, то можно хоть весь экран
закрасить случайными спрайтами. Например так:

Program GS1;
Uses arcade;
Var  dr: array[0..4] of integer;
    i, j, a, dx, dy: integer;
Begin
    dr[0]:=0; dr[1]:=5; dr[2]:=3; dr[3]:=6; 
    AddSprite(LoadImage('/car.png'), 40, 40);
    for j:=0 to 4 do
    for i:=0 to 4 do
    begin
        a:=Random(4);
        TransformSprite(0, dr[a]);
        SpritePosition(0, dx + 40*i, dy + 40*j);
        DrawSprite(0);
    end;
    Repaint;    
    Delay(5000);
End. 


[JACUK]

Короче мне нужно чтобы сверху екрана случайным образом виводились спрайты на дорогу(гонка) на дороге они могут буть в трех положения:слева, в центре и справа! Всего шесть видов автомобилей!