DIRECTORY
AtomButtons, EmbeddedButtons, Feedback, FeedbackOps, FeedbackTypes, GGActive, GGBasicTypes, GGCircleCache, GGContainer, GGControlPanelTypes, GGCoreOps, GGEvent, GGInterfaceTypes, GGMenu, GGModelTypes, GGScene, GGSceneType, GGSegmentTypes, GGShapes, GGState, GGUserInput, GGUserProfile, GGWindow,  Imager, ImagerFont, List, Menus, PFS, PFSNames, PutGet, Rope, Rules, TextNode, TiogaActive, TiogaOps, UserProfile, ViewerClasses, ViewerTools;

GGMenuImpl: CEDAR PROGRAM
IMPORTS AtomButtons, EmbeddedButtons, Feedback, FeedbackOps, GGActive, GGCircleCache, GGContainer, GGCoreOps, GGEvent, GGScene, GGShapes, GGState, GGUserInput, GGUserProfile, GGWindow, Imager, ImagerFont, List, PFS, PFSNames, PutGet, Rope, Rules, TiogaActive, TiogaOps, UserProfile, ViewerTools
EXPORTS GGInterfaceTypes, GGModelTypes, GGMenu = BEGIN

ControlsObj: PUBLIC TYPE = GGControlPanelTypes.ControlsObj;

MsgRouter: TYPE = FeedbackTypes.MsgRouter;
GGData: TYPE = GGInterfaceTypes.GGData;
GravityExtentData: TYPE = REF GravityExtentDataObj;
GravityExtentDataObj: TYPE = GGInterfaceTypes.GravityExtentDataObj;
Point: TYPE = GGBasicTypes.Point;
SceneObj: PUBLIC TYPE = GGSceneType.SceneObj; -- export of opaque type
SceneRef: TYPE = REF SceneObj;
Viewer: TYPE = ViewerClasses.Viewer;

ROPE: TYPE = Rope.ROPE;
popUpFont: Imager.Font; -- initialized in Init below;
entryHeight: CARDINAL = 15; -- height of a line of items
docEntryHeight: CARDINAL = 19; -- height of a line of items
entryHSpace: CARDINAL = 2; -- horizontal space between items on a line
entryVSpace: CARDINAL = 2; -- vertical leading between lines
fullColumn: CARDINAL = 600; -- the width of the standard large left column.
smallNumberSize: CARDINAL = 60;


PUChoiceList: PROC [r0, r1, r2, r3, r4, r5, r6, r7, r8, r9, r10, r11, r12, r13, r14, r15, r16, r17, r18, r19: AtomButtons.PopUpChoice _ [] ] RETURNS [list: AtomButtons.PopUpChoices] = GGCoreOps.PUChoiceList;
RList: PROC [ref1, ref2, ref3: REF ANY _ NIL] RETURNS [LIST OF REF ANY] = GGCoreOps.List;

AddARule: PROC [ggData: GGData] = {
rule: Rules.Rule _ Rules.Create[[
parent: ggData.controls.panel,
wy: ggData.height,
ww: ggData.controls.panel.cw,
wh: 2
]];
GGContainer.ChildXBound[ggData.controls.panel, rule];
ggData.height _ ggData.height + rule.wh + entryVSpace;
};
BuildControlPanel: PUBLIC PROC [ggData: GGData, fancyPanel: BOOL _ FALSE] = {
BuildActiveDocument[ggData, fancyPanel];
InitializeGravityLine[ggData];
BuildSlopeLine[ggData];
BuildAngleLine[ggData];
BuildRadiusLine[ggData];
BuildDistanceLine[ggData];
BuildMeasureLine[ggData];
BuildFeedbackLine[ggData];
AddARule[ggData];
};

BuildFeedbackLine: PROC [ggData: GGData] = {
nextX: NAT _ AtomButtons.BuildButtonLine[ggData.controls.panel, 0, ggData.height, ggData, GGUserInput.EventNotify, LIST[
[label["Feedback . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Line", FeedbackLineInGGData, fullColumn]]
]];
ggData.height _ ggData.height + entryHeight;
};

