The Seven

;\n}\n",[147],"2e41b057-177c-4214-84ed-61695ea6525f","main.ts",14,["D",1785526902537],"http","/**\n * test-7sin / main.ts — serves the quiz AND collects responses.\n *\n * Files: main.ts (this), app.jsx (the quiz component).\n * Env var required: ADMIN_KEY\n *\n * To see responses: open the val URL, tap the \"The Seven\" wordmark\n * five times, enter ADMIN_KEY. The key is checked server-side and\n * never ships to respondents.\n */\n\nimport { sqlite } from \"https://esm.town/v/std/sqlite\";\n// Deno here doesn't allow `import ... with { type: \"text\" }`, so read the\n// sibling file over its (version-pinned) module URL instead and cache it.\nconst APP_URL = new URL(\"./app.jsx\", import.meta.url).href;\nlet appCache: string | null = null;\nasync function appSource(): Promise {\n if (appCache === null) appCache = await (await fetch(APP_URL)).text();\n return appCache;\n}\n\nawait sqlite.execute(`\n CREATE TABLE IF NOT EXISTS sins_responses (\n id INTEGER PRIMARY KEY AUTOINCREMENT,\n ts INTEGER NOT NULL,\n sex TEXT,\n answers TEXT NOT NULL,\n fc TEXT,\n received_at INTEGER NOT NULL\n )\n`);\n\nconst json = (body: unknown, status = 200) =>\n new Response(JSON.stringify(body), {\n status,\n headers: { \"Content-Type\": \"application/json\" },\n });\n\nconst cell = (row: any, i: number, name: string) =>\n Array.isArray(row) ? row[i] : row[name];\n\nconst safeParse = (s: any, fallback: unknown) => {\n try {\n return JSON.parse(s);\n } catch {\n return fallback;\n }\n};\n\nconst PAGE = `\n\n\n\n\nThe Seven\n\n\n\n\n\n\n

