<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<style type="text/css" style="display:none;"> P {margin-top:0;margin-bottom:0;} </style>
</head>
<body dir="ltr">
<div style="font-family: Calibri, Helvetica, sans-serif; font-size: 12pt; color: rgb(0, 0, 0); background-color: rgba(0, 0, 0, 0);">
weird - <a href="http://trek7.sourceforge.net/" id="LPlnk447066">http://trek7.sourceforge.net/</a><br>
Works perfectly for me<br>
<br>
but yes, it's Fortran on the Vax from 1976-1978 timeframe<br>
it was Fortran/IV and/or/mixed Fortran/77<br>
so not "standard" fortran at all.<br>
actually the code wouldn't compile at all with compaq fortran (IBM) or even on a vax with newer versions,<br>
which led to a lot of speculation that it was Fortran/IV or some hybrid.<br>
<br>
there are several repositories of the trek7 code under that link,<br>
in the vms directory you'll find code for the vax, that does compile and link, and the vax EXE is there, supplied.<br>
<br>
the linux directory has the code for linux, with compiled binary<br>
as does the does version (compiled with Intel Fortran I think, it's been a while)<br>
and then there's the newest directory - not sure which "strain" that was.<br>
<br>
Hey, I've been working on that project since around 1978, it's been a very long time, details escape.<br>
<br>
It went through cycles, scanning in, and correcting, but then later cycles actually ended up being hand-typed.<br>
you'll notice comments in the code about it being hand-checked and type-correct exact to the printout that was being worked from.<br>
<br>
the code in the various dirs (dos, linux, vms) does all compile, the binaries are there, and they do run.<br>
<br>
This project is about as close to end of life as you can get, I really only posted it so it would survive me, when that day comes.<br>
I wanted it passed on to future generations. it really is the best trek game I've ever played, and I do mean best, and I do mean ever.<br>
Nothing else comes close.<br>
<br>
One final thing I always wanted to complete, but not sure it's even possible any more, is the multi-player aspect.<br>
<br>
on the vax/vms version you could assign terminals (if you had the privileges) to have up to four players at once.<br>
<br>
You can do the same sort of thing in linux in a different way - but I'd like to make that work again, on linux.<br>
<br>
And for Dos/Windows or possible Mac port (hah) someday - I'm not sure that will ever be possible.<br>
Dos/Windows doesn't have any concept of "terminals", and I'm totally incapable of writing a TCP/Socket interface for it, way beyond me.<br>
and it being fortran, well, that might be impossible too. I have no idea. and I'm not capable, so there we are.<br>
<br>
I own several vaxstation 3100/78's and I have vms on simh as well, so that's how I test.<br>
I miss my favorite trek game.<br>
<br>
And BTW for another trip down memory lane check out: <a href="http://trek7.sourceforge.net/files/castle/" id="LPlnk301555">
http://trek7.sourceforge.net/files/castle/</a><br>
This is "The New Castle" from Vax/VMS circa 1978, the project I finally completed after 38 years.<br>
<br>
I can't find any. testers to weed out any remaining bugs in Castle, so it is what it is.<br>
<br>
I'd appreciate if you could give Trek7 a once-over (or something).<br>
The idea of converting the code to something reasonable has been toyed with, but most important to me is the "feel" of the game,<br>
without that, it's just not trek7 any more.<br>
Please dont compare it to net-trek, it's not even close. shudder.<br>
<br>
I used to be fluent in fortran, many moons ago, but I've forgotten almost all of it.<br>
<br>
Again, primary purpose - pass it on, maybe someday someone will enjoy it as much as I did.<br>
Networking multi-player in linux would be really cool.<br>
<br>
I'd love to have another multi-player game some day.<br>
<br>
And give Castle a whirl, I left all the debugging in place just in case.<br>
<br>
thanks, and hope you enjoy<br>
<br>
Dan.<br>
</div>
<hr style="display:inline-block;width:98%" tabindex="-1">
<div id="divRplyFwdMsg" dir="ltr"><font face="Calibri, sans-serif" style="font-size:11pt" color="#000000"><b>From:</b> Larry Baker <baker@usgs.gov><br>
<b>Sent:</b> February 3, 2018 5:00 PM<br>
<b>To:</b> dgahling@hotmail.com<br>
<b>Cc:</b> simh@trailing-edge.com<br>
<b>Subject:</b> Re: [Simh] Crowther's Adventure game</font>
<div> </div>
</div>
<div class="" style="word-wrap:break-word">Dan,
<div class=""><br class="">
</div>
<div class="">The link to your Source Forge page you posted does not work for me. I found TREK7 it at <a href="https://sourceforge.net/projects/trek7/" class="">https://sourceforge.net/projects/trek7/</a>.</div>
<div class=""><br class="">
</div>
<div class="">I tried to find the sources you started with. I found a ZIP file called <a href="https://sourceforge.net/projects/trek7/files/trek7/status/trk7fsrc.zip/download" title="Click to download trk7fsrc.zip" class="" style="line-height:inherit; color:rgb(0,153,204); text-decoration:none; font-family:Lato,sans-serif; font-size:16.00004005432129px; white-space:nowrap; outline:none 0px!important">trk7fsrc.zip</a>.
When I compiled the first file, TREKA.FOR, I can see typos and lines extending past column 72. This could not be the original source code that worked at one time. Was this scanned? Has this been altered from a known working version, other than the scanning
errors? Like, the lines that extend past column 72? The code clearly expects column 72 to wrap to column 7 of a continuation line, which is how Fortran fixed-format source works.</div>
<div class=""><br class="">
</div>
<div class="">Ancient Fortran should not be that hard to convert, especially if you know the original platform. I saw LIB$ calls, which leads me to believe this was maybe VAX Fortran? I see the use of FORMAT specifiers without lengths, like F, not F7.2. It
would be nice to know the precise meaning of that non-standard Fortran. But, very new Fortran sill also accept FORMAT specifiers without lengths now. And, there is non-advancing support for Fortran I/O now. Fortran INTRINSICS should be straightforward.
The library calls will be harder.</div>
<div class=""><br class="">
</div>
<div class="">Want help? What platform do you want to run the code on?</div>
<div class=""><br class="">
<div class=""><span class="x_Apple-style-span" style="border-collapse:separate; font-family:'Helvetica Neue'; line-height:normal; border-spacing:0px"><span class="x_Apple-style-span" style="border-collapse:separate; color:rgb(0,0,0); font-family:'Helvetica Neue'; font-style:normal; font-variant:normal; font-weight:normal; letter-spacing:normal; line-height:normal; orphans:2; text-indent:0px; text-transform:none; white-space:normal; widows:2; word-spacing:0px">
<div class="" style="word-wrap:break-word">Larry Baker<br class="">
US Geological Survey<br class="">
650-329-5608<br class="">
<a href="mailto:baker@usgs.gov" class="">baker@usgs.gov</a><br class="">
<br class="">
</div>
<div class="" style="word-wrap:break-word"><br class="">
</div>
</span></span><br class="x_Apple-interchange-newline">
</div>
<br class="">
<div>
<blockquote type="cite" class="">
<div class="">On Feb 3, 2018, at 11:13 AM, <a href="mailto:simh-request@trailing-edge.com" class="">
simh-request@trailing-edge.com</a> wrote:</div>
<br class="x_Apple-interchange-newline">
<div class=""><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Message:
2</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Date:
Sat, 3 Feb 2018 17:51:47 +0000</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">From:
Dan Gahlinger <</span><a href="mailto:dgahling@hotmail.com" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">dgahling@hotmail.com</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">></span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">To: Quentin
North <</span><a href="mailto:quentin@quentin.org.uk" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">quentin@quentin.org.uk</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">>,
Bob Nelson</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="x_Apple-tab-span" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:pre; word-spacing:0px"></span><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important"><</span><a href="mailto:rmkrider@gmail.com" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">rmkrider@gmail.com</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">></span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Cc: "</span><a href="mailto:simh@trailing-edge.com" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">simh@trailing-edge.com</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">"
<</span><a href="mailto:simh@trailing-edge.com" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">simh@trailing-edge.com</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">></span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Subject:
Re: [Simh] Crowther's Adventure game</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Message-ID:</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="x_Apple-tab-span" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:pre; word-spacing:0px"></span><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important"><</span><a href="mailto:DM3PR16MB0813E647EB83D26D6D6BEF95C9F80@DM3PR16MB0813.namprd16.prod.outlook.com" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">DM3PR16MB0813E647EB83D26D6D6BEF95C9F80@DM3PR16MB0813.namprd16.prod.outlook.com</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">></span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="x_Apple-tab-span" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:pre; word-spacing:0px"></span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Content-Type:
text/plain; charset="utf-8"</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">I have
an original printout of Adventure from the mid 70's, taken from a Vax though,</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">It's
not a version I've found on the archives, the version ID on mine is different.</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">I've
been meaning to scan it and post it.</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Ancient
fortran is very hard to convert, as I found out trying to convert trek7 (</span><a href="https://trek7.sourceforge.net/" class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; orphans:auto; text-align:start; text-indent:0px; text-transform:none; white-space:normal; widows:auto; word-spacing:0px">https://trek7.sourceforge.net</a><span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">)</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">And I
spent 38 years or so converting "the new castle" from Vax to Linux/Dos/Mac.</span><br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<br class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px">
<span class="" style="font-family:Monaco; font-size:12px; font-style:normal; font-weight:normal; letter-spacing:normal; text-align:start; text-indent:0px; text-transform:none; white-space:normal; word-spacing:0px; float:none; display:inline!important">Dan.</span></div>
</blockquote>
</div>
<br class="">
</div>
</div>
</body>
</html>