FeedbackLineInGGData: AtomButtons.UpdateProc = {
ggData: GGData _ NARROW[clientData];
router: MsgRouter _ Feedback.CreateRouter[];
FeedbackOps.SetMultiLabel[router, button, TRUE, LIST[$Error, $Complaint]]; -- blink
FeedbackOps.SetMultiLabel[router, button, FALSE, LIST[$DuringMouse, $Feedback, $Warning, $Confirm, $Show, $Statistics]];
FeedbackOps.SetMultiTypescript[router, $Gargoyle, LIST[$Error, $Warning, $Show, $Typescript, $Complaint, $Statistics]];
ggData.router _ router;
ggData.controls.feedbackLine _ button;
};

IsGargoyle: PROC [path: PFS.PATH] RETURNS [BOOL] = {
shortname: ROPE _ PFSNames.ComponentRope[PFSNames.ShortName[PFSNames.StripVersionNumber[path]]];
RETURN[Rope.Match["*.gargoyle", shortname, FALSE] OR Rope.Match["*.gg", shortname, FALSE]];
};

panelNames: ARRAY [0..2] OF ROPE = ["[PCedar]<Gargoyle>GargoyleControlPanel.tioga", "[CedarCommon]<FamousFiles>GargoyleControlPanel.tioga", "[PCedar]<FamousFiles>GargoyleControlPanel.tioga"];
fancyPanelNames: ARRAY [0..2] OF ROPE = ["[PCedar]<Gargoyle>GargoyleControlPanel.gargoyle", "[CedarCommon]<FamousFiles>GargoyleControlPanel.gargoyle", "[PCedar]<FamousFiles>GargoyleControlPanel.gargoyle"];

FindControlPanel: PROC [] RETURNS [filename: ROPE _ NIL, isGargoyle: BOOL _ FALSE] = {
value: LIST OF ROPE;
fullName: PFS.PATH _ NIL;
path: PFS.PATH;
value _ UserProfile.ListOfTokens["Gargoyle.ControlPanelFile", NIL];
IF value # NIL THEN {
FOR list: LIST OF ROPE _ value, list.rest UNTIL list = NIL DO
path _ PFS.PathFromRope[list.first];
fullName _ PFS.FileInfo[name: path ! PFS.Error=>CONTINUE].fullFName;
IF fullName # NIL THEN RETURN[PFS.RopeFromPath[fullName], IsGargoyle[fullName]];
ENDLOOP;
};
FOR i: NAT IN [0..2] DO
path _ PFS.PathFromRope[panelNames[i]];
fullName _ PFS.FileInfo[name: path ! PFS.Error=>CONTINUE].fullFName;
IF fullName # NIL THEN RETURN[PFS.RopeFromPath[fullName], IsGargoyle[fullName]];
ENDLOOP;
};

FindFancyControlPanel: PROC [] RETURNS [filename: ROPE _ NIL] = {
value: LIST OF ROPE;
fullName: PFS.PATH _ NIL;
path: PFS.PATH;
value _ UserProfile.ListOfTokens["Gargoyle.ControlPanelFile", NIL];
IF value # NIL THEN {
FOR list: LIST OF ROPE _ value, list.rest UNTIL list = NIL DO
path _ PFS.PathFromRope[list.first];
fullName _ PFS.FileInfo[name: path ! PFS.Error=>CONTINUE].fullFName;
IF fullName # NIL THEN {
IF IsGargoyle[fullName] THEN RETURN[PFS.RopeFromPath[fullName]]
};
ENDLOOP;
};
FOR i: NAT IN [0..2] DO
path _ PFS.PathFromRope[fancyPanelNames[i]];
fullName _ PFS.FileInfo[name: path ! PFS.Error=>CONTINUE].fullFName;
IF fullName # NIL THEN RETURN[PFS.RopeFromPath[fullName]];
ENDLOOP;
};

