Re: Pseudo random number routine -- RPG400-L

Aside from simply winning (zapping all of the Klingons) SysReq-2 is theonly way to terminate. F3 will bring up the Help panel. All otherFunction keys are ignored.

It's an interesting game in several regards. It's a little better thana maze game that a friend showed me eons ago on a PDP-11; you couldn'tactually "see" the maze but, like a blind mouse, had to remember thewalls that you bumped into. But the best thing about Star Trek is thatit teaches that everything has a price: Do a short range scan, expendenergy; Do a long range scan, expend even more energy, Move fromsector-to-sector, well, you get the idea.



        * Jerry C. Adams
*IBM System i5/iSeries Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
        615.995.7024
fax
        615.995.1201
email
        jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



Peter.Colpaert@xxxxxxxxx wrote:

Scott,

thanks, that worked.
One problem: I couldn't find a way to exit the program (short ofSysReq-2).
IIRC, F7 used to be Exit way back when...

Now, I'll boldly go... back to work.

Peter Colpaert
Application Developer
PLI - IT - Kontich, Belgium
-----
Yoda of Borg are we.  Futile is resistance, assimilated will you be.
-----
Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>Sent by: rpg400-l-bounces@xxxxxxxxxxxx
25/01/2007 10:21
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Pseudo random number routine
I guess I'm too young for this, but how do you run this thing? I
compiled
the DSPF36 and RPG36 sources (are those the correct types?)
Yes.
but I can't find a way to start the program itself.
You have to be in the S/36 environment (If it's installed on your system,you can start it with STRS36 command).
To compile the display file:

  - type: SDA <enter>
  - Take option #7
  - Input library should be the library containing the QS36SRC file
    where the STREKFM member is
  - Source member = STREKFM
  - Output library = Library to compile to.
  - Display file = STREKFM
It will "schedule compilation" for the display file. This means itsubmitted the create job to batch. Wait for it to finish.
To compile the program, type the following, except replace "SRCLIB" and"OBJLIB" with the appropriate libraries for the source lib (where theQS36SRC file is) and the object lib, respectively.
- RPGC STREK,SRCLIB,,,,,,OBJLIB <enter>


To run the program, type:

   // LOAD STREK <enter>
   // RUN <enter>


Ahhh, the joys of the S/36 environment!