-- card: 12994 from stack: in -- bmap block id: 4751 -- flags: 4000 -- background id: 2785 -- name: ContentsCard ----- HyperTalk script ----- on OpenCard global TOCGEN if TOCGEN is not "Yes" and short name of me is "ContentsCard" then TestAndGenerate pass OpenCard end OpenCard on TestAndGenerate global TOCOUNT unlock screen get card field TocCountFld put it into TOCOUNT if TOCOUNT+2 is not number of cards in this background then answer "Generate a new table of contents" with "Yes" or "Later" if it is "Yes" then GenerateTOC end if end TestAndGenerate on GenerateTOC global TOC, TOCOUNT, TOCGEN set cursor to watch lock screen put "Yes" into TOCGEN put "" into TOC put 0 into TOCOUNT --put id of last card into LASTONE repeat go to next card set cursor to toc1 if fld "Type" is not empty then add 1 to TOCOUNT put TOCOUNT && word 1 of fld "Type" && "•" && line 1 of fld "Title" after TOC set cursor to toc2 if last char of TOC is not return then put return after TOC end if end if if the short name of this card is "ContentsCard" then exit repeat --if id of this card is LASTONE then exit repeat end repeat put TOC into fld "Recipe" of card "ContentsCard" put TOCOUNT into card field TocCountFld of card "ContentsCard" go to card "ContentsCard" doMenu "Compact Stack" put "No" into TOCGEN end GenerateTOC -- part 3 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=306 top=306 right=322 bottom=333 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 2 -- text size: 10 -- style flags: 0 -- line height: 13 -- part name: TocCountFld ----- HyperTalk script ----- on mouseUp answer "Regenerate Table of contents?" with "Yes" or "No" if it is "Yes" then put 0 into me GenerateTOC end if end mouseUp -- part contents for background part 14 ----- text ----- Table of Contents -- part contents for background part 13 ----- text ----- 1 BEEF • Beef with Tangerine Peel 2 CHICKEN • Chicken or Turkey Tetrazzini 3 CHICKEN • Chicken Tetrazini 4 CHICKEN • Crock pot Chicken a l'Orange 5 CHICKEN • General Tso's Chicken 6 CHICKEN • General Tso's Chicken 2 7 CHICKEN • Southern Fried Chicken 8 CHICKEN • Thai Chicken Coconut Soup 9 CHICKEN • Thai Ginger Chicken Soup 10 FISH • Bagna Cauda 11 FISH • Flounder in Tomato and Basil Sauce 12 FISH • Tom's Easy Fish Chowder 13 FISH • World's Best Fish and Chips 14 MEAT • Baked Lasagna 15 MEAT • Caesar Salad 16 MEAT • Cornbread Stuffing 17 MEAT • Lasagna 18 MEAT • Pozole Verde from Chilapa 19 MEAT • Spicy Peanut, Sate (Satay) sauces 20 OVO • Cranberry Fruit Nut Bread 21 OVO • Potato Gnocci 22 OVO-LACTO • Butter Spritz Cookies 23 OVO-LACTO • Challah 24 OVO-LACTO • Cheesecake 25 OVO-LACTO • Decadent French Toast 26 OVO-LACTO • Grandmother Watson's Oatmeal Cookies 27 OVO-LACTO • Hocott's Pennsylvanie Dutch Funnel Cakes 28 OVO-LACTO • Pecan Delight Pie 29 OVO-LACTO • Pennsylvania Dutch Funnel Cakes 30 OVO-LACTO • Simple and elegant Chocolate Mousse 31 OVO-LACTO • Snicker Doodles 32 OVO-LACTO • Tira mi su (desert) 33 OVO-LACTO • Truffles (candy) 34 PORK • Ham and Rice Stuffing 35 TUNA • Tuna Tetrazzini 36 VEGAN • Atole con Honholi 37 VEGAN • Benner's Pepper Slaw 38 VEGAN • Crusty French Bread 39 VEGAN • Japanese Soy Sauce Dressing 40 VEGAN • Pasta with Oil & Garlic 41 VEGAN • Salsa De Llaja -- part contents for background part 20 ----- text ----- This card shows the current table of contents. Click on an entry to go to that recipe card. You're asked whether Hypercard should update it whenever you add or delete a card. -- part contents for card part 3 ----- text ----- 41