ReturnCAValueAS
From scripting
function ReturnCAValue(InputStr) { // ----- Input The Cellular Automata Values HERE: ----- // Main1 = new Array(111, 110, 101, 100, 11, 10, 1, 0); Main2 = new Array( 1, 0, 1, 0, 1, 0, 0, 1); // ----- ---------------------------------------- ----- // $ConvInt = int(InputStr); $WC = -1; do { $WC++; } while ($WC < 8 && Main1[$WC] != $ConvInt); return Main2[$WC]; }
Re-written from MEL for AS by Nick Pisca.