HP3000-L Archives

April 2005, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"F. Alfredo Rego" <[log in to unmask]>
Reply To:
F. Alfredo Rego
Date:
Mon, 25 Apr 2005 07:27:23 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (37 lines)
At 14:11 +0100 4/25/05, Peter Smithson wrote:

>I'm trying to run a test program on MPE so I thought I'd start with Hello
>World and see where I got.  This is what I have so far -
>
>$CONTROL USLINIT, MAIN=HELLO
>BEGIN
> INTRINSIC PRINT;
>$CONTROL SEGMENT=HELLO
>PROCEDURE HELLO;
>BEGIN
>  BYTE ARRAY OUT(0:12);
>  MOVE OUT:="Press return to continue...";
>  PRINT(OUT, -12, 0);
>END
>END

In addition to the excellent comments by Denys, you might want
to give a rest to your "caps lock" key ;-)

Good luck,

  _______________
 |               |
 |               |
 |            r  |  Alfredo                  http://www.adager.com
 |          e    |
 |        g      |  F. Alfredo Rego
 |      a        |  Manager, R & D Labs
 |    d          |  Adager Corporation
 |  A            |  Sun Valley, Idaho 83353-3000            U.S.A.
 |               |
 |_______________|

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2