NoteCards 1.3K Library Package The Open Events Card EVALing arbitrary S-expressions at NoteFile open time Frank G. Halasz Xerox PARC First Written: 3-May-86 The NCOpenEventCard is a library package that defines the OpenEvents card type. An OpenEvents card is basically a text card that is specially registered in its NoteFile's registry card. The card should contain an arbitrary set of S-expressions to be EVALed whenever the NoteFile containing the card is opened. To create an OpenEvents card for a NoteFile, simply create an OpenEvents card as you would any other card. This will bring up a OpenEvents card that behaves just like a Text card. Use TEdit to type the required S-expressions. There can be only one OpenEvents card per NoteFile. Attempting to create a second one, will simply bring up the existing OpenEvents card so that it can be edited. LOADing NCOpenEventCard sets up NoteCards so that immediately after a NoteFile is opened, the contents of its OpenEvents card (if any) are read and EVALed. During the EVAL, the value of the atom NoteFile is bound to the NoteFile being opened. For example, an OpenEvents card containing the S-expression (NCP.BringUpCard (fetch (NoteFile ToBeFiledCard) of NoteFile)) will cause the ToBeFiled box to be brought up each time the NoteFile is opened. (LIST ((PAGE NIL NIL (0 0 17 22) ((TEXT NIL NIL (72 72 468 648) NIL))) (PAGE NIL NIL (0 0 17 22) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY GACHA OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM)) (468 756 72 36) NIL) (TEXT NIL NIL (72 72 468 648) NIL))) (PAGE NIL NIL (0 0 17 22) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 SIZE 10 FAMILY GACHA OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF SLOPE REGULAR WEIGHT MEDIUM)) (468 756 72 36) NIL) (TEXT NIL NIL (72 72 468 648) NIL)))))(((( ( ( TIMESROMAN  TIMESROMAN  HELVETICA TIMESROMAN  TIMESROMAN  TIMESROMAN6 8ŠÄ(Ì!zº