From 1600a89643d9e18e4853f44204bdd797f536d7bb Mon Sep 17 00:00:00 2001 From: Tangent Wantwight <tangent128@gmail.com> Date: Fri, 12 Jan 2024 23:30:18 -0500 Subject: [PATCH] Terminate upon icecap formation --- island.ts | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/island.ts b/island.ts index 7edfa6b..3064cbc 100644 --- a/island.ts +++ b/island.ts @@ -115,6 +115,8 @@ export function IslandApplet() { const basePos = len >> 1; const width = islands.width; + let timerId: number; + function drop(pos: number) { const lowerNeighbors: number[] = []; @@ -149,7 +151,10 @@ export function IslandApplet() { } // flat, increase elevation - islands.data[pos]++; + const newValue = ++islands.data[pos]; + if (newValue == 9) { + clearInterval(timerId); + } } function tick() { @@ -167,7 +172,7 @@ export function IslandApplet() { tick(); - setInterval(tick, 1000 / 10); + timerId = setInterval(tick, 1000 / 30); return [canvas]; }