flash on 2010-2-14

/**
 * Copyright Tamanegi_kenshi ( http://wonderfl.net/user/Tamanegi_kenshi )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/A74A
 */

package{
	

		
 import flash.display.Sprite;
 import flash.events.*;
 import flash.ui.Keyboard;
 
 [SWF(width=465,height=465,backgroundColor=0x00)]

   import flash.accessibility.Accessibility;
   public class test extends Sprite{
   	
    private var ball:Sprite;
    private var fl:Number =250;
    private var xpos:Number =0;
    private var ypos:Number =0;
    private var zpos:Number =0;
     private var Xx:Number =465/2;
     private var Yy:Number =465/2;
    
   
 	
	public function test(){	
 	init();
 	}	 
 	
 		private function init():void{
 			
 			ball=new Sprite();
 			with(ball.graphics){
 				lineStyle(1,0xff0000);
 				beginFill(0xff0000);
 				drawCircle(0,0,100);
 				endFill();
 				}
 				
 			addChild(ball);
 			
 			addEventListener(Event.ENTER_FRAME,on);
 			stage.addEventListener(KeyboardEvent.KEY_DOWN,down);
 			
 			
 		}
 		
 		private function on(event:Event):void{
 			xpos =0;
 			ypos =0;
 			
 			var scale:Number =fl/(fl+zpos);
 			ball.scaleX =ball.scaleY=scale;
 			ball.x=Xx+xpos*scale;
 			ball.y=Yy+ypos*scale;
 			
 }
        private function down(event:KeyboardEvent):void{
        	if(event.keyCode == Keyboard.UP){
        		zpos +=5;
        		}else if(event.keyCode ==Keyboard.DOWN){
        			zpos -=5;
        			}
        	
        	}
   } 
}