DIRECTORY
Booting USING [RegisterProcs, RollbackProc],
Buttons USING [ButtonProc],
InputFocus USING [GetInputFocus, SetInputFocus],
Menus USING [ClickProc, MouseButton],
MessageWindow USING [Append, Blink, Clear],
Process USING [Detach],
Rope USING [Concat, ROPE],
TEditDocument USING [Selection, SpinAndLock, TEditDocumentData, Unlock],
TEditDocumentPrivate USING [AnonymousLoadFile, AnonymousLoadImplFile, CloseAndNewViewer, CloseAndOpenPreviousFile, DoCloseAndOpenFile, DoCloseAndOpenImplFile, DoLoadFile, DoLoadImplFile, DoOpenFile, DoOpenImplFile, DoStoreFile, EmptyViewer, FileIsMoreRecent, LoadPreviousFile, NewViewer, OpenPreviousFile, PositionHistory, PositionViewer, PreLoadPrevious],
TEditInput USING [CheckSelection, CloseEvent, CommandProc, InterpretAtom, Register],
TEditScrolling USING [AutoScroll],
TEditSelection USING [MakeSelection],
TextNode USING [Location, LocNumber, LocWithin],
ViewerClasses USING [Viewer],
ViewerForkers USING [CallBack, ForkCall],
ViewerGroupLocks USING [CallRootAndLinksUnderWriteLock],
ViewerMenus USING [Restore, Save],
ViewerOps USING [AddProp, EnumerateViewers, EnumProc, FetchProp, PaintViewer],
ViewerTools USING [GetSelectionContents];

TEditDocuments3Impl: CEDAR PROGRAM
IMPORTS Booting, InputFocus, MessageWindow, Process, Rope, TEditDocument, TEditDocumentPrivate, TEditInput, TEditScrolling, TEditSelection, TextNode, ViewerForkers, ViewerGroupLocks, ViewerMenus, ViewerOps, ViewerTools
EXPORTS TEditDocumentPrivate
= BEGIN OPEN TEditDocumentPrivate;

ROPE: TYPE ~ Rope.ROPE;
Viewer: TYPE ~ ViewerClasses.Viewer;

Do: PROC [viewer: REF ANY, atom: ATOM] = {
TEditInput.InterpretAtom[NARROW[viewer], atom];
};

Register: PROC [atom: ATOM, op: TEditInput.CommandProc] = {
TEditInput.Register[atom, op];
};

ForkViewerOp2: PROC [proc: PROC [parent: Viewer, fileName: ROPE _ NIL], parent: Viewer] RETURNS [BOOL _ FALSE] = {
TEditInput.CloseEvent[];
ViewerForkers.ForkCall[parent, StackBase, NEW[Data2 _ [proc, parent, ViewerTools.GetSelectionContents[]]]];
};

ForkViewerOp: PROC [proc: PROC [parent: Viewer], parent: Viewer] RETURNS [BOOL _ FALSE] = {
TEditInput.CloseEvent[];
ViewerForkers.ForkCall[parent, StackBase, NEW[Data1 _ [proc, parent]]];
};

Data1: TYPE = RECORD [
proc: PROC [parent: Viewer],
viewer: Viewer];

Data2: TYPE = RECORD [
proc: PROC [parent: Viewer, fileName: ROPE],
viewer: Viewer,
fileName: ROPE];

StackBase: ViewerForkers.CallBack = {
WITH data SELECT FROM
data1: REF Data1 => {
data1.proc[data1.viewer ! ABORTED => CONTINUE];
};
data2: REF Data2 => {
data2.proc[data2.viewer, data2.fileName ! ABORTED => CONTINUE];
};
ENDCASE;
};


