[Closed] Maxscript challenge ideas

It’s not a fair judgement to make. the dotnet variant also uses up memory, it is just not part of the heap… check the 3dsmax process memory usage.

edit: naturally, the dotnet implementation is faster and uses less memory. But I can run the mxs algorithm with 10,000,000. It just takes up 500mb of memory and 30 seconds.

This works:

fn myCreateArrAssembly =
(
	source = @"using System;
	using System.Collections.Generic;
	using System.Text;
	using System.Diagnostics;

	namespace RandomNumberGenerator
	{
		public class RandomNumberGenerator
		{
			public static int [ ] CreateRandomInts ( int count )
			{
				//Stopwatch sw = new Stopwatch ( );
				//sw.Start ( );

				int [ ] arr = new int [ count ];
				for ( int i = 0; i < count; ++i )
					arr [ i ] = i;

				var arr2 = Shuffle ( arr );

				//sw.Stop ( );

				//Console.WriteLine ( sw.ElapsedMilliseconds / 1000.0 );
				return arr2;
			}

			public static T [ ] Shuffle<T> ( T [ ] array )
			{
				Random rnd = new Random ( );

				T [ ] newArray = new T [ array.Length ];
				array.CopyTo ( newArray, 0 );
				for ( int i = 0; i < array.Length; ++i )
				{
					int index = rnd.Next ( i, array.Length );
					if ( index != i )
					{
						T temp = newArray [ i ];
						newArray [ i ] = newArray [ index ];
						newArray [ index ] = temp;
					}
				}

				return newArray;
			}
		}
	}"

	csharpProvider = dotnetobject "Microsoft.CSharp.CSharpCodeProvider"
	compilerParams = dotnetobject "System.CodeDom.Compiler.CompilerParameters"

	compilerParams.ReferencedAssemblies.AddRange #("System.dll")

	compilerParams.GenerateInMemory = on
	compilerResults = csharpProvider.CompileAssemblyFromSource compilerParams #(source)
	
			if (compilerResults.Errors.Count > 0 ) then
			(
				errs = stringstream ""
				for i = 0 to (compilerResults.Errors.Count-1) do
				(
					err = compilerResults.Errors.Item[i]
					format "Error:% Line:% Column:% %
" err.ErrorNumber err.Line \                                              
														 err.Column err.ErrorText to:errs 
				)
				MessageBox (errs as string) title: "Errors encountered while compiling C# code"
				format "%
" errs
				return undefined
			)
	
	assembly = compilerResults.CompiledAssembly
	assembly.CreateInstance "RandomNumberGenerator.RandomNumberGenerator"
)

global myArrayClass = myCreateArrAssembly()
fn myrandomIndexes count = 
(
	myArrayClass.CreateRandomInts count asdotnetobject:true
)

(
	local s = Timestamp()
	myrandomIndexes 1000000
	((Timestamp()) - s) / 1000.0
)

Light