home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / program / compiler / stjo2122 / tutorial / hellowor.mod < prev    next >
Encoding:
Text File  |  1993-11-27  |  557 b   |  19 lines

  1. MODULE HelloWorld; (* SJ *)
  2.  
  3. (* demo module: writes "Hello world". Call it with LOAD.TTP or link it
  4.    with TOS modules. Works with GEM modules as well. But be careful:
  5.    Compilation must be done with TOS paths, because otherwise the use of
  6.    module Event is entered in the object file (don't know why) and this
  7.    module won't be found in TOS paths.
  8. *)
  9.  
  10. IMPORT IO;
  11.  
  12. VAR c : CHAR;
  13.  
  14. BEGIN
  15.   IO.ClearHome;
  16.   IO.WriteString("Hello world"); IO.WriteLn;
  17.   IO.WriteString("Press any key ..."); IO.WriteLn;
  18.   c := IO.ReadChar();
  19. END HelloWorld.