KeyUp

if( ::GetAsyncKeyState(VK_DOWN) & 0x8000f )

{

if(!down_up)

ball_a_down=0.001f;

down_up = true;

if(down_up)

{

        ...

}

}

else

{

        ...

}