BuildActiveDocument: PROC [ggData: GGData, fancyPanel: BOOL] = {
nextX: NAT _ 0;
v: Viewer;
lines: NAT _ 6;
height: NAT _ lines*docEntryHeight;
doc: TextNode.Ref _ NIL;
filename: ROPE;
true: ROPE = "TRUE";
isGargoyle: BOOL _ FALSE;
IF fancyPanel THEN filename _ FindFancyControlPanel[];
IF filename # NIL THEN {
isGargoyle _ TRUE;
}
ELSE [filename, isGargoyle] _ FindControlPanel[];
IF filename = NIL THEN Feedback.AppendByName[$System, oneLiner, $Error, "No file found for Gargoyle control panel in [PCedar]<Gargoyle>, [CedarCommon]<FamousFiles>, [PCedar]<FamousFiles> nor in Gargoyle.ControlPanelFile user profile entry."]
ELSE {
Feedback.PutFByName[$System, oneLiner, $Feedback, "Loading %g as Gargoyle's control panel", [rope[filename]]];
IF NOT isGargoyle THEN doc _ PutGet.FromFile[filename];
};
IF isGargoyle THEN {
thisData: GGData;
scene: GGModelTypes.Scene _ GGScene.CreateScene[];
height _ 140;
[v, thisData] _ GGWindow.CreateChildViewer[scene: scene,
wx: 0, wy: ggData.height, wh: height,
parent: ggData.controls.panel,
workingDirectory: "[PCedar]<FamousFiles>",
paint: TRUE
];
ggData.controls.controlPanel _ GGActive.LookupDoc[thisData];
GGUserInput.EventNotify[thisData, LIST[$MergeAll, filename]];
GGUserInput.EventNotify[thisData, LIST[$DeselectAll]];
GGUserInput.EventNotify[thisData, LIST[$SetActive, true]];
GGUserInput.EventNotify[thisData, LIST[$SetScaleUnit, NEW[REAL _ 1.0], $Quiet]];
GGUserInput.EventNotify[thisData, LIST[$CleanVersion]];
GGState.SetReadOnly[thisData, TRUE];
}
ELSE {
v _ ViewerTools.MakeNewTextViewer[[
wx: 0, wy: ggData.height, wh: height,
parent: ggData.controls.panel,
data: doc,
scrollable: TRUE, border: TRUE]];
ggData.controls.controlPanel _ TiogaActive.LookupDoc[v];
TiogaOps.Interpret[v, LIST[$ActivityOn]];
};
GGContainer.ChildXBound[ggData.controls.panel, v];
ggData.controls.controlPanelViewer _ v;
EmbeddedButtons.LinkDocToApplication[doc: ggData.controls.controlPanel, target: $Gargoyle, targetViewer: ggData.controls.actionArea, applicationData: ggData, notifyProc: ControlPanelNotify];
EmbeddedButtons.LinkDocToApplication[doc: ggData.controls.controlPanel, target: $UnQueuedGargoyle, targetViewer: ggData.controls.actionArea, applicationData: ggData, notifyProc: UnQueuedControlPanelNotify];
ggData.height _ ggData.height + height;
};

ControlPanelNotify: EmbeddedButtons.NotifyProc = {
newEvent: LIST OF REF _ List.Append[events]; -- make a copy of the eventList, because EmbeddedButtons resuses the original
ggData: GGData _ NARROW[applicationData];
[] _ GGActive.ControlPanelButtonHandler[ggData, newEvent, buttonInfo];
};

UnQueuedControlPanelNotify: EmbeddedButtons.NotifyProc = {
newEvent: LIST OF REF ANY _ List.Append[events]; -- make a copy of the eventList, because EmbeddedButtons resuses the original
GGUserInput.UnQueuedEventNotify[applicationData, newEvent];
};

InitializeGravityLine: PROC [ggData: GGData] = {
ggData.hitTest.gravityType _ pointsPreferred;
GGState.SetGravityExtent[ggData, GGUserProfile.GetDefaultGravityExtent[]/72.0];
GGState.SetHeuristics[ggData, GGUserProfile.GetDefaultHeuristics[]];
};

BuildSlopeLine: PROC [ggData: GGData] = {
buttonHandle: AtomButtons.SortedButtonHandle;
nextX: NAT _ AtomButtons.BuildButtonLine[ggData.controls.panel, 0, ggData.height, ggData, GGUserInput.EventNotify,LIST[
[button["Slope:", LIST[LIST[$SlopePrompt]] ]],
[button["Get!", LIST[LIST[$GetSlope]] ]],
[button["Add!", LIST[LIST[$AddSlope]] ]],
[button["Delete!", LIST[LIST[$DeleteSlope]] ]]
]];
buttonHandle _ AtomButtons.CreateSortedButtonViewer[ggData.controls.panel, nextX, ggData.height];
ggData.controls.slopeHandle _ buttonHandle;
GGEvent.StandardSlopes[ggData, LIST[$InitStandardSlopes]];
ggData.height _ ggData.height + entryHeight;
};

