wrights-deck/nobles.asy

import "suits.asy" as suits;
import "numerals.asy" as numerals;

int COUNT = CARDS;
int QUEEN = PUPPETS;
int EARL = BREAD;
int SCION = BLADES;
int PRINCE = WHEELS;
int REGENT = CHAIRS;

path[][] noble_faces = { {}, {}, {}, {}, {}, {} };

path[][] noble_letters = { {}, {}, {}, {}, {}, {} };

path[] c = { (45,335)..controls (45,94) and (212,-16)..(396,-16)..controls (523,-16) and (648,54)..(650,72)..controls (662,162) and (666,195)..(666,205)..controls (666,212) and (664,217)..(654,218)..controls (638,220) and (634,218)..(632,204)---(619,91)..controls (618,80) and (537,23)..(424,23)..controls (270,23) and (147,164)..(147,333)..controls (147,514) and (250,650)..(395,650)..controls (528,650) and (626,545)..(626,531)..controls (626,522) and (622,445)..(622,441)..controls (622,432) and (623,429)..(641,429)..controls (654,429) and (657,433)..(657,445)..controls (657,496) and (661,620)..(661,638)..controls (661,650) and (656,651)..(641,651)..controls (626,651) and (626,649)..(626,638)---(626,611)..controls (626,594) and (618,601)..(609,608)..controls (589,622) and (520,680)..(402,680)..controls (200,680) and (45,544)..cycle };
noble_letters[COUNT] = shrink_glyph(45, 666, true)*c;

path[] q = (45,340)..controls (45,118) and (204,25)..(382,3)..controls (389,2) and (396,2)..(396,1)..controls (396,-3) and (289,-51)..(255,-60)..controls (234,-65) and (215,-66)..(198,-66)..controls (191,-66) and (183,-65)..(176,-65)..controls (159,-65) and (151,-68)..(151,-80)..controls (151,-91) and (174,-122)..(187,-122)..controls (195,-122) and (229,-104)..(254,-104)..controls (308,-104) and (466,-187)..(603,-187)..controls (677,-187) and (759,-124)..(759,-111)..controls (759,-103) and (748,-94)..(745,-94)..controls (739,-94) and (707,-124)..(639,-124)..controls (595,-124) and (527,-98)..(459,-83)..controls (401,-70) and (305,-71)..(305,-67)..controls (305,-65) and (462,5)..(494,14)..controls (637,55) and (738,179)..(738,340)..controls (738,534) and (590,675)..(392,675)..controls (208,675) and (45,556)..cycle^^(132,356)..controls (132,509) and (239,647)..(382,647)..controls (545,647) and (640,485)..(640,332)..controls (640,108) and (465,18)..(434,18)..controls (411,18) and (274,54)..(217,119)..controls (166,177) and (132,264)..cycle;
noble_letters[QUEEN] = shrink_glyph(45, 759, true)*q;

path[] e = { (40,15)..controls (40,-2) and (40,-3)..(53,-3)..controls (76,-3) and (145,0)..(175,0)..controls (205,0) and (522,-3)..(545,-3)..controls (555,-3) and (567,-1)..(567,8)..controls (567,38) and (570,96)..(570,146)..controls (570,153) and (562,155)..(553,155)..controls (545,155) and (539,153)..(539,147)..controls (538,108) and (538,85)..(536,60)..controls (534,37) and (533,37)..(517,37)..controls (513,37) and (314,34)..(216,34)..controls (210,34) and (207,167)..(204,310)..controls (204,325) and (204,325)..(220,325)---(383,325)..controls (437,325) and (438,315)..(438,305)---(438,259)..controls (438,253) and (448,250)..(456,250)..controls (463,250) and (469,253)..(469,258)..controls (469,271) and (467,305)..(467,341)..controls (467,377) and (469,410)..(469,419)..controls (469,424) and (462,427)..(455,427)..controls (447,427) and (438,424)..(438,418)---(438,368)..controls (438,352) and (401,352)..(383,352)---(216,352)..controls (204,352) and (204,355)..(204,368)..controls (203,418) and (202,467)..(202,510)..controls (202,588) and (203,638)..(209,638)..controls (320,638) and (481,635)..(481,631)..controls (481,625) and (478,558)..(478,553)..controls (478,543) and (481,539)..(493,539)..controls (507,539) and (509,541)..(509,549)..controls (509,627) and (513,660)..(513,679)..controls (513,689) and (510,690)..(496,690)..controls (488,690) and (484,688)..(483,678)..controls (481,666) and (483,665)..(416,665)..controls (373,665) and (220,662)..(167,662)..controls (132,662) and (67,665)..(60,665)..controls (52,665) and (48,663)..(48,651)..controls (48,636) and (55,636)..(67,636)---(110,636)..controls (117,636) and (121,564)..(121,492)..controls (121,486) and (125,309)..(125,198)---(125,102)..controls (125,47) and (124,27)..(118,27)---(57,27)..controls (41,27) and (40,27)..cycle };
noble_letters[EARL] = shrink_glyph(40, 570, true)*e;

