Blackjack 🃏

- Rules -
The goal is to get as close to - but not over - 21 points for each hand:
- aces are valued 11 or 1 points,
- other honors are valued at 10 points, and
- the numbers on spot cards equal their value.

You start with 20 chips. Place your bet each round from 1 to 9.
Then for each hand choose actions (if applicable):

h - Hit: Take another card.
s - Stand: Keep the current hand and do not take any more cards.
d - Double Down: Double your bet and receive one final card for that hand.
p - Split: Split a hand into two separate hands (with own bets) when the first
2 cards share ranks. Up to 3 times per round (aces only once).

Hand wins when higher points than dealer or dealer busts (over 21).
Dealer hits while under 17 points. Then stands.
Blackjack (Ace with a 10 point card) beats 21 and stands implicitly.
You play one deck of 52 standard playing cards, shuffled every round.

#game

Log in to post a comment.

const gameSeed = 'Change this for a different game'; //type=string
const calls = ''; //type=string
const showRules = 0; //min=0 max=1 step=1 (No, Yes)

// You can find the Turtle API reference here: https://turtletoy.net/syntax
Canvas.setpenopacity(1);

loadEnum();
loadCardGames();
turtlelib_init();

if(calls == '') { R.seedRandom(); } else { R.seed(gameSeed); }

const ACTIONS = Enum.from('HIT', 'STAND', 'DOUBLEDOWN', 'SPLIT');

const turtle = new Turtle();
const polygons = new Polygons();
const textWriter = new Text(getFont('HersheySans1'));

const deck = Deck.standard();
const dealer = new Dealer();
const player = new Player(20, parseInt(calls[0]));
const bjg = new BlackJackGame(deck, dealer, player);

const gameStatus = (() => {try {return bjg.handleCalls(calls);} catch(e) {return { error: e.message };}})();