BuildAngleLine: PROC [ggData: GGData] = {
buttonHandle: AtomButtons.SortedButtonHandle;
nextX: NAT _ AtomButtons.BuildButtonLine[ggData.controls.panel, 0, ggData.height, ggData, GGUserInput.EventNotify,LIST[
[button["Angle:", LIST[LIST[$AnglePrompt]] ]],
[button["Get!", LIST[LIST[$GetAngle]] ]],
[button["Add!", LIST[LIST[$AddAngle]] ]],
[button["Delete!", LIST[LIST[$DeleteAngle]] ]]
]];
buttonHandle _ AtomButtons.CreateSortedButtonViewer[ggData.controls.panel, nextX, ggData.height];
ggData.controls.angleHandle _ buttonHandle;
GGEvent.StandardAngles[ggData, LIST[$InitStandardAngles]];
ggData.height _ ggData.height + entryHeight;
};

BuildRadiusLine: PROC [ggData: GGData] = {
buttonHandle: AtomButtons.SortedButtonHandle;
nextX: NAT _ AtomButtons.BuildButtonLine[ggData.controls.panel, 0, ggData.height, ggData, GGUserInput.EventNotify, LIST[
[button["Radius:", LIST[LIST[$RadiusPrompt]] ]],
[button["Get!", LIST[LIST[$GetRadius]] ]],
[button["Add!", LIST[LIST[$AddRadius]] ]],
[button["Delete!", LIST[LIST[$DeleteRadius]] ]]
]];
buttonHandle _ AtomButtons.CreateSortedButtonViewer[ggData.controls.panel, nextX, ggData.height];
ggData.controls.radiusHandle _ buttonHandle;
GGEvent.StandardRadii[ggData, LIST[$InitStandardRadii]];
ggData.controls.radiusCircleCache _ GGCircleCache.Create[];
ggData.height _ ggData.height + entryHeight;
};

BuildDistanceLine: PROC [ggData: GGData] = {
buttonHandle: AtomButtons.SortedButtonHandle;
nextX: NAT _ AtomButtons.BuildButtonLine[ggData.controls.panel, 0, ggData.height, ggData, GGUserInput.EventNotify, LIST[
[button["LineDist:", LIST[LIST[$DistancePrompt]] ]],
[button["Get!", LIST[LIST[$GetDistance]] ]],
[button["Add!", LIST[LIST[$AddDistance]] ]],
[button["Delete!", LIST[LIST[$DeleteDistance]] ]]
]];
buttonHandle _ AtomButtons.CreateSortedButtonViewer[ggData.controls.panel, nextX, ggData.height];
ggData.controls.distanceHandle _ buttonHandle;
GGEvent.StandardDistances[ggData, LIST[$InitStandardDistances]];
ggData.height _ ggData.height + entryHeight;
};

BuildMeasureLine: PROC [ggData: GGData] = {
nextX: NAT _ AtomButtons.BuildButtonLine[ggData.controls.panel, 0, ggData.height, ggData, GGUserInput.EventNotify, LIST[
[button["_", LIST[LIST[$MeasureSlopeFromSelection]], -1, TRUE ]],
[button["Slope:", LIST[LIST[$MeasureSlopeHit]], -1, TRUE ]],
[text["0.0", SlopeViewInGGData, smallNumberSize]],
[button["_", LIST[LIST[$MeasureAngleFromSelection]], -1, TRUE ]],
[button["Angle:", LIST[LIST[$MeasureAngleHit]], -1, TRUE ]],
[text["0.0", AngleViewInGGData, smallNumberSize]],
[button["_", LIST[LIST[$MeasureRadiusFromSelection]], -1, TRUE ]],
[button["Radius:", LIST[LIST[$MeasureRadiusHit]], -1, TRUE ]],
[text["0.0", DistanceViewInGGData, smallNumberSize]],
[button["_", LIST[LIST[$MeasureLineDistFromSelection]], -1, TRUE ]],
[button["LineDist:", LIST[LIST[$MeasureLineDistHit]], -1, TRUE ]],
[text["0.0", LineDistViewInGGData, smallNumberSize]]
]];
ggData.height _ ggData.height + entryHeight;
};

