diff --git a/dotscape b/dotscape index bdcdf2b..c185d47 100755 Binary files a/dotscape and b/dotscape differ diff --git a/fonts/upper-case-a.dsc b/fonts/upper-case-a.dsc new file mode 100644 index 0000000..05f4d77 --- /dev/null +++ b/fonts/upper-case-a.dsc @@ -0,0 +1,8 @@ +x ~0.200000017881 y ~0.199999943376 x 0.199999943376 y ~0.199999943376 x 0.199999943376 y ~0.0666667371988 +x 0.199999943376 y ~0.0666667371988 x ~0.200000017881 y ~0.0666667371988 x ~0.200000017881 y ~0.199999943376 +x 0.333333283663 y ~0.599999964237 x 0.333333283663 y 0.333333343267 x 0.199999943376 y 0.333333343267 +x 0.199999943376 y 0.333333343267 x 0.199999943376 y ~0.599999964237 x 0.333333283663 y ~0.599999964237 +x 0.199999943376 y 0.466666638851 x ~0.200000017881 y 0.466666638851 x ~0.200000017881 y 0.333333343267 +x ~0.200000017881 y 0.333333343267 x 0.199999943376 y 0.333333343267 x 0.199999943376 y 0.466666638851 +x ~0.200000017881 y 0.333333343267 x ~0.333333343267 y 0.333333343267 x ~0.333333343267 y ~0.599999964237 +x ~0.333333343267 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y 0.333333343267 diff --git a/fonts/upper-case-b.dsc b/fonts/upper-case-b.dsc new file mode 100644 index 0000000..3155432 --- /dev/null +++ b/fonts/upper-case-b.dsc @@ -0,0 +1,12 @@ +x ~0.200000017881 y 0.466666638851 x 0.199999943376 y 0.466666638851 x 0.199999943376 y 0.333333343267 +x 0.199999943376 y 0.333333343267 x ~0.200000017881 y 0.333333343267 x ~0.200000017881 y 0.466666638851 +x 0.333333283663 y 0.333333343267 x 0.333333283663 y 0.0666666701436 x 0.199999943376 y 0.0666666701436 +x 0.199999943376 y 0.0666666701436 x 0.199999943376 y 0.333333343267 x 0.333333283663 y 0.333333343267 +x ~0.200000017881 y 0.0666666701436 x 0.199999943376 y 0.0666666701436 x 0.199999943376 y ~0.0666667371988 +x 0.199999943376 y ~0.0666667371988 x ~0.200000017881 y ~0.0666667371988 x ~0.200000017881 y 0.0666666701436 +x 0.333333283663 y ~0.0666667371988 x 0.199999943376 y ~0.0666667371988 x 0.199999943376 y ~0.466666638851 +x 0.199999943376 y ~0.466666638851 x 0.333333283663 y ~0.466666638851 x 0.333333283663 y ~0.0666667371988 +x 0.199999943376 y ~0.466666638851 x ~0.200000017881 y ~0.466666638851 x ~0.200000017881 y ~0.599999964237 +x ~0.200000017881 y ~0.599999964237 x 0.199999943376 y ~0.599999964237 x 0.199999943376 y ~0.466666638851 +x ~0.200000017881 y 0.466666638851 x ~0.333333343267 y 0.466666638851 x ~0.333333343267 y ~0.599999964237 +x ~0.333333343267 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y 0.466666638851 diff --git a/fonts/upper-case-c.dsc b/fonts/upper-case-c.dsc new file mode 100644 index 0000000..cfebfb5 --- /dev/null +++ b/fonts/upper-case-c.dsc @@ -0,0 +1,10 @@ +x ~0.200000017881 y 0.466666638851 x 0.199999943376 y 0.466666638851 x 0.199999943376 y 0.333333343267 +x 0.199999943376 y 0.333333343267 x ~0.200000017881 y 0.333333343267 x ~0.200000017881 y 0.466666638851 +x 0.333333283663 y 0.333333343267 x 0.199999943376 y 0.333333343267 x 0.199999943376 y 0.200000017881 +x 0.199999943376 y 0.200000017881 x 0.333333283663 y 0.200000017881 x 0.333333283663 y 0.333333343267 +x 0.333333283663 y ~0.333333283663 x 0.199999943376 y ~0.333333283663 x 0.199999943376 y ~0.466666638851 +x 0.199999943376 y ~0.466666638851 x 0.333333283663 y ~0.466666638851 x 0.333333283663 y ~0.333333283663 +x 0.199999943376 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y ~0.466666638851 +x ~0.200000017881 y ~0.466666638851 x 0.199999943376 y ~0.466666638851 x 0.199999943376 y ~0.599999964237 +x ~0.200000017881 y 0.333333343267 x ~0.333333343267 y 0.333333343267 x ~0.333333343267 y ~0.466666638851 +x ~0.333333343267 y ~0.466666638851 x ~0.200000017881 y ~0.466666638851 x ~0.200000017881 y 0.333333343267 diff --git a/fonts/upper-case-d.dsc b/fonts/upper-case-d.dsc new file mode 100644 index 0000000..041c3c3 --- /dev/null +++ b/fonts/upper-case-d.dsc @@ -0,0 +1,12 @@ +x 0.333333283663 y 0.200000017881 x 0.333333283663 y ~0.333333283663 x 0.199999943376 y ~0.333333283663 +x 0.199999943376 y ~0.333333283663 x 0.199999943376 y 0.200000017881 x 0.333333283663 y 0.200000017881 +x ~0.200000017881 y ~0.466666638851 x 0.0666666701436 y ~0.466666638851 x 0.0666666701436 y ~0.599999964237 +x 0.0666666701436 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y ~0.466666638851 +x 0.0666666701436 y ~0.333333283663 x 0.199999943376 y ~0.333333283663 x 0.199999943376 y ~0.466666638851 +x 0.199999943376 y ~0.466666638851 x 0.0666666701436 y ~0.466666638851 x 0.0666666701436 y ~0.333333283663 +x 0.199999943376 y 0.200000017881 x 0.0666666701436 y 0.200000017881 x 0.0666666701436 y 0.333333343267 +x 0.0666666701436 y 0.333333343267 x 0.199999943376 y 0.333333343267 x 0.199999943376 y 0.200000017881 +x 0.0666666701436 y 0.333333343267 x ~0.200000017881 y 0.333333343267 x ~0.200000017881 y 0.466666638851 +x ~0.200000017881 y 0.466666638851 x 0.0666666701436 y 0.466666638851 x 0.0666666701436 y 0.333333343267 +x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y 0.466666638851 x ~0.333333343267 y 0.466666638851 +x ~0.333333343267 y 0.466666638851 x ~0.333333343267 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 diff --git a/fonts/upper-case-e.dsc b/fonts/upper-case-e.dsc new file mode 100644 index 0000000..82b6867 --- /dev/null +++ b/fonts/upper-case-e.dsc @@ -0,0 +1,8 @@ +x 0.333333283663 y 0.466666638851 x ~0.200000017881 y 0.466666638851 x ~0.200000017881 y 0.333333343267 +x ~0.200000017881 y 0.333333343267 x 0.333333283663 y 0.333333343267 x 0.333333283663 y 0.466666638851 +x 0.199999943376 y 0.0666666701436 x ~0.200000017881 y 0.0666666701436 x ~0.200000017881 y ~0.0666667371988 +x ~0.200000017881 y ~0.0666667371988 x 0.199999943376 y ~0.0666667371988 x 0.199999943376 y 0.0666666701436 +x 0.333333283663 y ~0.466666638851 x ~0.200000017881 y ~0.466666638851 x ~0.200000017881 y ~0.599999964237 +x ~0.200000017881 y ~0.599999964237 x 0.333333283663 y ~0.599999964237 x 0.333333283663 y ~0.466666638851 +x ~0.200000017881 y 0.466666638851 x ~0.333333343267 y 0.466666638851 x ~0.333333343267 y ~0.599999964237 +x ~0.333333343267 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y 0.466666638851 diff --git a/fonts/upper-case-f.dsc b/fonts/upper-case-f.dsc new file mode 100644 index 0000000..26793c4 --- /dev/null +++ b/fonts/upper-case-f.dsc @@ -0,0 +1,6 @@ +x 0.199999943376 y ~0.0666667371988 x ~0.200000017881 y ~0.0666667371988 x ~0.200000017881 y 0.0666666701436 +x ~0.200000017881 y 0.0666666701436 x 0.199999943376 y 0.0666666701436 x 0.199999943376 y ~0.0666667371988 +x 0.333333283663 y 0.333333343267 x ~0.200000017881 y 0.333333343267 x ~0.200000017881 y 0.466666638851 +x ~0.200000017881 y 0.466666638851 x 0.333333283663 y 0.466666638851 x 0.333333283663 y 0.333333343267 +x ~0.200000017881 y 0.466666638851 x ~0.333333343267 y 0.466666638851 x ~0.333333343267 y ~0.599999964237 +x ~0.333333343267 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y 0.466666638851 diff --git a/fonts/upper-case-g.dsc b/fonts/upper-case-g.dsc new file mode 100644 index 0000000..17d2a31 --- /dev/null +++ b/fonts/upper-case-g.dsc @@ -0,0 +1,12 @@ +x 0.333333283663 y 0.333333343267 x 0.199999943376 y 0.333333343267 x 0.199999943376 y 0.200000017881 +x 0.199999943376 y 0.200000017881 x 0.333333283663 y 0.200000017881 x 0.333333283663 y 0.333333343267 +x 0.333333283663 y ~0.466666638851 x 0.199999943376 y ~0.0666667371988 x 0.333333283663 y ~0.0666667371988 +x 0.199999943376 y ~0.0666667371988 x 0.199999943376 y ~0.466666638851 x 0.333333283663 y ~0.466666638851 +x 0.0666666701436 y ~0.0666667371988 x 0.199999943376 y ~0.0666667371988 x 0.199999943376 y ~0.199999943376 +x 0.199999943376 y ~0.199999943376 x 0.0666666701436 y ~0.199999943376 x 0.0666666701436 y ~0.0666667371988 +x 0.199999943376 y 0.466666638851 x ~0.200000017881 y 0.466666638851 x ~0.200000017881 y 0.333333343267 +x ~0.200000017881 y 0.333333343267 x 0.199999943376 y 0.333333343267 x 0.199999943376 y 0.466666638851 +x ~0.333333343267 y 0.333333343267 x ~0.200000017881 y 0.333333343267 x ~0.200000017881 y ~0.466666638851 +x ~0.200000017881 y ~0.466666638851 x ~0.333333343267 y ~0.466666638851 x ~0.333333343267 y 0.333333343267 +x 0.199999943376 y ~0.466666638851 x ~0.200000017881 y ~0.466666638851 x ~0.200000017881 y ~0.599999964237 +x ~0.200000017881 y ~0.599999964237 x 0.199999943376 y ~0.599999964237 x 0.199999943376 y ~0.466666638851 diff --git a/fonts/upper-case-h.dsc b/fonts/upper-case-h.dsc new file mode 100644 index 0000000..4f69b33 --- /dev/null +++ b/fonts/upper-case-h.dsc @@ -0,0 +1,6 @@ +x 0.333333283663 y ~0.599999964237 x 0.199999943376 y ~0.599999964237 x 0.199999943376 y 0.466666638851 +x 0.199999943376 y 0.466666638851 x 0.333333283663 y 0.466666638851 x 0.333333283663 y ~0.599999964237 +x 0.199999943376 y ~0.0666667371988 x ~0.200000017881 y ~0.0666667371988 x ~0.200000017881 y 0.0666666701436 +x ~0.200000017881 y 0.0666666701436 x 0.199999943376 y 0.0666666701436 x 0.199999943376 y ~0.0666667371988 +x ~0.200000017881 y 0.466666638851 x ~0.333333343267 y 0.466666638851 x ~0.333333343267 y ~0.599999964237 +x ~0.333333343267 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y 0.466666638851 diff --git a/fonts/upper-case-i.dsc b/fonts/upper-case-i.dsc new file mode 100644 index 0000000..2dcda73 --- /dev/null +++ b/fonts/upper-case-i.dsc @@ -0,0 +1,6 @@ +x 0.199999943376 y 0.466666638851 x 0.199999943376 y 0.333333343267 x ~0.200000017881 y 0.333333343267 +x ~0.200000017881 y 0.333333343267 x ~0.200000017881 y 0.466666638851 x 0.199999943376 y 0.466666638851 +x 0.0666666701436 y 0.333333343267 x 0.0666666701436 y ~0.466666638851 x ~0.0666666701436 y ~0.466666638851 +x ~0.0666666701436 y ~0.466666638851 x ~0.0666666701436 y 0.333333343267 x 0.0666666701436 y 0.333333343267 +x 0.199999943376 y ~0.466666638851 x ~0.200000017881 y ~0.466666638851 x ~0.200000017881 y ~0.599999964237 +x ~0.200000017881 y ~0.599999964237 x 0.199999943376 y ~0.599999964237 x 0.199999943376 y ~0.466666638851 diff --git a/fonts/upper-case-j.dsc b/fonts/upper-case-j.dsc new file mode 100644 index 0000000..235ebcf --- /dev/null +++ b/fonts/upper-case-j.dsc @@ -0,0 +1,8 @@ +x ~0.0666666701436 y 0.333333343267 x 0.199999943376 y 0.333333343267 x 0.199999943376 y 0.466666638851 +x 0.199999943376 y 0.466666638851 x ~0.0666666701436 y 0.466666638851 x ~0.0666666701436 y 0.333333343267 +x 0.333333283663 y 0.466666638851 x 0.199999943376 y 0.466666638851 x 0.199999943376 y ~0.466666638851 +x 0.199999943376 y ~0.466666638851 x 0.333333283663 y ~0.466666638851 x 0.333333283663 y 0.466666638851 +x 0.199999943376 y ~0.599999964237 x ~0.200000017881 y ~0.599999964237 x ~0.200000017881 y ~0.466666638851 +x ~0.200000017881 y ~0.466666638851 x 0.199999943376 y ~0.466666638851 x 0.199999943376 y ~0.599999964237 +x ~0.200000017881 y ~0.199999943376 x ~0.200000017881 y ~0.466666638851 x ~0.333333343267 y ~0.466666638851 +x ~0.333333343267 y ~0.466666638851 x ~0.333333343267 y ~0.199999943376 x ~0.200000017881 y ~0.199999943376 diff --git a/imperative-shell/file-thread.sml b/imperative-shell/file-thread.sml index 04b69b0..68a9da8 100644 --- a/imperative-shell/file-thread.sml +++ b/imperative-shell/file-thread.sml @@ -11,7 +11,7 @@ struct datatype parse_result = OK of AppType.triangle list | PARSE_ERROR val structureName = "UpperCaseG" - val filename = "fonts/lower-case-z.dsc" + val filename = "fonts/upper-case-k.dsc" val exportFilename = "fonts/upper-case-h.sml" fun ndcToLerpX num =