export ex;

Starting
Begin
Randomize;
RandomizeAll;
end;

every 0$1 trigger ex do
var i
Begin
ex=i;
i=i+1;
end;