Add Wikipedia page box

UI/Base/Loading.ts

@@ -1,7 +1,17 @@
 import {FixedUiElement} from "./FixedUiElement";
+import {Translation} from "../i18n/Translation";
+import Combine from "./Combine";
+import Svg from "../../Svg";
+import Translations from "../i18n/Translations";
 
-export default class Loading extends FixedUiElement {
-    constructor() {
-        super("Loading..."); // TODO to be improved
+export default class Loading extends Combine {
+    constructor(msg?: Translation | string) {
+        const t = Translations.T(msg ) ?? Translations.t.general.loading.Clone();
+        t.SetClass("pl-2")
+        super([
+            Svg.loading_svg().SetClass("animate-spin").SetStyle("width: 1.5rem; height: 1.5rem; margin-bottom: 4px;"),
+            t 
+        ])
+        this.SetClass("flex m-1")
     }
 }

UI/WikipediaBox.ts

@@ -0,0 +1,53 @@
+import {UIEventSource} from "../Logic/UIEventSource";
+import {VariableUiElement} from "./Base/VariableUIElement";
+import Wikipedia from "../Logic/Web/Wikipedia";
+import Loading from "./Base/Loading";
+import {FixedUiElement} from "./Base/FixedUiElement";
+import Combine from "./Base/Combine";
+import BaseUIElement from "./BaseUIElement";
+import Title from "./Base/Title";
+import Translations from "./i18n/Translations";
+import Svg from "../Svg";
+
+export default class WikipediaBox extends Combine{
+    
+    constructor(options: {
+        pagename: string,
+        language: string
+    }) {
+        
+        const htmlContent = UIEventSource.FromPromiseWithErr(Wikipedia.GetArticle({
+            pageName: options.pagename,
+            language: options.language,
+            removeInfoBoxes: true
+        }))
+        
+        const contents : UIEventSource<string | BaseUIElement> = htmlContent.map(htmlContent => {
+            if(htmlContent === undefined){
+                // Still loading
+                return new Loading("Loading wikipedia page").SetClass("p-4")
+            }
+            if(htmlContent["success"] !== undefined){
+                return new FixedUiElement(htmlContent["success"]).SetClass("wikipedia-article")
+            }
+            if(htmlContent["error"]){
+                return new FixedUiElement(htmlContent["error"]).SetClass("alert p-4")
+            }
+            
+            return undefined
+            
+        })
+        
+        const scrollable = new Combine([new VariableUiElement(contents).SetClass("block pl-6 pt-2")])
+            .SetClass("block overflow-auto normal-background rounded-lg")
+        super([
+            new Combine([Svg.wikipedia_svg().SetStyle("width: 1.5rem").SetClass("mr-3"), 
+                new Title(Translations.t.general.wikipedia.wikipediaboxTitle, 2)]).SetClass("flex"),
+            scrollable])
+        
+        this
+            .SetClass("block rounded-xl subtle-background m-1 p-2 flex flex-col")
+    }
+    
+    
+}