CheckFilesAfterRollback: Booting.RollbackProc = {
Check: ViewerOps.EnumProc = {
WITH v.data SELECT FROM
tdd: TEditDocument.TEditDocumentData => {
IF FileIsMoreRecent[tdd.text, v.file] THEN {
MessageWindow.Append[Rope.Concat["Loading newer version of ", v.file], TRUE];
ViewerMenus.Restore[v]; -- reload the file
};
};
ENDCASE;
RETURN [TRUE] --continue enumeration--
};
ViewerOps.EnumerateViewers[Check]; -- Check each top level viewer
};

SelectMouse: PROC [mouseButton: Menus.MouseButton, redOp, yellowOp, blueOp: ATOM] RETURNS [ATOM] = {
RETURN [SELECT mouseButton FROM
red => redOp, yellow => yellowOp, blue => blueOp,
ENDCASE => ERROR];
};

PreReset: PUBLIC Menus.ClickProc = {
WITH parent SELECT FROM
viewer: Viewer =>
MessageWindow.Append[
IF viewer.file = NIL THEN "Confirm clearing viewer" ELSE Rope.Concat["Confirm reloading of ", viewer.file],
TRUE];
ENDCASE;
};

Reset: PUBLIC Menus.ClickProc = {
MessageWindow.Clear[];
Do[parent, SelectMouse[mouseButton, $RedReset, $YellowReset, $BlueReset]];
};

ResetOp: TEditInput.CommandProc = {
inner: PROC = {
FOR v: Viewer _ viewer, v.link UNTIL v = NIL DO
WITH v.data SELECT FROM
tdd: TEditDocument.TEditDocumentData => {
[] _ TEditDocument.SpinAndLock[tdd, "Reset"];
ViewerOps.AddProp[v, $ResetLoc, NEW[INT _ TextNode.LocNumber[tdd.lineTable.lines[0].pos]]];
v.newVersion _ TRUE; -- to force the init proc to reread the file
TEditDocument.Unlock[tdd];
};
ENDCASE;
IF v.link=viewer THEN EXIT;
ENDLOOP;
FOR v: Viewer _ viewer, v.link UNTIL v = NIL DO
WITH v.data SELECT FROM
tdd: TEditDocument.TEditDocumentData => {
IF InputFocus.GetInputFocus[].owner=v THEN InputFocus.SetInputFocus[];
WITH ViewerOps.FetchProp[v, $ResetLoc] SELECT FROM
locRef: REF INT => {
v.class.init[v];
v.newVersion _ v.newFile _ FALSE;
[] _ TEditDocument.SpinAndLock[tdd, "Reset"];
IF ~PositionViewer[v,TextNode.LocWithin[tdd.text,locRef^],all] THEN
ViewerOps.PaintViewer[v, all];
TEditDocument.Unlock[tdd];
};
ENDCASE;
};
ENDCASE;
IF v.link=viewer THEN EXIT;
ENDLOOP;
};
ViewerGroupLocks.CallRootAndLinksUnderWriteLock[inner, viewer];
};

Save: PUBLIC Menus.ClickProc = {
MessageWindow.Clear[];
Do[parent, SelectMouse[mouseButton, $RedSave, $YellowSave, $BlueSave]];
};

SaveOp: TEditInput.CommandProc = {
TEditInput.CloseEvent[];
IF ~viewer.saveInProgress THEN  TRUSTED {
[] _ Process.Detach[FORK ViewerMenus.Save[viewer]];
};
RETURN [FALSE];
};

PreClear: PUBLIC Menus.ClickProc = {
MessageWindow.Append[clearFirst: TRUE, message:
"Click LEFT to empty this viewer, MIDDLE to make new viewer, RIGHT for close & new"];
};

Clear: PUBLIC Menus.ClickProc =  {
Do[parent, SelectMouse[mouseButton, $Empty, $New, $CloseAndNew]];
};

EmptyOp: TEditInput.CommandProc = { EmptyViewer[viewer]; RETURN [FALSE] };

NewOp: TEditInput.CommandProc = { NewViewer[viewer]; RETURN [FALSE] };

