More scripts

blair55 · Dec 29, 2022 · 68434a2 · 68434a2
1 parent 7535b54
commit 68434a2
Show file tree

Hide file tree

Showing 6 changed files with 88 additions and 11 deletions.
diff --git a/http/bulkRemove.fsx b/http/bulkRemove.fsx
@@ -0,0 +1,12 @@
+#r "nuget: FSharp.Data"
+
+open System.Text.Json
+open FSharp.Data
+open FSharp.Data.HttpContentTypes
+open FSharp.Data.HttpRequestHeaders
+
+[ "" ]
+|> List.map (fun s -> JsonSerializer.Serialize({| PlayerId = s |}))
+|> List.iter (fun r ->
+ Http.Request("https://rightresu.lt/api/removePlayer", body = TextRequest r, headers = [ ContentType Json ])
+ |> ignore)
diff --git a/http/put-predictions.http b/http/put-predictions.http
@@ -0,0 +1,59 @@
+POST https://rightresu.lt/api/putPredictions
+content-type: application/json
+
+{
+ "PlayerId": "",
+ "FixtureSetId": "",
+ "Predictions": [
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ {
+ "FixtureId": "",
+ "HomeScore": int,
+ "AwayScore": int
+ },
+ ]
+}
diff --git a/http/remove-player-from-league copy.http b/http/remove-player-from-league copy.http
diff --git a/http/remove-player-from-league.http b/http/remove-player-from-league.http
@@ -0,0 +1,7 @@
+POST https://rightresu.lt/api/removePlayerFromLeague
+content-type: application/json
+
+{
+ "PlayerId": "",
+ "LeagueId": "",
+}
diff --git a/http/remove-player.http b/http/remove-player.http
@@ -0,0 +1,6 @@
+POST https://rightresu.lt/api/removePlayer
+content-type: application/json
+
+{
+ "PlayerId": "",
+}
diff --git a/src/Server/EventHandling.fs b/src/Server/EventHandling.fs
@@ -8,10 +8,10 @@ open Server.Subscribers
 module EventHandling =
 
  let (|MapPredictionSetEventPlayerIdId|) (PlayerId playerId) : PlayerId =
- PlayerId playerId
- // if "fb-735238821018" = playerId
- // then PlayerId "tw-458540585"
- // else PlayerId playerId
+ match playerId with
+ | "fb-10160345161488703" -> PlayerId "tw-414832159"
+ | "fb-735238821018" -> PlayerId "tw-458540585"
+ | _ -> PlayerId playerId
 
  let onEvent deps (DatedEvent (event, created)) =
  printfn "handling event: %A" event