Euler 4
forked from Euler3 (diff: 35)
ActionScript3 source code
/**
* Copyright enecre ( http://wonderfl.net/user/enecre )
* MIT License ( http://www.opensource.org/licenses/mit-license.php )
* Downloaded from: http://wonderfl.net/c/na9o
*/
// forked from enecre's Euler3
// forked from enecre's forked from: Euler6
// forked from enecre's Euler6
// forked from enecre's Euler2
package {
import flash.events.Event;
import flash.text.TextField;
import flash.display.Sprite;
public class Euler extends Sprite {
private var tf:TextField = new TextField();
public function Euler() {
// write as3 code here..
tf.height = 465;
addChild(tf);
ans.x = 200;
ans.height = 465;
addChild(ans);
init();
}
private var a:int = 1000;
private var b:int = 0;
private var ans:TextField = new TextField();
public function init():void{
addEventListener(Event.ENTER_FRAME, onEnterFrame);
}
private function onEnterFrame(e:Event):void{
if(b <= 0){
if(a == 0)removeEventListener(Event.ENTER_FRAME,onEnterFrame);
else{
a--;
b = 1000;
}
}
b--;
var c:String = String(a * b);
tr(b);
var len:int = c.length;
//if(len <= 5)return;
if(c.charAt(0) == c.charAt(len - 1) &&
c.charAt(1) == c.charAt(len - 2) &&
c.charAt(2) == c.charAt(len - 3)
){
addAns(c, a, b);
}
}
private function addAns(...o:Array):void{
ans.appendText(o + "\n");
ans.scrollV = ans.maxScrollV;
}
private function tr(...o:Array):void{
tf.appendText(o + "\n");
tf.scrollV = tf.maxScrollV;
}
}
}