NewButton: PUBLIC Buttons.ButtonProc = { NewViewer[NIL] };

CloseAndNewOp: TEditInput.CommandProc = {
CloseAndNewViewer[viewer]; RETURN [FALSE] };

Store: PUBLIC Menus.ClickProc =  {
MessageWindow.Clear[];
Do[parent, SelectMouse[mouseButton, $RedStore, $YellowStore, $BlueStore]];
};

StoreOp: TEditInput.CommandProc = { RETURN [ForkViewerOp2[DoStoreFile,viewer]] };

PreviousFile: PUBLIC Menus.ClickProc =  {
PreLoadPrevious[parent];
Do[parent, SelectMouse[mouseButton, $LoadPrevious, $OpenPrevious, $CloseAndOpenPrevious]];
};

LoadPreviousOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp[LoadPreviousFile,viewer]];
};

OpenPreviousOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp[OpenPreviousFile,viewer]];
};

CloseAndOpenPreviousOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp[CloseAndOpenPreviousFile,viewer]];
};

AnonymousLoadImpl: PUBLIC Menus.ClickProc = {
Do[parent,$AnonymousLoadImpl];
};

AnonymousLoadImplOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp[AnonymousLoadImplFile,viewer]];
};

AnonymousLoad: PUBLIC Menus.ClickProc =  {
Do[parent,$AnonymousLoad];
};

AnonymousLoadOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp[AnonymousLoadIt,viewer]];
};

AnonymousLoadIt: PROC [parent: Viewer] = {
AnonymousLoadFile[parent];
};

PreGet, PreGetImpl: PUBLIC Menus.ClickProc = {
viewer: Viewer = NARROW[parent];
MessageWindow.Append["Click LEFT to load in this viewer, MIDDLE for new viewer, RIGHT for close & new", TRUE];
};

Get: PUBLIC Menus.ClickProc =  {
Do[parent, SelectMouse[mouseButton, $Load, $Open, $CloseAndOpen]];
};

LoadOp: TEditInput.CommandProc = { RETURN [ForkViewerOp2[LoadIt,viewer]] };

LoadIt: PROC [parent: Viewer, fileName: ROPE _ NIL] = {
[] _ DoLoadFile[parent, fileName, FALSE];
};

OpenOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp2[OpenIt,viewer]];
};

OpenIt: PROC [parent: Viewer, fileName: ROPE _ NIL] = {
[] _ DoOpenFile[fileName, parent];
};

CloseAndOpenOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp2[CloseAndOpenIt,viewer]];
};

CloseAndOpenIt: PROC [parent: Viewer, fileName: ROPE _ NIL] = {
[] _ DoCloseAndOpenFile[parent, fileName];
};


GetImpl: PUBLIC Menus.ClickProc =  {
Do[parent, SelectMouse[mouseButton, $LoadImpl, $OpenImpl, $CloseAndOpenImpl]];
};

LoadImplOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp2[LoadItImpl,viewer]];
};

LoadItImpl: PROC [parent: Viewer, fileName: ROPE _ NIL] = {
[] _ DoLoadImplFile[parent, fileName, FALSE];
};

OpenImplOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp2[OpenItImpl,viewer]];
};

OpenItImpl: PROC [parent: Viewer, fileName: ROPE _ NIL] = {
[] _ DoOpenImplFile[fileName, parent];
};

CloseAndOpenImplOp: TEditInput.CommandProc = {
RETURN [ForkViewerOp2[CloseAndOpenItImpl,viewer]];
};

CloseAndOpenItImpl: PROC [parent: Viewer, fileName: ROPE _ NIL] = {
[] _ DoCloseAndOpenImplFile[parent, fileName];
};

OpenButton: PUBLIC Buttons.ButtonProc = {
[] _ ForkViewerOp2[OpenIt, NIL];
};

Normalize: PUBLIC Menus.ClickProc = {
Do[parent, SelectMouse[mouseButton, $NormalizeToStart, $NormalizeToCaret, $NormalizeToEnd]];
};

