diff --git a/2.10/Source/Render32.pas b/2.10/Source/Render32.pas index cb96780..eb57de8 100644 --- a/2.10/Source/Render32.pas +++ b/2.10/Source/Render32.pas @@ -130,7 +130,8 @@ end; {$endif} try - xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf := fcp.xform[0]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -194,7 +195,8 @@ end; {$endif} try - xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf := fcp.xform[0]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -259,7 +261,8 @@ end; {$endif} try - xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf := fcp.xform[0]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -325,7 +328,8 @@ end; {$endif} try - xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf := fcp.xform[0]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); diff --git a/2.10/Source/Render32f.pas b/2.10/Source/Render32f.pas index 909c9cf..f0f48f9 100644 --- a/2.10/Source/Render32f.pas +++ b/2.10/Source/Render32f.pas @@ -158,6 +158,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -224,6 +225,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -291,6 +293,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -359,6 +362,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); diff --git a/2.10/Source/Render48.pas b/2.10/Source/Render48.pas index bbf801f..c47d5de 100644 --- a/2.10/Source/Render48.pas +++ b/2.10/Source/Render48.pas @@ -152,6 +152,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -245,6 +246,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -339,6 +341,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -434,6 +437,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); diff --git a/2.10/Source/Render64.pas b/2.10/Source/Render64.pas index 872a91b..74308a3 100644 --- a/2.10/Source/Render64.pas +++ b/2.10/Source/Render64.pas @@ -156,6 +156,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -220,6 +221,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -285,6 +287,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p); @@ -351,6 +354,7 @@ end; try xf := fcp.xform[0];//random(fcp.NumXForms)]; + xf.NextPoint(p); for i := 0 to FUSE do begin xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf.NextPoint(p);