ok that is pretty nice

cmd/clitest/main.go

@@ -7,7 +7,6 @@ import (
 	"log"
 	"net/http"
 	"os"
-	"path"
 	"slices"
 	"sort"
 	"strings"
@@ -50,9 +49,21 @@ func main() {
 		like = append(like, ledger.LikeAfter(*likeAfter))
 
 		foo := func(w http.ResponseWriter, r *http.Request) {
-			switch path.Dir(r.URL.Path) {
+			foolike := make(ledger.Likes, 0)
-			case "/bal":
+			for _, v := range r.URL.Query()["likeName"] {
-				register := deltas.Like(like...).Register()
+				foolike = append(foolike, ledger.LikeName(v))
+			}
+			for _, v := range r.URL.Query()["likeAfter"] {
+				foolike = append(foolike, ledger.LikeAfter(v))
+			}
+			for _, v := range r.URL.Query()["likeBefore"] {
+				foolike = append(foolike, ledger.LikeBefore(v))
+			}
+			if len(foolike) == 0 {
+				foolike = like
+			}
+
+			register := deltas.Like(foolike...).Register()
 			nameCurrencyDateValue := map[string]map[ledger.Currency]map[string]float64{}
 			dates := []string{}
 			for date, balances := range register {
@@ -73,21 +84,51 @@ func main() {
 
 			line := charts.NewLine()
 			line.AddXAxis(dates)
+
+			switch r.URL.Path {
+			default:
+				http.NotFound(w, r)
+				return
+			case "/bal":
 				for name, currencyDateValue := range nameCurrencyDateValue {
 					for currency, dateValue := range currencyDateValue {
 						series := make([]int, len(dates))
-						for i, date := range dates {
+						for i := range dates {
-							series[i] = int(dateValue[date])
+							var lastValue float64
+							for j := range dates[:i+1] {
+								if newLastValue, ok := dateValue[dates[j]]; ok {
+									lastValue = newLastValue
+								}
+							}
+							series[i] = int(lastValue)
 						}
 						key := fmt.Sprintf("%s (%s)", name, currency)
 						line.AddYAxis(key, series)
 					}
 				}
+			case "/reg":
+				for name, currencyDateValue := range nameCurrencyDateValue {
+					for currency, dateValue := range currencyDateValue {
+						series := make([]int, len(dates))
+						for i := range dates {
+							var prevValue float64
+							var lastValue float64
+							for j := range dates[:i+1] {
+								if newLastValue, ok := dateValue[dates[j]]; ok {
+									prevValue = lastValue
+									lastValue = newLastValue
+								}
+							}
+							series[i] = int(lastValue - prevValue)
+						}
+						key := fmt.Sprintf("%s (%s)", name, currency)
+						line.AddYAxis(key, series)
+					}
+				}
+			}
 			if err := line.Render(w); err != nil {
 				panic(err)
 			}
-			case "/reg":
-			}
 		}
 
 		log.Println("listening on", *httpOutput)