GravityInGGData: AtomButtons.InitTwoStateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.gravButton _ twoState;
};
AlignmentsInGGData: AtomButtons.InitTwoStateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.alignments _ twoState;
};
MidpointsInGGData: AtomButtons.InitTwoStateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.midpointButton _ twoState;
};
HeuristicsInGGData: AtomButtons.InitTwoStateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.heuristicsButton _ twoState;
};

GravityExtentRepaint: PROC [dc: Imager.Context, clientData: REF ANY, buttonData: REF ANY, button: Viewer] = {
caretPoint: Point;
ged: GravityExtentData _ NARROW[buttonData];
extent: REAL _ ged.extent;
Imager.TranslateT[dc, [0, button.wh/2.0]];
caretPoint _ [extent, 0.0];
GGShapes.DrawCaret[dc, caretPoint, [0,-1], 1.0];
};
SlopeViewInGGData: AtomButtons.UpdateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.slopeView _ button;
};

AngleViewInGGData: AtomButtons.UpdateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.angleView _ button;
};

DistanceViewInGGData: AtomButtons.UpdateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.radiusView _ button;
};

LineDistViewInGGData: AtomButtons.UpdateProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.lineDistView _ button;
};

Choice: PROC [action: LIST OF REF ANY, actionImage: Rope.ROPE, doc: Rope.ROPE, font: Imager.Font _ NIL] RETURNS [AtomButtons.PopUpChoice]= {
RETURN[[action, actionImage, doc, font]];
};

gRouter: MsgRouter; -- the router used by routines that are too deep in Gargoyle to know what viewer they are working on behalf of.  Sends output to the Gargoyle typescript and the Cedar Message Window.
Init: PROC = {
popUpFont _ ImagerFont.Find["xerox/tiogafonts/helvetica10I", substituteQuietly];
gRouter _ Feedback.CreateRouter[];
[] _ Feedback.RegisterRouter[gRouter, $Gargoyle];
FeedbackOps.SetMultiMessageWindow[gRouter, TRUE, LIST[$Error, $Complaint]]; -- blink
FeedbackOps.SetMultiMessageWindow[gRouter, FALSE, LIST[$DuringMouse, $Feedback, $Warning, $Confirm, $Show, $Statistics]];
FeedbackOps.SetMultiTypescript[gRouter, $Gargoyle, LIST[$Error, $Warning, $Show, $Typescript, $Complaint, $Statistics]];
};

Init[];

END.

ŽGGMenuImpl.mesa 
Contents: Routines to build the Gargoyle control panel.
Copyright Σ 1985, 1987, 1988, 1989 by Xerox Corporation.  All rights reserved.
Created by Pier on June 23, 1987 when GGMenuImpl overflowed
Last edited by Pier on April 27, 1992 2:42 pm PDT
Bier, September 23, 1991 11:12 am PDT
Eisenman, July 14, 1987 6:34:23 pm PDT
Doug Wyatt, December 18, 1989 2:04:01 pm PST

