[MOHCTEP]

var a:Array = [
			["a1", "a2", "a3", "a4"],
			["b1", "b2", "b3", "b4"],
			["c1", "c2", "c3", "c4"],
			["d1", "d2", "d3", "d4"]];
			tracer(a);
			shiftulator(a);
			tracer(a);
			shiftulator(a);
			tracer(a);
			shiftulator(a);
			tracer(a);
			shiftulator(a);
			tracer(a);
//
function tracer(arg:Array):void {
			for (var i:String in arg) trace(arg[i]);
			trace('**************************\n');
		}
//:))
function shiftulator(arg:Array):void {
			var ind:int = arg[0].length - 1, tmp:Array=[];
			for (var i:String in arg) tmp.push(arg[i][ind]);
			tmp.unshift(tmp.pop());
			for (i in arg) arg[i][ind] = tmp[i];
		}

output:
a1,a2,a3,a4
b1,b2,b3,b4
c1,c2,c3,c4
d1,d2,d3,d4
**************************

a1,a2,a3,d4
b1,b2,b3,a4
c1,c2,c3,b4
d1,d2,d3,c4
**************************

a1,a2,a3,c4
b1,b2,b3,d4
c1,c2,c3,a4
d1,d2,d3,b4
**************************

a1,a2,a3,b4
b1,b2,b3,c4
c1,c2,c3,d4
d1,d2,d3,a4
**************************

a1,a2,a3,a4
b1,b2,b3,b4
c1,c2,c3,c4
d1,d2,d3,d4
**************************