home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / PROG / MISC / FPC355_1.ZIP / SAMPLES.ZIP / SMESSAGE.SEQ < prev    next >
Encoding:
Text File  |  1988-12-01  |  498 b   |  20 lines
  1. \ SMESSAGE.SEQ          Sample MY Startup Message       by Tom Zimmer
  2.  
  3. comment:
  4.  
  5.   This file contains an example of how to change the signon message
  6. to display a user defined message in place of the default system
  7. message.
  8.  
  9. comment;
  10.  
  11. : myhello       ( --- )
  12.                 ." Hello!"  ;   \ here is the message
  13.  
  14. ' myhello is .hello             \ install new hello function into .HELLO
  15.  
  16. \ We will also disable the displaying of the current file at boot time
  17.  
  18. ' noop is .curfile
  19.  
  20.