How to make a background worker thread (NME recipe)

ThreadingSample.hx

import com.eclecticdesignstudio.motion.Actuate;
import cpp.vm.Thread;
import nme.display.Sprite;
import nme.events.Event;
import nme.Lib;


class ThreadingExample extends Sprite {
	
	
	public function new () {
		
		super ();
		
		var worker = Thread.create (doWork);
		worker.sendMessage (Thread.current ());
		
		addEventListener (Event.ENTER_FRAME, this_onEnterFrame);
		
	}
	
	
	private function doWork ():Void {
		
		var main = Thread.readMessage (true);
		
		for (i in 0...100) {
			
			main.sendMessage ("Progress: " + (i / 100) + "%");
			
		}
		
		main.sendMessage ("Done");
		
	}
	
	
	private function this_onEnterFrame (event:Event):Void {
		
		var message = Thread.readMessage (false);
		
		if (message == "Done") {
			
			removeEventListener (Event.ENTER_FRAME, this_onEnterFrame);
			
		}
		
		trace (message);
		
	}
	
	
}