NIGHT Working Hours Macro Calculation

I would like to write a macro that can return the number of hours worked during the night shift.

In this case, the night shift starts at 21:00pm and ends at 6:am next day.

The column "I2" returns the number of hours worked during the day - formula ((F3-C3+(F3<C3))-(E3-D3+(E3<C3)))*24);
The column "J2" gives the overtime hours taking into account the number of regular hours allowed - IF(OR(I3="",I3<6),"",IF(I3>H3,"",I3-H3));
Cells "C3:F13" allows users to set up (using a data validation list) starting time, lunch in, lunch out, end time ( columns C and D AM; E and F PM);

My question is: How can I calculate night hours in column K, without having conflits with numbers returned in column I (worked hours)? Is it possible to write a macro for this?

Below please see the table:

B
C
D
E
F
G
H
I
J
K

1
Name
Start Time
Lunch In
Lunch Out
End time
BREAK?
Regular hours
Worked Hours
Overtime
Night Shift

[Code] ......