path[] r = (40,649)..controls (40,634) and (48,632)..(60,632)--(115,634)..controls (126,634) and (127,436)..(127,289)---(127,156)..controls (127,85) and (126,27)..(122,27)---(77,27)..controls (61,27) and (59,27)..(59,15)..controls (59,-2) and (60,-3)..(73,-3)..controls (82,-3) and (141,0)..(171,0)..controls (201,0) and (256,-3)..(279,-3)..controls (289,-3) and (290,-1)..(290,14)..controls (290,26) and (290,27)..(279,27)---(218,27)..controls (212,27) and (207,240)..(207,302)..controls (207,308) and (208,313)..(218,313)..controls (246,313) and (289,312)..(310,312)..controls (473,309) and (483,186)..(483,66)---(483,8)..controls (483,0) and (484,0)..(491,0)..controls (491,0) and (590,-3)..(624,-3)..controls (636,-3) and (641,0)..(641,5)..controls (641,26) and (638,27)..(629,27)---(583,27)..controls (572,27) and (571,35)..(569,92)..controls (563,256) and (465,303)..(402,322)..controls (388,326) and (382,326)..(382,327)..controls (382,328) and (389,329)..(402,335)..controls (444,354) and (536,406)..(536,498)..controls (536,638) and (418,668)..(318,668)..controls (295,668) and (203,662)..(173,662)..controls (143,662) and (76,664)..(60,664)..controls (47,664) and (40,664)..cycle^^(207,345)---(207,586)..controls (207,616) and (210,640)..(214,640)..controls (231,641) and (249,642)..(266,642)..controls (360,642) and (451,583)..(451,484)..controls (451,400) and (411,356)..(363,334)..controls (359,332) and (355,333)..(351,333)..controls (317,334) and (266,334)..(223,335)..controls (209,335) and (207,337)..cycle;
noble_letters[REGENT] = shrink_glyph(40, 641, true)*r;

path[] p = (40,649)..controls (40,634) and (48,632)..(60,632)---(123,634)..controls (127,634) and (128,589)..(128,526)---(128,474)..controls (128,343) and (127,27)..(119,27)---(68,27)..controls (52,27) and (50,27)..(50,15)..controls (50,-2) and (51,-3)..(64,-3)..controls (73,-3) and (141,0)..(171,0)..controls (201,0) and (263,-3)..(286,-3)..controls (296,-3) and (297,-1)..(297,14)..controls (297,26) and (297,27)..(286,27)---(213,27)..controls (209,27) and (208,136)..(208,216)---(208,282)..controls (208,288) and (208,293)..(218,293)..controls (246,293) and (269,290)..(305,290)..controls (446,290) and (544,343)..(544,471)..controls (544,606) and (440,667)..(304,667)..controls (281,667) and (203,662)..(173,662)..controls (143,662) and (76,664)..(60,664)..controls (47,664) and (40,664)..cycle^^(209,325)---(209,586)..controls (209,616) and (210,640)..(214,640)..controls (225,641) and (236,641)..(247,641)..controls (366,641) and (458,583)..(458,486)..controls (458,357) and (361,312)..(247,312)..controls (231,312) and (209,313)..cycle;
noble_letters[PRINCE] = shrink_glyph(40, 544, true)*p;

//path[] d = (35,10)..controls (35,-2) and (35,-4)..(46,-4)..controls (57,-4) and (145,0)..(173,0)..controls (238,0) and (303,-4)..(368,-4)..controls (547,-2) and (713,116)..(713,335)..controls (713,549) and (548,678)..(332,678)..controls (292,678) and (202,666)..(128,666)..controls (94,666) and (63,667)..(59,667)..controls (46,667) and (46,663)..(46,651)..controls (46,639) and (50,639)..(59,639)---(129,641)..controls (130,641) and (131,610)..(131,563)..controls (131,397) and (124,25)..(118,25)---(52,25)..controls (39,25) and (35,25)..cycle^^(213,86)..controls (213,225) and (213,362)..(214,500)..controls (214,545) and (217,645)..(221,646)..controls (244,652) and (285,652)..(311,652)..controls (496,652) and (612,490)..(612,348)..controls (612,261) and (608,22)..(272,22)..controls (252,22) and (221,22)..(215,26)..controls (213,27) and (213,54)..cycle;
//noble_letters[DUCHESS] = shrink_glyph(35, 713, true)*d;

path[] s = { (55,488)..controls (55,256) and (411,318)..(411,139)..controls (411,70) and (349,18)..(278,18)..controls (220,18) and (102,51)..(100,81)---(94,173)..controls (93,185) and (90,189)..(78,189)---(73,189)..controls (63,189) and (61,183)..(61,175)..controls (61,161) and (69,67)..(71,31)..controls (72,21) and (158,-15)..(269,-15)..controls (380,-15) and (493,54)..(493,178)..controls (493,411) and (138,334)..(138,520)..controls (138,594) and (195,649)..(271,649)..controls (345,649) and (425,576)..(425,551)..controls (425,542) and (422,491)..(422,487)..controls (422,478) and (423,475)..(441,475)..controls (454,475) and (457,479)..(457,491)..controls (457,542) and (462,637)..(462,648)..controls (462,660) and (458,662)..(443,662)..controls (428,662) and (428,659)..(428,648)---(427,637)..controls (426,629) and (424,627)..(420,627)..controls (415,627) and (409,631)..(404,635)..controls (348,673) and (305,677)..(269,677)..controls (161,677) and (55,600)..cycle };
noble_letters[SCION] = shrink_glyph(55, 493, true)*s;