DIRECTORY Buttons, Labels, ViewerClasses; MonitorToolButtons: DEFINITIONS = BEGIN Handle: TYPE = REF MTViewerRec; MTViewerRec: TYPE = RECORD [ height: NAT _ 0, container: ViewerClasses.Viewer, screenWidth: EntryViewer, screenHeight: EntryViewer, refresh: EntryViewer, hBlank: EntryViewer, vBlank: EntryViewer, bpp: EntryViewer, fieldTime, fieldFreq, lineTime, lineFreq: ResultViewer, pixelTime, pixelFreq, MUL, DIV: ResultViewer, vControl, hControl: ResultViewer ]; EntryViewer: TYPE = REF EntryViewerRec; EntryViewerRec: TYPE = RECORD [ button: Buttons.Button, --not strictly needed for computations input: ViewerClasses.Viewer, -- the Text Box for user input units: Labels.Label ]; -- units for input; e.g. pixels, microseconds, ... ResultViewer: TYPE = REF ResultViewerRec; ResultViewerRec: TYPE = RECORD [ left: Labels.Label, data: ViewerClasses.Viewer, right: Labels.Label]; ScreenWidth: Buttons.ButtonProc; ScreenHeight: Buttons.ButtonProc; Refresh: Buttons.ButtonProc; HBlank: Buttons.ButtonProc; VBlank: Buttons.ButtonProc; BitsPerPixel: Buttons.ButtonProc; END. „File: MonitorToolButtons.mesa Last Edited by Pier on May 23, 1983 5:12 pm Contents: Viewer buttons for the color monitor tool Ęq˜J˜Jšœ™J™+Jšœ3™3J˜šĪk ˜ J˜J˜J˜J˜—Jšœ œ˜!Jš˜J˜Jšœœœ ˜šœ œœ˜Jšœœ˜J˜ J˜J˜J˜J˜J˜J˜J˜7Jšœœœ˜-J˜ J˜J˜—Jšœ œœ˜'šœœœ˜JšœĪc&˜>Jšœž˜;Jšœž2˜I—J˜Jšœœœ˜)šœœœ˜ Jšœ˜Jšœ˜Jšœ˜—J˜J˜Jšœ ˜ J˜Jšœ!˜!J˜Jšœ˜J˜Jšœ˜J˜Jšœ˜J˜Jšœ!˜!J˜Jšœ˜—…—>3