c1d3dbd

Pinchord · pinchord.git · Tickets · Changelog

Branches > serial-mods > c1d3dbd > files

Initial commit

Grahp, 2026-01-07

Commit: c1d3dbd98a4ab2b9817feff2655ef86bb4ee0482

4 changed files:

.gitignore added (view file)

@@ -0,0 +1,2 @@+.clj-kondo/+.lsp/

pinchord-dict.clj added (view file)

@@ -0,0 +1,284 @@+(def priority+  "Priorities used for javelin orthospelling."+  (zipmap [::pre-prefixes ::prefixes ::initials ::vowels ::finals ::suffixes]+          (rest (range))))++(comment+  (def yaml-dict (yaml/parse-string (slurp "pinchord-javelin-dictionary.yaml")))++  (->> (:letters yaml-dict)+       (filter #(= (:order %) 2))+       (map (fn [m] [(:stroke m) (:data m)]))+       (into {})))++(def initials {"T" "t",+               "TSP*" "sk"+               "TSPHR" "sv",+               "TP" "f",+               "TSWR" "kr",+               "THR" "thr",+               "TPR" "fr",+               "PWR" "br",+               "SH*" "sch",+               "TSPR" "scr",+               "TSWH" "kn",+               "TWH" "thw",+               "PWHR" "bl",+               "SPWHR" "cl",+               "TS" "st",+               "SPR" "spr",+               "SWHR" "shr",+               "HR" "l",+               "WH" "wh",+               "TW" "tw",+               "S" "s",+               "SR" "v",+               "TPWR" "dr",+               "H" "h",+               "PR" "pr",+               "TSPWR" "gr",+               "SHR" "sl",+               "SW" "sw",+               "SWR" "y",+               "TSPWH" "gh",+               "R" "r",+               "TSPR*" "squ",+               "TWR" "vr",+               "TSR" "str",+               "TWHR" "j",+               "SH" "sh",+               "PH" "m",+               "TSP" "sc",+               "TR" "tr",+               "P" "p",+               "WHR" "qu",+               "WHR*" "q",+               "TPHR" "fl",+               "TH" "th",+               "WR" "wr",+               "SPWR" "cr",+               "SPH" "sm",+               "TSW" "k",+               "SPHR" "spl",+               "TSPWHR" "gl",+               "TSWHR" "kl",+               "SPW" "c",+               "SWH" "z",+               "PHR" "pl",+               "SPWH" "ch",+               "TSPW" "g",+               "W" "w",+               "SP" "sp",+               "TSPH" "sn",+               "TPH" "n",+               "TPW" "d",+               "PW" "b"})++(def vowels {"OU" "ou",+             "AU" "au",+             "AOI" "ee",+             "AO^" "oa",+             "AU^" "ua",+             "AI^" "ia",+             "IU^" "ui",+             "IU" "e",+             "AIU" "ea",+             "OI^" "io",+             "AIU^" "ae",+             "AOU" "ei",+             "U^" "ue",+             "U" "u",+             "O" "o",+             "AO" "oo",+             "A" "a",+             "I" "i",+             "AOIU" "",+             "OIU" "oe",+             "AOU^" "ie",+             "OI" "oi",+             "OIU^" "eo",

Show all 285 lines

pinchord-javelin-dictionary.yaml added (view file)

@@ -0,0 +1,227 @@+name: Pinchord+maximumOutlineLength: 1+starters:+- {stroke: '', definition: '', mask: ''}+letters:+- {stroke: -LRPKF*, data: rld, order: 5}+- {stroke: -LRKST*, data: nsc, order: 5}+- {stroke: -LRKFS*, data: wn, order: 5}+- {stroke: -LRPFT*, data: nny, order: 5}+- {stroke: -LRPKFS, data: ng, order: 5}+- {stroke: -LRPKST, data: nj, order: 5}+- {stroke: -LRKFS, data: nsh, order: 5}+- {stroke: -LPKF*, data: ddl, order: 5}+- {stroke: -LKFS*, data: wl, order: 5}+- {stroke: -LRKST, data: nxt, order: 5}+- {stroke: -LRKS*, data: nsk, order: 5}+- {stroke: -RPFT*, data: rly, order: 5}+- {stroke: TSPWHR, data: gl, order: 3}+- {stroke: -RPKF*, data: dg, order: 5}+- {stroke: -LRPFT, data: ny, order: 5}+- {stroke: -RPKST, data: rj, order: 5}+- {stroke: -RPKFS, data: rg, order: 5}+- {stroke: -LRPK*, data: bbl, order: 5}+- {stroke: -RKST*, data: rsc, order: 5}+- {stroke: -LRPFS, data: nz, order: 5}+- {stroke: -PKFS*, data: gg, order: 5}+- {stroke: -LPKFS, data: lg, order: 5}+- {stroke: -RPKFT, data: cky, order: 5}+- {stroke: -LPFT*, data: nly, order: 5}+- {stroke: -LRPKF, data: nd, order: 5}+- {stroke: -PKFT*, data: cy, order: 5}+- {stroke: -RKFS*, data: rw, order: 5}+- {stroke: -LPKST, data: lj, order: 5}+- {stroke: -LRST*, data: nth, order: 5}+- {stroke: -LKST*, data: lsc, order: 5}+- {stroke: -LRPS, data: mn, order: 5}+- {stroke: -LRF*, data: fn, order: 5}+- {stroke: -PKF*, data: dd, order: 5}+- {stroke: -LRFS, data: nv, order: 5}+- {stroke: -PKST, data: j, order: 5}+- {stroke: -KFS*, data: w, order: 5}+- {stroke: -LKST, data: lxt, order: 5}+- {stroke: -PKFS, data: g, order: 5}+- {stroke: -LPKF, data: ld, order: 5}+- {stroke: -LRPK, data: mb, order: 5}+- {stroke: -RST*, data: rth, order: 5}+- {stroke: TSPWR, data: gr, order: 3}+- {stroke: -RPFS, data: rz, order: 5}+- {stroke: -PFS*, data: zz, order: 5}+- {stroke: -LPFS, data: lz, order: 5}+- {stroke: SPWHR, data: cl, order: 3}+- {stroke: -KST*, data: sc, order: 5}+- {stroke: -RPKF, data: rd, order: 5}+- {stroke: -PFT*, data: yy, order: 5}+- {stroke: -RKS*, data: rsk, order: 5}+- {stroke: -LRK*, data: nc, order: 5}+- {stroke: TSPWH, data: gh, order: 3}+- {stroke: -PKFT, data: ky, order: 5}+- {stroke: -RPFT, data: ry, order: 5}+- {stroke: -LRKS, data: nx, order: 5}+- {stroke: -LKS*, data: lsk, order: 5}+- {stroke: -LRST, data: nst, order: 5}+- {stroke: TSWHR, data: kl, order: 3}+- {stroke: -LRKF, data: nch, order: 5}+- {stroke: -RKST, data: rxt, order: 5}+- {stroke: -LST*, data: lth, order: 5}+- {stroke: TSPHR, data: sv, order: 3}+- {stroke: -LPK*, data: bl, order: 5}+- {stroke: -LRPF, data: nn, order: 5}+- {stroke: TSPR*, data: squ, order: 3}+- {stroke: -RKFS, data: rsh, order: 5}+- {stroke: -LKFS, data: lsh, order: 5}+- {stroke: -LPFT, data: ly, order: 5}+- {stroke: TSPW, data: g, order: 3}+- {stroke: AIU^, data: ae, order: 4}+- {stroke: SPWH, data: ch, order: 3}+- {stroke: -LRT, data: nt, order: 5}+- {stroke: SWHR, data: shr, order: 3}+- {stroke: OIU^, data: eo, order: 4}+- {stroke: -LRK, data: nk, order: 5}+- {stroke: -RKF, data: rch, order: 5}+- {stroke: -LFS, data: lv, order: 5}+- {stroke: TPWR, data: dr, order: 3}+- {stroke: TSWH, data: kn, order: 3}+- {stroke: -LRP, data: mp, order: 5}+- {stroke: -KT*, data: ct, order: 5}+- {stroke: -RKS, data: rx, order: 5}+- {stroke: SPWR, data: cr, order: 3}+- {stroke: SPHR, data: spl, order: 3}+- {stroke: -KST, data: xt, order: 5}+- {stroke: -FS*, data: vv, order: 5}+- {stroke: -RPS, data: rm, order: 5}+- {stroke: -LT*, data: ttl, order: 5}+- {stroke: -LRS, data: ns, order: 5}+- {stroke: -RST, data: rst, order: 5}+- {stroke: -PFS, data: z, order: 5}+- {stroke: TSWR, data: kr, order: 3}+- {stroke: -PFT, data: y, order: 5}+- {stroke: -PKF, data: d, order: 5}+- {stroke: -PS*, data: sp, order: 5}+- {stroke: TSPH, data: sn, order: 3}+- {stroke: TSP*, data: sk, order: 3}+- {stroke: -KFS, data: sh, order: 5}+- {stroke: AOIU, data: '', order: 4}+- {stroke: -LK*, data: lc, order: 5}+- {stroke: -KF*, data: tch, order: 5}+- {stroke: PWHR, data: bl, order: 3}+- {stroke: TWHR, data: j, order: 3}+- {stroke: -LRF, data: nf, order: 5}+- {stroke: -LKF, data: lch, order: 5}+- {stroke: -LPK, data: lb, order: 5}+- {stroke: -LST, data: lst, order: 5}+- {stroke: -ST*, data: th, order: 5}+- {stroke: -RK*, data: rc, order: 5}+- {stroke: -LPF, data: ln, order: 5}+- {stroke: WHR*, data: q, order: 3}+- {stroke: -LPS, data: lm, order: 5}+- {stroke: TSPR, data: scr, order: 3}+- {stroke: -PK*, data: w, order: 5}+- {stroke: -RPK, data: rb, order: 5}+- {stroke: -RPF, data: rn, order: 5}+- {stroke: -LKS, data: lx, order: 5}+- {stroke: -KS*, data: sk, order: 5}+- {stroke: AOU^, data: ie, order: 4}+- {stroke: -RFS, data: rv, order: 5}+- {stroke: TPHR, data: fl, order: 3}+- {stroke: SHR, data: sl, order: 3}+- {stroke: -RS, data: rs, order: 5}+- {stroke: SPH, data: sm, order: 3}+- {stroke: SPR, data: spr, order: 3}+- {stroke: AIU, data: ea, order: 4}+- {stroke: -T*, data: tt, order: 5}+- {stroke: '#|+', data: '{^}_', order: 1}+- {stroke: -PT, data: pt, order: 5}+- {stroke: -LF, data: lf, order: 5}+- {stroke: PWR, data: br, order: 3}+- {stroke: -PS, data: m, order: 5}+- {stroke: -KT, data: kt, order: 5}+- {stroke: -R*, data: rr, order: 5}+- {stroke: OIU, data: oe, order: 4}+- {stroke: TSW, data: k, order: 3}+- {stroke: -PF, data: n, order: 5}+- {stroke: -KS, data: x, order: 5}+- {stroke: -KF, data: ch, order: 5}+- {stroke: -L*, data: ll, order: 5}+- {stroke: SH*, data: sch, order: 3}+- {stroke: -LT, data: lt, order: 5}+- {stroke: OI^, data: io, order: 4}+- {stroke: SWR, data: y, order: 3}+- {stroke: PHR, data: pl, order: 3}+- {stroke: -P*, data: pp, order: 5}+- {stroke: -FS, data: v, order: 5}+- {stroke: SWH, data: z, order: 3}+- {stroke: AI^, data: ia, order: 4}+- {stroke: IU^, data: ui, order: 4}+- {stroke: WHR, data: qu, order: 3}+- {stroke: TSR, data: str, order: 3}+- {stroke: TPH, data: n, order: 3}+- {stroke: TPR, data: fr, order: 3}+- {stroke: TPW, data: d, order: 3}+- {stroke: -F*, data: ff, order: 5}+- {stroke: TSP, data: sc, order: 3}+- {stroke: SPW, data: c, order: 3}+- {stroke: THR, data: thr, order: 3}+- {stroke: -FT, data: ft, order: 5}+- {stroke: -RT, data: rt, order: 5}+- {stroke: -RP, data: rp, order: 5}+- {stroke: -ST, data: st, order: 5}+- {stroke: -RK, data: rk, order: 5}+- {stroke: AOU, data: ei, order: 4}+- {stroke: AOI, data: ee, order: 4}+- {stroke: AO^, data: oa, order: 4}+- {stroke: -S*, data: ss, order: 5}+- {stroke: -LS, data: ls, order: 5}+- {stroke: TWH, data: thw, order: 3}+- {stroke: -LP, data: lp, order: 5}+- {stroke: -K*, data: c, order: 5}+- {stroke: -RF, data: rf, order: 5}+- {stroke: AU^, data: ua, order: 4}+- {stroke: -PK, data: b, order: 5}+- {stroke: -LK, data: lk, order: 5}+- {stroke: -LR, data: rl, order: 5}+- {stroke: TWR, data: vr, order: 3}+- {stroke: SP, data: sp, order: 3}+- {stroke: OI, data: oi, order: 4}+- {stroke: -R, data: r, order: 5}+- {stroke: TP, data: f, order: 3}+- {stroke: -P, data: p, order: 5}+- {stroke: AI, data: ai, order: 4}+- {stroke: -L, data: l, order: 5}+- {stroke: SR, data: v, order: 3}+- {stroke: -K, data: k, order: 5}+- {stroke: WH, data: wh, order: 3}+- {stroke: PR, data: pr, order: 3}+- {stroke: TW, data: tw, order: 3}+- {stroke: PH, data: m, order: 3}+- {stroke: -E, data: e, order: 6}+- {stroke: IU, data: e, order: 4}+- {stroke: TS, data: st, order: 3}+- {stroke: HR, data: l, order: 3}+- {stroke: '|+', data: '{^}-', order: 1}+- {stroke: -S, data: s, order: 5}+- {stroke: -T, data: t, order: 5}+- {stroke: TH, data: th, order: 3}+- {stroke: AO, data: oo, order: 4}+- {stroke: OU, data: ou, order: 4}+- {stroke: AU, data: au, order: 4}+- {stroke: WR, data: wr, order: 3}+- {stroke: SH, data: sh, order: 3}+- {stroke: PW, data: b, order: 3}+- {stroke: U^, data: ue, order: 4}+- {stroke: TR, data: tr, order: 3}+- {stroke: -F, data: f, order: 5}+- {stroke: SW, data: sw, order: 3}+- {stroke: H, data: h, order: 3}+- {stroke: '#', data: '{-|}', order: 2}+- {stroke: I, data: i, order: 4}+- {stroke: '|', data: '({^}', order: 1}+- {stroke: R, data: r, order: 3}+- {stroke: O, data: o, order: 4}+- {stroke: U, data: u, order: 4}+- {stroke: T, data: t, order: 3}+- {stroke: P, data: p, order: 3}+- {stroke: S, data: s, order: 3}+- {stroke: +, data: '{^}', order: 1}+- {stroke: A, data: a, order: 4}+- {stroke: W, data: w, order: 3}

pinchord-javelin-system.yaml added (view file)

@@ -0,0 +1,320 @@+## Pinchord Version 7+name: "Pinchord"+## Eventually I think I could make this work with the normal extended stenotype layout?+## Requiring only the # S thing and to make ^+ maybe?+keys:+  - name: "#"+    mask: 0x01+  - name: "|"+    mask: 0x02+  - name: "+"+    mask: 0x04+  - name: "T"+    mask: 0x08+  - name: "S"+    mask: 0x10+  - name: "P"+    mask: 0x20+  - name: "W"+    mask: 0x40+  - name: "H"+    mask: 0x80+  - name: "R"+    mask: 0x100+  - name: "*"+    mask: 0x200++  - name: "A"+    mask: 0x400+  - name: "O"+    mask: 0x800+  - name: "-"+    mask: 0+    absentMask: 31744 ## match AOIU^+    presentMask: 16744448 ## Every key after AOIU^+  - name: "I"+    mask: 0x1000+  - name: "U"+    mask: 0x2000+  - name: "^"+    mask: 0x4000++  - name: "L"+    mask: 0x8000+  - name: "R"+    mask: 0x10000+  - name: "P"+    mask: 0x20000+  - name: "K"+    mask: 0x40000+  - name: "F"+    mask: 0x80000+  - name: "S"+    mask: 0x100000+  - name: "T"+    mask: 0x200000+  - name: "*"+    mask: 0x400000+  - name: "E"+    mask: 0x800000++undo: "-LR"++layout:+  - mask: 1+    name: "#"+    center: { "x": 0.5, "y": 0.06 }+    path: [+      { "c": "m", "p": [0.00454, 0] },+      { "c": "l", "p": [0.99545, 0] },+      { "c": "l", "p": [0.99545, 0.12] },+      { "c": "l", "p": [0.00454, 0.12] },+      { "c": "c" }+    ]+  - mask: 0x800000+    name: "^"+    center: { "x": 0.04545, "y": 0.275 }+    path: [+      { "c": "m", "p": [0.00454, 0.15] },+      { "c": "rl", "p": [0.08181, 0] },+      { "c": "rl", "p": [0, 0.25] },+      { "c": "rl", "p": [-0.08181, 0] },+      { "c": "c" }+    ]+  - mask: 0x1000000+    name: "+"+    center: { "x": 0.04545, "y": 0.53 }+    path: [+      { "c": "m", "p": [0.00454, 0.41] },+      { "c": "rl", "p": [0.08181, 0] },+      { "c": "rl", "p": [0, 0.17] },+      { "c": "rq", "p": [0, 0.12, -0.08181, 0.12, -0.08181, 0] },+      { "c": "c" }+    ]+  - mask: 2+    name: "S"+    center: { "x": 0.13636, "y": 0.4 }+    path: [+      { "c": "m", "p": [0.09545, 0.15] },+      { "c": "rl", "p": [0.08181, 0] },

Show all 321 lines