If you update this routine, also update Init below.
Currently, we know of these message classes used in Gargoyle:
(BT)	Complaint: Gargoyle informs the user of a user-initiated problem
(BT)	Error: internal error.  One of Gargoyle's invariants has been broken
(L)	Confirm: Gargoyle asks the user to confirm a guarded operation
(L)	DuringMouse: feedback generated each time the mouse is moved.
(L)	Feedback: an acknowledgement that Gargoyle has done what you asked
(LT)	Show: info that was explicitly requested (e.g. what color is this?)
(LT)	Statistics: Gargoyle prints user requested statistics
(LT)	Warning: Problems during a batch operation, like MergeInterpress
(T)	Typescript: Output that only seems appropriate for the typescript, period.
(L) = send to label.  (B) = send to label and blink.  (T) = send to typescript
There are several places to look in for the Gargoyle control panel:
(1) The file specified in Gargoyle.ControlPanelFile: in the user profile.
(2) The file "[PCedar]<Gargoyle>GargoyleControlPanel.tioga" (useful during development)
(3) The file "[CedarCommon]<FamousFiles>GargoyleControlPanel.tioga"
(4) The file "[PCedar]<FamousFiles>GargoyleControlPanel.tioga"
Use whichever is found first.  Return NIL if none are found.
If that failed, try this:
There are several places to look in for the Gargoyle control panel:
(1) The file specified in Gargoyle.ControlPanelFile: in the user profile.
(2) The file "[PCedar]<Gargoyle>GargoyleControlPanel.gargoyle" (useful during development)
(3) The file "[CedarCommon]<FamousFiles>GargoyleControlPanel.gargoyle"
(4) The file "[PCedar]<FamousFiles>GargoyleControlPanel.gargoyle"
Use whichever is found first.  Return NIL if none are found.
If that failed, try this:
PROC [buttonInfo: ButtonInfo, events: LIST OF REF ANY, targetViewer: Viewer, applicationData: REF] RETURNS [result: REF _ NIL];
PROC [buttonInfo: ButtonInfo, events: LIST OF REF ANY, targetViewer: Viewer, applicationData: REF] RETURNS [result: REF _ NIL];
<<BuildGravityLine: PROC [ggData: GGData] = {
nextX: NAT _ 0;
ggData.controls.gravityTypeMenu _ 
AtomButtons.BuildEnumTypeSelection[viewer: ggData.controls.panel, x: 4, y: ggData.height, maxWidth: 140,
clientData: ggData,
handleProc: GGUserInput.EventNotify,
title: "GravType:", default: "PreferPoints",
borderOnButtons: TRUE, style: flipThru, allInOneRow: TRUE,
buttonNames: LIST["PreferLines", "PreferPoints"],
atom: $GravityChoiceChange];
ggData.hitTest.gravityType _ pointsPreferred;

nextX _ ggData.controls.gravityTypeMenu.nextx;
nextX _ AtomButtons.BuildButtonLine[
ggData.controls.panel, nextX + entryHSpace, ggData.height, ggData, GGUserInput.EventNotify,
LIST[
[button["GravExtent:", LIST[LIST[$ShowGravExtent]]]]
]];

nextX _ GraphicsButton.BuildGraphicsButton[
container: ggData.controls.panel,
x: nextX + entryHSpace,
y: ggData.height,
w: 60, -- changed from 72 to make more room in line
h: entryHeight,
clientData: ggData,
choices: LIST[
[LIST[$GravityExtentChange, $ValueDown]],
[LIST[$GravityExtentChange, $InitialValue]],
[LIST[$GravityExtentChange, $ValueUp]]],
handleProc: GGUserInput.EventNotify,
repaintProc: GravityExtentRepaint,
buttonData: NEW[GravityExtentDataObj _ [extent: GGUserProfile.GetDefaultGravityExtent[]]],
updateProc: GravityExtentInGGData
];

nextX _ AtomButtons.BuildButtonLine[
ggData.controls.panel, nextX + entryHSpace, ggData.height, ggData, GGUserInput.EventNotify,
LIST[
[twoState["Gravity", LIST[$ToggleGravity], TRUE, GravityInGGData]],
[twoState["Midpts", LIST[$ToggleMidpoints], FALSE, MidpointsInGGData]],
[twoState["Auto", LIST[$ToggleHeuristics], GGUserProfile.GetDefaultHeuristics[], HeuristicsInGGData]],
[twoState["Alignments", LIST[$ToggleShowAlignments], TRUE, AlignmentsInGGData]]
],
entryHSpace];


ggData.height _ ggData.height + entryHeight;
};
>>

[label["Measure- "]],
Style Line:

Gravity Line:

GravityExtentInGGData: GraphicsButton.UpdateGraphicsButtonProc = {
ggData: GGData _ NARROW[clientData];
ggData.controls.gravityExtentButton _ stateInfo;
};


Distance Line:

If you update the router, remember to also correct it in FeedbackLineInGGData above.
Κ¬˜Icodeš
œ™™7Kš
œN™NKš
œ;™;Kš
œ1™1Kš
œ%™%Kšœ#Οk™&K™,—K˜š
	˜	Jš
