forked from: flash on 2015-11-17

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

// forked from mutantleg's flash on 2015-11-17
package {
    
    import flash.events.Event;
    import flash.display.Sprite;
    public class FlashTest extends Sprite {
        public function FlashTest() {
            
            cw=32;ch=32;
            initEmpty(16,16);
            
            var i:int;
            for (i=0;i<64;i+=1)
            { setTile(Math.random()*16,Math.random()*16,1); }             
            
            for (i=0;i<16;i+=1)
            { setTile(i, 0,1); setTile(0,i,1); setTile(i,14,1); setTile(14,i,1); }

                       
            myBall = new xBall();
            myBall.cx=230; myBall.cy=240;
            myBall.rad=12;
            
            stage.addEventListener(Event.ENTER_FRAME, onEnter);
        }//ctor
        
        public var vecGrid:Vector.<int>;
        public var mw:int = 0;         public var mh:int = 0;
        public var cw:Number = 32;     public var ch:Number = 32;

        public function isWall(ax:int, ay:int):Boolean
        { if (ax<0||ax>=mw||ay<0||ay>=mh){return true;}  return vecGrid[ay*mw+ax] > 0;  } 
        
        public function setTile(ax:int, ay:int, t:int):void
        { if (ax<0||ax>=mw||ay<0||ay>=mh) {return;} vecGrid[ay*mw+ax]=t; }

        public function initEmpty(aw:int, ah:int):void
        { mw=aw; mh=ah; vecGrid = new Vector.<int>(aw*ah, false); }

        public function getMag(ax:Number, ay:Number):Number
        { return Math.sqrt(ax * ax + ay * ay); }

        public var myBall:xBall;
         
        public function onEnter(e:Event):void
        {
            var ms:Number;  var ta:Number;
            var a:xBall;      var d:Number;
            var mx:Number; var my:Number;
            mx = stage.mouseX; my = stage.mouseY;
            a = myBall;
            ta = Math.atan2(my-a.cy, mx-a.cx);
            d = getMag(mx-a.cx, my-a.cy);
            
             ms = 0.3;
            if (d < 30) {ms=0; a.vx*=0.9; a.vy*=0.9;}
            a.vx += Math.cos(ta)*ms;
            a.vy += Math.sin(ta) *ms;
            a.vx *= 0.99;  a.vy *= 0.99;

            gridTest(a);       
            gridTest(a);       

            a.cx += a.vx;   a.cy += a.vy;
            
            
            graphics.clear();
            graphics.lineStyle(2, 0);
   
            var i:int; var k:int; var yt:int; var t:int;
            for (i=0;i<mh;i++)
            {
             yt = i * mw;
             for (k=0;k<mw;k++)
             {
               t = vecGrid[k+yt];
               if (t > 0)
               {
                 graphics.beginFill(0x404040, 1);
                   graphics.drawRect(k*cw,i*ch,cw,ch);               
                 graphics.endFill();  
                   continue;
               }//endif
               //graphics.drawRect(k*cw,i*ch,cw,ch);      
             }//nextk
            }//nexti 
            
            graphics.beginFill(0x808080,1);
            graphics.drawCircle(a.cx, a.cy, a.rad);
            graphics.endFill();
             
        }//onenter
        
        public function gridTest(a:xBall):void
        {
          var i:int; var k:int;
          var ax:int; var ay:int;
          var ix:Number; var iy:Number;
          var d:Number; var ta:Number;
          var nx:Number; var ny:Number;
          var dot:Number;
          var bx:Number; var by:Number;
          
          ax = a.cx / cw; ay = a.cy / ch;
          for (i = -1; i <= 1; i += 1) 
          for (k = -1; k <= 1; k += 1) 
          {
            if (isWall(ax+k, ay+i)==false) { continue; }

             bx = (ax+k)*cw; by = (ay+i)*ch;
                
             if (a.cx < bx) {ix = bx; }
             else if (a.cx > bx+cw)  { ix = bx+ cw; }
             else {ix=a.cx;}
             if (a.cy < by) {iy = by; }
             else if (a.cy > by+ch)  { iy = by+ ch; }
             else {iy=a.cy;}
             
               d = getMag(a.cx-ix, a.cy-iy);
               if (d > a.rad) { continue; }
               
                ta = Math.atan2(iy - a.cy, ix - a.cx);
                a.cx += Math.cos(ta) * (d - a.rad);
                a.cy += Math.sin(ta) * (d - a.rad);
                nx = Math.cos(ta); ny = Math.sin(ta);  
    
               dot = a.vy * ny + a.vx * nx;
               if (dot > 0.5)
               {  a.vx -=  nx * dot;  a.vy -=  ny * dot;  }
          }//nextki
    
        }//gridtest
        
            
        
    

        
    }//classend
}

internal class xBall
{
  public var cx:Number = 0;  public var cy:Number = 0;
  public var vx:Number = 0;  public var vy:Number = 0;   
  public var rad:Number = 16;  
    
}//xball