=LET(x_,COUNTA(A:A)-1,b1_,OFFSET(B1,,,x_),b2_,OFFSET(b1_,1,0),c1_,OFFSET(b1_,,1),c2_,OFFSET(c1_,1,0),d1_,OFFSET(b1_,,2),d2_,OFFSET(d1_,1,0),y_,IFERROR((d2_="IN")*(d1_="OUT")*(b2_=b1_)*(c2_-c1_),),y_)
sample file here