œ·˜·K˜—šΟn
œœ
˜JšœŸ˜¦Kšœ*˜6—˜Kšœ
œ
œ#˜;K˜Kšœœ˜*Kšœœ˜'Kšœœœ˜3Kšœœ)˜CKšœœ˜!Kšœ
œ
œΟc˜FKšœ
œœ
˜Kšœœ˜$K˜Kšœœœ
˜KšœŸ˜5Kšœ
œŸ˜8KšœœŸ˜;Kšœ
œŸ+˜FKšœ
œŸ!˜<IprocšœœŸ/˜KKšœœ˜K˜—K˜Kšžœœ{œ;˜Ο
Kšžœœœ
œœœœ
œ
œ
œ˜YK˜šžœœ˜#š
œ!˜!Lš
œ˜Lš
œ˜Lš
œ˜Lš
œ˜Lš
œ˜—Lš
œ5˜5Lš
œ6˜6Lš
œ˜—K™š
žœœ
œœœ˜MKš
œ(˜(Kš
œ˜Kš
œ˜Kš
œ˜Kš
œ˜Kš
œ˜Kš
œ˜Kš
œ˜Kš
œ˜K˜K˜—šžœœ˜,šœœiœ
˜xKš
œΆ
˜Ά
K˜—Kš
œ,˜,K˜K˜—šžœ˜0Kš
Οb3™3™=Kš
œE™EKš
œI™IKš
œB™BKš
œA™AKš
œF™FKš
œH™HKš
œ:™:Kš
œE™EKš
œN™N—K™NKšœœ
˜$Kš
œ,˜,Kšœ*œœŸ˜SKšœ*œœC˜xKšœ2œA˜wKš
œ˜Kš
œ&˜&K˜K˜—šž
œœœ
œœœ˜4KšœœQ˜`Kšœ%œœœ˜[K˜K˜—Kšœœœ
œŸ
˜Ώ
Kšœœœ
œ¨
˜Ν
K˜šžœœœœœœœ˜VK™CK™IKš
œW™WKš
œC™CKš
œ>™>K™<Kšœœ
œ
œ
˜Kšœ
œ
œœ
˜Kšœœ
œ
˜Kšœ>œ˜Cšœ	œ
œ˜š
œœ
œ
œœœ
˜=Kšœœ˜$Kšœœœœ˜DJš
œœ
œ
œ
œ/˜PJšœ
˜—K˜—K™šœœ
œ˜Kšœœ 
œ˜'Kšœœœœ˜DJš
œœ
œ
œ
œ/˜PJšœ
˜—K˜K˜—š
žœœœœœ˜AK™CK™IKš
œZ™ZKš
œF™FKš
œA™AK™<Kšœœ
œ
œ
˜Kšœ
œ
œœ
˜Kšœœ
œ
˜Kšœ>œ˜Cšœ	œ
œ˜š
œœ
œ
œœœ
˜=Kšœœ˜$Kšœœœœ˜Dšœœ
œ

˜Jšœœ
œ˜?J˜—Jšœ
˜—K˜—K™šœœ
œ˜Kšœœ œ˜,Kšœœœœ˜DJš
œœ
œ
œ
œ˜:Jšœ
˜—K˜K˜—šžœœœ˜@Kšœœ˜J˜
Jšœœ˜Jšœœ˜#Jšœœ
˜Jšœ
œ
˜Jšœœ
˜Jšœœœ
˜Jšœœ$˜6šœœ
œ˜Jšœ
œ
˜J˜
—Jšœ-˜1Jšœœ
œΫ
˜ρ
šœ˜Jš
œn˜nJšœ
œœ!˜7J˜—šœœ˜Jš
œ˜J˜2Jš
œ
˜
š
œ8˜8Kš
œ%˜%Kš
œ˜Kš
œ*˜*Kšœ˜K˜—Kš
œ<˜<Kšœ"œ˜=Kšœ"œ˜6Kšœ"œ˜:Kšœ"œœ
œ˜PKšœ"œ˜7Kšœœ˜$J˜
—šœ˜š
œ#˜#Kš
œ%˜%Kš
œ˜Kš
œ
˜
Kšœœ
œ˜!—Kš
œ8˜8Jšœœ˜)J˜—Jš
œ2˜2Kš
œ'˜'KšœQ œe˜Ύ
KšœQ œm˜Ξ
Kš
œ'˜'K˜K˜—šžœ ˜2Kšœ"œ
œ
œ
œ)œœ
	œ™Kšœ
œ
œ
œŸM˜zKšœœ˜)Kš
œF˜FK˜K˜—šžœ ˜:Kšœ"œ
œ
œ
œ)œœ
	œ™Kš
œ
œ
œ
œ
œŸM˜~Kš
œ;˜;K˜K˜—šžœœ™-Kšœœ™Kš
œ"™"š
œh™hKš
œ™Kš
œ$™$Kš
œ,™,Kšœœ œ
™:Kšœ
œ ™1Kš
œ™—Kš
œ-™-K™Kš
œ.™.š
œ$™$Kš
œ[™[šœ
™Kšœ	 
œœ
œ™4—Kš
œ™K™—š
œ+™+Kš
œ!™!Kš
œ™Kš
œ™KšœŸ,™3Kš
œ™Kš
œ™šœ	œ
™Kšœ
œ$™)Kšœ
œ'™,Kšœ
œ#™(—Kš
œ$™$Kš
œ"™"KšœœK™ZKš
œ!™!Kš
œ™K™—š
œ$™$Kš
œ[™[šœ
™Kšœœœ™CKšœœœ™GKšœœP™fKšœœœ™OKš
œ™—Kš
œ
™
K™K™—Kš
œ,™,K™Kš
ž™K™—šžœœ˜0Kš
œ-˜-Kš
œO˜OKš
œD˜DK˜K˜—šžœœ˜)Kš
œ-˜-šœœhœ
˜wKšœœ
œ˜.Kšœœ
œ˜)Kšœœ
œ˜)Kšœœ
œ˜.K˜—Kš
œa˜aKš
œ+˜+Kšœœ˜:Kš
œ,˜,˜K˜——šžœœ˜)Kš
œ-˜-šœœhœ
˜wKšœœ
œ˜.Kšœœ
œ˜)Kšœœ
œ˜)Kšœœ
œ˜.K˜—Kš
œa˜aKš
œ+˜+Kšœœ˜:Kš
œ,˜,K˜K˜—šžœœ˜*Kš
œ-˜-šœœiœ
˜xKšœœ
œ˜0Kšœœ
œ˜*Kšœœ
œ˜*Kšœœ
œ˜/K˜—Kš
œa˜aKš
œ,˜,Kšœœ˜8Kš
œ;˜;Kš
œ,˜,K˜K˜—šžœœ˜,Kš
œ-˜-šœœiœ
˜xKšœœ
œ˜4Kšœœ
œ˜,Kšœœ
œ˜,Kšœœ
œ˜1K˜—Kš
œa˜aKš
œ.˜.Kšœ"œ˜@Kš
œ,˜,K˜K˜—šžœœ˜+šœœiœ
˜xKš
œ™Kšœ
œ
œ#œ˜AKšœœ
œœ˜<Kš
œ2˜2Kšœ
œ
œ#œ˜AKšœœ
œœ˜<Kš
œ2˜2Kšœ
œ
œ$œ˜BKšœœ
œœ˜>Kš
œ5˜5Kšœ
œ
œ&œ˜DKšœœ
œœ˜BKš
œ4˜4K˜—Kš
œ,˜,K˜—K˜K™K™™
K™—šžœ"˜1Kšœœ
˜$Kš
œ&˜&K˜—šžœ"˜4Kšœœ
˜$Kš
œ&˜&K˜—šžœ"˜3Kšœœ
˜$Kš
œ*˜*K˜—šΠbn
žœ"˜4Kšœœ
˜$Kš
œ,˜,K˜K˜—šžœ-™BKšœœ
™$Kš
œ0™0K™K™—šžœœ"œ
œœ
œ˜mK˜Kšœœ
˜,Kšœœ˜Kš
œ*˜*Kš
œ˜Kš
œ0˜0K˜—K™™K™—šžœ˜-Kšœœ
˜$Kš
œ#˜#K˜K˜—šžœ˜-Kšœœ
˜$Kš
œ#˜#K˜K˜—šžœ˜0Kšœœ
˜$Kš
œ$˜$K˜K˜—šžœ˜0Kšœœ
˜$Kš
œ&˜&K˜—K˜šžœœ
œ
œ
œ
œœœœœ˜Œ
Kšœ#˜)K˜—K˜KšœŸΆ
˜Κ
šžœœ˜K•StartOfExpansionO[name: 
ROPE, substitution: 
ImagerFont.Substitution _ substituteWithWarning]š
œP˜PK™TKš
œ"˜"Kš
œ1˜1Kšœ+œœŸ˜TKšœ+œœC˜yKšœ3œA˜xK˜—K˜Kš
œ˜K˜Kšœ
˜J˜—…—8δ[