OberonCore

MODULE  Sum;
   IMPORT  Math, ObxAscii;
   
PROCEDURE Main*;
   VAR
      in, out: ObxAscii.Text;
      a, b: INTEGER;
BEGIN
   in := ObxAscii.Open(NIL, 'D:/Temp/input.txt');
   ObxAscii.ReadInt(in, a);
   ObxAscii.ReadInt(in, b);
   
   out := ObxAscii.NewText();
   ObxAscii.WriteInt(out, a + b);
   ObxAscii.Register(out, NIL, 'D:/Temp/output.txt');
      
END Main;   

BEGIN
   Main   
END Sum.

^Q Sum.Main ~
^Q DevCompiler.Compile ~
^Q DevLinker.LinkExe   dos Sum.exe := National Kernel+  Fonts Dates Math Files Dialog Strings Stores Meta Converters  Services Ports Sequencers Models Log Views Controllers Properties Mechanisms Containers TextModels  Fonts Properties   Views TextMappers Printers Printing TextRulers TextSetters TextViews    ObxAscii Sum ~

^Q DevLinker.LinkExe   Sum.exe := National Kernel+  Fonts Dates Math Files Dialog Strings Stores Meta Converters  Services Ports Sequencers Models Log Views Controllers Properties Mechanisms Containers HostFiles HostRegistry HostFonts TextModels  Fonts Properties   Views TextMappers Printers Printing TextRulers TextSetters TextViews    ObxAscii Sum ~

^Q DevLinker.LinkExe   Sum.exe := National Kernel+  Meta Math Fonts Dates  Files Strings Log Dialog Services Stores Converters Ports Sequencers Models Views  StdInterpreter   Meta        Controllers Properties Mechanisms Containers HostFiles HostRegistry HostFonts TextModels  Fonts     TextMappers Printers Printing TextRulers TextSetters TextViews    ObxAscii Sum ~

…
BEGIN
     Main
…

(!) DevLinker.Link dos
Sum.exe := National Kernel$+ Files HostFiles StdLoader Math Strings Dates Meta Dialog Services
Fonts Ports Stores Log Converters Sequencers Models Printers Views
Controllers Properties Printing Mechanisms Containers
Documents Windows StdCFrames Controls StdDialog StdApi StdCmds StdInterpreter
HostRegistry HostFonts HostPorts OleData HostMechanisms HostWindows
HostPrinters HostClipboard HostCFrames HostDialog HostCmds
HostMenus HostPictures TextModels TextRulers TextSetters TextViews
TextControllers TextMappers ObxAscii Sum Init
1 Applogo.ico 2 Doclogo.ico 3 SFLogo.ico 4 CFLogo.ico 5 DtyLogo.ico
1 Move.cur 2 Copy.cur 3 Link.cur 4 Pick.cur 5 Stop.cur 6 Hand.cur 7 Table.cur