Tap-on tap-off fare capping

Work out how much each rider of a city rail network is charged, given fare capping.

Each event is [rider, day, time, kind, zone]: a rider tapped "on" or "off" at a gate in the given zone, on a day of the week (1 to 7) at "HH:MM". Events come in chronological order.

Trips. A rider has at most one open trip.

• A tap-on opens a trip. If the rider already had an open trip, that earlier trip was never finished.
• A tap-off finishes the open trip if it happens on the same day as the tap-on and at most 180 minutes after it. Otherwise the open trip was never finished, and this tap-off is ignored. A tap-off with no open trip is ignored too.
• A trip still open after the last event was never finished.

Fares. A finished trip costs 200 + 80 * d, where d is the difference between the tap-on zone and tap-off zone. A trip that was never finished costs 600. A trip is charged on the day of its tap-on.

Caps. Take each rider's trips in the order their tap-ons occurred. A trip's charge is its fare, but never more than what is left of the rider's dailyCap for that day, nor of the weeklyCap for the whole week (both counting what was actually charged so far, not fares). A used-up cap means a charge of 0.

Input: events, a list of events as above, and the integers dailyCap and weeklyCap.

Output: a list of [rider, total] pairs, one for every rider with at least one tap-on, sorted by rider name ascending, where total is the rider's total charge. Riders who only have ignored tap-offs are not listed. Return [] if nobody tapped on.