\n\n\n`;\n\nexport default async function (req: Request): Promise {\n const url = new URL(req.url);\n\n if (url.pathname === \"/app.jsx\") {\n return new Response(await appSource(), {\n headers: { \"Content-Type\": \"text/plain; charset=utf-8\" },\n });\n }\n\n if (url.pathname === \"/api/responses\") {\n const adminKey = Deno.env.get(\"ADMIN_KEY\");\n const authed = !!adminKey && url.searchParams.get(\"key\") === adminKey;\n\n if (req.method === \"POST\") {\n let body: any;\n try {\n body = await req.json();\n } catch {\n return json({ error: \"Body must be JSON.\" }, 400);\n }\n if (!body?.answers || typeof body.answers !== \"object\") {\n return json({ error: \"Missing answers.\" }, 400);\n }\n const payload = JSON.stringify(body.answers);\n if (payload.length > 20000) return json({ error: \"Payload too large.\" }, 413);\n\n await sqlite.execute({\n sql: \"INSERT INTO sins_responses (ts, sex, answers, fc, received_at) VALUES (?, ?, ?, ?, ?)\",\n args: [\n Number(body.ts) || Date.now(),\n String(body.sex ?? \"unspecified\").slice(0, 20),\n payload,\n JSON.stringify(body.fc ?? []),\n Date.now(),\n ],\n });\n return json({ ok: true }, 201);\n }\n\n if (req.method === \"GET\") {\n if (!authed) return json({ error: \"Bad or missing key.\" }, 401);\n const r = await sqlite.execute(\n \"SELECT id, ts, sex, answers, fc FROM sins_responses ORDER BY ts DESC LIMIT 2000\",\n );\n const responses = r.rows.map((row: any) => ({\n id: Number(cell(row, 0, \"id\")),\n ts: Number(cell(row, 1, \"ts\")),\n sex: cell(row, 2, \"sex\"),\n answers: safeParse(cell(row, 3, \"answers\"), {}),\n fc: safeParse(cell(row, 4, \"fc\"), []),\n }));\n return json({ responses });\n }\n\n if (req.method === \"DELETE\") {\n if (!authed) return json({ error: \"Bad or missing key.\" }, 401);\n const id = url.searchParams.get(\"id\");\n if (!id) return json({ error: \"Missing id.\" }, 400);\n await sqlite.execute({\n sql: \"DELETE FROM sins_responses WHERE id = ?\",\n args: [Number(id)],\n });\n return json({ ok: true });\n }\n\n return json({ error: \"Method not allowed.\" }, 405);\n }\n\n return new Response(PAGE, {\n headers: { \"Content-Type\": \"text/html; charset=utf-8\" },\n });\n}\n",[154],"fdd04d26-3bda-435f-8f5a-b6361f2d289d","app.jsx","f2d3296a-8d16-11f1-b548-1607ee4eb77e",11,["D",1785526512785],"import React, { useState, useMemo, useEffect, useRef } from \"https://esm.sh/react@18.2.0\";\nimport { createRoot } from \"https://esm.sh/react-dom@18.2.0/client\";\n\n/* ------------------------------------------------------------------ *\n * THE SEVEN — a measured profile\n * A seven-sins inventory built from adapted (original-wording) items\n * modelled on published single-construct scales: DGS, DES/BeMaS,\n * BPAQ-Anger, PPS/IPS + BSCS, MVS, PFS, SOI-R, hubristic pride / NPI.\n * Scoring: subscale means -> z against approximate published norms ->\n * within-person ranking, with a forced-choice round and a\n * social-desirability check.\n * ------------------------------------------------------------------ */\n\nconst T = {\n ground: \"#262019\",\n panel: \"#312A21\",\n panelHi: \"#3B3229\",\n rule: \"#4C4136\",\n ruleFaint: \"#3D342A\",\n chalk: \"#EFE7DA\",\n dim: \"#B7AA98\",\n faint: \"#8B7F6E\",\n};\n\nconst FONT_DISPLAY =\n '\"Iowan Old Style\",\"Palatino Linotype\",\"Book Antiqua\",Palatino,Georgia,serif';\nconst FONT_BODY =\n 'Optima,Candara,\"Gill Sans\",\"Segoe UI\",system-ui,-apple-system,sans-serif';\nconst FONT_DATA = 'ui-monospace,\"SF Mono\",Menlo,Consolas,monospace';\n\nconst SIN_META = {\n pride: {\n label: \"Pride\",\n color: \"#E3B23C\",\n cluster: \"ext\",\n gloss: \"Excessive self-regard, and a discounting of what others contribute.\",\n model: \"Hubristic pride adjectives (Tracy & Robins) + NPI-style grandiosity\",\n },\n greed: {\n label: \"Greed\",\n color: \"#A268BE\",\n cluster: \"ext\",\n gloss: \"Wanting more regardless of how much you already have; acquisition as a default setting.\",\n model: \"Dispositional Greed Scale (Seuntjens et al.) + Material Values Scale\",\n },\n lust: {\n label: \"Lust\",\n color: \"#D45C7E\",\n cluster: \"ext\",\n gloss: \"Frequent, intrusive sexual interest and openness to uncommitted sex.\",\n model: \"SOI-R Desire & Attitude facets (Penke & Asendorpf)\",\n },\n gluttony: {\n label: \"Gluttony\",\n color: \"#E38134\",\n cluster: \"ext\",\n gloss: \"Appetite that outruns need — for food, drink, or consumption generally.\",\n model: \"Power of Food Scale (Lowe et al.), hedonic-hunger framing\",\n },\n envy: {\n label: \"Envy\",\n color: \"#4E9E86\",\n cluster: \"int\",\n gloss: \"Resentment at what others have; the wish that they had less.\",\n model: \"Dispositional Envy Scale (Smith et al.) + malicious BeMaS facet\",\n },\n anger: {\n label: \"Anger\",\n color: \"#D6452E\",\n cluster: \"int\",\n gloss: \"A short fuse, and frustration that turns outward or lingers.\",\n model: \"Buss–Perry Aggression Questionnaire, Anger subscale\",\n },\n sloth: {\n label: \"Sloth\",\n color: \"#7C93C7\",\n cluster: \"int\",\n gloss: \"Delay, avoidance, and capacities left unused.\",\n model: \"Pure/Irrational Procrastination Scales + Brief Self-Control Scale\",\n },\n};\n\nconst SIN_ORDER = [\"pride\", \"greed\", \"lust\", \"gluttony\", \"envy\", \"anger\", \"sloth\"];\n\n/* ---------------------------- ITEM BANK ---------------------------- *\n * 6 items per sin, one reverse-keyed each. Wording is original,\n * written from the construct definitions rather than copied from the\n * source instruments.\n * ------------------------------------------------------------------- */\nconst BANK = {\n pride: [\n { t: \"I deserve more recognition than I usually get.\" },\n { t: \"Most of the people I work alongside are not as capable as I am.\" },\n { t: \"I find it hard to take advice from someone I don't rate.\" },\n { t: \"When a group effort goes well, I know how much of it came down to me.\" },\n { t: \"I like other people to notice how well I'm doing.\", },\n { t: \"I go out of my way to credit other people for my successes.\", r: true },\n ],\n greed: [\n { t: \"As soon as I get something, I'm thinking about the next thing I want.\" },\n { t: \"There is no such thing as having enough money.\" },\n { t: \"I'd rather hold on to something than share it, even when I don't need it.\" },\n { t: \"I would bend a rule if it meant a much better deal for me.\" },\n { t: \"Getting more than my share matters to me more than it probably should.\" },\n { t: \"I'm content with what I already own.\", r: true },\n ],\n lust: [\n { t: \"Sexual thoughts arrive often, even when I'm busy with something else.\" },\n { t: \"I size people up as possible partners without really meaning to.\" },\n { t: \"Sex without emotional attachment seems perfectly fine to me.\" },\n { t: \"Attraction has led me into decisions I later questioned.\" },\n { t: \"I often feel drawn to people who aren't available to me.\" },\n { t: \"On an ordinary day my attention rarely drifts to sex.\", r: true },\n ],\n gluttony: [\n { t: \"I think about food when I'm not remotely hungry.\" },\n { t: \"The smell or sight of something I like gives me an immediate urge to have it.\" },\n { t: \"If something tastes good I'll keep going well past full.\" },\n { t: \"Once I start something enjoyable, stopping at a sensible point is hard.\" },\n { t: \"I order or buy more than I need simply because I want it.\" },\n { t: \"I can leave the rest of something I'm enjoying without much of a struggle.\", r: true },\n ],\n envy: [\n { t: \"Other people's success can leave a sour taste.\" },\n { t: \"It bothers me that some people get easily what I've had to work for.\" },\n { t: \"When someone I know does well, part of me hopes it doesn't last.\" },\n { t: \"I compare what I have to what others have more than I'd like to admit.\" },\n { t: \"Hearing a friend's good news sometimes leaves me feeling worse about myself.\" },\n { t: \"I'm straightforwardly pleased when people around me do better than me.\", r: true },\n ],\n anger: [\n { t: \"I lose my temper faster than most people I know.\" },\n { t: \"When I'm frustrated, everyone can tell immediately.\" },\n { t: \"Small annoyances can set off a reaction out of all proportion.\" },\n { t: \"When someone wrongs me I turn it over for a long time afterwards.\" },\n { t: \"I've said things in the heat of the moment that I later regretted.\" },\n { t: \"It takes a great deal to make me angry.\", r: true },\n ],\n sloth: [\n { t: \"I put things off until the delay starts to cost me.\" },\n { t: \"I'll do the easy version of a task rather than the version I know is better.\" },\n { t: \"I spend time on trivial things to avoid starting what actually matters.\" },\n { t: \"There are things I'm capable of that I simply don't bother using.\" },\n { t: \"Once the initial motivation wears off, I struggle to keep going.\" },\n { t: \"When I decide to do something, I start on it straight away.\", r: true },\n ],\n};\n\n/* Social-desirability / impression-management check (5 items).\n All keyed so that agreement indicates improbably virtuous self-report. */\nconst SD_ITEMS = [\n \"I have never taken anything that wasn't mine, however small.\",\n \"I admit my mistakes the moment I notice them, every time.\",\n \"I have never been irritated by someone asking me for a favour.\",\n \"I am always courteous, even to people I dislike.\",\n \"I have never said anything about someone that I wouldn't say to their face.\",\n];\n\n/* Forced-choice round: each sin appears exactly twice. */\nconst FC_PAIRS = [\n [\"pride\", \"envy\"],\n [\"greed\", \"sloth\"],\n [\"lust\", \"anger\"],\n [\"gluttony\", \"pride\"],\n [\"envy\", \"greed\"],\n [\"anger\", \"sloth\"],\n [\"lust\", \"gluttony\"],\n];\n\nconst FC_STATEMENTS = {\n pride: \"I overrate myself.\",\n greed: \"I never feel I have enough.\",\n lust: \"I'm ruled by attraction more than I'd like.\",\n gluttony: \"I don't know when to stop.\",\n envy: \"I resent what other people have.\",\n anger: \"I flare up too easily.\",\n sloth: \"I waste what I could be doing.\",\n};\n\n/* ------------------------- NORM REFERENCES ------------------------- *\n * Approximate anchors on a 1–5 metric, averaged from the two published\n * VAVS studies (subscale means ~2.1–2.7, SDs ~0.42–0.71). Lust is\n * normed by sex because sociosexuality shows large sex differences.\n * These are convenience-sample figures: treat percentiles as rough.\n * ------------------------------------------------------------------- */\nconst NORMS = {\n pride: { m: 2.46, sd: 0.58 },\n greed: { m: 2.63, sd: 0.6 },\n gluttony: { m: 2.36, sd: 0.65 },\n envy: { m: 2.63, sd: 0.62 },\n anger: { m: 2.56, sd: 0.64 },\n sloth: { m: 2.49, sd: 0.6 },\n};\nconst LUST_NORMS = {\n male: { m: 2.9, sd: 0.72 },\n female: { m: 2.42, sd: 0.65 },\n unspecified: { m: 2.6, sd: 0.7 },\n};\n\n/* --------------------------- COLLECTION ---------------------------- *\n * Responses POST to this val's own /api/responses. The admin key is\n * typed into the admin panel and checked server-side, so no secret\n * ships to respondents.\n *\n * REQUIRE_CONSENT is off while testing: nothing is asked and every\n * completed run is sent. Flip it to true before real respondents see\n * this, and the opt-in reappears on the intro screen.\n * ------------------------------------------------------------------- */\nconst ENDPOINT = \"/api/responses\";\nconst REQUIRE_CONSENT = false;\n\nasync function saveResponse(payload) {\n await fetch(ENDPOINT, {\n method: \"POST\",\n headers: { \"Content-Type\": \"application/json\" },\n body: JSON.stringify(payload),\n });\n}\n\nasync function loadResponses(key) {\n const res = await fetch(`${ENDPOINT}?key=${encodeURIComponent(key)}`);\n if (!res.ok) throw new Error(`Endpoint returned ${res.status}`);\n const data = await res.json();\n return (data.responses || []).sort((a, b) => b.ts - a.ts);\n}\n\nconst variance = (xs) => {\n if (xs.length < 2) return 0;\n const m = xs.reduce((a, b) => a + b, 0) / xs.length;\n return xs.reduce((a, b) => a + (b - m) ** 2, 0) / (xs.length - 1);\n};\n\n/** Cronbach's alpha across respondents for one set of recoded items. */\nfunction cronbachAlpha(matrix) {\n const k = matrix.length; // respondents\n if (k < 3) return null;\n const n = matrix[0].length; // items\n let itemVarSum = 0;\n for (let i = 0; i < n; i++) itemVarSum += variance(matrix.map((row) => row[i]));\n const totals = matrix.map((row) => row.reduce((a, b) => a + b, 0));\n const totalVar = variance(totals);\n if (!totalVar) return null;\n return (n / (n - 1)) * (1 - itemVarSum / totalVar);\n}\n\n/* --------------------------- BUILD ORDER --------------------------- */\nfunction buildItems() {\n const out = [];\n for (let i = 0; i < 6; i++) {\n for (let k = 0; k < SIN_ORDER.length; k++) {\n const sin = SIN_ORDER[(k + i * 3) % SIN_ORDER.length];\n const it = BANK[sin][i];\n out.push({ id: `${sin}${i}`, sin, text: it.t, reverse: !!it.r });\n }\n }\n SD_ITEMS.forEach((t, i) => {\n out.splice(6 + i * 9, 0, { id: `sd${i}`, sin: \"_sd\", text: t, reverse: false });\n });\n return out;\n}\nconst ITEMS = buildItems();\nconst PAGE_SIZE = 6;\nconst PAGES = Math.ceil(ITEMS.length / PAGE_SIZE);\n\n/* ------------------------------ MATH ------------------------------- */\nfunction normalCdf(z) {\n const s = z < 0 ? -1 : 1;\n const x = Math.abs(z) / Math.SQRT2;\n const t = 1 / (1 + 0.3275911 * x);\n const y =\n 1 -\n ((((1.061405429 * t - 1.453152027) * t + 1.421413741) * t - 0.284496736) * t +\n 0.254829592) *\n t *\n Math.exp(-x * x);\n return 0.5 * (1 + s * y);\n}\nconst clamp = (v, a, b) => Math.min(b, Math.max(a, v));\n\nfunction polar(r, deg) {\n const a = ((deg - 90) * Math.PI) / 180;\n return [r * Math.cos(a), r * Math.sin(a)];\n}\nfunction sectorPath(r0, r1, a0, a1) {\n const [x0, y0] = polar(r1, a0);\n const [x1, y1] = polar(r1, a1);\n const [x2, y2] = polar(r0, a1);\n const [x3, y3] = polar(r0, a0);\n return `M${x0} ${y0} A${r1} ${r1} 0 0 1 ${x1} ${y1} L${x2} ${y2} A${r0} ${r0} 0 0 0 ${x3} ${y3} Z`;\n}\n\n/* --------------------------- UI PRIMITIVES ------------------------- */\nfunction Eyebrow({ children, color }) {\n return (\n \n {children}\n \n );\n}\n\nfunction Btn({ children, onClick, disabled, kind = \"solid\", full }) {\n const solid = kind === \"solid\";\n return (\n \n {children}\n \n );\n}\n\n/* ------------------------------ SCREENS ---------------------------- */\nfunction Intro({ sex, setSex, consent, setConsent, onStart, onAdmin }) {\n return (\n

\n An inventory in fifty-four parts\n \n The Seven\n \n

\n {SIN_ORDER.map((s) => (\n \n {SIN_META[s].label}\n \n ))}\n

\n\n \n Seven vices, measured the way personality researchers measure anything else:\n forty-two statements, six per sin, adapted from validated scales for greed,\n envy, anger, procrastination, hedonic hunger, sociosexuality and hubristic\n pride. Five further statements check whether you're flattering yourself, and a\n short forced-choice round makes you pick between vices when you can't have both.\n

\n\n \n Everyone scores something on all seven. What the result gives you is the{\" \"}\n shape — which sins run ahead of the rest\n of you, and of most other people.\n

\n\n \n Reference group for the lust scale\n \n Sociosexual desire differs substantially by sex, so this one scale is compared\n against a matched norm. Everything else uses a single reference.\n

\n {[\n [\"male\", \"Men\"],\n [\"female\", \"Women\"],\n [\"unspecified\", \"Don't split it\"],\n ].map(([k, l]) => (\n setSex(k)}\n className=\"px-4 py-2 transition-colors\"\n style={{\n fontFamily: FONT_BODY,\n fontSize: 14,\n borderRadius: 2,\n border: `1px solid ${sex === k ? T.chalk : T.rule}`,\n background: sex === k ? T.chalk : \"transparent\",\n color: sex === k ? T.ground : T.dim,\n cursor: \"pointer\",\n }}\n >\n {l}\n \n ))}\n

\n\n {REQUIRE_CONSENT && (\n \n Sharing your answers\n setConsent(!consent)}\n className=\"mt-3 flex gap-3 text-left w-full\"\n style={{ background: \"none\", border: \"none\", padding: 0, cursor: \"pointer\" }}\n aria-pressed={consent}\n >\n \n {consent ? \"✓\" : \"\"}\n \n \n Send my answers to whoever made this quiz, so they can check how well the\n questions work. No name, email or device details are attached — just the\n ratings themselves, including the ones about sex, food and anger, and the\n time you finished.\n \n \n \n Leave it unticked and the quiz works exactly the same — your results stay on\n this screen and go nowhere.\n

\n \n )}\n\n

\n Begin\n

\n\n \n Answer quickly and honestly — undesirable traits are systematically\n under-reported, and the check items will notice. This is normal-range\n personality, not a diagnosis.\n

\n \n );\n}\n\nconst ANCHORS = [\"Disagree strongly\", \"\", \"Neutral\", \"\", \"Agree strongly\"];\n",[161],"pulls","branches",1,"forks","envVars",{"_175":169,"_177":63},"connections",{"_175":63,"_176":63},"count","unfilledCount","emptyCount",{"_43":160,"_32":161,"_30":162,"_135":-5,"_41":42,"_40":163,"_137":25,"_38":196,"_13":63,"_33":34,"_35":165,"_24":25,"_140":-5,"_184":197,"_27":198},{"_43":153,"_32":154,"_30":57,"_135":-5,"_41":42,"_40":155,"_137":25,"_38":193,"_13":149,"_33":157,"_35":158,"_24":25,"_140":-5,"_184":194,"_27":195},{"_43":146,"_32":147,"_30":148,"_135":-5,"_41":42,"_40":149,"_137":59,"_38":190,"_13":63,"_33":34,"_35":151,"_24":25,"_140":-5,"_184":191,"_27":192},{"_43":142,"_32":28,"_30":31,"_135":-5,"_41":42,"_40":14,"_137":25,"_38":187,"_13":144,"_33":34,"_35":37,"_24":25,"_140":-5,"_184":188,"_27":189},{"_43":132,"_32":133,"_30":134,"_135":-5,"_41":42,"_40":136,"_137":59,"_38":183,"_13":63,"_33":20,"_35":139,"_24":25,"_140":-5,"_184":185,"_27":186},["D",1785526170801],"children",[],[133],["D",1785526913611],[],[28],["D",1785526212302],[],[147],["D",1785526902537],[],[154],["D",1785526512785],[],[161],["D",1785524994632],{"_97":96,"_105":101},{"_97":96,"_98":99,"_100":101,"_18":55,"_102":103,"_104":25},{"_13":86,"_32":87,"_43":42,"_88":44,"_89":-5,"_90":-5,"_91":-5,"_92":-5,"_93":-5,"_94":45,"_95":96},"ctx",{"_79":-5,"_124":236,"_237":238,"_239":240,"_241":25,"_242":25,"_243":25,"_244":59,"_245":-5,"_246":-7,"_247":-7,"_248":63,"_249":25,"_250":25,"_251":-5,"_252":25,"_253":25,"_254":25,"_255":-5},"ENV",{"_207":208,"_209":210,"_211":87,"_212":213,"_214":215,"_216":217,"_218":219,"_220":221,"_222":223,"_224":225,"_226":227,"_228":229,"_230":231,"_232":233,"_234":235},"REACT_APP_SENTRY_DSN","https://586020d86f05489db63a554690acf1e9@o1398359.ingest.sentry.io/6724499","RENDER_GIT_COMMIT","e87eb04e707cf64e7e532c8e8ec395f209e17f15","RENDER_GIT_BRANCH","POSTHOG_API_TOKEN","phc_nmoyuAkStEZuUp69rYlg1DZgrIt19Gx0Y4Hwf8tGgJP","POSTHOG_API_HOST","https://wart.val.town","WEB_API_TEMPLATE","https://{val}.web.val.run","APP_URL","https://www.val.town","MODULE_URL","https://esm.town","VANITY_WEB_API_TEMPLATE","https://{label}.val.run/","DENOLS_URL","https://lsp.val.town","NODE_ENV","production","CLOUDFLARE_TURNSTILE_SITE_KEY","0x4AAAAAACtaIZJH7s9rBMZ6","GOOGLE_CLIENT_ID","875989696899-jtsqkhlbdv5jrlsk8631p7ipjg3c6o62.apps.googleusercontent.com","STRIPE_PUBLISHABLE_KEY","pk_live_51N2zvWEpZTTLipIkVEwXrUG9AT0yeOOEYxszarZT1jpsZV58Ly6wlg3SltZpHN26CUalOBmUSY7adQRQiSkCZz2500qSXNkf8Y","API_URL","https://api.val.town",[],"preferencesKeybindings","default","preferencesTheme","light","preferencesFixers","preferencesCopilot","preferencesSelectionAi","preferencesCloseBrackets","preferencesChatPanelState","preferencesDprint","preferencesDenofmt","notificationCount","flagDenols","isBusinessOrgMember","businessOrgHandle","isBusinessOrgAdmin","isHigherTownieTier","navCollapsed","currentOrgId"]

Diff · v15