Position: PUBLIC Menus.ClickProc = {Do[parent,
IF shift THEN $PositionIncludingComments ELSE $Position];
};

JumpToPrevious: PUBLIC Menus.ClickProc = {Do[parent,$PrevPlace]};
PrevPlaceOp: TEditInput.CommandProc = {
tdd: TEditDocument.TEditDocumentData _ NARROW[viewer.data];
prop: REF PositionHistory _ NARROW[ViewerOps.FetchProp[viewer, $PositionHistory]];
IF tdd # NIL AND prop # NIL THEN {
loc: TextNode.Location _ prop.pos;
IF loc = tdd.lineTable.lines[0].pos THEN loc _ prop.prev;
IF PositionViewer[viewer, loc] THEN RETURN; 
IF loc # prop.prev AND PositionViewer[viewer, prop.prev] THEN RETURN };
MessageWindow.Append["No previous place saved.", TRUE];
MessageWindow.Blink[];
RETURN [FALSE];
};

Reselect: PUBLIC Menus.ClickProc = {Do[parent,$Reselect]};
ReselectOp: TEditInput.CommandProc = {
tdd: TEditDocument.TEditDocumentData _ NARROW[viewer.data];
prop: TEditDocument.Selection _ NARROW[ViewerOps.FetchProp[viewer, $SelectionHistory]];
IF tdd # NIL AND prop # NIL AND TEditInput.CheckSelection[prop] THEN {
TEditSelection.MakeSelection[selection: primary, new: prop];
TEditScrolling.AutoScroll[viewer,FALSE] }
ELSE {
MessageWindow.Append["No saved selection.", TRUE];
MessageWindow.Blink[] };
RETURN [FALSE];
};

Find: PUBLIC Menus.ClickProc = { Do[parent, SELECT mouseButton FROM
red => IF shift THEN $FindNextCaseless ELSE $FindNext,
yellow => IF shift THEN $FindAnyCaseless ELSE $FindAny,
blue => IF shift THEN $FindPrevCaseless ELSE $FindPrev,
ENDCASE => ERROR];
};

FindDef: PUBLIC Menus.ClickProc = { Do[parent, SELECT mouseButton FROM
red => IF shift THEN $FindNextDefCaseless ELSE $FindNextDef,
yellow => IF shift THEN $FindAnyDefCaseless ELSE $FindAnyDef,
blue => IF shift THEN $FindPrevDefCaseless ELSE $FindPrevDef,
ENDCASE => ERROR];
};

FindWord: PUBLIC Menus.ClickProc = { Do[parent, SELECT mouseButton FROM
red => IF shift THEN $FindNextWordCaseless ELSE $FindNextWord,
yellow => IF shift THEN $FindAnyWordCaseless ELSE $FindAnyWord,
blue => IF shift THEN $FindPrevWordCaseless ELSE $FindPrevWord,
ENDCASE => ERROR];
};



FewerLevels: PUBLIC Menus.ClickProc = {Do[parent,$FewerLevels]};

MoreLevels: PUBLIC Menus.ClickProc = {Do[parent,$MoreLevels]};

AllLevels: PUBLIC Menus.ClickProc = {Do[parent,$AllLevels]};

FirstLevelOnly: PUBLIC Menus.ClickProc = {Do[parent,$FirstLevelOnly]};


FewerLines: PUBLIC Menus.ClickProc = {Do[parent,$FewerLines]};

MoreLines: PUBLIC Menus.ClickProc = {Do[parent,$MoreLines]};

AllLines: PUBLIC Menus.ClickProc = {Do[parent,$AllLines]};

FirstLineOnly: PUBLIC Menus.ClickProc = {Do[parent,$FirstLineOnly]};

Time: PUBLIC Menus.ClickProc = {Do[parent,$Time]};


