Labels:text | screenshot OCR: Palette.Kep | System.Close System.Copy System.Grow Kepler.Store String Text Button A A A A Welcome.Text | Close Copy Grow Search Replace Parcs Edit Compile Error Fold Browse Store ! Even the basic resources of the system are extensible. For example, the editor you are just using supports "live" extensions of characters which are sent messages when editing operations occur. The moving objects that you see below are such "extensions" of characters. They float in the text just as characters, and may be cut, copied and pasted. ObTris.Mod | Close Copy Grow Search Replace Parcs Edit Compile Error Fold Browse Store MODULE ObTris; (* V1.0 (C) 1 Nov 1995 by Ralf Degner, E-Mail: degner@pallas.amp.uni-hannover.de *) (* If you use MacOberon or the Ceres replace Input.Time Unit by 300 *) IMPORT Oberon, Viewers, Display, MenuViewers, TextFrames, Texts, Files, Input; CONST red=1; blue=3; green=2; yellow=5; col1=4; col2=6; col3=7; Menu = "System.Close System.Copy System.Grow ObTris.Start ObTris.ShowNext ObTris.Score"; XAnzahl=10; YAnzahl=24; MinKasten=4; Unten Offset=10; ObenOffset-4; SeitenOffset=10; NextXPos=-5; NextYPos=YAnzahl DIV 2; LinesProLevel=10; SpeedUpProLevel=20; ScoreFakt-10; ScoreFileMark-06C6F6976H; TYPE Escher.Pict | Close Copy Grow Zoom Colors Width Fill Tools Store VI-'84 RAH NOK Waterfall X-'61 MCE User:ProjectOberon/Oberonv4 Log | Close Copy Grow Search Replace Log Locate Store Current ObTris Status - Score: 20 Lines: 2 Level: 0 ObTris.Mod System.Tool | Close Copy Grow Search Replace Parcs Store NOTE: If you don't have a three button mouse, you can use the left-Alt-key instead of the middle mouse button. XE.Open Welcome.Text <-Click middle button on XE.Open XE.Open Release.Notes.Text XE.Open ↑ XE.SysOpen 1 Edit.Recall System.Recall <-Click here for latest info Edit.Show ↑ Browser.ShowDef↑ Browser.ShowObj↑ Decoder.Decode ↑ ObTris | Close Copy Grow Start Misc About ☐☐ |▬▬▬▬ ☐☐☐ 7 My.Tool | Close Copy Grow Search Replace Parcs Store Decoder Amiga Compiler Edit Browser Elems Colors Texts Syntax Courier Clipboard Style Mines Close Copy Grow Start Pause Misc About 8 (3) 20 Nov 95 22:09:29
