mirror-github-bspeice/apophysis
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fixed xform[0] not being applied in the 1st iteration

Browse Source
This commit is contained in:
zueuk
2009-02-07 08:34:39 +00:00
parent 433a001f72
commit 5b20e148f5
4 changed files with 20 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files
2.10/Source/Render32.pas
+8 -4
View File
@@ -130,7 +130,8 @@ end;
{$endif} {$endif}
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -194,7 +195,8 @@ end;
{$endif} {$endif}
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -259,7 +261,8 @@ end;
{$endif} {$endif}
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -325,7 +328,8 @@ end;
{$endif} {$endif}
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
2.10/Source/Render32f.pas
+4
View File
@@ -158,6 +158,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -224,6 +225,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -291,6 +293,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -359,6 +362,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
2.10/Source/Render48.pas
+4
View File
@@ -152,6 +152,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -245,6 +246,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -339,6 +341,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -434,6 +437,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
2.10/Source/Render64.pas
+4
View File
@@ -156,6 +156,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -220,6 +221,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -285,6 +287,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);
@@ -351,6 +354,7 @@ end;
try try
xf := fcp.xform[0];//random(fcp.NumXForms)]; xf := fcp.xform[0];//random(fcp.NumXForms)];
xf.NextPoint(p);
for i := 0 to FUSE do begin for i := 0 to FUSE do begin
xf := xf.PropTable[Random(PROP_TABLE_SIZE)]; xf := xf.PropTable[Random(PROP_TABLE_SIZE)];
xf.NextPoint(p); xf.NextPoint(p);