function walk(i) {
    if(calls.length == 0 || showRules == 1) {
        showIntro();
        return false;
    }
    
    if(gameStatus.error !== undefined) {
        turtle.jump(-90, 70);
        textWriter.print(turtle, 'Error', 1);
        turtle.jump(-90, 90);
        textWriter.print(turtle, gameStatus.error, 1);
        return false;
    }

    const gameResults = (gameStatus.options === 0)? gameStatus.lastRoundResults.map(res => res): [];
    
    turtle.jump(-90, -85);
    textWriter.print(turtle, `Dealer:\n${bjg.getScore(dealer)[0]}`, .7);
    dealer.draw(turtle, [-40, -80]);

    for(let j = 0, max = player.handCount; j < max; j++) {
        turtle.jump(-90, -55 + 25 * j);
        textWriter.print(turtle, `${max == 1? 'Player': `Hand #${j+1}`}:
${bjg.getScore(player, j).join(' or ')}
${gameStatus.options === 0? `${gameResults[j]} ${player.getHand(j).bet}`: `Bet: ${player.getHand(j).bet}`}`, .6);
        player.getHand(j).draw(turtle, [-40, -50 + 25 * j]);
        if(gameStatus.handIdx == j) {
            PT.drawTour(turtle, [[-49, -62 + 25 * j], [70, -62 + 25 * j], [70, -63 + 25 * (j+1)], [-49, -63 + 25 * (j+1)]])
        }
    }

    turtle.jump(-90, 65);
    textWriter.print(turtle, `Player chips: ${player.chips}`, .7);
    
    let tab = -90;
    [
        [ACTIONS.HIT, '(h)it'],
        [ACTIONS.STAND, '(s)tand'],
        [ACTIONS.DOUBLEDOWN, '(d)ouble'],
        [ACTIONS.SPLIT, 's(p)lit']
    ].forEach(e => {
        if((gameStatus.options & e[0]) === e[0]) {
            turtle.jump(tab, 90);
            textWriter.print(turtle, e[1], .7);
            tab += 40;
        }
    });

    if(gameStatus.options === 0) {
        turtle.jump(tab, 90);
        if(player.chips == 0) {
            textWriter.print(turtle, `GAME OVER - Thanks for playing!`, .7);
        } else {
            textWriter.print(turtle, `Add a bet (1-9) to the calls to start a new round`, .7);
        }
    } else {
        turtle.jump(-90, 80);
        textWriter.print(turtle, `Add one of the options below to your calls`, .7);
    }

    return false;
}

function showIntro() {
    const logoWriter = new Text(getFont('EMSMistyNight'));

    centerPlotAt(turtle, logoWriter.getPts(turtle, 'blackjack', 2), [0, -80]);

    if(calls == '') {
        centerPlotAt(turtle, textWriter.getPts(turtle, 'Enter and then append your calls to the calls input field', .7), [0, 80]);
        centerPlotAt(turtle, textWriter.getPts(turtle, 'To start a game enter your bet (1 to 9)', .7), [0, 90]);
    } else {
        centerPlotAt(turtle, textWriter.getPts(turtle, 'Toggle the showRules option to continue', .7), [0, 90]);
    }
    
    if(Array.prototype.zip == undefined) {
        Array.prototype.zip = (function (a) { return this.map((e, i) => [e, a[i]]) });
    }
    if(Array.prototype.flatZip == undefined) {
        Array.prototype.flatZip = (function (a) { return this.map((e, i) => [...e, a[i]]) });
    }

    const introDeck = Deck.standard();

    ['KING', 'QUEEN', 'JACK', 'TEN'].sort((a, b) => Math.random() < .5? -1: 1).zip(
        ['CLUBS', 'HEARTS', 'SPADES', 'DIAMONDS'].sort((a, b) => Math.random() < .5? -1: 1)
    ).forEach((e, i) => {
        new Card(SUITS[e[1]], RANKS.ACE, true).draw(turtle, [-5.5 -67.5 + 45*i,-50], 13, 20, .25);
        new Card(SUITS[e[1]], RANKS[e[0]], true).draw(turtle, [5.5 -67.5 + 45*i,-50], 13, 20, -.25);
        introDeck.remove(SUITS[e[1]], RANKS.ACE);
        introDeck.remove(SUITS[e[1]], RANKS[e[0]]);
    });
    
    introDeck.shuffle();
    
    if(showRules == 0) {
        const getPos = (r, theta) => [r * 40 * Math.sin(theta), r * 40 * Math.cos(theta) + 18];
        while(card = introDeck.getTop()) {
            card.faceUp = Math.random() < .8;
            card.draw(turtle, getPos(Math.random()**.5, Math.random() * 2 * Math.PI), 13, 20, R.getAngle());
            chip(turtle, polygons, 4.5, getPos((Math.random()*1.5)**.5, Math.random() * 2 * Math.PI), Math.random() * 5 | 0, 4 + 7 * Math.random() | 0, R.getAngle());
        }
    } else {
        centerPlotAt(turtle, textWriter.getPts(turtle, `- Rules -`, .7), [0, -27]);
        centerPlotAt(turtle, textWriter.getPts(turtle, `The goal is to get as close to - but not over - 21 points for each hand:
- aces are valued 11 or 1 points,
- other honors are valued at 10 points, and
- the numbers on spot cards equal their value.

You start with 20 chips. Place your bet each round from 1 to 9.
Then for each hand choose actions (if applicable):

h - Hit: Take another card. 
s - Stand: Keep the current hand and do not take any more cards. 
d - Double Down: Double your bet and receive one final card for that hand. 
p - Split: Split a hand into two separate hands (with own bets) when the first
             2 cards share ranks. Up to 3 times per round (aces only once).

Hand wins when higher points than dealer or dealer busts (over 21).
Dealer hits while under 17 points. Then stands.
Blackjack (Ace with a 10 point card) beats 21 and stands implicitly.
You play one deck of 52 standard playing cards, shuffled every round.`, .5), [0,25]);
    }
}


function centerPlotAt(turtle, paths, pos = [0, 0]) {
    const bb = pathsBB(paths);
    const centerCorrection = [
        -(bb[1][0] - bb[0][0]) / 2 - bb[0][0],
        -bb[1][1] + (bb[1][1] - bb[0][1]) / 2
    ];
    
    paths.forEach(path => PT.draw(turtle, path.map(pt => V.add(V.add(pt, centerCorrection), pos))));
}

function pathsBB(paths) {
    return paths.map(path => pathBB(path)).reduce((a, c) => [
        [Math.min(a[0][0], c[0][0]), Math.min(a[0][1], c[0][1])],
        [Math.max(a[1][0], c[1][0]), Math.max(a[1][1], c[1][1])]
    ], [
        [Number.MAX_SAFE_INTEGER, Number.MAX_SAFE_INTEGER],
        [Number.MIN_SAFE_INTEGER, Number.MIN_SAFE_INTEGER]
    ]);
}
function pathBB(path) {
    return path.reduce((a, c) => [
        [Math.min(a[0][0], c[0]), Math.min(a[0][1], c[1])],
        [Math.max(a[1][0], c[0]), Math.max(a[1][1], c[1])]
    ], [
        [Number.MAX_SAFE_INTEGER, Number.MAX_SAFE_INTEGER],
        [Number.MIN_SAFE_INTEGER, Number.MIN_SAFE_INTEGER]
    ]);
}

function chip(turtle, polygons, r = 5, pos = [-80, 0], hatchIdx = 0, nSegments = 10, rotation = 0) {
    const diamondHatch = 6;
    const hatchSettings = [
        [[], [[1, .15]], [[1, .15]], []],
        [[[1, .15]], [], [], [[1, .15]]],
        [
            [[rotation+1, 1 / (diamondHatch/r)], [rotation-1, 1 / (diamondHatch/r)]], //center
            [], //segments
            [], //ring
            [[1, .15]] // outer ring (with segments)
        ],
        [[[1, .15]], [[1, .15]], [], []],
        [[[rotation+1, 1 / (diamondHatch/r)], [rotation-1, 1 / (diamondHatch/r)]], [[rotation+1, 1 / (diamondHatch/r)], [rotation-1, 1 / (diamondHatch/r)]], [[1, .15]], []],
    ];

    const segmentPts = [
        ...PT.arc(.8 * r, Math.PI / nSegments, 0, null, true),
        ...PT.arc(     r, Math.PI / nSegments, 0, null, true).reverse()
    ];

    for(let i = 0; i < nSegments; i++) {
        const seg = polygons.create();
        seg.addPoints(...segmentPts.map(pt => V.trans(V.rot2d(rotation+i * 2 * Math.PI / nSegments), pt)).map(pt => V.add(pt, pos)));
        hatchSettings[hatchIdx][1].forEach(h => seg.addHatching(...h));
        seg.addOutline();
        polygons.draw(turtle, seg);
    }
    
    [
        [.55, hatchSettings[hatchIdx][0]],
        [.7, hatchSettings[hatchIdx][2]],
        [1, hatchSettings[hatchIdx][3]]
    ].forEach(rF => {
        const outer = polygons.create();
        outer.addPoints(...PT.circle(rF[0] * r).map(pt => V.add(pt, pos)));
        rF[1].forEach(h => outer.addHatching(...h));
        outer.addOutline();
        polygons.draw(turtle, outer);
    });
}

function BlackJackGame(deck, dealer, player) {
    class BlackJackGame {
        #player;
        #dealer;
        #deck;
        constructor(deck, dealer, player) {
            this.#deck = deck;
            this.#dealer = dealer;
            this.#player = player;
            
            this.reset();
        }
        reset() {
            //for(let counterCheat = 0; counterCheat < this.#player.bet; counterCheat++, Math.random()){}

            this.#dealer.reset();
            this.#player.reset();
            this.#deck.reset();

            deck.shuffle();
            this.start();
        }
        start() {
            for(let i = 0; i < 2; i++) {
                for(let handIdx = 0; handIdx < this.#player.handCount; handIdx++) {
                    this.#dealer.hit(this.#deck, this.#player, handIdx);
                }
                this.#dealer.hit(this.#deck);
            }
        }
        evaluate(debug = false) {
            
            if(debug) {
                console.group('Evaluation');
                console.group('Dealer');
                console.log('Dealer', '' + this.#dealer.getHand().peek().join('\n'));
                console.groupEnd();
            }
            
            const gameResults = [];
            for(let i = 0; i < this.#player.handCount; i++) {
                const handScore = this.getScore(this.#player, i)[0];
                const dealerScore = this.getScore(this.#dealer)[0];

                if(debug) {
                    console.group('Player ' + i);
                    console.log('Scores (dealer,player)', dealerScore, handScore);
                }
                if(handScore == 'Bust') {
                    if(debug) console.log('Lost because bust');
                    gameResults.push('Lost');
                } else if(dealerScore == handScore) {
                    if(debug) console.log('Tied');
                    gameResults.push('Tied');
                    player.chips += player.getHand(i).bet;
                } else if(handScore == 'Blackjack' || dealerScore == 'Bust' || dealerScore < handScore) {
                    if(debug) console.log('Won');
                    gameResults.push('Won');
                    player.chips += 2 * player.getHand(i).bet;
                } else {
                    if(debug) console.log('Lost because nothing else');
                    gameResults.push('Lost');
                }
                if(debug) {
                    console.log(this.#player.getHand(i).peek().join('\n'));
                    console.groupEnd();
                }
            }
            if(debug) {
                console.groupEnd();
            }
            return gameResults;
        }
        splitHand(handIdx) {
            const card = this.#player.getHand(handIdx).takeLast();
            this.#dealer.hit(this.#deck, this.#player, handIdx);
            this.#player.addHand();
            this.#player.getHand(this.#player.handCount - 1).add(card);
            this.#dealer.hit(this.#deck, this.#player, this.#player.handCount - 1);
        }
        getOptions(player, handIdx = 0) {
            const options = ACTIONS.HIT | ACTIONS.STAND;
            const hand = player.getHand(handIdx);
            if(!hand) return 0;
            if(hand.size != 2) {
                return options;
            }
            
            const cards = hand.peek();
            const splitRank = cards[0].rank;
            const userCanSplit = (
                   (player.handCount < 4 && cards.every(c => c.rank == splitRank && c.rank != RANKS.ACE))
                || (player.handCount == 1 && cards.every(c => c.rank == RANKS.ACE))
            ) && (player.bet < player.chips);
            
            const canDouble = player.bet <= player.chips;

            return options | ( canDouble? ACTIONS.DOUBLEDOWN: 0) | ( userCanSplit? ACTIONS.SPLIT: 0);
        }
        getScore(player, handIdx = 0) {
            const hand = player.getHand(handIdx);

            if(!hand.peek().every(c => c.faceUp)) {
                return ['?'];
            }
            
            return this.handScore(hand, player.handCount);
        }
        handScore(hand, nrOfHands) {
            const cards = hand.peek();
            
            const score = cards.reduce((a, c) =>  a + this.cardScore(c), 0);
            
            if(nrOfHands == 1 && score == 21 && cards.length == 2) return ['Blackjack'];
            
            const nrAces = cards.filter(c => c.rank == RANKS.ACE).length;
            
            const scores = Array.from({length: nrAces + 1}, (e, i) => score - 10 * i).filter(s => s <= 21);
            
            return (scores.length == 0? ['Bust']: scores);
        }
        cardScore(c) {
            return c.rank == RANKS.ACE? 11: (c.rank < RANKS.JACK? RANKS.index(c.rank) + 2: 10);
        }
        handleCalls(calls) {
            let handIdx = 0;
            let options = this.getOptions(this.#player, 0);
            let lastGameResults = [];

            calls.split('').forEach((char, i) => {
                if(i === 0) return;
                
                switch(char.toLowerCase()) {
                    case 'h':
                        if((options & ACTIONS.HIT) != ACTIONS.HIT) {
                            throw new Error(`Illegal call: '${char}'`);
                        }
                        this.#dealer.hit(this.#deck, this.#player, handIdx);
                        if(this.getScore(this.#player, handIdx)[0] == 'Bust') {
                            handIdx++;
                        }
                        break;
                    case 's':
                        if((options & ACTIONS.STAND) != ACTIONS.STAND) {
                            throw new Error(`Illegal call: '${char}'`);
                        }
                        handIdx++;
                        break;
                    case 'd':
                        if((options & ACTIONS.DOUBLEDOWN) != ACTIONS.DOUBLEDOWN) {
                            throw new Error(`Illegal call: '${char}'`);
                        }
                        this.#dealer.hit(this.#deck, this.#player, handIdx);
                        this.#player.chips -= this.#player.getHand(handIdx).bet;
                        this.#player.getHand(handIdx).bet = this.#player.getHand(handIdx).bet * 2;
                        handIdx++;
                        break;
                    case 'p':
                        if((options & ACTIONS.SPLIT) != ACTIONS.SPLIT) {
                            throw new Error(`Illegal call: '${char}'`);
                        }
                        this.splitHand(handIdx);
                        break;
                    case '1':
                    case '2':
                    case '3':
                    case '4':
                    case '5':
                    case '6':
                    case '7':
                    case '8':
                    case '9':
                        const amount = parseInt(char);
                        if(0 < options || this.#player.chips < amount) {
                            throw new Error(`Illegal call: '${char}'`);
                        }
                        
                        this.#player.bet = amount;
                        this.reset();
                        handIdx = 0;
        
                        if(this.getScore(this.#player, handIdx)[0] == 'Blackjack') {
                            handIdx++;
                        }
                        break;
                    default:
                        throw new Error(`Illegal call: '${char}'`);
                }
            
                options = this.getOptions(this.#player, handIdx);
                
                if(handIdx == this.#player.handCount) {
                    if(Array.from({length: this.#player.handCount}, (e, i) => this.getScore(this.#player, i)[0]).some(e => e != 'Bust')) {
                        this.#dealer.reveal();
                
                        while(this.getScore(this.#dealer)[0] < 17) {
                            this.#dealer.hit(this.#deck);
                        }
                    }
                    
                    lastGameResults = this.evaluate();
                }
            });
            
            return {
                handIdx: handIdx,
                options: options,
                lastRoundResults: lastGameResults
            }
        }
    }
    return new BlackJackGame(deck, dealer, player);
}

function loadCardGames() {
    const cardRanks = [...Array.from({length: 9}, (e, i) => ''+(i+2)), 'J', 'Q', 'K', 'A'];
    const cardFontPaths = [[[[-0.155,-0.137],[-0.155,-0.163],[-0.13,-0.212],[-0.105,-0.237],[-0.055,-0.263],[0.045,-0.263],[0.095,-0.237],[0.12,-0.212],[0.145,-0.163],[0.145,-0.112],[0.12,-0.063],[0.07,0.013],[-0.18,0.263],[0.17,0.263]]],[[[-0.13,-0.263],[0.145,-0.263],[-0.005,-0.063],[0.07,-0.063],[0.12,-0.037],[0.145,-0.012],[0.17,0.063],[0.17,0.113],[0.145,0.188],[0.095,0.238],[0.02,0.263],[-0.055,0.263],[-0.13,0.238],[-0.155,0.213],[-0.18,0.163]]],[[[0.057,-0.263],[-0.193,0.088],[0.183,0.088]],[[0.057,-0.263],[0.057,0.263]]],[[[0.12,-0.263],[-0.13,-0.263],[-0.155,-0.037],[-0.13,-0.063],[-0.055,-0.087],[0.02,-0.087],[0.095,-0.063],[0.145,-0.012],[0.17,0.063],[0.17,0.113],[0.145,0.188],[0.095,0.238],[0.02,0.263],[-0.055,0.263],[-0.13,0.238],[-0.155,0.213],[-0.18,0.163]]],[[[0.145,-0.187],[0.12,-0.237],[0.045,-0.263],[-0.005,-0.263],[-0.08,-0.237],[-0.13,-0.163],[-0.155,-0.037],[-0.155,0.088],[-0.13,0.188],[-0.08,0.238],[-0.005,0.263],[0.02,0.263],[0.095,0.238],[0.145,0.188],[0.17,0.113],[0.17,0.088],[0.145,0.013],[0.095,-0.037],[0.02,-0.063],[-0.005,-0.063],[-0.08,-0.037],[-0.13,0.013],[-0.155,0.088]]],[[[0.17,-0.263],[-0.08,0.263]],[[-0.18,-0.263],[0.17,-0.263]]],[[[-0.055,-0.263],[-0.13,-0.237],[-0.155,-0.187],[-0.155,-0.137],[-0.13,-0.087],[-0.08,-0.063],[0.02,-0.037],[0.095,-0.012],[0.145,0.037],[0.17,0.088],[0.17,0.163],[0.145,0.213],[0.12,0.238],[0.045,0.263],[-0.055,0.263],[-0.13,0.238],[-0.155,0.213],[-0.18,0.163],[-0.18,0.088],[-0.155,0.037],[-0.105,-0.012],[-0.03,-0.037],[0.07,-0.063],[0.12,-0.087],[0.145,-0.137],[0.145,-0.187],[0.12,-0.237],[0.045,-0.263],[-0.055,-0.263]]],[[[0.157,-0.087],[0.133,-0.012],[0.083,0.037],[0.008,0.063],[-0.017,0.063],[-0.092,0.037],[-0.143,-0.012],[-0.167,-0.087],[-0.167,-0.112],[-0.143,-0.187],[-0.092,-0.237],[-0.017,-0.263],[0.008,-0.263],[0.083,-0.237],[0.133,-0.187],[0.157,-0.087],[0.157,0.037],[0.133,0.163],[0.083,0.238],[0.008,0.263],[-0.043,0.263],[-0.117,0.238],[-0.143,0.188]]],[[[-0.355,-0.163],[-0.305,-0.187],[-0.23,-0.263],[-0.23,0.263]],[[0.22,-0.263],[0.145,-0.237],[0.095,-0.163],[0.07,-0.037],[0.07,0.037],[0.095,0.163],[0.145,0.238],[0.22,0.263],[0.27,0.263],[0.345,0.238],[0.395,0.163],[0.42,0.037],[0.42,-0.037],[0.395,-0.163],[0.345,-0.237],[0.27,-0.263],[0.22,-0.263]]],[[[0.107,-0.263],[0.107,0.137],[0.083,0.213],[0.058,0.238],[0.007,0.263],[-0.042,0.263],[-0.093,0.238],[-0.117,0.213],[-0.142,0.137],[-0.142,0.088]]],[[[-0.055,-0.263],[-0.105,-0.237],[-0.155,-0.187],[-0.18,-0.137],[-0.205,-0.063],[-0.205,0.063],[-0.18,0.137],[-0.155,0.188],[-0.105,0.238],[-0.055,0.263],[0.045,0.263],[0.095,0.238],[0.145,0.188],[0.17,0.137],[0.195,0.063],[0.195,-0.063],[0.17,-0.137],[0.145,-0.187],[0.095,-0.237],[0.045,-0.263],[-0.055,-0.263]],[[0.02,0.163],[0.17,0.313]]],[[[-0.168,-0.263],[-0.168,0.263]],[[0.183,-0.263],[-0.168,0.088]],[[-0.043,-0.037],[0.183,0.263]]],[[[-0.03,-0.263],[-0.23,0.263]],[[-0.03,-0.263],[0.17,0.263]],[[-0.155,0.088],[0.095,0.088]]]];;
    const cardSuits = ['Hearts','Diamonds','Clubs','Spades'];
    const cardNames = ['Two', 'Three', 'Four', 'Five', 'Six', 'Seven', 'Eight', 'Nine', 'Ten', 'Jack', 'Queen', 'King', 'Ace'];

    const SUITS = Enum.from(cardSuits);
    const RANKS = Enum.from(cardNames);
    this.SUITS = SUITS;
    this.RANKS = RANKS;
    
    // Fisher-Yates (aka Knuth) Shuffle
    // https://stackoverflow.com/questions/2450954/how-to-randomize-shuffle-a-javascript-array#2450976
    function shuffle(array) {
      let currentIndex = array.length,  randomIndex;
    
      // While there remain elements to shuffle.
      while (currentIndex > 0) {
    
        // Pick a remaining element.
        randomIndex = Math.floor(Math.random() * currentIndex);
        currentIndex--;
    
        // And swap it with the current element.
        [array[currentIndex], array[randomIndex]] = [
          array[randomIndex], array[currentIndex]];
      }
    
      return array;
    }
    
    class Player {
        #chips;
        #hands;
        #bet;
        constructor(chips, bet) {
            this.#chips = chips;
            this.#bet = bet;
        }
        reset() {
            this.#chips -= this.#bet;
            this.#hands = [new Hand(this.#bet)];
        }
        deal(card, handIdx) {
            this.#hands[handIdx].add(card);
        }
        set bet(b) {
            this.#bet = b;
        }
        get bet() {
            return this.#bet;
        }
        set chips(c) {
            this.#chips = c;
        }
        get chips() {
            return this.#chips;
        }
        get handCount() {
            return this.#hands.length;
        }
        getHand(handIdx = 0) {
            return this.#hands[handIdx];
        }
        addHand() {
            this.#chips -= this.#bet;
            this.#hands.push(new Hand(this.#bet));
        }
    }
    
    this.Player = Player;

    class Dealer {
        #hand;
        constructor() {
            this.reset();
        }
        reset() {
            this.#hand = new Hand();
        }
        hit(deck, player, handIdx = 0) {
            if(player === undefined) {
                const dealerCard = deck.getTop();
                dealerCard.faceUp = (this.#hand.size !== 1)
                this.#hand.add(dealerCard);
                return;
            }
            const c = deck.getTop();
            c.faceUp = true;
            player.deal(c, handIdx);
        }
        draw(turtle, location) {
            this.#hand.draw(turtle, location);
        }
        reveal() {
            this.#hand.setFaceUp(1, true);
        }
        getHand() {
            return this.#hand;
        }
        get handCount() {
            return 1;
        }
    }
    
    this.Dealer = Dealer;
    
    class Card {
        #suit = 0;
        #rank = 0;
        #faceUp = false;
        constructor(suit, rank, faceUp = false) {
            this.#suit = suit;
            this.#rank = rank;
            this.#faceUp = faceUp;
        }
        get faceUp() {
            return this.#faceUp;
        }
        set faceUp(val) {
            this.#faceUp = (val == true);
        }
        get rank() {
            return this.#rank;
        }
        get suit() {
            return this.#suit;
        }
        get name() {
            return `${RANKS.key(this.#rank)} of ${SUITS.key(this.#suit)}`;
        }
        draw(turtle, pos, width = 13, height = 20, rotation = 0) {
            const rot = V.rot2d(rotation);
            
            if(this.#faceUp) {
                const suit = getSuitSymbolPts(this.#suit, Math.min(width, height) * .6)
                                    .map(pt => V.trans(rot, V.add(pt, [0, height / 4])));
                
                const rank = cardFontPaths[RANKS.index(this.#rank)].map(path =>
                    path.map(pt => V.scale(pt, Math.min(width, height) * .8))
                        .map(pt => V.trans(rot, V.add(pt, [0, -height / 4])))
                );
                const rankPolygon = polygons.create();
                rank.forEach(path => path.map(pt => V.add(pt, pos)).forEach((e, i, a) => {
                    if(i == a.length - 1) return;
                    rankPolygon.addSegments(e, a[(i+1)%a.length]);
                }));
                polygons.draw(turtle, rankPolygon);
                
                const suitPolygon = polygons.create();
                suitPolygon.addPoints(...suit.map(pt => V.add(pt, pos)));
                suitPolygon.addOutline();
                if(this.#suit & (SUITS.SPADES | SUITS.CLUBS)) {
                    suitPolygon.addHatching(1 + rotation, .15);
                } else {
                    suitPolygon.addHatching(1 + rotation, 1);
                    suitPolygon.addHatching(-1 + rotation, 1);
                }
                polygons.draw(turtle, suitPolygon);
            } else {
                const coverCornerR = .8 * Math.min(width, height) / 6;
                const coverMargin = Math.min(width, height) * .15;
                const coverOutlines = [[1, 1], [-1, 1], [-1, -1], [1, -1]].flatMap((e, i) => 
                    PT.arc(coverCornerR, Math.PI / 2, i*Math.PI/2, null, true).map(pt => V.add(V.mul(e, [(width-coverMargin)/2 - coverCornerR, (height-coverMargin)/2 - coverCornerR]), pt))            
                ).map(pt => V.trans(rot, pt));
                
                const coverPolygon = polygons.create();
                coverPolygon.addPoints(...coverOutlines.map(pt => V.add(pt, pos)));
                coverPolygon.addHatching(1 + rotation, 2);
                coverPolygon.addHatching(-1 + rotation, 2);
                coverPolygon.addOutline();
                polygons.draw(turtle, coverPolygon);
            }

            const cornerR = Math.min(width, height) / 6;
            const outlines = [[1, 1], [-1, 1], [-1, -1], [1, -1]].flatMap((e, i) => 
                PT.arc(cornerR, Math.PI / 2, i*Math.PI/2, null, true).map(pt => V.add(V.mul(e, [width/2 - cornerR, height/2 - cornerR]), pt))            
            ).map(pt => V.trans(rot, pt));
            
            const outlinesPolygon = polygons.create();
            outlinesPolygon.addPoints(...outlines.map(pt => V.add(pt, pos)));
            outlinesPolygon.addOutline();
            polygons.draw(turtle, outlinesPolygon);
        }
        clone() {
            return new Card(this.suit, this.rank, this.faceUp);
        }
        toString() {
            return this.faceUp? this.name: 'Face down';
        }
    }
    this.Card = Card;
    
    class Deck {
        #originalCards = [];
        #deck = [];
        constructor(cards) {
            this.#originalCards = cards;
            this.reset();
        }
        reset() {
            this.#deck = this.#originalCards.map(v => v.clone());
        }
        shuffle() {
            this.#deck = shuffle(this.#deck);
        }
        getTop() {
            return this.#deck.pop();
        }
        get length() {
            return this.#deck.length;
        }
        take(s, r) {
            const card = this.#deck.find(c => c.suit == s && c.rank == r);
            if(card) {
                this.remove(s, r);
            }
            return card;
        }
        remove(s, r) {
            this.#deck = this.#deck.filter(c => !(c.suit == s && c.rank == r));
        }
        add(card) {
            this.#originalCards.push(card);
            this.#deck.push(card);
        }
        peek(n = 0) {
            return this.#deck[this.#deck.length - 1 - n].clone();
        }
        get size() {
            return this.#deck.length;
        }
        static standard(n = 52) { //or 32 for only seven and higher
            if(n != 52 && n != 32) throw new Error(`Only 52 or 32 card decks are supported at the moment`);
            return new Deck(Object.keys(SUITS).flatMap((s, si) => Object.keys(RANKS).map((v, i) => new Card(SUITS[s], RANKS[v]))));
        }
    }
    this.Deck = Deck;
    
    class Hand {
        #cards = [];
        #bet;
        constructor(bet) {
            this.#bet = bet;
        }
        add(card) {
            this.#cards.push(card);
        }
        takeLast() {
            return this.#cards.pop();
        }
        peek() {
            return this.#cards.map(v => v.clone());
        }
        set bet(b) {
            this.#bet = b;
        }
        get bet() {
            return this.#bet;
        }
        get size() {
            return this.#cards.length;
        }
        draw(turtle, position, widthPerCard = 13, height = 20, margin = null, rotation = 0) {
            const rot = V.rot2d(rotation);
            
            margin = margin === null? widthPerCard/13: margin;
            
            this.#cards.forEach((e, i) => {
                e.draw(turtle, V.add(position, V.trans(rot, [(widthPerCard + margin) * i, 0])), widthPerCard, height, rotation);
            })
        }
        setFaceUp(idx, faceUp) {
            this.#cards[idx].faceUp = faceUp;
        }
        toString() {
            return this.#cards.map(c => ''+c).join(', ');
        }
    }
    this.Hand = Hand;
    
    return;

    function getSuitSymbolPts(suit, scale) {
        switch(suit) {
            case SUITS.HEARTS:
                return getHeart(scale);
            case SUITS.DIAMONDS:
                return getDiamond(scale);
            case SUITS.SPADES:
                return getSpade(scale);
            case SUITS.CLUBS:
                return getClub(scale);
        }
    }

    // ========== HEART ==========
    function getHeart(scale) {
        return getHeartPts(scale / 29).map(pt => V.add([0, -scale/12], pt));
    }
    
    // ========== DIAMOND ==========
    function getDiamond(scale) {
        return [
            [0, -1],
            [2/3, 0],
            [0, 1],
            [-2/3, 0],
            [0, -1]
        ].map(pt => V.scale(pt, scale/2));
    }
    
    // ========== CLUB ==========
    function getClub(scale) {
        // Three circles for the clover
        const r = scale / 3.9;
    
        const rawStem = getStemPts(r).map(pt => [pt[0], r + pt[1]]);
    
        const rightClub = getCirclePts(r, -Math.PI/2, 4*Math.PI / 3).map(pt => V.add(pt, V.scale([Math.sin(Math.PI / 3), Math.cos(Math.PI / 3)], r))).filter(pt => rawStem[0][0] < pt[0]);
        
        const stem = rawStem.filter(pt => rightClub[rightClub.length - 1][1] < pt[1]);
        
        return [
            ...getCirclePts(r, -Math.PI/2 - 2*Math.PI / 3, 4*Math.PI / 3).map(pt => [pt[0], pt[1] - r]),         // Top
            ...rightClub,
            ...stem,
            ...rightClub.map(pt => [-pt[0], pt[1]]).reverse()
        ].map(pt => V.add(pt,[0, scale/50]));
    }
    
    // ========== SPADE ==========
    function getSpade(scale) {
        const r = scale / 31;
    
        const rawStem = getStemPts(r*8).map(pt => V.add([0, scale/3.6], pt));
    
        // Spade head (heart flipped vertically)
        const pts = getHeartPts(r*.9).filter(pt => 0 < pt[1] || (pt[0] < -rawStem[0][0] || rawStem[0][0] < pt[0])).map(pt => [pt[0], -pt[1]]).reverse();
        
        const stem = rawStem.filter(pt => pts[0][1] < pt[1]);
        
        return [...pts, ...stem, pts[0]];
    }

    function getCirclePts(r, phase = 0, len = 2 * Math.PI) {
        const pts = [];
        for (let i = 0, max = Math.ceil(r * len); i <= max; i++) {
            const a = len * (i / max);
            pts.push([r * Math.cos(phase + a), r * Math.sin(phase + a)]);
        }
        return pts;
    }
    
    function getHeartPts(s) {
        const halfPts = [];
        for (let a = 0; a <= Math.PI; a += 0.05) {
            const px = 16 * Math.pow(Math.sin(a), 3);
            const py = 13 * Math.cos(a) - 5 * Math.cos(2 * a) - 2 * Math.cos(3 * a) - Math.cos(4 * a);
            halfPts.push([s * px, -s * py]);
        }
        return [...halfPts, ...halfPts.map(pt => [-pt[0], pt[1]]).reverse()];
    }
    
    function getStemPts(r, h = r/2) {
        const halfPts = getCirclePts(r, 4 * Math.PI / 6, Math.PI / 3).map(pt => [pt[0] + r*1.1, pt[1]]);
        return [[r/10, -h], ...halfPts.reverse(), ...halfPts.map(pt => [-pt[0], pt[1]]).reverse(), [-r/10, -h]];
    }
}

function loadEnum() {
    function createEnum(...values) {
        class Enum {
            constructor(...values) {
                values.forEach((v, i) => this[v.toUpperCase()] = 1 << i);
            }
            key(value) {
                return values[Math.log2(value)].toUpperCase();
            }
            keys(value) {
                const result = [];
                for(let i = 0, max = values.length; i < max; i++) {
                    if( ((value >> i) & 1) === 1 ) result.push(values[i].toUpperCase());
                }
                return result;
            }
            index(value) {
                return Math.log2(value);
            }
            indexes(value) {
                const result = [];
                for(let i = 0, max = values.length; i < max; i++) {
                    if( ((value >> i) & 1) === 1 ) result.push(1 << i);
                }
                return result;
            }
            get length() {
                return values.length;
            }
        }
        
        return new Proxy(Object.freeze(new Enum(...values)), {
            get(target, name, receiver) {
                if (Reflect.has(target, name)) {
                    let rv = Reflect.get(target, name, receiver);
                    if (typeof rv === "string") {
                        rv = rv.toUpperCase();
                    }
                    return rv;
                }
                throw new Error(`Unknown Enum property: ${name}`);
              }
        });
    }    
    
    class EnumInterface {
        static from(...arr) {
            if(arr.length == 0) throw new Error(`Need at least one key to create an Enum`);
            const keys =[...(  (typeof arr[0]) == 'string'? arr: arr[0] )].map(v => v);
            if(keys.some(k => (typeof k) != 'string')) throw new Error(`Cannot create Enum from other items than strings`);
            
            return Object.freeze(new createEnum(...keys));
        }
    }
    this.Enum = EnumInterface;
}

// Below is automatically maintained by Turtlelib 1.0
// Changes below this comment might interfere with its correct functioning.
function turtlelib_init() {
	turtlelib_ns_c6665b0e9b_Jurgen_Vector_Math();
	turtlelib_ns_c5f8fa95ed_Jurgen_Intersection();
	turtlelib_ns_2d89bd6d64_Jurgen_Path_tools();
	turtlelib_ns_a4e905e926_Jurgen_TextWriter();
	turtlelib_ns_80dcba45dd_Jurgen_Polygons();
	turtlelib_ns_13b81fd40e_Jurgen_Randomness();
}
// Turtlelib Jurgen Vector Math v 4 - start - {"id":"c6665b0e9b","package":"Jurgen","name":"Vector Math","version":"4"}
function turtlelib_ns_c6665b0e9b_Jurgen_Vector_Math() {
/////////////////////////////////////////////////////////
// Vector functions - Created by Jurgen Westerhof 2024 //
/////////////////////////////////////////////////////////
class Vector {
    static add  (a,b) { return a.map((v,i)=>v+b[i]); }
    static sub  (a,b) { return a.map((v,i)=>v-b[i]); }
    static mul  (a,b) { return a.map((v,i)=>v*b[i]); }
    static div  (a,b) { return a.map((v,i)=>v/b[i]); }
    static scale(a,s) { return a.map(v=>v*s); }

    static det(m)                { return m.length == 1? m[0][0]: m.length == 2 ? m[0][0]*m[1][1]-m[0][1]*m[1][0]: m[0].reduce((r,e,i) => r+(-1)**(i+2)*e*this.det(m.slice(1).map(c => c.filter((_,j) => i != j))),0); }
    static angle(a)              { return Math.PI - Math.atan2(a[1], -a[0]); } //compatible with turtletoy heading
    static rot2d(angle)          { return [[Math.cos(angle), -Math.sin(angle)], [Math.sin(angle), Math.cos(angle)]]; }
    static rot3d(yaw,pitch,roll) { return [[Math.cos(yaw)*Math.cos(pitch), Math.cos(yaw)*Math.sin(pitch)*Math.sin(roll)-Math.sin(yaw)*Math.cos(roll), Math.cos(yaw)*Math.sin(pitch)*Math.cos(roll)+Math.sin(yaw)*Math.sin(roll)],[Math.sin(yaw)*Math.cos(pitch), Math.sin(yaw)*Math.sin(pitch)*Math.sin(roll)+Math.cos(yaw)*Math.cos(roll), Math.sin(yaw)*Math.sin(pitch)*Math.cos(roll)-Math.cos(yaw)*Math.sin(roll)],[-Math.sin(pitch), Math.cos(pitch)*Math.sin(roll), Math.cos(pitch)*Math.cos(roll)]]; }
    static trans(matrix,a)       { return a.map((v,i) => a.reduce((acc, cur, ci) => acc + cur * matrix[ci][i], 0)); }
    //Mirror vector a in a ray through [0,0] with direction mirror
    static mirror2d(a,mirror)    { return [Math.atan2(...mirror)].map(angle => this.trans(this.rot2d(angle), this.mul([-1,1], this.trans(this.rot2d(-angle), a)))).pop(); }

    static equals(a,b)   { return !a.some((e, i) => e != b[i]); }
    static approx(a,b,p) { return this.len(this.sub(a,b)) < (p === undefined? .001: p); }
    static norm  (a)     { return this.scale(a,1/this.len(a)); }
    static len   (a)     { return Math.hypot(...a); }
    static lenSq (a)     { return a.reduce((a,c)=>a+c**2,0); }
    static lerp  (a,b,t) { return a.map((v, i) => v*(1-t) + b[i]*t); }
    static dist  (a,b)   { return Math.hypot(...this.sub(a,b)); }
    
    static dot  (a,b)   { return a.reduce((a,c,i) => a+c*b[i], 0); }
    static cross(...ab) { return ab[0].map((e, i) => ab.map(v => v.filter((ee, ii) => ii != i))).map((m,i) => (i%2==0?-1:1)*this.det(m)); }
    
    static clamp(a,min,max) { return a.map((e,i) => Math.min(Math.max(e, min[i]), max[i])) };
    static rotateClamp(a,min,max) { return a.map((e,i) => {const d = max[i]-min[i];if(d == 0) return min[i];while(e < min[i]) { e+=d; }while(e > max[i]) { e-=d; }return e;});
    }
}
this.V = Vector;
}
// Turtlelib Jurgen Vector Math v 4 - end
// Turtlelib Jurgen Intersection v 4 - start - {"id":"c5f8fa95ed","package":"Jurgen","name":"Intersection","version":"4"}
function turtlelib_ns_c5f8fa95ed_Jurgen_Intersection() {
///////////////////////////////////////////////////////////////
// Intersection functions - Created by Jurgen Westerhof 2024 //
///////////////////////////////////////////////////////////////
class Intersection {
    //a-start, a-direction, b-start, b-direction
    //returns false on no intersection or [[intersection:x,y], scalar a-direction, scalar b-direction
    static info(as, ad, bs, bd) { const d = V.sub(bs, as), det = -V.det([bd, ad]); if(det === 0) return false; const res = [V.det([d, bd]) / det, V.det([d, ad]) / det]; return [V.add(as, V.scale(ad, res[0])), ...res]; }
    static ray(a, b, c, d) { return this.info(a, b, c, d); }
    static segment(a,b,c,d, inclusiveStart = true, inclusiveEnd = true) { const i = this.info(a, V.sub(b, a), c, V.sub(d, c)); return i === false? false: ( (inclusiveStart? 0<=i[1] && 0<=i[2]: 0<i[1] && 0<i[2]) && (inclusiveEnd?   i[1]<=1 && i[2]<=1: i[1]<1 && i[2]<1) )?i[0]:false;}
    static tour(tour, segmentStart, segmentDirection) { return tour.map((e, i, a) => [i, this.info(e, V.sub(a[(i+1)%a.length], e), segmentStart, segmentDirection)]).filter(e => e[1] !== false && 0 <= e[1][1] && e[1][1] <= 1).filter(e => 0 <= e[1][2]).map(e => ({position: e[1][0],tourIndex: e[0],tourSegmentPortion: e[1][1],segmentPortion: e[1][2],}));}
    static inside(tour, pt) { return tour.map((e,i,a) => this.segment(e, a[(i+1)%a.length], pt, [Number.MAX_SAFE_INTEGER, 0], true, false)).filter(e => e !== false).length % 2 == 1; }
    static circles(centerA, radiusA, centerB, radiusB) {const result = {intersect_count: 0,intersect_occurs: true,one_is_in_other: false,are_equal: false,point_1: [null, null],point_2: [null, null],};const dx = centerB[0] - centerA[0];const dy = centerB[1] - centerA[1];const dist = Math.hypot(dy, dx);if (dist > radiusA + radiusB) {result.intersect_occurs = false;}if (dist < Math.abs(radiusA - radiusB) && !N.approx(dist, Math.abs(radiusA - radiusB))) {result.intersect_occurs = false;result.one_is_in_other = true;}if (V.approx(centerA, centerB) && radiusA === radiusB) {result.are_equal = true;}if (result.intersect_occurs) {const centroid = (radiusA**2 - radiusB**2 + dist * dist) / (2.0 * dist);const x2 = centerA[0] + (dx * centroid) / dist;const y2 = centerA[1] + (dy * centroid) / dist;const prec = 10000;const h = (Math.round(radiusA**2 * prec)/prec - Math.round(centroid**2 * prec)/prec)**.5;const rx = -dy * (h / dist);const ry = dx * (h / dist);result.point_1 = [x2 + rx, y2 + ry];result.point_2 = [x2 - rx, y2 - ry];if (result.are_equal) {result.intersect_count = Infinity;} else if (V.equals(result.point_1, result.point_2)) {result.intersect_count = 1;} else {result.intersect_count = 2;}}return result;}
}
this.Intersection = Intersection;
}
// Turtlelib Jurgen Intersection v 4 - end
// Turtlelib Jurgen Path tools v 3 - start - {"id":"2d89bd6d64","package":"Jurgen","name":"Path tools","version":"3"}
function turtlelib_ns_2d89bd6d64_Jurgen_Path_tools() {
///////////////////////////////////////////////////////
// Path functions - Created by Jurgen Westerhof 2024 //
///////////////////////////////////////////////////////
class PathTools {
    static bezier(p1, cp1, cp2, p2, steps = null) {steps = (steps === null? Math.max(3, (V.len(V.sub(cp1, p1)) + V.len(V.sub(cp2, cp1)) + V.len(V.sub(p2, cp2))) | 0): steps) - 1; return Array.from({length: steps + 1}).map((v, i, a, f = i/steps) => [[V.lerp(p1, cp1, f),V.lerp(cp1, cp2, f),V.lerp(cp2, p2, f)]].map(v => V.lerp(V.lerp(v[0], v[1], f), V.lerp(v[1], v[2], f), f))[0]);}
    // https://stackoverflow.com/questions/18655135/divide-bezier-curve-into-two-equal-halves#18681336
    static splitBezier(p1, cp1, cp2, p2, t=.5) {const e = V.lerp(p1, cp1, t);const f = V.lerp(cp1, cp2, t);const g = V.lerp(cp2, p2, t);const h = V.lerp(e, f, t);const j = V.lerp(f, g, t);const k = V.lerp(h, j, t);return [[p1, e, h, k], [k, j, g, p2]];}
    static circular(radius,verticeCount,rotation=0) {return Array.from({length: verticeCount}).map((e,i,a,f=i*2*Math.PI/verticeCount+rotation) => [radius*Math.cos(f),radius*Math.sin(f)])}
    static circle(r){return this.circular(r,Math.max(12, r*2*Math.PI|0));}
    static arc(radius, extend = 2 * Math.PI, clockWiseStart = 0, steps = null, includeLast = false) { return [steps == null? (radius*extend+1)|0: steps].map(steps => Array.from({length: steps}).map((v, i, a) => [radius * Math.cos(clockWiseStart + extend*i/(a.length-(includeLast?1:0))), radius * Math.sin(clockWiseStart + extend*i/(a.length-(includeLast?1:0)))])).pop(); }
    static draw(turtle, path) {path.forEach((pt, i) => turtle[i==0?'jump':'goto'](pt));}
    static drawTour(turtle, path) {this.draw(turtle, path.concat([path[0]]));}
    static drawPoint(turtle, pt, r = .1) {this.drawTour(turtle, this.circle(r).map(e => V.add(e, pt)));}
    static drawArrow(turtle, s, d, width = 6, length = 3) {turtle.jump(s);const arrowHeadBase = V.add(s,d);turtle.goto(arrowHeadBase);turtle.goto(V.add(arrowHeadBase, V.trans(V.rot2d(-V.angle(d)), [-length, width/2])));turtle.jump(V.add(arrowHeadBase, V.trans(V.rot2d(-V.angle(d)), [-length, -width/2])));turtle.goto(arrowHeadBase);}
    static circlesTangents(c1_center, c1_radius, c2_center, c2_radius, internal = false) {let middle_circle = [V.scale(V.sub(c1_center, c2_center), .5)].map(hwp => [V.add(c2_center, hwp), V.len(hwp)]).pop();if(!internal && c1_radius == c2_radius) {let target = V.sub(c2_center, c1_center);let scaledTarget = V.scale(target, c1_radius/V.len(target));let partResult = [V.add(c1_center, V.trans(V.rot2d(Math.PI/2), scaledTarget)),V.add(c1_center, V.trans(V.rot2d(Math.PI/-2), scaledTarget))];return [partResult,partResult.map(pt => V.add(pt, target))]}let swap = !internal && c2_radius > c1_radius;if(swap) {let t = [[...c1_center], c1_radius];c1_center = c2_center;c1_radius = c2_radius;c2_center = t[0];c2_radius = t[1];}let internal_waypoints = Intersection.circles(c1_center, c1_radius + (internal?c2_radius:-c2_radius), ...middle_circle);if(!internal_waypoints.intersect_occurs) return [];const circlePointAtDirection2 = (circle_center, radius, direction) => V.add(circle_center, V.scale(direction, radius/V.len(direction)));const result = [[circlePointAtDirection2(c1_center, c1_radius, V.sub(internal_waypoints.point_1, c1_center)),circlePointAtDirection2(c1_center, c1_radius, V.sub(internal_waypoints.point_2, c1_center))],[circlePointAtDirection2(c2_center, c2_radius, internal?V.sub(c1_center, internal_waypoints.point_1):V.sub(internal_waypoints.point_1, c1_center)),circlePointAtDirection2(c2_center, c2_radius, internal?V.sub(c1_center, internal_waypoints.point_2):V.sub(internal_waypoints.point_2, c1_center))]];return swap? [[result[1][1],result[1][0]],[result[0][1],result[0][0]]]: result;}
    static vectors(path) {return Array.from({length: path.length - 1}).map((e, i) => V.sub(path[i+1], path[i]));}
    static path(vectors) {return vectors.reduce((a,c) => a.length==0?[c]:[...a, V.add(c, a[a.length-1])], []);}
    static redistributeLinear(path, length = .5) {const p = path.map(pt => [...pt]);const result = [[...p[0]]];let pointer = 1;doneAll: while(pointer < p.length) {let l = length;while(pointer < p.length) {const distance = V.len(V.sub(p[pointer], p[pointer - 1]));if(distance < l) {l-=distance;pointer++;continue;}if(distance == l) {if(pointer < p.length - 1) result.push([...p[pointer]]);pointer++;break doneAll;}if(l < distance) {const newPoint = V.lerp(p[pointer-1], p[pointer], l/distance);if(pointer < p.length - 1) result.push([...newPoint]);p[pointer - 1] = newPoint;break;}}}result.push(p.pop());return result;}
    static length(path) { return this.lengths(path).reduce((c, a) => a + c, 0); }
    static lengths(path) { return path.map((e, i, a) => V.len(V.sub(e, a[(i+1)%a.length]))).filter((e, i, a) => i < a.length - 1); }
    static intersectInfoRay(path, origin, direction) {const vectors = this.vectors(path);const ri = vectors.map((e, i) => [i, Intersection.info(origin, direction, path[i], e)]).filter(e => 0 <= e[1][2] && e[1][2] <= 1 && 0 < e[1][1]).sort(e => e[1][1]);if(ri.length == 0) return false;const hit = ri[0];const lengths = this.lengths(path);const length = lengths.reduce((a, c) => a + c, 0);let l = 0;for(let i = 0; i < hit[0]; i++) {l += lengths[i];}return [hit[1][0], (l + (lengths[hit[0]] * hit[1][2])) / length, hit[1][1]];}
    static lerp(path, part) {if(part < 0 || 1 < part) throw new Error('Range of part is 0 to 1, got ' + path);const lengths = this.lengths(path);const length = lengths.reduce((a, c) => a + c, 0);let l = length * part;for(let i = 0; i < lengths.length; i++) {if(lengths[i] < l) {l-=lengths[i];continue;}return V.lerp(path[i], path[i+1], l / V.len(V.sub(path[i+1], path[i])));}return [...path[path.length - 1]];}
    static boundingBox(path) { return path.reduce((a, c) => [[Math.min(c[0], a[0][0]), Math.min(c[1], a[0][1])],[Math.max(c[0], a[1][0]), Math.max(c[1], a[1][1])]], [path[0], path[0]]); }
}
this.PT = PathTools;
}
// Turtlelib Jurgen Path tools v 3 - end
// Turtlelib Jurgen TextWriter v 5 - start - {"id":"a4e905e926","package":"Jurgen","name":"TextWriter","version":"5"}
function turtlelib_ns_a4e905e926_Jurgen_TextWriter() {
////////////////////////////////////////////////////////////////
// Text utility code. Created by Reinder Nijhoff 2024
// https://turtletoy.net/turtle/0f84fd3ae4
//
// Usage: (new Text(getFont('EMSAllure'))).print(turtle, "Text to write", textSize);
//
// Modifications by Jurgen Westerhof 2024: https://turtletoy.net/turtle/9aef87b45e
// - Does not force turtle to operate in radians
// - Now respects turtle.isdown() and doesn't print if true
// - Text.size(turtle, str, scale = 1) returns properties of text str to be printed
// - Text.bbox(turtle, str, scale = 1) returns bounding box of text str to be printed
// - Text.dimensions(scale = 1) returns properties of fontData for scale
// - Text.bboxPrint(turtle, str, scale = 1) prints the text and returns the absolute bounding box
////////////////////////////////////////////////////////////////
const fonts = {
    EMSMistyNight: {"name":"EMSMistyNight","unitsPerEm":1000,"ascent":800,"descent":-200,"capHeight":500,"xHeight":300,"glyphs":"IADEDgDAIQA4CeYFHPhGBf737ARg8EwEdOtMBCLoKAWC54AHgudcCEDoIAhE7mIHfPJEB0T4AEAsBpb7LgRP\/NADhv7OBD8AaAa9AD4I4f\/8CCj+PggO\/CwGlvsAQADAIgB4CkoG6u2kBsTmegjE5t4IZOd6CAjuYgcI7gBAmgHq7RcCxObQA8TmLgRG59ADCO7VAgjuAEAAwCMA3heMBTzxtQI88bUCIO9iByDvIAgi6FoKIuh+CSDv4g4g74IPIui8ESLo\/hBI78wVSO\/MFR7xuBAe8UAQaPcOFWj3DhWY+b4PmPlkD70AKg29AMoNevlcCHr5vAd+AMgFfgBoBrb52AG2+dgBaPfCBmj3Ygc88QBATgw88TgJPPHACIb3Bg6G94gOPPEAQADAJACAFrYSiOZWE5zwAED+EKbmOhHa6QBAdhFg8DoRru2aEFDsHg\/y6u4MvOlyC\/jpcgve7wBAcgu+50gN5ufiDkDoAECQC+LmkAvQ5ABAugnu5LoJ5ucAQLoJ2um6CQLvAEC6Cb7n4AZA6GoEvOn0ArDrlQII7lIDQvDsBFTyYgcM9LoJTPUSDGT2iA7g914QevngELr64BAv\/KAP6P3KDcX+bAzk\/gBAthIv\/C4TOPr4Ef73Rg\/s9VoKMPNEBzzxyAXe7ygFxu6wBMztsAQO7QBAegj46SYHtuqGBrDraAYO7eQHAu9aCrrwhA2a8uAQcPSwE6r2LBU++fAUb\/wQE8X+IhAfAKwN3QByC\/wAcgsuBHILhvcAQPYJBPf2Cej9AED2CQT\/5AdH\/oYGqf3OBA780AN0+pIDPvmSA2j3AECaAWj3+AEYAgBAsQP4AZIDZ\/4AQKoFwf\/2Cd0A9gmSBABAAMAlAFQaYgc06owFeupMBBTsLgQm7kwE\/O9GBVrxCAc28t4I+vHYCSTwugmq7N4I8upiBzTqAEAIB+7z9glY864L3PHQDKLv7gws7RIM8uqWCljpmAh86AQGXuixA1jpmgHO61oBiu7YAQDxcgPW8goF0PMIB+7zAEBcF\/7ouQEE\/zMDfgC6GFzqAEBWEwr2uBBk9qYOpPdmDdT5Zg1L\/aYOwf9eEPwAmBJ6AYwUWgHGFn4AYBim\/vYYb\/ycGJj5hBeG98wVgvZWEwr2AED4EcL34BCe+EAQ\/PlAEMn9OhEj\/zQSwf8yFMH\/ShUj\/8wVCP7qFW\/8zBW2+YwUHPjOE8L3+BHC9wBAAMAmAJ4guBDk\/uIOXgAwDPwAIAieAJIEQ\/83Auz8HAG2+VoBCvZyA9byqgV48QBALgSO9DMDIvczAyD5sQMU+7AE7PwAQAAPfPKcCXzy5AdY82gGjvTIBSj2jAWG94wFmPkEBrT7gAfJ\/ZwJxf4SDMX+Qg7J\/aAPDvwiENj6XhB6+V4QfPIAQHASmvJwElD7AEC8Eej9MhQAAKIX\/AD0Gn4ATB0E\/8geS\/3CH9j6AECmHXT6rByt\/FQahv7kFgT\/aBWp\/YwUT\/yMFHzyah188gBAah1g8G4UYPAAQG4UqO7IFNbjAEDUEtbjthJ66gBA\/hDC6EIOoOc2C6DnAghe6G4F8uooBertSgbA7+QHAPEgCADxAEA6ETLsIhC26ogO2umuC7zpFAq26jgJFOz8CJDt2Alm7zYLfvBmDX7wBBB+8LgQQvBYEaLvvBGo7gBAgAc46yYHDu2AB2zuAEAAwCcA5gW5AertlQKm5pIEpuYQBAjuMwMI7gBAAMAoACQOuglaAcIGBP+SBA781QIc+BcCNPS1Ajzx8gPM7eYF8upcCCLoNgsk5k4MZOcyCv7oAghu7MIGYPBoBsr0wgZE+IAHUPveCCj+0goAABIMHAE2C7UCAEBGBZj5TASI9UwEuPIKBcDvAEAAwCkAiA4oBVoBIAgE\/1oKDvwwDBz40Aw09DAMPPHwCsztGgny6oYGIuixAyTmtQJk57AE\/ujgBm7sIAhg8HoIyvQgCET4YgdQ+wQGKP4uBAAA1QIcAdADtQIAQLoJmPmWCoj1lgq48vYJwO8AQADAKgDsE8IGAPFSAwLvFwI88WIHNPT4AUD3VwIc+ABAFAOY+XoIgvZ6CG\/8Ngtv\/FQLqvZ8EHr5dhFo92wMUvT4ETzxdhFC8ABA4BAg7xgLVPIYC87rwAjO63oI+vEAQDgJNPT2CZTzlgpS9NgJEPU4CTT0AEAAwCsAjBQ7AdDzfgnQ834JsOuQC7DrkAuy83QTsvN0E470AEB0E871kAvO9ZALqf0AQDIKiv1+CYr9fgnO9QBAAgjO9TsBzvU7Aej0AEAAwCwA3gj4AdgBFAPYAS4EWgHsBL0A7AQAABQD4f8XAgj+dgLw+2oEFPuGBrT7CAfJ\/eAGgv+GBhwBqgU3AkwEFAMUAzMD+AEUAwBAkgTN\/BAEiv2wBAj+CgVq\/ZIEzfwAQNgBuQH0ArkBEAQ7AbAEngCwBAAA9ALB\/\/gBCP5XAtL7TAQU+2gGlvvgBqn9wgaC\/2gG\/ACMBTcCLgT0AvQCFAPYAfQCAEBqBK380AOK\/ZIE6P3sBEv9agSt\/ABAAMAtAAAPJA5w9CQOlPMcAZTzAEA7Acr0OwHO9SQOzvUAQADALgD8CGoEFPt2AvD7FwII\/hQDwf+wBF4AaAaC\/0QHqf2GBrT7agQU+wBAkgSt\/PIDiv2wBAj+CgVq\/ZIErfwAQADALwDcGSYWJObYAX4AcgP4Ad4XgucAQADAMABiFlIDzuvIBTrpGgm+5xIMoOdGD3zoNBK26owU5O7IFFTyLBWq9goUVvpSEqn9gg\/h\/8wL\/ACcCfwAhgbh\/3IDLP3YAZj5OwE09HoB\/O9XApDtUgPO6wBALAZo7QgHkut6CFzqlgq86QwNFurEDs7rQBAk8JoQ7vN8EET43A8y++IOLP1ODOT+lgrF\/t4IR\/5EB838BAaY+W4FyPZGBRjyAEAQBAjuUgN88jMDzvWxA9r4sARQ+24FT\/wAQNoRuvq2EkD31BI09JgSePG8Eert4BAU7ABAAMAxAMoNHAHe7yYHIuggCCLoAEA4CQToOAln\/kgNZ\/4AQGYNPwA\/AD8AAEBeAIb+7ASG\/uwEiu70AgDxAEBEB7DrRAdH\/gBAAMAyAIYVdgJk53YC3PEAQBAEZOcQBPjpBAbC6MAIvudyC6DnBg7m5yIQ4Oj4EVzq1BKw63QTaO1WE6LvthJ48eAQlPMGDgr27ASO\/ABACAeO\/BATjvwQE574AEAOFZ74DhV+AABA1BIo\/vIDKP4AQPISfgB6AX4AegEI\/gBAdgJP\/CQOePFGD0jvRg+q7MoNXOrMC7zpmAi86SwGEOuwBCzt8gP87\/ID+vEAQF4QkutYEUrtWBFm77gQ4vCCD3zyAEAAwDMAMhR6Abz4egHo\/bEDwf+8BxwBTgy9AKAPYv+8EUv9thJQ+9QS\/ve8Ec71fBA09OIOMPNCDtbyAEAMDRjyJA6W8b4PYPDgEKjuHBEs7XwQturiDhzpTgzm594IoOfCBubnKAVe6PIDHOnyA0bnAEA3AgrnNwJI7wBALgQg7y4E0uwoBTjraAY06lwIvOnwCrzp7gzU6qwNUOysDSbuDA3A7xIMAPF4Cnjxegh48QBAHg9E7mQPLO0eDzLsAEB6CHzymAhY87QKWPOKDDT06A3O9cQOHPhqDvb6yg0s\/RIMhv4UCgT\/vAfF\/oYGR\/6qBej9TASt\/NAD8PszA7r6MwOe+ABAvg\/s\/JoQuvq4EHr5mhBi+EAQqvYAQADANADeF0gNIugyCiLoXAgI7koGGPIQBM71OwG2+TsBlvtmDZb7AECIDm77iA5L\/SQOR\/44CUf+AEA4CQAAwBcAAABAhBdH\/s4TR\/4uE+j91BJL\/dQStPuGFbT7AECGFXT6hhU++dQSPvnUElTyAECaEDT0mhBH\/gBAOhFU8sQOVPLEDj758gM++R4PQOgAQFQLgOmWCm7sbAyA6VQLgOkAQADANQCMFPgBPvn4Aej9EARi\/wgHXgB4Ct0Apg7h\/3YRqf10E3T6khPm9hYSWPPgENzxiA668ABAUgNc+VIDbvsQBK385gUo\/noII\/82CwT\/JA4s\/R4PuvpkDwT34g6O9O4MmvLSCr7xXAiW8eYFGPKSBBLzAEBAEE\/8OhEa+nYR\/vdYESj2fBAM9ABAUgMS83YC9PJyA6TofBCk6HwQyuUAQDQSrOU0Em7sAEAEEPbrzgT2684EuvBKBvzvvAei73gKwO8AQAoFeuoEEFzqAEAAwDYApBUWEibuFhL46QBAuBAc6UIOvuf2CebnhgaA6XIDzO03Ajzx+AHs9XYCGvoQBIr9RAc\/ANIK\/AAAQCQOfgBYEQT\/7BOW+24UgPgyFM71LhPW8nYR4vCmDqLvMAwg78AI3u9oBvrxAECMBfTySgao7uQHsOucCRbqrgu86SQO+OncD3TruBAO7ZoQJu4AQOYFpPekBnD0wAg28lQLHvGsDZbxvg+U87gQIvdAELr6Rg9L\/e4M5P5aCuT+5Aep\/QgHL\/xoBlb6AEDOBBT7EAQ++dADCvYQBBjyagSi7wBAlBGy85gSZPaYErz4FhIU+1gRrfwAQADANwBuFH4JHwAIBx8AJgdP\/J4HtvnACCj2tAp88ooM3u8kDszt3A8y7ABAag7269UC9uvVAkjvAED8AEjv\/ABe6ABA9AKk6M4TpOgAQBQDeuq+D3rqAECwExbqsBNW63wQSu2sDR7xMAyO9FQLYvhUCz8AAEB6CGf+fgna+JwJR\/56CGf+AEAAwDgA5BZoBnjxkgTe75IDLO3sBPjpRAd86JYKvufoDQToOhHg6C4T1OoKFGjtVhPA77wRWvFeEBjyAEBiB6Lvfgke8agMlvGCD0LwQBCo7l4QUOweD7bqDA3a6fYJ2uliBzjrCAdo7QBAyAUU7G4FDu3IBUTuAEDaEfbrNBJo7bwRiu4AQLgQ1vIuEzT08BRG9uoV+PhoFbT7zhNn\/gQQfgByCxwBPgieAEwExf74AbT72AFA99ADUvQsBrjyPghU8gBAfgmU86gMdvMeD1L0HBHI9pQRevkcEfD7Rg9H\/hIMxf4+CCj+pAZv\/OYFIPmGBgr2ngeO9H4JlPMAQLAERvbyA9r48gO2+c4ET\/wAQPISZPaSE2L4khPU+S4TMvuYEk\/8AEAAwDkA8BRSA5L6UgPF\/gBA7ATB\/yAI\/AD0C90AoA+G\/lISOPpWE4b3sBM28i4Txu40ElDsvg+e6agM5ufeCObnRgXC6BQDEOtaAQjuWgG48tUCqvZuBZ74mAiY+TYLmPnKDRz4xA4i9wBAvg8e8QAP0PNmDez1WgqG97wHBPfmBcr0zgSc8EYFzO1iB3rq9gm86U4M2ukGDrDrRg+K7gBAmhBK7bwRYPCUETDzlBHs9VgRRPgAQGoEFOwzAwju9ALi8FID9PIuBMr0AEAiEIj1ZA\/8+UgNiv1UCyP\/XAgE\/ywGqf1GBU\/8RgXY+gBAAMA6AN4ITAQU+1cC8Pv4AQj+9ALh\/7AEXgBoBoL\/RAfJ\/YYGtPtMBBT7AECSBM388gOK\/bAECP7sBGr9kgTN\/ABALgQU7DcC8OzYAQLv1QK68GoEWvFKBn7wCAeo7koGquwuBBTsAECSBK7t8gOK7rAEAu\/sBGzukgSu7QBAAMA7AFYJFwK5ATMDuQFMBDsBCgWeAAoF4f8zA8H\/NwLo\/ZUC0vuSBPb6pAaW+yYHqf0IB2L\/pAb8AMgFGAJqBNUCMwMUAxcC9AIAQLAErfwuBGr97ATo\/SgFS\/2wBK38AECSBBTslQLw7DcCAu8zA+LwzgRa8aQGfvCAB8bupAaq7JIEFOwAQLAEzO0QBIruzgQC7ygFbO6wBMztAEAAwDwALBUAD57pOwFS9HwQfgCYEmf+5gWI9QBATARS9LYSmOqaEF7oAEAAwD0APheaAUjvJhZI7yYWQvAAQAgW+vF6AfrxegEe8QBAmgFG9iYWRvYmFiL3AEAIFtr4egHa+HoB\/vcAQADAPgDwFM4EQOi1AjTq\/hA09ABARg+I9dUCKP7OBL0AChRS9EoGOukAQADAPwAQE0QHvPhEB6b1PgjQ89gJVPKQC+LwqAyE7wwNCO7uDNLszAvU6roJ2unkB7zpKAWY6tADUOzyA2zuAED4AUTu+AG+5wBAkgO+55IDHOmSBEDoaAag5xQKgueKDAToag7+6LgQ1OqUEWjtWBGi79wP+vEkDjDzbAzu85YKEPW6Cez1ugmC9roJnvgAQOgN4vBGD6juRg8s7YgOVusAQCAIbvssBk\/8yAVn\/sIGPwBcCL0AMgrh\/xgLCP4yCg78IAhu+wBAPggM\/Z4H6P1cCGf+wAjJ\/T4IDP0AQADAQABOKl4f5gW0GT4IthJcCFQLSgYKBd0A+AFc+dgB9PIUA27shgbi5tIK+uL+EKLgfhgC4KAenOFKJCrlnyeY6tooSO9cKKb1qCXw+3oh5P5MHQT\/uBpP\/PoZGvoAQEIY8PukFYb+dhEE\/6wN6P3wCvz52Ams9LQKfvAwDA7toA+A6QoUvud+GKDn0Bsc6UwdBOgAQFQa8uosFVzq\/hBo7cQO9PKIDob34g5W+nwQzfzUEor96hWO\/MAX\/PlaGcj2Nhos7QBAXhAQ60gNSO8wDJTzTgwE9+4M1PkAQI4cOOtsG0T4AECgHkbnTB2A+GodtPvIHiz9vCAM\/RQjtPvqJPj4SCYK9t4muvDkJc7rLCQi6DQhcOWsHBjjhBce4hATPOJmDTDkVglG58gF9usQBH7w0AMu9ewEDvwaCXoBZg2SBPISSgbYGCwGRh4uBABAAMBBACocHwDh\/34A4f\/MC+H\/AECgD+H\/DBzh\/wBADBxn\/n4YZ\/5eEHrqXhDm5wBApg4E6EgNBOguBOj98gNH\/j8AR\/4AQK4Lhv4mB2f+pAap\/SAItvn4Ebb5AEBwEm77ChRH\/oIPR\/4AQIYViv3EDrDrAEBmDYzsSA2u7RwR\/vf8CP73zAsA8QBAAMBCADAbOwEAABYSAAAsFUP\/wBcI\/twZL\/xyGvz5VBrC9zwZavUCFwz0yBRY8wBAHBF88jIUePFiFsDvAhdo7YAW9uvwFFzqcBJY6b4PwuhUC6ToWgGk6ABAHAEW6pIEFuqMBRbqaAbU6mgGyf0EBmf+HAFn\/gBA2AlH\/rwRR\/4yFM38pBUU+wgW2vhKFcj2sBMu9ZQRUvTEDrLzlgqy85YKlvsAQHoIqf16CJjqAEC6CVzqJA626nwQVus0EkrtNBIC7zoRfvBGD5bxqAz68XgK+vF4CvDsAEDOExTsbhSQ7VAU5O6SE6LvAEDGFgr23heG9xoY+Pj8F3T6AhdP\/ABAAMBDAPYY7BO68FYTLO06EZjq6A286fYJeupEBw7tyAW+8UoGpPeAB9j6lgoI\/h4Ppv62Emr9UBQO\/GgVdPoAQCwGDvywBLb58gNo97EDWPMuBJzwCgXM7QBAXBfY+swVyf1wEj8Apg78APAK3QCkBkP\/MwNu+5oBaPeaAQDx0APO67wH\/ugwDILnag6g5zoRXugAQHQTBuawE\/jpAEAsFSTm6hWc8ABAAMBEANAb3ADB\/3wQwf\/IFIb+IBfN\/DwZtvk2GiL3VBoM9DYa9PL6GX7wGhgO7WIWOOsKFNrpNBIc6V4QpOieAKToAEC9AFzqKAVc6uYFEOvmBcn9bgWm\/p4Apv4AQFYJKP5kDyj+2hFL\/ZIT8PsOFdT5zBWq9uoVWPOGFWDwbhTM7bYSsOvgENTqQg566jgJeuoAQPYJjOz2CbT7AEACCAj+Agh66gBAYhbM7aIXuvD8F\/TyGhiI9cAX4PcgF7b5gBbY+gBAAMBFAFQaWgHB\/1wXwf9cF5IDAEA8GZIDPBli+ABAwBe6+oQXzfyAFqn92Amp\/XgKDP14Ckb2AEB4ChD1Kg0Q9aYOiPUeD+b2Hg\/8+ZoQ\/PmaEOrtAEAeD6LvHg+W8aYOmvLKDRLzlgoS85YKDu0AQJwJXOp0E1zqjBQ46ywVquxKFSTwAEDkFt7vJhas5QBADhV86DsBfOgAQBwBFuoKBRbq5gV66mgGVutoBmr9yAWG\/vwAhv4AQFwIS\/1cCDjrAEAAwEYAYBi9AOH\/ZA\/h\/wBAZA9n\/vAKZ\/4UCsn9FArs9QBA2Ams9EIOrPRGD0z1Rg96+f4Qevn+EJDtAECCD4Tvgg+W8YgOmvL2CZry2Aks7QBAGgmY6m4UmOrqFRTs6hVC8ABAwBf878YWcOUAQIYVXuj8AF7oAEC9APjpzgT46eYFEOvmBYr9RgWG\/twAhv4AQAIIVusCCOj9AEAAwEcAKhxODGT2VhNk9goUBPcKFG77mBJL\/UAQxf5ODOT+XAjN\/IYGPvmqBY70BAZg8LwHFOyWCtrpZg2A6QQQ2unaETjrLhMO7c4Txu7OE+LwAEAIFuLwLBXK5QBAkhPo5c4T+OkAQP4QfOgkDoLnGglA6G4FXOq1AsztWgH68VoBRvb0AlD75gWm\/pwJXgDiDhwBthLB\/6oUKP4AQCgFaO3QAzzxcgPo9EwEPvnIBZb7AEDqFar26hUv\/ABAqBbk\/qgWVwIAQPwXdgL8F+b2uhhG9tAbRvYAQO4brPSKDKz0AEAAwEgAoB69AF4A4g5eAABAIhBeAGQeXgAAQCgepv7cGab+HhkI\/h4Z8urcGTTqZB406gBAZB6k6HwQpOgAQOIOpOi9AKToAEDcADTqKAU06sgFOOvIBcn9CgVn\/p4AZ\/4AQMQOhv7wCob+MgrJ\/TIKNPTIFDT0AEDwFKr28BSp\/QoUhv5eEIb+AEACFwj+Ahc06gBAmhAW6uwTFurwFBDr8BSW8TIUVPIyClTyAEAUCt7vFArU6rQKNOriDjTqAEACCDTqAghH\/gBAAMBJACIQOwE\/AL4PPwAAQKAPhv5UC4b+lgrJ\/ZYKEOuQCxbq3A8W6gBA3A986PwAfOgAQPwA+OmqBfjpaAa26mgGqf2MBYb+OwGG\/gBAeggo\/noINOoAQADASgAQE14AAACVAp4AyAXdAH4Jgv+uC4r9qAyW+yoNtvkqDRDrBg4W6hYSFuoAQDQSXuiaAV7oAEB6ATTqVgk06gBA3gh0694IuvqYCI78gAcI\/sgFBP+SA8X+WgEI\/gBAGAu26hgLUPsAQADASwAqHBwB4f8GDuH\/AEDoDYb+lgqG\/pYKhvdsDOj0hBeSA9AbCAfaIJgILCRcCKImgAc9KIYGAECiJgoFkCQsBnohLAakH4wFph0uBNAbdgJwEs71OhGO9L4PdvMAQCQO1vJ0E\/brShWY6qgWNOpyGjTqAECQGl7o\/hBe6ABAiA586DsBfOgAQDsBNOpuBTTqBAbU6gQGyf1GBYb+HAGG\/gBAXAgI\/lwINOoAQHgK+vF4CtTqNgsW6moOFuoAQP4QNOpwEjTqeApw9ABAZA9q9TQSIPloFcn9fhiZARgacgNsG5IEAEAAwEwA9hjcAD8ApBU\/AKQVMwMAQIQXMwOEF0T4AEBEFpL6RBZP\/PAUqf04Can9AEBaCvD7WgoQ6zYLNOq+DzTqAEDcD3zovQB86ABAngA06m4FNOosBvLqLAbJ\/W4FZ\/7cAGf+AEAgCJLrIAjN\/ABAAMBNAJAkfgAAAPQLAAAAQBIMhv4CCIb+RAfJ\/T4I3u8AQBoJWvHgED8A+BFeALgaIO8AQLgaNvLuG0v9bBtH\/j4XR\/4AQFwXAABoJAAAAEBKJGf+FiFn\/lggiv1kHjjrIh806lYiNOoAQFYifOhwHHzothJQ+wBA+BFc+VYJfOiVAnzoAECVAvjpwgb46SYHmOpGBYr9TARn\/l4AZ\/4AQN4I9uv+ENL7AEAoHij+KhxQ7ABAAMBOAMocvQAAAKgMAAAAQIoMZ\/4+CGf+ngfJ\/Z4HkO0AQN4IhO9KFX4ACBZ+AABAXBd+AFwX8ur8FzTq7hs06gBAKhxe6CIQXugAQEAQFupQFBbqLBXy6iwVtvkAQHQTBPf8CKTovQCk6ABAngA06rAENOqqBTjrqgWK\/c4EZ\/69AGf+AECYCJLrbhSW+wBAAMBPAFoZNwKE75oB7vPYAWj30APN\/AgHov8SDFoBfBCeAMgUCP6EF7b5YBhM9d4X3u+GFZLr\/hBe6MwLoOcgCKToyAU06gBAJgdQ7OYF5O6qBZryLAaG92IHbvvYCSj+Bg7k\/rwRDP1WE7b5zhPK9FYTfvD4EdLsvg9c6ioNvOkAQEwERO7QA1TysQPO9UwEgPjsBHT6BAZP\/ABALBXU+eoVgvbqFZryDhXG7rATMuwAQADAUADQGxwBPwAEED8AAEAEEIb+NguG\/ngKyf14CtT5AEB4Chz4\/hAc+G4UpPf8F+z1+hkS85Aa\/O\/6GZDtPheY6uwT\/uh2EaToHAGk6ABAHAE06m4FNOpKBhDrSgap\/W4Fhv4cAYb+AECWCiztlgoo9joRKPZ0E0z1DhWy8+oV3PHMFYruyBRu7HAS8uoEEFzq2Alc6gBAmAiw65gIZ\/4AQKgWUOyiFybuQhii70IYAPGiF9bygBZS9ABAAMBRAFoZYgdWCYwFGglqBJ4HEATsBLAElQIIB90A7gyG\/kAQT\/y2EoD4dBNM9S4TlvFwEibuWBEU7GQPXOqoDJ7pAECkBlDsRgXA7ygFDPSMBeD3SgZQ+\/wIiv0AQEQHI\/+SBCz9FwJ6+TsBCvZaAZbx1QIO7W4FFurYCQToBg4E6HYR4OiqFBDrAheK7t4XmvJcF4b36hW6+lYTiv0iEEP\/5Ad2AgBAfgnVAqYOcgPyEmoExhZGBdAbpAZeHyYHsCKkBg4kyAXMJGoEzCQzAwBAISczAyEnzgQCJmIHDiR+Cf4flgqIHbQKHhm6CXASvAcMDcgFOAmwBCYHzgRKBowFLAakBuAGYgeeB0QHAEAuBFz5UgPm9jMDEvOxA\/zvLgRE7gBAkhOq7CwVJPBoFbLzShWC9jIUmPkAQEAQKAXkFggHEhs+CKAe3giYIcAI8COeBwBAAMBSAKwcvQDh\/8QO4f8AQMQOZ\/6WCmf+9gnJ\/fYJBPcAQHIL5vZCDub2gg+k914QnvjYGLED9BqqBegcJgciHwIItiF6CCYlPgiAJ0QHuyhoBgBA3icKBUQlSgbyIQQGOiBuBegctQJKFZ74jBTC9+wTQPcAQNQS2vgOFZb75BYo\/vYY\/AAwG3IDjhzOBABAcBKC9iYWTPVgGHbztBke8ZYZbO6cGBTshhUW6i4T\/uhGD3zongB86ABAfgA06goFNOqqBdTqqgWK\/c4EZ\/7cAGf+AEC8Byj+vAdW6wBA\/Ah66h4Peur+ELbqUhI467ATFOzIFGjtDhWi78gU3PEQE7Lz\/hCO9MQOrPT2Caz09gks7QBARBbS7FwXAu9cF7rwqBa48ggWdvMAQADAUwAIFvQCmQH0Auj9AEA7AbkBOwGC9gBAFAOC9hQD+PjQAxT7RgWO\/AIICP4SDIb+Hg9q\/XwQ8Pt8EFb6BBDa+EIOwvd+CYj1bgUw8\/QCfvAXAibulQL2684EgOkIB6ToeAoi6DAMIuhCDsLoAEC4EOLmuBBc6gBAmBLi5tQSnPAAQP4QfvD+ECbuBBBu7KYO8uruDFzq0gr46d4INOqkBjjr5gXw7CYHIO\/eCGDw4g528xwRjvSSE8j2yBSY+QoUrfxSEmf+BBCi\/wwNXgD8CF4AjAVi\/wBAFhIO\/LYSdPpwEtr4OhFo90YPCvaYCJryhgZa8QoFwO9MBAjuagRo7QBAAMBUAHgZRgU\/AMgUPwAAQKoUhv7cD4b+ZA8I\/mQPLO0AQB4PeurqFXrqIBfO66IXAPEAQFoZAPFCGIjmAEAgF3zoCgV86ABAFwJq5vwAPPEAQPQCiu4zA27s8gM46woF1OrwCtTq8ArJ\/ZYKhv5GBYb+AEAqDQj+Kg226gBAAMBVAC4d3AAW6s4EFupGBfLqRgW2+SwGL\/yeByj+OAmC\/xgLXgBIDd0A3A\/dAPISHwDwFMX+gBat\/D4XMvuiFyD5ohcQ62AYXOpwHFzqAECOHF7ouBBe6ABAmhAW6m4UFupoFbbqaBXU+aoUbvt0Eyz9vBFn\/qAPBP+EDQT\/kAtH\/ngKS\/26CbT7AEACCG77RAfU+WIHpPdiB3rqAEC9AHzoiA586ABAiA5c6jIKXOqcCdTqnAnI9gBAAMBWAEgcngAW6hAEFuoqDZ4ARg+eAN4X8uq6GDTq7hsW6gBA7hte6NwPXugAQAQQNOoOFTTqpBXU6mQPFPsAQIgO2viYCBbqrgsW6gBArgt86B8AfOgAQMIGOOsGDuz8AEAAwFcADCt+ABbq8gMW6ioNngBGD54ADhV88gBApBUk8CocfgAoHn4ABifU6oAnNOrxKjTqAEDxKl7oBB9e6ABAQB806owjNOpoJDTqriQ460Ye9voAQIgdvPiEFxbq7hsW6gBADBx86IIPfOgAQIIPNOryEjTqqhTq7R4PMvsAQIgO2vh6CDTqFAo06gBAWgp86H4AfOgAQMIGVuusDS\/8AEDMFTjrjhwO\/ABAAMBYAEgcvQA\/AKgMPwAAQAYOHwAqHB8AAEAMHIb+YBiG\/uAQ9PKAFnrqhBf46bgaFuoAQLgaXuimDl7oAEDEDhbq8hIW6lYTtuqCDwDxAEBqDoTvlgoW6tAMFuoAQO4MXugXAl7oAEAXAhbqjAUW6k4MsvPsBGf+ngBn\/gBAZg1q9ZgI7PxcCMn9wAhn\/mwMZ\/4AQEIOZ\/4WEmf+mBKp\/UIOBPcAQFYJkuuGFUf+yBRH\/sgUzfwAQADAWQBOGwQGPwDqFT8AAEDqFYb+fBCG\/gQQCP4EEP735Ba26sAXNOowGzTqAEASG17oHg9e6ABAHg806pITNOpQFPLqxA7O9QBAZg248vwIFuoSDBbqAEAwDEDoPwBA6ABAPwAW6kwEFursBBDr9Au8+PQL6P1UC4b+5gWG\/gBABg5H\/gYOgPhiBxDrAEAAwFoA1hq9AOH\/XBfh\/1wXUgMAQB4ZUgN4GYD4AEDAF5L6XBeO\/AIXav0mFsn9AgjJ\/QBAMgr2+qIXXOp4GVzqAEB4GaToLgSk6C4EJOYAQDcCauaaAR7xAEByA4ru8gNu7IwF1Oo0EtTqAEAEEJDtdgJH\/vwAR\/4AQG4F6P3IFJjqAEAAwFsAbAwSDIYGFwKGBhcCuOMAQNgBHuISDB7iAEASDLjj5gW444YGDOWGBtUCqgUuBABAEATyAxAE0OQAQEoG7ARODOwEAEAAwFwA3BlXAqDnJhaZAd4XXgCSAyTmAEAAwF0ATgx+AIYGeAqGBngKkOMAQLQKHuJ+AB7iAEB+AJDjwgaQ4wQG7uQEBrUC4AYuBABAegjQA3oI0OQAQEoGzgQ\/AM4EAEAAwF4AjBQyCsLo0AOE7xcCkO0yCsrl8hKQ7ToRou\/0C9rpAEAAwF8A6A0\/AKoFyg2qBQBAAMBgAMwLgAcq5dADPOJXAt7gVwIC4LEDpN7sBMze9gnu5DgJrOUAQADAYQBIHB8A4f9+AOH\/zAvh\/wBAoA\/h\/wwc4f8AQAwcZ\/5+GGf+XhB66l4Q5ucAQKYOBOhIDQToLgTo\/fIDR\/4\/AEf+AECuC4b+Jgdn\/qQGqf0gCLb5+BG2+QBAcBJu+woUR\/6CD0f+AECGFYr9xA6w6wBAZg1u7EgNru0cEf73Ggn+98wLAPEAQADAYgAwGzsBAAAWEgAALBVD\/8AXCP7cGS\/8chr8+VQawvc8GWr1AhcM9MgUWPMAQBwRfPIyFHjxRBbA7wIXaO1iFvbryBRc6nASWOm+D6ToVAuk6FoBpOgAQBwBFuqSBBbqjAUW6mgG1OpoBsn9BAZn\/hwBZ\/4AQNgJR\/68EUf+MhTN\/KQVFPsIFtr4ShXI9rATLvWUEVL0pg6y85YKsvOWCpb7AEB6CKn9egiY6gBAuglc6gYOtup8EFbrNBJK7TQSAu8cEX7wRg+W8agM+vF4CvrxeArw7ABAzhMU7G4UkO0yFMbukhOi7wBAxhYK9t4XhvcaGPj4\/Bd0+gIXT\/wAQADAYwC6GOwTuvBWEyztHBGY6soNvOnYCXrqJgcO7cgFvvFKBqT3gAfY+pYKCP4eD6b+thJq\/TIUDvxoFXT6AEAEBg78sAS2+fIDaPexA1jzEASc8AoFzO0AQFwX2PrMFcn9cBIfAIgO\/ADSCt0ApAZD\/xQDbvt6AWj3egEA8bEDsOueB\/7oMAyC52oOoOc6EV7oAEB0EwbmkhP46QBADhUk5uoVnPAAQADAZACyG70Awf98EMH\/qhSG\/gIXzfw8Gbb5Nhoi91QaDPQ2GvTy+hl+8BoYDu1EFjjrChTa6TQSHOlAEKTongCk6ABAngBc6igFXOrmBRDr5gXJ\/W4Fpv6eAKb+AEA4CSj+Rg8o\/rwRS\/10E\/D7DhXU+cwVgvbMFVjzaBVg8FAUzO22ErDruBDU6kIOeuo4CXrqAED2CYzs9gm0+wBAAggI\/gIIeuoAQEQWzO2iF7rw\/Bf08hoYiPWiF+D3IBe2+YAW2PoAQADAZQA2GloBwf8+F8H\/PhdyAwBAPBlyAzwZYvgAQMAXuvqEF838gBap\/dgJqf14Cgz9eApG9gBAeAoQ9SoNEPWmDoj1Hg\/m9h4P\/PmaEPz5mhDq7QBAHg+i7x4PlvGmDpryyg0S85YKEvOWCg7tAECcCVzqdBNc6owUOOssFarsShUk8ABADhV86BwBfOgAQPwAFursBBbq5gV66mgGVutoBkv9qgWG\/vwAhv4AQFwIS\/1cCDjrAEDkFsDvCBaO5QBAAMBmANgYvQDh\/2QP4f8AQGQPZ\/7wCmf+FArJ\/RQK7PUAQNgJrPRCDqz0ZA9M9WQPevkcEXr5HBGQ7QBAgg+E74IPlvGIDpry9gma8vYJLO0AQBoJmOqMFJjq6hUU7OoVQvAAQMAX\/O\/kFnDlAECGFV7o\/ABe6ABAvQD46c4E+OkEBhDrBAaK\/UYFhv78AIb+AEACCFbrAgjo\/QBAAMBnALIbzAtk9tQSZPaSEwT3khNu+xYSS\/2+D8X+zAvk\/uQHzfwEBj75CgWO9IwFYPBEBxTsFAra6dAMgOmCD9rpWBE467YSDu1WE8buVhPi8ABAhhXi8IwUyuUAQPIS6OUuE\/jpAEB8EHzohA2C55gIQOjsBFzqFwLM7dwA+vHcAEb2dgJQ+24Fpv4aCV4AQg4cATQSwf8yFCj+AECwBGjtUgM88fQCyvTQAz75RgWW+wBAaBWq9mgVL\/wAQAgW5P4IFlcCAECEF3YChBfm9hoYRvZOG0b2AEBsG6z09Aus9ABAAMBoACIfvQBeAOIOXgAAQEAQXgBGHl4AAEAoHqb+tBmm\/h4Z6P0eGfLq3Bk06kYeNOoAQEYepOh8EKToAEDEDqTongCk6ABA3AA06igFNOqqBTjrqgXJ\/ewEZ\/6eAGf+AECmDob+8AqG\/jIKyf0yCjT0yBQ09ABAyBSq9sgUqf3sE4b+QBCG\/gBA5BYI\/uQWNOoAQHwQFursExbq8BQQ6\/AUlvEyFFTyMgpU8gBA9gne7\/YJ1Oq0CjTq4g406gBAAgg06gIIR\/4AQADAaQBAENwAPwBkDz8AAEBGD4b+8AqG\/jIKyf0yChDrNgsW6oIPFuoAQIIPfOieAHzoAECeAPjpRgX46QQGtuoEBqn9KAWG\/twAhv4AQCAIKP4gCDTqAEAAwGoAEBMAAAAANwKeAG4F3QAaCYL\/VAuK\/U4MbvvQDLb50AwQ66wNFuq8ERbqAEDaEV7oOwFe6ABA\/AA06vwINOoAQHoIdOt6CLr6PgiO\/CYHCP5uBQT\/MwPF\/vwA6P0AQLQKtuq0ClD7AEAAwGsArBy9AOH\/rA3h\/wBAhA2G\/jIKhv4yCob3Egzo9IwUHwCkFd0AAhf8AH4Y3QBIHMH\/AEBkD3bz4BCO9BYSzvUaGAj+nBhn\/kgcZ\/4AQMoN1vIQE\/br8BSY6kQWNOoYGjTqAEA2Gl7omhBe6ABAJA586NwAfOgAQNwANOoKBTTqqgXU6qoFyf3sBIb+vQCG\/gBAAggI\/gIINOoAQBQK+vEUCtTq0goW6ugNFuoAQJoQNOr4ETTqFApw9ABAAA9q9doRIPkOFcn9Yhbk\/gBAAMBsALoY\/AA\/AMwVPwDMFTMDAECiFzMDohdE+ABAYhaS+mIWT\/zwFKn9Vgmp\/QBAeArw+3gKEOtUCzTq3A806gBABBB86NwAfOgAQL0ANOqMBTTqSgby6koGyf2MBWf+\/ABn\/gBAPgiS6z4IzfwAQADAbQDqJPwAAABsDAAAAECKDIb+egiG\/rwHyf3ACN7vAECcCVrxWBE\/AHASXgAwGyDvAEAwGxjycBxL\/e4bR\/7AF0f+AEDeFwAA6iQAAABAzCRn\/pghZ\/7aIIr95h4466QfNOrOIjTqAECwInzoyhx86C4TUPsAQHASXPnYCXzoFAN86ABAFAP46UQH+OmeB5jqyAWK\/c4EZ\/7cAGf+AEBWCfbrdhHS+wBAoB4o\/qwcUOwAQADAbgDoHPwAAADuDAAAAEDQDGf+eghn\/uQHyf3kB5DtAEAaCYTvaBV+ACYWfgAAQIQXfgCEF\/LqQhg06iocNOoAQEgcXuheEF7oAEBeEBbqbhQW6koV8upKFbb5AECSEwT3OAmk6NwApOgAQL0ANOrsBDTq5gUQ6+YFiv0KBWf+\/ABn\/gBA3giS66oUbvsAQADAbwB4GRcChO96Ae7zuQFo97EDrfzCBqL\/9AtaAUAQngCqFAj+Phe2+UIYTPXAF97vaBWS6+AQXuiuC6Dn5Aek6KoFNOoAQAgHMuyqBeTubgWa8uYFaPdEB277ugko\/ugN5P6UEQz9LhO2+ZITyvQuE37w2hHS7KAPXOruDLzpAEAuBETukgNU8pIDzvUuBID4zgR0+sgFT\/wAQPAU1PnMFYL2zBWa8vAUxu6SEzLsAEAAwHAAMBu9AB8Avg8fAABAvg+G\/vAKhv4yCsn9MgrU+QBAFAoc+LgQHPgKFKT3wBfs9bQZEvNUGvzvlhlo7QIXmOqwE\/7oOhGk6L0ApOgAQNwANOooBTTqBAYQ6wQGqf0oBWf+vQBn\/gBAWgos7VoKKPb+ECj2EBNM9cgUsvOkFdzxhhWK7m4Ubuw0EvLqoA9c6pwJXOoAQFwIsOtcCGf+AEBEFlDsXBcI7vwXou\/8FwDxXBfW8kQWUvQAQADAcQBaGQIIVgksBhoJCgWeB7AE7ARGBZUCngfdAIQNhv7gEE\/8LhOA+AoUTPXOE3jxEBMm7vgRFOwEEFzqKg2e6QBARAcy7OYFwO+qBQz0LAbg9+AGUPt+CYr9AEDkByP\/KAUs\/ZUCevnYAQr2+AF48XIDDu0EBvjpeAoE6IgOBOgWEuDoShUQ66IXiu5+GJry\/Bdo94AWuvrOE4r9uBBD\/3oIdgIAQM4EXPnyA8j20AMS80wE\/O\/OBETuAEAyFKrszBUk8AgWsvPqFYL2yBSY+QBA5AdiB+AGCAeGBgQGwgYoBUQHsARcCM4E9gnmBa4LRAdIDT4Igg+cCbgQugkWEpwJMhTACIYVCAdEFuwEYhZMBGIWegEAQIwUegGMFPID7BNGBS4TyAUWEkoG\/hAsBmQPbgU2CzMDMgoUAwBASA0sBqAPYgc6EeQHthKeBwBAAMByAEwdmgHh\/6AP4f8AQKAPZ\/5yC2f+0grJ\/dIKBPcAQFYTgvYCF0z1PBl285AaHvFyGmzueBkU7GIW+OkKFP7oIhB86HoBfOgAQFoBNOrmBTTqaAbU6mgGiv2qBWf+uQFn\/gBAmAgo\/pgIVusAQNgJeuoEEHrq2hG26i4TOOuMFBTspBVo7eoVou+kFdzx7BOy89oRjvSgD6z00gqs9NIKLO0AQCAX0uxCGALvQhi68IQXuPLkFnbzAED0C8j24g7I9gQQaPe4EET4+BG2+WgVxf6oFuH\/hBdeAFoZXgAwGwAATB2i\/wBAah0I\/k4bhv6QGob+9hjN\/CYWnvhKFaT3qhRo9wBAkhPa+A4VdPqoFiz9XBco\/t4Xhv4AQADAcwCAFnIDmQFyA+j9AEC5AbkBuQGC9gBAkgOC9pID+PhMBBT7yAWO\/FwICP5sDIb+gg9q\/eAQ8Pv+EFb6fBDa+MQOwvf2CYj15gUw83IDfvCVAibuFAP260YFgOmAB6To0goi6KgMIujEDsLoAEA6EeLmOhFc6gBAEBPi5lYTnPAAQFgRfvBYEQjufBBu7B4P8upmDVzqVAv46VYJNOomBzjraAbS7IAHIO9WCWDwRg9Y85QRjvQKFMj2LBWY+YwUrfy2Emf+fBCi\/4QNXgB+CV4A5gVi\/wBAmBIO\/C4TdPryEtr4vBFo974PCvb8CJryCAda8YwFwO\/OBAju7ARo7QBAAMB0APYYzgQ\/AFAUPwAAQFAUhv6CD4b+4g4I\/uIOLO0AQMQOeuqGFXrqxhbO6yAXAPEAQNgYAPHeF4jmAEDGFnzosAR86ABAuQFq5p4APPEAQHYCiu7VAm7skgM465IE1OqWCtTqlgrJ\/RQKhv7sBIb+AEDQDAj+0Ay26gBAAMB1AEwdmgEW6owFFuoEBvLqBAa2+eAGL\/xcCCj+9gmC\/8wLXgAGDt0AmhDdALATHwCkFcX+Phet\/PwXMvtgGCD5YBgQ6x4ZXOouHVzqAEBMHV7odhFe6ABAWBEW6iwVFuomFrbqJhbU+WgVbvsKFCz9cBJn\/l4QBP9CDgT\/TgxH\/jYLS\/14CrT7AEDACG77AgjU+SAIpPcgCHrqAEB6AXzoRg986ABARg9c6vAKXOpaCtTqWgrI9gBAAMB2AKwc\/AAW6pIEFuqsDZ4AoA+eAGAY8uo8GTTqcBwW6gBAcBxe6F4QXugAQF4QNOqGFTTqJhbU6r4PFPsAQOIO2vj8CBbqMAwW6gBAMAx86J4AfOgAQEQHOOuIDuz8AEAAwHcAKit+ABbq0AMW6ioNngBGD54ADhV88gBAhhUk8CocfgAoHn4ABifU6oAnNOrxKjTqAEDxKl7oBB9e6ABAQB806owjNOpoJDTqkCQ460Ye9voAQIgdvPiEF\/jp7hv46QBADBx86IIPfOgAQIIPNOryEjTqjBTq7R4PMvsAQIgO2vh6CDTqFAo06gBAWgp86H4AfOgAQMIGVuusDS\/8AEDMFTjrjhwO\/ABAAMB4ANAbPwA\/ADAMPwAAQIQNHwCyGx8AAECUG4b+3heG\/l4Q9PIIFnrqAhf46TYa+OkAQDYaXugkDl7oAEBCDhbqcBIW6tQStuoADwDxAEDoDYTvFAoW6k4MFuoAQGwMXuiaAV7oAECaARbqCgUW6swLsvNqBGf+HwBn\/gBA7gxq9SAI7PzkB8n9Pghn\/vQLZ\/4AQMoNZ\/6UEWf+FhKp\/coNBPcAQN4IkussFUf+UBRH\/lAUrfwAQADAeQDQG4YGHwBiFh8AAEBiFob+\/hCG\/nwQCP58EP73XBe26kIYNOqyGzTqAEBsG17ooA9e6ABAoA806goUNOrIFPLqRg\/O9QBA6A248n4JFuqKDBbqAECoDEDongBA6ABAngAW6s4EFupGBRDrbAy8+GwM6P3MC4b+aAaG\/gBAag5H\/moOgPi8BxDrAEAAwHoAVBqeAOH\/IBfh\/yAXUgMAQPYYUgM8GYD4AECiF5L6PheO\/MYWav3qFcn95AfJ\/QBAFAr2+oQXXOpaGVzqAEBaGaToEASk6BAEJOYAQBcCauZ6AR7xAEBSA4rusQNu7G4F1OoWEtTqAEDcD2jtVwJH\/twAR\/4AQEYF6P2MFJjqAEAAwHsADA3oDWgGJgdoBowFqgXQAxAE9AJaAbEDqf1uBdr4egEu9QBAXgBS9AoFnPAoBd7v0AN66lIDBOiSA8rlzgS442IHeOJmDVriAEAqDRLknAkS5CAIEuREB+7kwgZM5iYHXug4CeTuGgne73IDUvR6CET4\/Aja+BoJOPrgBr0ApAYYAkQHkgMCCGoEVgnOBOgNzgQAQCgF+AEKBT8A4Ab8+eAGXPkAQCYHSO8IB4ru7ASC5wBArA1KBuAGSgZGBYwFkgMQBLUCOwFyA4r9KAW8+DsBEPUAQB8AUvTOBH7w7ATe75IDeuoUAwToUgPK5bAEkOMmB3jiKg1a4gBA7gwS5FYJEuTkB\/TjCAfu5IYGJObgBl7o\/AjG7t4IwO8zA1L0Pggc+MAIvPjeCDj6wga9AGgGGAImB5IDvAdqBBoJzgSsDc4EAEDsBPgBzgQ\/AMIG\/PnCBj75AEDgBkjvwgaK7rAEZOcAQADAfADCBlcC0uJXAowFAEBSA4wF8gOMBfID+uIAQADAfQBIDT8ASgYmB0oGwAiMBVoKEAQ2CzsBeAqK\/d4IvPjQDBD1AEDKDVL0Ggl+8BoJ3u94Cnrq0goE6LQKyuVWCZDj4AZ44r0AWuIAQPwAEuSSBBLkBAb04wgH7uRiByTmCAde6AoFxu4KBcDvtApS9MgFHPhGBbz4CgU4+kQHvQCeBxgC4AaSA0oGagTsBM4EPwDOBABA\/Aj4ARoJPwBEB\/z5RAc++QBAJgdI7yYHiu44CWTnAEA\/AEoGJgdKBsAIjAVaChAENgs7AXgKiv3eCLz40AwQ9QBAyg1S9BoJfvAaCd7veAp66tIKBOi0CsrlVgmQ4+AGeOK9AFriAED8ABLkkgQS5AQG9OMIB+7kYgck5ggHXugKBcbuCgXA77QKUvTIBRz4RgW8+AoFOPpEB70AngcYAuAGkgNKBmoE7ATOBD8AzgQAQPwI+AEaCT8ARAf8+UQHPvkAQCYHSO8mB4ruOAlk5wBAAMB+ACAX+AFq9TMDlvFqBELwLAb87xoJHvFODNbyQBDK9DoREPXaEcr0EBO+8QBA8BQ28s4TCvZSEob3\/hD+9wAPpPdWCaz0pAYS80YF9PKSBLLzLgTo9PIDCvYAQG4FePGqBXjxgAf68VoKWPPKDUz1IhBG9pQRRvYAQADA"},
    HersheySans1: {"name":"HersheySans1","unitsPerEm":1000,"ascent":800,"descent":-200,"capHeight":500,"xHeight":300,"glyphs":"IADEDgDAIQBODE4MJOZODGj3AEBODIr9GAvF\/k4MAACEDcX+TgyK\/QBAAMAiALATmAgk5pgIxu4AQHASJOZwEsbuAEAAwCMA3Bk6ETjhmAiYCABAnBg44QQQmAgAQJgIPPHcGTzxAEBiB574nBie+ABAAMAkAJwYhA044YQN7AQAQHASOOFwEuwEAECcGNrpJhZk53ASJOaEDSTm2Alk52IH2uliB1DsmAjG7tgJ\/O9ODDzxsBOy8yYW6PRcFyj2nBie+JwYT\/wmFsX+cBIAAIQNAADYCcX+YgdP\/ABAAMAlAIgdiB0k5mIHAAAAQIQNJOYEEKToBBAQ68QOkO1ODMbu2AnG7mIHUOxiB9rpmAhk5xgLJOaEDSTmBBBk57ATpOhcF6ToEhtk54gdJOYAQJwYaPcmFp748BQU+\/AUiv1cFwAA3BkAAEgcxf6IHU\/8iB3U+RIbaPecGGj3AEAAwCYA\/h\/+Hzzx\/h\/878gexu6IHcbuSBz87xIbfPKcGJ74JhZP\/LATxf46EQAATgwAANgJxf6YCIr9YgcU+2IHnviYCCj22Ano9HAS\/O+wE8bu8BRQ7PAU2umwE2TnOhEk5sQOZOeEDdrphA1Q7MQO\/O86EbLzXBdP\/NwZxf5IHAAAyB4AAP4fxf7+H4r9AEAAwCcATgzYCaTomAhk59gJJOYYC2TnGAva6dgJUOyYCJDtAEAAwCgAOhE6ETjhxA64404MZOfYCVDsmAh88pgIaPfYCYr9Tgx2AsQOLAY6EZgIAEAAwCkAOhFiBzjh2Am4404MZOfEDlDsBBB88gQQaPfEDor9Tgx2AtgJLAZiB5gIAEAAwCoAsBOEDZDthA1P\/ABAYgc88bATnvgAQLATPPFiB574AEAAwCsA\/h+wE9rpsBMAAABAmAjo9Mge6PQAQADALADYCdgJFPuYCE\/8YgcU+5gI1PnYCRT72AmK\/WIHAAAAQADALQD+H5gI6PTIHuj0AEAAwC4A2AmYCNT5YgcU+5gIT\/zYCRT7mAjU+QBAAMAvABIbSBw44SwGmAgAQADAMACcGMQOJOYYC2TnmAgQ62IHPPFiB+j0mAgU+xgLxf7EDgAAOhEAAPAUxf5cFxT7nBjo9JwYPPFcFxDr8BRk5zoRJObEDiTmAEAAwDEAnBgYCxDrhA3a6ToRJOY6EQAAAEAAwDIAnBiYCFDsmAgQ69gJpOgYC2TnhA0k5nASJObwFGTnJhak6FwXEOtcF5DtJhb877ATsvNiBwAAnBgAAABAAMAzAJwY2Akk5lwXJOYEEPzvsBP87yYWPPFcF3zynBgo9pwYnvhcF0\/88BTF\/joRAACEDQAA2AnF\/pgIiv1iBxT7AEAAwDQAnBiwEyTmYgdo99wZaPcAQLATJOawEwAAAEAAwDUAnBgmFiTm2Akk5pgIPPHYCfzvhA3G7joRxu7wFPzvXBd88pwYKPacGJ74XBdP\/PAUxf46EQAAhA0AANgJxf6YCIr9YgcU+wBAAMA2AJwYXBfa6SYWZOdwEiTmBBAk5k4MZOfYCRDrmAg88ZgIaPfYCU\/8TgzF\/gQQAAA6EQAA8BTF\/lwXT\/ycGJ74nBho91wXsvPwFDzxOhH87wQQ\/O9ODDzx2Amy85gIaPcAQADANwCcGJwYJOZODAAAAEBiByTmnBgk5gBAAMA4AJwYhA0k5tgJZOeYCNrpmAhQ7NgJxu5ODPzvOhE88fAUfPJcF+j0nBho95wYFPtcF4r9JhbF\/nASAACEDQAA2AnF\/pgIiv1iBxT7Ygdo95gI6PQYC3zyxA488bAT\/O8mFsbuXBdQ7FwX2ukmFmTncBIk5oQNJOYAQADAOQCcGFwXxu4mFnzysBPo9AQQKPbEDij2GAvo9JgIfPJiB8buYgeQ7ZgI2ukYC2TnxA4k5gQQJOawE2TnJhba6VwXxu5cF+j0JhYU+7ATxf4EEAAAhA0AANgJxf6YCE\/8AEAAwDoA2AmYCDzxYgd88pgIsvPYCXzymAg88QBAmAjU+WIHFPuYCE\/82AkU+5gI1PkAQADAOwDYCZgIPPFiB3zymAiy89gJfPKYCDzxAEDYCRT7mAhP\/GIHFPuYCNT52AkU+9gJiv1iBwAAAEAAwDwAiB1IHNrpmAjo9EgcAAAAQADAPQD+H5gIPPHIHjzxAECYCJ74yB6e+ABAAMA+AIgdmAja6Ugc6PSYCAAAAEAAwD8AJhZiB1DsYgcQ65gIpOjYCWTnTgwk5joRJOawE2Tn8BSk6CYWEOsmFpDt8BT877ATPPHEDrLzxA5o9wBAxA6K\/YQNxf7EDgAABBDF\/sQOiv0AQADAQAA0IdwZ\/O+cGJDtJhZQ7HASUOwEEJDtxA7G7oQNfPKEDSj2xA6e+DoR1PnwFNT5XBee+JwYKPYAQHASUOwEEMbuxA588sQOKPYEEJ74OhHU+QBA3BlQ7JwYKPacGJ74EhvU+Ygd1Pn+H2j3NCGy8zQhPPH+H5DtyB4Q60gcpOjcGWTnJhYk5nASJObEDmTnTgyk6NgJEOuYCJDtYgc88WIH6PSYCJ742AkU+04Miv3EDsX+cBIAACYWAADcGcX+SByK\/YgdT\/wAQBIbUOzcGSj23Bme+BIb1PkAQADAQQAmFsQOJObsBAAAAEDEDiTmnBgAAABAmAho9\/AUaPcAQADAQgDcGZgIJOaYCAAAAECYCCTmsBMk5lwXZOecGKTo3BkQ69wZkO2cGPzvXBc88bATfPIAQJgIfPKwE3zyXBey85wY6PTcGWj33BkU+5wYiv1cF8X+sBMAAJgIAAAAQADAQwDcGdwZUOycGNrpJhZk57ATJObEDiTmTgxk59gJ2umYCFDsYgf872IHKPaYCNT52AlP\/E4Mxf7EDgAAsBMAACYWxf6cGE\/83BnU+QBAAMBEANwZmAgk5pgIAAAAQJgIJOY6ESTm8BRk51wX2umcGFDs3Bn879wZKPacGNT5XBdP\/PAUxf46EQAAmAgAAABAAMBFAFwXmAgk5pgIAAAAQJgIJOacGCTmAECYCHzycBJ88gBAmAgAAJwYAAAAQADARgAmFpgIJOaYCAAAAECYCCTmnBgk5gBAmAh88nASfPIAQADARwDcGdwZUOycGNrpJhZk57ATJObEDiTmTgxk59gJ2umYCFDsYgf872IHKPaYCNT52AlP\/E4Mxf7EDgAAsBMAACYWxf6cGE\/83BnU+dwZKPYAQLATKPbcGSj2AEAAwEgAEhuYCCTmmAgAAABA3Bkk5twZAAAAQJgIfPLcGXzyAEAAwEkA2AmYCCTmmAgAAABAAMBKALATcBIk5nAS1Pk6EYr9BBDF\/oQNAAAYCwAAmAjF\/mIHiv0sBtT5LAZo9wBAAMBLANwZmAgk5pgIAAAAQNwZJOaYCGj3AEDEDjzx3BkAAABAAMBMAPAUmAgk5pgIAAAAQJgIAABcFwAAAEAAwE0AiB2YCCTmmAgAAABAmAgk5nASAAAAQEgcJOZwEgAAAEBIHCTmSBwAAABAAMBOABIbmAgk5pgIAAAAQJgIJObcGQAAAEDcGSTm3BkAAABAAMBPABIbxA4k5k4MZOfYCdrpmAhQ7GIH\/O9iByj2mAjU+dgJT\/xODMX+xA4AALATAAAmFsX+nBhP\/NwZ1PkSGyj2Ehv879wZUOycGNrpJhZk57ATJObEDiTmAEAAwFAA3BmYCCTmmAgAAABAmAgk5rATJOZcF2TnnBik6NwZEOvcGcbunBg88VwXfPKwE7LzmAiy8wBAAMBRABIbxA4k5k4MZOfYCdrpmAhQ7GIH\/O9iByj2mAjU+dgJT\/xODMX+xA4AALATAAAmFsX+nBhP\/NwZ1PkSGyj2Ehv879wZUOycGNrpJhZk57ATJObEDiTmAEBwEhT73Bl2AgBAAMBSANwZmAgk5pgIAAAAQJgIJOawEyTmXBdk55wYpOjcGRDr3BmQ7ZwY\/O9cFzzxsBN88pgIfPIAQDoRfPLcGQAAAEAAwFMAnBicGNrpJhZk53ASJOaEDSTm2Alk52IH2uliB1DsmAjG7tgJ\/O9ODDzxsBOy8yYW6PRcFyj2nBie+JwYT\/wmFsX+cBIAAIQNAADYCcX+YgdP\/ABAAMBUALAThA0k5oQNAAAAQOwEJOYmFiTmAEAAwFUAEhuYCCTmmAie+NgJT\/xODMX+BBAAAHASAAAmFsX+nBhP\/NwZnvjcGSTmAEAAwFYAJhbsBCTmxA4AAABAnBgk5sQOAAAAQADAVwCIHSwGJOZODAAAAEBwEiTmTgwAAABAcBIk5pwYAAAAQMgeJOacGAAAAEAAwFgAnBhiByTmnBgAAABAnBgk5mIHAAAAQADAWQAmFuwEJObEDnzyxA4AAABAnBgk5sQOfPIAQADAWgCcGJwYJOZiBwAAAEBiByTmnBgk5gBAYgcAAJwYAAAAQADAWwA6EZgIOOGYCJgIAEDYCTjh2AmYCABAmAg44ToROOEAQJgImAg6EZgIAEAAwFwAOhGxAyTm8BSxAwBAAMBdADoRxA444cQOmAgAQAQQOOEEEJgIAEBiBzjhBBA44QBAYgeYCAQQmAgAQADAXgCwE4QNuOOxA+j0AECEDbjjXBfo9ABAAMBfACYWsQOYCNwZmAgAQADAYADYCdgJUOxiB8buYgc88ZgIfPLYCTzxmAj872IHPPEAQADAYQBcFyYWxu4mFgAAAEAmFnzysBP87zoRxu6EDcbuGAv875gIfPJiByj2Ygee+JgIT\/wYC8X+hA0AADoRAACwE8X+JhZP\/ABAAMBiAFwXmAgk5pgIAAAAQJgIfPIYC\/zvhA3G7joRxu6wE\/zvJhZ88lwXKPZcF574JhZP\/LATxf46EQAAhA0AABgLxf6YCE\/8AEAAwGMAJhYmFnzysBP87zoRxu6EDcbuGAv875gIfPJiByj2Ygee+JgIT\/wYC8X+hA0AADoRAACwE8X+JhZP\/ABAAMBkAFwXJhYk5iYWAAAAQCYWfPKwE\/zvOhHG7oQNxu4YC\/zvmAh88mIHKPZiB574mAhP\/BgLxf6EDQAAOhEAALATxf4mFk\/8AEAAwGUAJhZiByj2JhYo9iYWsvPwFDzxsBP87zoRxu6EDcbuGAv875gIfPJiByj2Ygee+JgIT\/wYC8X+hA0AADoRAACwE8X+JhZP\/ABAAMBmAMQOBBAk5oQNJOYYC2Tn2AkQ69gJAAAAQCwGxu7EDsbuAEAAwGcAXBcmFsbuJhZ2AvAULAawE2IHOhGYCIQNmAgYC2IHAEAmFnzysBP87zoRxu6EDcbuGAv875gIfPJiByj2Ygee+JgIT\/wYC8X+hA0AADoRAACwE8X+JhZP\/ABAAMBoAFwXmAgk5pgIAAAAQJgIsvNODPzvxA7G7nASxu7wFPzvJhay8yYWAAAAQADAaQDYCWIHJOaYCGTn2Akk5pgI7uRiByTmAECYCMbumAgAAABAAMBqAE4M2Akk5hgLZOdODCTmGAvu5NgJJOYAQBgLxu4YC7ED2AliB2IHmAjsBJgIAEAAwGsA8BSYCCTmmAgAAABA8BTG7pgIFPsAQIQNKPYmFgAAAEAAwGwA2AmYCCTmmAgAAABAAMBtAOokmAjG7pgIAAAAQJgIsvNODPzvxA7G7nASxu7wFPzvJhay8yYWAAAAQCYWsvPcGfzvSBzG7v4fxu50IvzvtCOy87QjAAAAQADAbgBcF5gIxu6YCAAAAECYCLLzTgz878QOxu5wEsbu8BT87yYWsvMmFgAAAEAAwG8AXBeEDcbuGAv875gIfPJiByj2Ygee+JgIT\/wYC8X+hA0AADoRAACwE8X+JhZP\/FwXnvhcFyj2JhZ88rAT\/O86EcbuhA3G7gBAAMBwAFwXmAjG7pgImAgAQJgIfPIYC\/zvhA3G7joRxu6wE\/zvJhZ88lwXKPZcF574JhZP\/LATxf46EQAAhA0AABgLxf6YCE\/8AEAAwHEAXBcmFsbuJhaYCABAJhZ88rAT\/O86EcbuhA3G7hgL\/O+YCHzyYgco9mIHnviYCE\/8GAvF\/oQNAAA6EQAAsBPF\/iYWT\/wAQADAcgAEEJgIxu6YCAAAAECYCCj22Al88k4M\/O\/EDsbucBLG7gBAAMBzAPAU8BR88rAT\/O8EEMbuTgzG7pgI\/O9iB3zymAjo9BgLKPY6EWj3sBOe+PAUFPvwFE\/8sBPF\/gQQAABODAAAmAjF\/mIHT\/wAQADAdADEDtgJJObYCRT7GAvF\/oQNAAAEEAAAAEAsBsbuxA7G7gBAAMB1AFwXmAjG7pgIFPvYCcX+TgwAAAQQAABwEsX+JhYU+wBAJhbG7iYWAAAAQADAdgCwEywGxu6EDQAAAEDwFMbuhA0AAABAAMB3ABIbYgfG7k4MAAAAQDoRxu5ODAAAAEA6EcbuJhYAAABAEhvG7iYWAAAAQADAeADwFGIHxu7wFAAAAEDwFMbuYgcAAABAAMB5ALATLAbG7oQNAAAAQPAUxu6EDQAAGAvsBJgIYgcsBpgI7ASYCABAAMB6APAU8BTG7mIHAAAAQGIHxu7wFMbuAEBiBwAA8BQAAABAAMB7ADoRxA444U4MeOIYC7jj2Akk5tgJpOgYCxDrTgxQ7IQNxu6EDTzxGAuy8wBATgx44hgL7uQYC2TnTgza6YQNEOvEDpDtxA7874QNfPKYCOj0hA1o98QO1PnEDk\/8hA3F\/k4MAAAYC3YCGAvsBE4MYgcAQBgLKPaEDZ74hA0U+04Miv0YC8X+2Ak7AdgJsQMYCywGTgxiB8QOmAgAQADAfADYCZgIOOGYCJgIAEAAwH0AOhHYCTjhTgx44oQNuOPEDiTmxA6k6IQNEOtODFDsGAvG7hgLPPGEDbLzAEBODHjihA3u5IQNZOdODNrpGAsQ69gJkO3YCfzvGAt88gQQ6PQYC2j32AnU+dgJT\/wYC8X+TgwAAIQNdgKEDewETgxiBwBAhA0o9hgLnvgYCxT7TgyK\/YQNxf7EDjsBxA6xA4QNLAZODGIH2AmYCABAAMB+AIgdYgee+GIHKPaYCHzyGAs88YQNPPEEEHzy8BQo9lwXaPfcGWj3SBwo9ogdsvMAQGIHKPaYCLLzGAt88oQNfPIEELLz8BRo91wXnvjcGZ74SBxo94gdsvOIHTzxAEAAwA=="},
};
function getFont(name) {
    return fonts[name];
}
this.getFont = getFont;
function Text(fontData) {
    const decode = (data) => {
        const b = atob(data), a = new Int16Array(b.length / 2), g = {};
        for (let i = 0; i < b.length; i+=2) {
            a[i / 2 | 0] = b.charCodeAt(i) | (b.charCodeAt(i + 1) << 8);
        }
        for (let i = 0;i < a.length; i++) {
            let u = String.fromCharCode(a[i++]), x = a[i++], d = [], p = [];
            for (;a[i] !== -16384; i++) a[i] === 16384 ? (d.push(p), p = []) : p.push(a[i]);
            g[u] = { x, d };
        }
        return g;
    }
    const rotAdd = (a, b, h) => [Math.cos(h)*a[0] - Math.sin(h)*a[1] + b[0],
                                 Math.cos(h)*a[1] + Math.sin(h)*a[0] + b[1]];

    const data = Object.fromEntries(Object.entries(fontData).map(([key, value]) =>
        [key, key === 'glyphs' ? decode(value) : value]));

    class RangeFinderTurtle extends Turtle {
        constructor(x, y) {super(x, y);this.reset();}
        goto(x, y) {super.goto(x, y);const [a, b] = this.pos();this.rangeX = [Math.min(a, this.rangeX? this.rangeX[0]: a), Math.max(a, this.rangeX? this.rangeX[1]: a)];this.rangeY = [Math.min(b, this.rangeY? this.rangeY[0]: b), Math.max(b, this.rangeY? this.rangeY[1]: b)];}
        reset() {const [a, b] = this.pos();this.rangeX = [a, a];this.rangeY = [b, b];}
        bbox() { return [[this.rangeX[0], this.rangeY[0]], [this.rangeX[1], this.rangeY[1]]]; }
    }
    
    class Text {
        getPts(t, str, scale = 1) {
            const isRealDown = t && t.isdown();
            const paths = [];
            
            t.up();
            const isDown = t && t.isdown();
            let pos = t ? [t.x(), t.y()] : [0,0], h = t ? t.h() * 2*Math.PI/t.fullCircle() : 0, o = pos, s = scale / data.unitsPerEm;
            str.split('').map(c => {
                if (c == '\n') {
                    pos = o = rotAdd([0, 10 * scale], o, h);
                    return;
                }
                let path = [];
                const glyph = (data.glyphs[c] || data.glyphs[' ']), d = glyph.d;
                d.forEach( (p, k) => {
                    t && t.up();
                    if(path.length > 0) paths.push(path);
                    path = [];
                    for (let i=0; i<p.length; i+=2) {
                        const pt = rotAdd([p[i]*s, p[i+1]*s], pos, h);
                        path.push(pt);
                        t && t.goto(pt);
                        t && (!isDown || t.down());
                    }
                });
                if(path.length > 0) paths.push(path);
                pos = rotAdd([glyph.x*s, 0], pos, h);
            });
            if(isRealDown) t.down();
            return paths;
        }
        print (t, str, scale = 1) {
            const paths = this.getPts(t, str, scale);
            let pos = t ? [t.x(), t.y()] : [0,0], h = t ? t.h() * 2*Math.PI/t.fullCircle() : 0;
            
            paths.forEach(path => path.forEach((e, i) => {
                t[i==0?'jump':'goto'](e);
                pos = e;
            }));
            return rotAdd([0, 10*scale], pos, h);
        }
        bboxPrint(t, str, scale = 1) {
            const rft = new RangeFinderTurtle(t.pos());
            rft.degrees(t.fullCircle());
            rft.seth(t.h());
            rft.up();
            this.print(rft, str, scale);
            this.print(t, str, scale);
            return rft.bbox();
        }
        size(t, str, scale = 1) {
            const rft = new RangeFinderTurtle();
            rft.up();
            this.print(rft, str, scale);
            return {
                width: rft.rangeX[1] - rft.rangeX[0],
                height: rft.rangeY[1] - rft.rangeY[0],
                bbox: t.h() === 0? rft.bbox(): this.bbox(t, str, scale)
            }
        }
        bbox(t, str, scale = 1) {
            const rft = new RangeFinderTurtle();
            rft.degrees(t.fullCircle());
            rft.seth(t.h());

            rft.up();
            this.print(rft, str, scale);
            return rft.bbox();
        }
        dimensions(scale = 1, standardCharacter = 'x') {
            const t = new Turtle();
            const x        = this.size(t, standardCharacter, scale);
            const allLower = this.size(t, 'abcdefghijklmnopqrstuvwxyz', scale);
            const allUpper = this.size(t, 'ABCDEFGHIJKLMNOPQRSTUVWXYZ', scale);
            // property names from: https://www.onlineprinters.co.uk/magazine/font-sizes/
            return {
                height: x.height,
                width: x.width,
                ascenders: Math.abs(allLower.bbox[0][1]) - x.height,
                descenders: Math.abs(allLower.bbox[1][1]),
                capitalHeight: Math.abs(allUpper.bbox[0][1]),
                capitalDescenders: Math.abs(allUpper.bbox[1][1])
            };
        }
    }

    return new Text();
}
this.Text = Text;
}
// Turtlelib Jurgen TextWriter v 5 - end
// Turtlelib Jurgen Polygons v 1 - start - {"id":"80dcba45dd","package":"Jurgen","name":"Polygons","version":"1"}
function turtlelib_ns_80dcba45dd_Jurgen_Polygons() {
////////////////////////////////////////////////////////////////
// Polygon Clipping utility code - Created by Reinder Nijhoff 2019
// (Polygon binning by Lionel Lemarie 2021) https://turtletoy.net/turtle/95f33bd383
// (Delegated Hatching by Jurgen Westerhof 2024) https://turtletoy.net/turtle/d068ad6040
// (Deferred Polygon Drawing by Jurgen Westerhof 2024) https://turtletoy.net/turtle/6f3d2bc0b5
// https://turtletoy.net/turtle/a5befa1f8d
//
// const polygons = new Polygons();
// const p = polygons.create();
// polygons.draw(turtle, p);
// polygons.list();
// polygons.startDeferSession();
// polygons.stopDeferring();
// polygons.finalizeDeferSession(turtle);
//
// p.addPoints(...[[x,y],]);
// p.addSegments(...[[x,y],]);
// p.addOutline();
// p.addHatching(angle, distance); OR p.addHatching(HatchObject); where HatchObject has a method 'hatch(PolygonClass, thisPolygonInstance)'
// p.inside([x,y]);
// p.boolean(polygon, diff = true);
// p.segment_intersect([x,y], [x,y], [x,y], [x,y]);
////////////////////////////////////////////////////////////////
function Polygons(){const t=[],s=25,e=Array.from({length:s**2},t=>[]),n=class{constructor(){this.cp=[],this.dp=[],this.aabb=[]}addPoints(...t){let s=1e5,e=-1e5,n=1e5,h=-1e5;(this.cp=[...this.cp,...t]).forEach(t=>{s=Math.min(s,t[0]),e=Math.max(e,t[0]),n=Math.min(n,t[1]),h=Math.max(h,t[1])}),this.aabb=[s,n,e,h]}addSegments(...t){t.forEach(t=>this.dp.push(t))}addOutline(){for(let t=0,s=this.cp.length;t<s;t++)this.dp.push(this.cp[t],this.cp[(t+1)%s])}draw(t){for(let s=0,e=this.dp.length;s<e;s+=2)t.jump(this.dp[s]),t.goto(this.dp[s+1])}addHatching(t, s) {if(typeof t == 'object') return t.hatch(n, this);const e=new n;e.cp.push([-1e5,-1e5],[1e5,-1e5],[1e5,1e5],[-1e5,1e5]);const h=Math.sin(t)*s,o=Math.cos(t)*s,a=200*Math.sin(t),i=200*Math.cos(t);for(let t=.5;t<150/s;t++) {e.dp.push([h*t+i,o*t-a],[h*t-i,o*t+a]);e.dp.push([-h*t+i,-o*t-a],[-h*t-i,-o*t+a]);}e.boolean(this,!1);this.dp=[...this.dp,...e.dp]}inside(t){let s=0;for(let e=0,n=this.cp.length;e<n;e++)this.segment_intersect(t,[.1,-1e3],this.cp[e],this.cp[(e+1)%n])&&s++;return 1&s}boolean(t,s=!0){const e=[];for(let n=0,h=this.dp.length;n<h;n+=2){const h=this.dp[n],o=this.dp[n+1],a=[];for(let s=0,e=t.cp.length;s<e;s++){const n=this.segment_intersect(h,o,t.cp[s],t.cp[(s+1)%e]);!1!==n&&a.push(n)}if(0===a.length)s===!t.inside(h)&&e.push(h,o);else{a.push(h,o);const n=o[0]-h[0],i=o[1]-h[1];a.sort((t,s)=>(t[0]-h[0])*n+(t[1]-h[1])*i-(s[0]-h[0])*n-(s[1]-h[1])*i);for(let n=0;n<a.length-1;n++)(a[n][0]-a[n+1][0])**2+(a[n][1]-a[n+1][1])**2>=.001&&s===!t.inside([(a[n][0]+a[n+1][0])/2,(a[n][1]+a[n+1][1])/2])&&e.push(a[n],a[n+1])}}return(this.dp=e).length>0}segment_intersect(t,s,e,n){const h=(n[1]-e[1])*(s[0]-t[0])-(n[0]-e[0])*(s[1]-t[1]);if(0===h)return!1;const o=((n[0]-e[0])*(t[1]-e[1])-(n[1]-e[1])*(t[0]-e[0]))/h,a=((s[0]-t[0])*(t[1]-e[1])-(s[1]-t[1])*(t[0]-e[0]))/h;return o>=0&&o<=1&&a>=0&&a<=1&&[t[0]+o*(s[0]-t[0]),t[1]+o*(s[1]-t[1])]}};const y=function(n,j=[]){const h={},o=200/s;for(var a=0;a<s;a++){const c=a*o-100,r=[0,c,200,c+o];if(!(n[3]<r[1]||n[1]>r[3]))for(var i=0;i<s;i++){const c=i*o-100;r[0]=c,r[2]=c+o,n[0]>r[2]||n[2]<r[0]||e[i+a*s].forEach(s=>{const e=t[s];n[3]<e.aabb[1]||n[1]>e.aabb[3]||n[0]>e.aabb[2]||n[2]<e.aabb[0]||j.includes(s)||(h[s]=1)})}}return Array.from(Object.keys(h),s=>t[s])};return{list:()=>t,create:()=>new n,draw:(n,h,o=!0)=>{rpl=y(h.aabb, this.dei === undefined? []: Array.from({length: t.length - this.dei}).map((e, i) => this.dsi + i));for(let t=0;t<rpl.length&&h.boolean(rpl[t]);t++);const td=n.isdown();if(this.dsi!==undefined&&this.dei===undefined)n.pu();h.draw(n),o&&function(n){t.push(n);const h=t.length-1,o=200/s;e.forEach((t,e)=>{const a=e%s*o-100,i=(e/s|0)*o-100,c=[a,i,a+o,i+o];c[3]<n.aabb[1]||c[1]>n.aabb[3]||c[0]>n.aabb[2]||c[2]<n.aabb[0]||t.push(h)})}(h);if(td)n.pd();},startDeferSession:()=>{if(this.dei!==undefined)throw new Error('Finalize deferring before starting new session');this.dsi=t.length;},stopDeferring:()=>{if(this.dsi === undefined)throw new Error('Start deferring before stopping');this.dei=t.length;},finalizeDeferSession:(n)=>{if(this.dei===undefined)throw new Error('Stop deferring before finalizing');for(let i=this.dsi;i<this.dei;i++) {rpl = y(t[i].aabb,Array.from({length:this.dei-this.dsi+1}).map((e,j)=>i+j));for(let j=0;j<rpl.length&&t[i].boolean(rpl[j]);j++);t[i].draw(n);}this.dsi=undefined;this.dei=undefined;}}}
this.Polygons = Polygons;
}
// Turtlelib Jurgen Polygons v 1 - end
// Turtlelib Jurgen Randomness v 2 - start - {"id":"13b81fd40e","package":"Jurgen","name":"Randomness","version":"2"}
function turtlelib_ns_13b81fd40e_Jurgen_Randomness() {
///////////////////////////////////////////////////////////////
// Pseudorandom functions - Created by Jurgen Westerhof 2024 //
///////////////////////////////////////////////////////////////
class Random {
    static #apply(seed) {
        // Seedable random number generator by David Bau: http://davidbau.com/archives/2010/01/30/random_seeds_coded_hints_and_quintillions.html
        !function(a,b,c,d,e,f,g,h,i){function j(a){var b,c=a.length,e=this,f=0,g=e.i=e.j=0,h=e.S=[];for(c||(a=[c++]);d>f;)h[f]=f++;for(f=0;d>f;f++)h[f]=h[g=s&g+a[f%c]+(b=h[f])],h[g]=b;(e.g=function(a){for(var b,c=0,f=e.i,g=e.j,h=e.S;a--;)b=h[f=s&f+1],c=c*d+h[s&(h[f]=h[g=s&g+b])+(h[g]=b)];return e.i=f,e.j=g,c})(d)}function k(a,b){var c,d=[],e=typeof a;if(b&&"object"==e)for(c in a)try{d.push(k(a[c],b-1))}catch(f){}return d.length?d:"string"==e?a:a+"\0"}function l(a,b){for(var c,d=a+"",e=0;e<d.length;)b[s&e]=s&(c^=19*b[s&e])+d.charCodeAt(e++);return n(b)}function m(c){try{return o?n(o.randomBytes(d)):(a.crypto.getRandomValues(c=new Uint8Array(d)),n(c))}catch(e){return[+new Date,a,(c=a.navigator)&&c.plugins,a.screen,n(b)]}}function n(a){return String.fromCharCode.apply(0,a)}var o,p=c.pow(d,e),q=c.pow(2,f),r=2*q,s=d-1,t=c["seed"+i]=function(a,f,g){var h=[];f=1==f?{entropy:!0}:f||{};var o=l(k(f.entropy?[a,n(b)]:null==a?m():a,3),h),s=new j(h);return l(n(s.S),b),(f.pass||g||function(a,b,d){return d?(c[i]=a,b):a})(function(){for(var a=s.g(e),b=p,c=0;q>a;)a=(a+c)*d,b*=d,c=s.g(1);for(;a>=r;)a/=2,b/=2,c>>>=1;return(a+c)/b},o,"global"in f?f.global:this==c)};if(l(c[i](),b),g&&g.exports){g.exports=t;try{o=require("crypto")}catch(u){}}else h&&h.amd&&h(function(){return t})}(this,[],Math,256,6,52,"object"==typeof module&&module,"function"==typeof define&&define,"random");
        Math.seedrandom(seed);
    }
    static seedRandom() { this.#apply(new Date().getMilliseconds()); }
    static seedDaily() { this.#apply(new Date().toDateString()); }
    static seed(seed) { this.#apply(seed); }
    static getInt(min, max) { if(max == undefined) {max = min + 1; min = 0; } const [mi, ma] = [Math.min(min, max), Math.max(min, max)]; return (mi + Math.random() * (ma - mi)) | 0;}
    static get(min, max) {if(min == undefined) {return Math.random();}if(max == undefined) {max = min;min = 0;}const [mi, ma] = [Math.min(min, max), Math.max(min, max)];return mi + Math.random() * (ma - mi);}
    static fraction(whole) { return this.get(0, whole); }
    static getAngle(l = 1) { return l * this.get(0, 2*Math.PI); }
    // Standard Normal variate using Box-Muller transform.
    static getGaussian(mean=.5, stdev=.1) {const u = 1 - this.get(); /* Converting [0,1) to (0,1] */const v = this.get();const z = ( -2.0 * Math.log( u ) )**.5 * Math.cos( 2.0 * Math.PI * v );/* Transform to the desired mean and standard deviation: */return z * stdev + mean;}
    static skew(value, skew = 0) { /*skew values (from 0 to 1) by a skew from -1 to 1, respectively right and left skewed (resp more values to left or to right), 0 is not skewed*/return (skew < 0)? value - (this.skew(1-value, -skew) - (1-value)): Math.pow(value, 1-Math.abs(skew));}
    static getNormalDistributed(skew = 0) { /*skew values (from 0 to 1) by a skew from -1 to 1, respectively right and left skewed (resp more values to left or to right), 0 is not skewed*/let v = -1;while(v < 0 || 1 <= v) { v = this.getGaussian(.5, .1) };return this.skew(v, skew);}
}
this.R = Random;
}
// Turtlelib Jurgen Randomness v 2 - end