rt11-v5-all-dev.txt

gistfile1.txt

Note:

ADVENT will compile in FB and run in SJ
PC is not available in XM, but it is in FB

Devices
DL  RL01/RL02 Cartridge Disk
DM  RK06(13M)/RK07(26M) Cartridge Disk
DU  MSCP Disk-Class Handler
    RA60(195MB)/RA80/RA81/RA82(594MB) Disk
    RC25 Disk
    RD31(20M)/RD32(41M)/RD50/RD51/RD52/RD53/RD54(152M) Disk
    RX33 Diskette
    RX50 Diskette
DW  RD31/RD32/50/RD51/RD52/RD53 Disk
DX  RX01 Single-Density Diskette
DY  RX02 Double-Density Diskette
DZ  RX50 Diskette (Professional 300)
LD  Logical Disk Handler
LP  Line Printer
LS  Serial Line Printer
MM  TJU16 (MASSBUS) Magtape
MS  TS11 (UNIBUS) Magtape
    TU80/TSU05/TSV05
    TK25 Magtape
MT  TM11 (UNIBUS) Magtape
MU  TMSCP Magtape Class Handler
    TK50 Magtape
    TU81+ Magtape
NC  Ethernet Handler for Professional 300 Series Processors
NL  Null Handler
NQ  Ethernet Handler for Q-bus Processors
NU  Ethernet Handler for UNIBUS Processors
RK  RK05 Cartridge Disk
------------

mkdir rt-11-tst
cd rt-11-tst
mkdir Disks

copy into Disks:
RT-11_V5.3_BIN_RL02_BACKUP
RT-11_V5.3_BIN_RL02_WORKING
basic-rk05.dsk
fortran-iv-v021-compiler-files.img
fortran-iv-v021-objecttime-system.img
omsiPascal2.1.dsk
rtv53_rl.dsk

#--------------------------------------------------------------------
# perform an automated install or copy a preexisting rl02 version of
# RT-11_V5.3_BIN_RL02_WORKING to working.dsk
#--------------------------------------------------------------------
cat >initial.ini <<"EOF"
set cpu 11/94
set cpu 4M
set TTI 8B
set TTO 8B
attach LPT lpt.txt
attach PTR ptr.txt
attach PTP ptp.txt

set rl0 writeenabled
set rl0 rl02
attach rl0 distribution.dsk

set rl1 writeenabled
set rl1 rl02
attach rl1 distribution-backup.dsk
set rl1 badblock

boot rl0

EOF

pdp11 initial.ini

17-FEB-88
follow prompts
rm distribution.dsk
mv distribution-backup.dsk Disks/
rm initial.ini

#--------------------------------------------------------------------
# copy working system onto the disk of your choice
#--------------------------------------------------------------------
cat >s1.ini <<"EOF"
set cpu 11/94
set cpu 4M
set TTI 8B
set TTO 8B
attach LPT lpt.txt
attach PTR ptr.txt
attach PTP ptp.txt

set rl0 writeenabled
set rl0 rl02
attach rl0 working.dsk

set hk0 rk07
attach hk0 working-copy.dsk
set hk0 badblock

boot rl0

EOF

pdp s1.ini
.initialize/badblocks dm0:
DU0:/Initialize; Are you sure? Y
?DUP-I-No bad blocks detected DM0:

.

.SQUEEZE/OUTPUT:dm0: dl0:
.copy/boot dm0:RT11FB.SYS dm0:
boot dm0:
dir
...
 206 Files, 5023 Blocks
 48633 Free blocks

CTRL-E
q
rm s1.ini
rm working.dsk
mv working-copy.dsk system.dsk

#--------------------------------------------------------------------
# set up storage disk
#--------------------------------------------------------------------
cat >s2.ini <<"EOF"
set cpu 11/94
set cpu 4M
set TTI 8B
set TTO 8B
attach LPT lpt.txt
attach PTR ptr.txt
attach PTP ptp.txt

