*°+*><*+°*

bbaudry · Jul 26, 2024 · 42d8190 · 42d8190
1 parent 8daa487
commit 42d8190
Show file tree

Hide file tree

Showing 2 changed files with 131 additions and 0 deletions.
diff --git a/p5-experiments/plottable/etemontreal001.html b/p5-experiments/plottable/etemontreal001.html
@@ -0,0 +1,26 @@
+<!DOCTYPE html>
+<html lang="en">
+<html>
+
+<head>
+    <meta charset="UTF-8">
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/p5.js/1.5.0/p5.js"></script>
+    <script src="https://cdnjs.cloudflare.com/ajax/libs/p5.js/0.5.11/addons/p5.dom.min.js"></script>
+    <script src="https://unpkg.com/[email protected]"></script>
+    <style>
+        body {
+            padding: 0;
+            margin: 0;
+            background-color: black;
+        }
+    </style>
+</head>
+
+<body>
+    <script src="plottableframePostcards.js"></script>
+    <script src="etemontreal001.js"></script>
+    <script src="etemontreal001-core.js"></script>
+    <script src="showcode2.js"></script>
+</body>
+
+</html> 
diff --git a/p5-experiments/plottable/etemontreal001.js b/p5-experiments/plottable/etemontreal001.js
@@ -0,0 +1,105 @@
+function savesvg() {
+    save("etemontreal005.svg");
+}
+
+function savepng() {
+    save("etemontreal005.png");
+}
+
+var font
+var fSize = 12
+var alea = []
+var mainhu = 30
+var rarehu = 180
+function preload() {
+    font = loadFont("../fonts/1CAMBam_Stick_9.ttf");
+    sourcecode = loadStrings('etemontreal001-core.js');
+}
+
+function draw() {
+    background(0, 0, 100)
+    /*     cartepostale(globalmargin, globalmargin)
+        cartepostale(globalmargin + wpostcard, globalmargin)
+        cartepostale(globalmargin, globalmargin + hpostcard)
+        cartepostale(globalmargin + wpostcard, globalmargin + hpostcard)
+     */
+    codeetadresse(globalmargin, globalmargin, destinataires[0])
+    codeetadresse(globalmargin + wpostcard, globalmargin, destinataires[1])
+    codeetadresse(globalmargin, globalmargin + hpostcard, destinataires[2])
+    codeetadresse(globalmargin + wpostcard, globalmargin + hpostcard, destinataires[3])
+    noLoop()
+}
+
+function codeetadresse(x, y, adresse) {
+    stroke(0, 0, 0)
+    setmargins(x, y)
+    rect(x, y, wpostcard, hpostcard)
+    codeagauche()
+    adresseadrtoite(adresse)
+
+}
+
+var destinataires = [
+    { noms: ["jacques baudry", "françoise burel"], adresse: "15 rue des vedaudais", ville: "35690 Acigné", pays: "FRANCE" },
+    { noms: ["martin monperrus"], adresse: "Virebergsvägen 15", ville: "16930 Solna", pays: "SUEDE" },
+    { noms: ["marie-cécile mocellin","corentin lemonnier"], adresse: "13 rue glacière", ville: "75013 Paris", pays: "FRANCE" },
+    { noms: ["erik natanael gustafsson"], adresse: "orions bälte 38", ville: "136 76 Brandbergen", pays: "SUEDE" },
+]
+
+function adresseadrtoite(adresse) {
+    var adresse, posx, posy
+
+    fSize = 21
+    textFont(font)
+    textSize(fSize)
+    posx = actualheight * 0.55
+    posy = actualwidth * 0.42
+    push()
+    translate(leftmargin, bottommargin);
+    rotate(radians(270))
+    for(i=0;i<adresse.noms.length;i++){
+        text(adresse.noms[i], posx, posy)
+        posy+=1.5*fSize
+    }
+    text(adresse.adresse, posx, posy)
+    posy+=1.5*fSize
+    text(adresse.ville, posx, posy)
+    posy+=1.5*fSize
+    text(adresse.pays, posx, posy)
+    pop()
+}
+
+
+function codeagauche() {
+    var allcode, c, tw, posx, posy
+    posx = 0
+    posy = 3 * fSize
+    allcode = ''
+    fSize = 11
+    for (var i = 0; i < sourcecode.length; i++) {
+        var token = sourcecode[i]
+        if (token.toString().startsWith("function")) { allcode += "$" }
+        var notab = token.toString().replace(/\s/g, '').split('\r\n')[0]
+        allcode += notab
+    }
+    textFont(font)
+    textSize(fSize)
+    push()
+    translate(leftmargin, bottommargin);
+    rotate(radians(270))
+    for (let i = 0; i < allcode.length; i++) {
+        c = allcode.charAt(i)
+
+        tw = textWidth(c)
+        if (posx + tw > actualheight * 0.5 || c == "$") {
+            posx = 0
+            posy += fSize + 1
+        }
+        if (c != "$") { text(c, posx, posy) }
+        else (text(""), posx, posy)
+        posx += tw
+    }
+    posx = 0
+    posy += 2 * fSize + 1
+    pop()
+}