Split: PUBLIC Menus.ClickProc = {Do[parent,
SelectMouse[mouseButton, $RedSplit, $YellowSplit, $BlueSplit]];
};

Booting.RegisterProcs[r: CheckFilesAfterRollback];

Register[$RedReset,ResetOp]; Register[$YellowReset,ResetOp]; Register[$BlueReset,ResetOp];
Register[$RedSave,SaveOp]; Register[$YellowSave,SaveOp]; Register[$BlueSave,SaveOp];
Register[$Empty,EmptyOp];
Register[$New,NewOp];
Register[$CloseAndNew,CloseAndNewOp];
Register[$RedStore, StoreOp]; Register[$YellowStore, StoreOp]; Register[$BlueStore, StoreOp];
Register[$LoadPrevious,LoadPreviousOp];
Register[$OpenPrevious,OpenPreviousOp];
Register[$CloseAndOpenPrevious,CloseAndOpenPreviousOp];
Register[$AnonymousLoadImpl,AnonymousLoadImplOp];
Register[$AnonymousLoad,AnonymousLoadOp];
Register[$Load,LoadOp];
Register[$Open,OpenOp];
Register[$CloseAndOpen,CloseAndOpenOp];
Register[$LoadImpl,LoadImplOp];
Register[$OpenImpl,OpenImplOp];
Register[$CloseAndOpenImpl,CloseAndOpenImplOp];
Register[$PrevPlace,PrevPlaceOp];
Register[$Reselect,ReselectOp];

END.

JTEditDocuments3Impl.mesa
Copyright c 1985 by Xerox Corporation.  All rights reserved.
Plass, March 29, 1985 3:36:43 pm PST
Doug Wyatt, April 5, 1985 5:49:28 pm PST
Russ Atkinson (RRA) August 19, 1985 4:05:04 pm PDT

[data: REF ANY]
This is called after Rollback to see if any viewers need to be Reset.
[v: ViewerClasses.Viewer] RETURNS [BOOL _ TRUE]
Reset

[viewer: ViewerClasses.Viewer _ NIL] RETURNS [recordAtom: BOOL _ TRUE, quit: BOOL _ FALSE]
Save

Clear = Empty, New, or CloseAndNew

called when Clear menu item becomes unguarded
PreClear[parent];
Don't fork these operations since they change the selection; want to capture typein that follows calls on these.

This is the button in the upper left corner.
Store

PreviousFile = LoadPrevious, OpenPrevious, or CloseAndOpenPrevious

Anonymous Loads -- into NoName viewers

Get = Load, Open, or CloseAndOpen

PreGet[parent];
GetImpl = LoadImpl, OpenImpl, or CloseAndOpenImpl

PreGetImpl[parent];
This is the Open button in the upper right corner of the screen.
Places menu commands

Levels menu commands

Lines menu commands
Time

Split

�Ê˜
codeš
œ™Kšœ
Ïm
œ1™<K™$K™(K™2K™—š
Ïk	˜	Kšœžœ˜,Kšœžœ˜Kšœžœ ˜0Kšœžœ˜%Kšœžœ˜+Kšœžœ
˜Kšœžœ
žœ˜Kšœžœ5˜HKšœžœÊ˜äKšœžœD˜TKšœžœ˜"Kšœžœ˜%Kšœ	žœ"˜0Kšœžœ
˜Kšœžœ˜)Kšœžœ"˜8Kšœžœ˜"Kšœ
žœ?˜NKšœžœ˜)K˜—šÐblœžœ
ž˜"KšžœÓ
˜Ú
Kšžœ˜Kšœžœ
žœ˜"—K˜Kšžœžœžœ
˜Kšœžœ˜$K˜š
Ïnœžœ
žœ
žœžœ˜*Kšœžœ˜/Kš
œ˜—K˜š œžœžœ!˜;Kš
œ˜Kš
œ˜K˜—š 
œžœžœžœžœžœžœžœ˜rK˜Kšœ*žœ>˜kKš
œ˜K˜—š œžœžœ#žœžœžœ˜[K˜Kšœ*žœ˜GKš
œ˜K˜—šœžœžœ˜Kšœžœ˜Kš
œ˜K˜—šœžœžœ˜Kšœžœžœ˜,Kš
œ˜Kšœ
žœ˜K˜—•StartOfExpansion -- [data: REF ANY]š
œ%˜%Kš
Ðck™šžœžœ
ž˜šœžœ˜Kšœžœžœ˜/K˜—šœžœ˜Kšœ*žœžœ˜?K˜—Kšžœ
˜—K˜—˜K˜—š
œ1˜1K™E–3 -- [v: ViewerClasses.Viewer] RETURNS [BOOL _ TRUE]š
œ˜Kš
¡/™/šžœžœ
ž˜š
œ)˜)šžœ$žœ˜,KšœGžœ˜MKšœÏc˜*K˜—K˜—Kšžœ
˜—Kšžœžœ¢˜&Kš
œ˜—Kšœ#¢˜AK˜K˜—™K™š
 œžœ;žœ