set hk0 rk07
attach hk0 system.dsk

set hk1 rk07
attach hk1 storage.dsk

boot hk0

EOF

pdp11 s2.ini

.initialize/badblocks dm1:

.initialize/badblocks dm1:
DM1:/Initialize; Are you sure? Y
?DUP-I-No bad blocks detected DM1:

CTRL-E
q

mkdir backups
backups/system-installed-rk07.dsk
backups/storage-initialized-rk07.dsk

rm s2.ini

#--------------------------------------------------------------------
# set up languages and boot.ini
#--------------------------------------------------------------------
cat >boot.ini <<"EOF"
set cpu 11/94
set cpu 4M
set TTI 8B
set TTO 8B
attach LPT lpt.txt
attach PTR ptr.txt
attach PTP ptp.txt

set hk0 rk07
attach hk0 system.dsk

set hk1 rk07
attach hk1 storage.dsk

attach rk0 basic.dsk
attach rk1 pascal.dsk
attach rk2 fortran.dsk

boot hk0

EOF

pdp11 boot.ini

.initialize/badblocks rk0:
RK0:/Initialize; Are you sure? Y
?DUP-I-No bad blocks detected RK0:

.initialize/badblocks rk1:
RK1:/Initialize; Are you sure? Y
?DUP-I-No bad blocks detected RK1:

.initialize/badblocks rk2:
RK2:/Initialize; Are you sure? Y
?DUP-I-No bad blocks detected RK2:

edit startf.com, starts.com, and startx.com
add
assign dm1: vol:
assign rk0: bas:
assign rk1: pas:
assign rk2: for:

also in starts.com
add
set tt: scope



copy/boot dm0:RT11XM.SYS dm0:
boot dm0:

install basic, pascal, and fortran into their respective disks

basic:
attach rk3 Disks/basic-rk05.dsk
copy rk3:*.* BAS:

.run bas:basic
BASIC-11/RT-11 V2.1
OPTIONAL FUNCTIONS (ALL, NONE, OR INDIVIDUAL)? ALL

READY
PRINT "HELLO"
HELLO

READY
BYE

pascal:
det rk3
attach rk3 omsiPascal2.1.dsk
copy rk3:*.* PAS:

edit/create vol:adder.pas
.run pas:xm
*vol:adder,vol:adder=vol:adder.pas
.type vol:adder.lst
.link vol:adder/map:vol:,pas:libfpp
.type vol:adder.map
.run adder
12 45
 inputs and answer:
 1.200000E+01 4.500000E+01 5.700000E+01

---
adder.pas
program adder(input,output);

var x,y,z : real;

begin
	read(x,y);
	z := x + y;
	writeln(' inputs and answer: ');
	writeln(x, y, z)
end.

fortran:

download the two fortran images

det rk3:
att rx0 Disks/fortran-iv-v021-compiler-files.img

ASSIGN DX0: INP
ASSIGN FOR: OUP

.RUN INP:FORGEN
Answer questions with:
"?" or carriage return (<CR>) for information,
YES(Y) for affirmation, anything else for NO.


A maximum of   56 lines are allowed per listing page.
Is this acceptable? Y
A maximum of  136 characters are allowed in a formatted
(ASCII) record.  Is this acceptable? Y
A maximum of  6 channels may be open at a given time.
Is this acceptable? Y
The FORTRAN compiler can compile system-specific OPEN and CLOSE
statement keywords for RT-11, RSX-11, and RSTS/E systems.  These
statements are currently compiled for the following system: RT-11
Is this acceptable? Y
FORTRAN can produce inline code for EAE, EIS or FIS hardware,
or it can produce threaded (THR) code which is hardware independent.
Should the compiler produce EAE code? N
Should the compiler produce EIS code? N
Should the compiler produce FIS code? N
Should the compiler produce THR code? Y
The inline compiler can optimize for SPEED or for SIZE. These
optimizations are mutually exclusive. Do you want
the optimization to be for SPEED? SIZE
Do you wish a threaded only compiler? Y
Compiler options selection complete.


