Carom Collision Force Model

Carom Collision Force Model
one of my best modelling task so far.

http://weelookang.blogspot.sg/2014/08/carom-collision-force-model.html
model A:  hit n rebounce only
start frame 1
Fx1 = -200, Fy1 = -20, Fx2 = -40, Fy2 = -520
initial values of t = 0.042, x = 0.0276, y = 0.0252, vx = 1.103, vy =1.3218
fx = if(t<0.167,0,if(t<0.171,Fx1,if(t<0.458,0,if(t<0.462,Fx2,0))))
fy = if(t<0.167,0,if(t<0.171,Fy1,if(t<0.458,0,if(t<0.462,Fy2,0))))
model B: got hit n rebounce
start frame 4
Fbx1 = -200, Fby1 = -10
initial values of t = 0.167, x = 0.189, y = 0.1902, vx = 0.7998, vy = 0.1
fx = if(t<0.583,0,if(t<0.588,Fbx1,0))
fy = if(t<0.583,0,if(t<0.588,Fby1,0))
model C: friction force
start frame 16
initial values of t = 0.666, x = 0.3279, y = 0.3334, vx = 0.55, vy = -0.5
frictionx = 0.96, frictiony= -0.85
fx = if(vx>0,-frictionx,0)
fy = if(vy<0,-frictiony,0)
https://dl.dropboxusercontent.com/u/44365627/lookangEJSworkspace/lookangejss/02_newtonianmechanics_3dynamics/trz/caromforcemodelangelineaw.trz