žœžœ˜dšžœžœ
ž˜Kš
œ1˜1Kšžœžœ˜—š
œ˜K˜——šœ
žœ˜$šžœžœ
ž˜š
œ˜š
œ˜Kšžœžœ
žœžœ3˜kKšžœ˜——Kšžœ
˜—Kš
œ˜K˜—šœžœ˜!Kš
œ˜Kš
œJ˜JKš
œ˜—K˜–^ -- [viewer: ViewerClasses.Viewer _ NIL] RETURNS [recordAtom: BOOL _ TRUE, quit: BOOL _ FALSE]š
œ#˜#Kš
¡Z™Zšœžœ˜šžœžœžœ
ž˜/šžœžœ
ž˜š
œ)˜)Kš
œ-˜-Kšœ žœ
žœ4˜[Kšœžœ¢,˜AKš
œ˜K˜—Kšžœ
˜—Kšžœžœ
žœ
˜Kšžœ
˜—šžœžœžœ
ž˜/šžœžœ
ž˜š
œ)˜)Kšžœ$žœ˜Fšžœ#žœ
ž˜2šœžœ
žœ˜Kš
œ˜Kšœžœ
˜!Kš
œ-˜-šžœ=ž˜CKš
œ˜—Kš
œ˜K˜—Kšžœ
˜—K˜—Kšžœ
˜—Kšžœžœ
žœ
˜Kšžœ
˜—K˜—Kš
œ?˜?Kš
œ˜K˜——™K™šœžœ˜ Kš
œ˜Kš
œG˜GKš
œ˜—K˜š
œ"˜"K˜šžœžœžœ˜)Kšœžœ˜3Kš
œ˜—Kšžœžœ˜Kš
œ˜K˜——™"K™šœ
žœ˜$Kš
œ-™-šœ!žœ
˜/K˜U—K˜K˜—šœžœ˜"Kš
œ™Kš
œA˜AKš
œ˜K˜—K™pK™šœ9žœžœ˜JK˜—šœ5žœžœ˜FK˜—šœžœ"žœ˜:K™,K˜—š
œ)˜)Kšœžœžœ˜,K˜——™K™šœžœ˜"Kš
œ˜Kš
œJ˜JKš
œ˜—K˜šœ$žœ'˜QK˜——™BK™šœžœ˜)K˜Kš
œZ˜ZKš
œ˜K˜—š
œ*˜*Kšžœ)˜/Kš
œ˜K˜—š
œ*˜*Kšžœ)˜/Kš
œ˜K˜—š
œ2˜2Kšžœ1˜7Kš
œ˜—K˜—™&K™šœžœ˜-Kš
œ˜Kš
œ˜K˜—˜/Kšžœ.˜4Kš
œ˜K˜—šœžœ˜*Kš
œ˜Kš
œ˜K˜—˜+Kšžœ(˜.Kš
œ˜—˜š œžœ˜*Kš
œ˜Kš
œ˜———K˜™!K™šœžœ˜.Kšœžœ	˜ Kšœhžœ˜nKš
œ˜K˜—šœžœ˜ Kš
œ™Kš
œB˜BKš
œ˜K˜—šœ#žœ"˜KK˜š œžœžœžœ˜7Kšœ"žœ˜)Kš
œ˜——K˜š
œ"˜"Kšžœ ˜&Kš
œ˜K˜š œžœžœžœ˜7Kš
œ"˜"Kš
œ˜K˜——˜*Kšžœ(˜.Kš
œ˜K˜š œžœžœžœ˜?Kš
œ*˜*Kš
œ˜—K˜—K˜—™1K™šœ	žœ˜$Kš
œ™Kš
œN˜NKš
œ˜K˜—š
œ&˜&Kšžœ$˜*Kš
œ˜K˜š 
œžœžœžœ˜;Kšœ&žœ˜-Kš
œ˜K˜——š
œ&˜&Kšžœ$˜*Kš
œ˜K˜š 
œžœžœžœ˜;Kš
œ&˜&Kš
œ˜K˜——š
œ.˜.Kšžœ,˜2Kš
œ˜K˜š œžœžœžœ˜CKš
œ.˜.Kš
œ˜—K˜——šœžœ˜)K™@Kšœžœ˜ Kš
œ˜K˜—™K™šœžœ˜%Kš
œ\˜\Kš
œ˜—K˜šœ
žœ˜.Kšžœžœžœ˜9Kš
œ˜—K˜Kšœžœ+˜Aš
œ'˜'Kšœ'žœ˜;Kšœžœžœ0˜Rš
žœžœ
žœžœ
žœ˜"K˜"Kšžœ"žœ˜9Kšžœžœ
žœ˜,Kšžœžœ#žœ
žœ˜G—Kšœ1žœ˜7K˜Kšžœžœ˜Kš
œ˜—K˜Kšœ
žœ*˜:š
œ&˜&Kšœ'žœ˜;Kšœ žœ1˜Wšžœžœ
žœžœ
žœ!žœ˜FK˜<Kšœ!žœ˜)—šžœ˜Kšœ,žœ˜2K˜—Kšžœžœ˜š
œ˜K˜——šœžœ žœ
ž˜CKšœžœžœžœ˜6Kšœ
žœžœžœ
˜7Kšœžœžœžœ˜7Kšžœžœ˜Kš
œ˜K˜—šœ	žœ žœ
ž˜FKšœžœžœžœ˜<Kšœ
žœžœžœ
˜=Kšœžœžœžœ˜=Kšžœžœ˜Kš
œ˜K˜—šœ
žœ žœ
ž˜GKšœžœžœžœ˜>Kšœ
žœžœžœ˜?Kšœžœžœžœ˜?Kšžœžœ˜Kš
œ˜K˜—K˜—™K˜Kšœ
žœ-˜@K˜Kšœžœ,˜>K˜Kšœžœ+˜<K˜Kšœžœ0˜FK˜K™—™K˜Kšœžœ,˜>K˜Kšœžœ+˜<K˜Kšœ
žœ*˜:K˜Kšœžœ/˜DK˜—™K™Kšœžœ&˜2K˜—™K˜šœžœ˜+Kš
œ?˜?Kš
œ˜—K™—K˜Kš
œ2˜2K˜Kš
œZ˜ZKš
œT˜TKš
œ˜Kš
œ˜Kš
œ%˜%Kš
œ]˜]Kš
œ'˜'Kš
œ'˜'Kš
œ7˜7Kš
œ1˜1Kš
œ)˜)Kš
œ˜Kš
œ˜Kš
œ'˜'Kš
œ˜Kš
œ˜Kš
œ/˜/Kš
œ!˜!Kš
œ˜K˜Kšžœ
˜K˜—…—/XB®