.@INP:F4LTHR

.R LINK
*OUP:FORTRA=INP:FROOT///S
*INP:F0,INLINE,OUP:DEFLTS/O:1
*INP:F1/O:1
*INP:F2/O:1
*INP:F3/O:1
*INP:F4/O:1
*INP:F5/O:1
*INP:F6/O:1
*INP:F7/O:1
*INP:F8/O:1
*INP:F9/O:1
*INP:F10/O:1
*INP:LOOP/O:1
*INP:F11/O:1
*INP:F12/O:1
*INP:F13/O:1
*INP:F14/O:1
*INP:F15/O:1
*INP:F16/O:1
*INP:F17/O:1
*INP:CDUMP/O:1//
*^C

.
Simulation stopped, PC: 145012 (BNE 144674)
sim> att rx0 Disks/fortran-iv-v021-objecttime-system.img
RX: writing buffer to file
RX: buffering file in memory
sim> c
R LIBR
*OUP:FORLIB=INP:NHD,OTSCOM,NOVIR,V2NS/G
Global? $ERRS
Global? $ERRTB
Global? $VRINT
Global?
*^C

.fortran
Files? ^C

.copy for:*.* sy:


#--------------------------------------------------------------------
# Install ADVENT - note if program won't work in monitor, try FB,
# then SJ
#--------------------------------------------------------------------
xref: _00-readme-rt11-v4-advent.txt

mkdir ./advent
cd ./advent
curl -O http://www.ifarchive.org/if-archive/games/pc/adv350kp.zip
unzip adv350kp.zip RT11SRC.ZIP
unzip RT11SRC.ZIP
rm adv350kp.zip RT11SRC.ZIP

cd ..
pdp11 boot.ini

copy/boot dm0:rt11sj.sys dm0:
boot dm0:


Simulation stopped, PC: 151406 (ASL R4)
sim> att ptr ./advent/AINIT.FOR
sim> c


COPY PC: VOL:AINIT.FOR
 Files copied:
PC:            to DK:AINIT.FOR

.
Simulation stopped, PC: 122124 (EMT 340)
sim> att ptr ./advent/ATEXT.TXT
sim> c
COPY PC: VOL:ATEXT.TXT
 Files copied:
PC:            to DK:ATEXT.TXT

.
Simulation stopped, PC: 151410 (MOV R4,R3)
sim> att ptr ./advent/ABUILD.FOR
sim> c
COPY PC: VOL:ABUILD.FOR
 Files copied:
PC:            to DK:ABUILD.FOR

.
Simulation stopped, PC: 151420 (ADD 150602,R3)
sim> att ptr ./advent/ADVENT.FOR
sim> c
COPY PC: VOL:ADVENT.FOR
 Files copied:
PC:            to DK:ADVENT.FOR

