sleep sort
forked from wonderfl trace (diff: 34)
sleep sortのActionScript3実装(ActionScript Thread Library使用)。 そのままだと正常に動作しなかったので待機時間を*100した。
ActionScript3 source code
/**
* Copyright Seacolor ( http://wonderfl.net/user/Seacolor )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/qW8A
*/
package {
import flash.display.Sprite;
import flash.events.*;
import flash.text.TextField;
import org.libspark.thread.Thread;
import org.libspark.thread.EnterFrameThreadExecutor;
public class TraceTest extends Sprite {
public function TraceTest() {
// Thread initialize
Thread.initialize(new EnterFrameThreadExecutor());
//This is all the initialization you need in your main class
inittrace(stage);
// demonstration
const array:Array = [ 5, 3, 6, 3, 6, 3, 1, 4, 7 ];
for (var i:int = 0;i < array.length;i++) {
new SleepThread(int(array[i])).start();
}
}
}
}
import flash.text.TextField;
import flash.display.Stage;
import org.libspark.thread.Thread;
class SleepThread extends Thread
{
public var n:int;
public function SleepThread(n:int):void {
this.n = n;
}
override protected function run():void
{
sleep(n * 100);
next(exe);
}
protected function exe():void
{
trace(n);
}
}
///// WONDERFL TRACE /////
import flash.display.Sprite;
import flash.display.Stage;
import flash.text.TextField;
import flash.text.TextFormat;
function inittrace(s:Stage):void
{
WTrace.initTrace(s);
}
//global trace function
var trace:Function;
//wtreace class
class WTrace
{
private static var FONT:String = "Fixedsys";
private static var SIZE:Number = 12;
private static var TextFields:Array = [];
private static var trace_stage:Stage;
public static function initTrace(stg:Stage):void
{
trace_stage = stg;
trace = wtrace;
}
private static function scrollup():void
{
// maximum number of lines: 100
if (TextFields.length > 100)
{
var removeme:TextField = TextFields.shift();
trace_stage.removeChild(removeme);
removeme = null;
}
for(var x:Number=0;x<TextFields.length;x++)
{
(TextFields[x] as TextField).y -= SIZE*1.2;
}
}
public static function wtrace(... args):void
{
var s:String="";
var tracefield:TextField;
for (var i:int;i < args.length;i++)
{
// imitating flash:
// putting a space between the parameters
if (i != 0) s+=" ";
s+=args[i].toString();
}
tracefield= new TextField();
tracefield.autoSize = "left";
tracefield.text = s;
tracefield.y = trace_stage.stageHeight - 20;
var tf:TextFormat = new TextFormat(FONT, SIZE);
tracefield.setTextFormat(tf);
trace_stage.addChild(tracefield);
scrollup();
TextFields.push(tracefield);
}
}