.
Simulation stopped, PC: 151262 (ADD #20,R1)
sim> att ptr ./advent/AIOSUB.FOR
sim> c
COPY PC: VOL:AIOSUB.FOR
 Files copied:
PC:            to DK:AIOSUB.FOR

.
Simulation stopped, PC: 152514 (BEQ 152524)
sim> att ptr ./advent/AMAIN.FOR
sim> C
COPY PC: VOL:AMAIN.FOR
 Files copied:
PC:            to DK:AMAIN.FOR

.
Simulation stopped, PC: 151402 (ADD #2446,R5)
sim> ATT PTR ./advent/ASUB.FOR
sim> c
COPY PC: VOL:ASUB.FOR
 Files copied:
PC:            to DK:ASUB.FOR

.
Simulation stopped, PC: 153026 (BIS #1,36(SP))
sim> ATT PTR ./advent/ASUSP.FOR
sim> C
COPY PC: VOL:ASUSP.FOR
 Files copied:
PC:            to DK:ASUSP.FOR

.
Simulation stopped, PC: 156066 (MOV (SP)+,R3)
sim> ATT PTR ./advent/AMAC.MAC
sim> C
COPY PC: VOL:AMAC.MAC
 Files copied:
PC:            to DK:AMAC.MAC

.
Simulation stopped, PC: 156064 (MOV (SP)+,R4)
sim> ATT PTR ./advent/ADVENT.ODL
sim> C
COPY PC: VOL:ADVENT.ODL
 Files copied:
PC:            to DK:ADVENT.ODL


compil/novec vol:advent,vol:ainit,vol:asub,vol:aiosub,vol:asusp

compil/novec vol:amain

.compil vol:amac

.link/prompt advent,asub,aiosub,asusp,amac
*AINIT/O:1
*AMAIN/O:1
*FORLIB/O:1//

.compil/novec vol:abuild
ABUILD

.link abuild,asusp,forlib

.dir advent.sav

ADVENT.SAV   102
 1 Files, 102 Blocks
 1686 Free blocks

Buiding DAT files
.copy vol:atext sy:
 Files copied:
VOL:ATEXT.TXT  to SY:ATEXT.TXT


.run abuild


copy/boot dm0:rt11sj.sys dm0:
boot dm0:

.run advent
Welcome to Adventure!!  Would you like instructions?
>Y
Somewhere nearby is Colossal Cave, where others have found fortunes in
treasure and gold, though it is rumored that some who enter are never
seen again.  Magic is said to work in the cave.  I will be your eyes
and hands.  Direct me with commands of 1 or 2 words.  I should warn
you that I look at only the first four letters of each word, so you'll
have to enter "NORTHEAST" as "NE" to distinguish it from "NORTH".
(Should you get stuck, type "HELP" for some general hints.  For infor-
mation on how to end your adventure, etc., type "INFO".)
                        - - -
This program was originally developed by Willie Crowther.  Most of the
features of the current program were added by Don Woods (DON @ SU-AI).
The current version was done by Kent Blackett and Bob Supnik.
                        - - -
Bug reports and other correspondence should be sent to:

        Digital Equipment Computer Users Society
        One Iron Way, MR2-3/E55
        Marlboro, Mass. 01752
        Attn:  Adventure Maintenance

You are standing at the end of a road before a small brick building.
Around you is a forest.  A small stream flows out of the building and
down a gully.
>HELP
I know of places, actions, and things.  Most of my vocabulary
describes places and is used to move you there.  To move, try words
like "FOREST", "DNSTREAM", "ENTER", "EAST", "WEST", "NORTH", "SOUTH",
"UP", or "DOWN".  I know about a few special objects, like a black rod
hidden in the cave.  These objects can be manipulated using some of
the action words that I know.  Usually you will need to give both the
object and action words (in either order), but sometimes I can infer
the object from the verb alone.  Some objects also imply verbs; in
particular, "INVENTORY" implies "TAKE INVENTORY", which causes me to
give you a list of what you're carrying.  The objects have side
effects; for instance, the rod scares the bird.  Usually people having
trouble moving just need to try a few more words.  Usually people
trying unsuccessfully to manipulate an object are attempting something
beyond their (or my!) capabilities and should try a completely
different tack.  To speed the game you can sometimes move long
distances with a single word.  For example, "BUILDING" usually gets
you to the building from anywhere above ground except when lost in the
forest.  Also, note that cave passages turn a lot, and that leaving a
room to the north does not guarantee entering the next from the south.
Good luck!
>QUIT
Do you really want to quit now?
>Y
Ok

You scored  27 out of a possible 350, using    5 turns.
You are obviously a Rank Amateur.  Better luck next time.
To achieve the next higher rating, you need  9 more points.

.
copy/boot dm0:rt11xm.sys dm0:
boot dm0: