Trailing-Edge
-
PDP-10 Archives
-
bb-jr93j-bb
-
aplw12.r03
There are 10 other files named aplw12.r03 in the archive. Click here to see a list.
0 ez ) H / P
, @
" , 4 0$ 0/$ 0D + + 0D + + 0D *Q
P
+
B + 0D )+ 5aj @ + 4 ! $ & , #4 # $
0& , %4 %/$ , '4 '*$ , ( (D" *4 )d* l* 8
34 0lj + *lj + 7B
D.& F ej + b@ H -, I4 J9 F B
U" , s7 +
A" +
z + 1( B : 2H
U( @ $< | (QQ + @ + + 0 , $: 1F + + & 8 + ( , + , + *, + ( *E** *+ ,
, '+ @ , 4 ! @ & *
C, A4 B $
{& , C4 DL$ , E4 F$ , G4 Gd* @ 8 \&o "** L , L7 + O , ;+ 9F L
U T9F Q 8 l* @ + 0D *+ j`j @ + Z , S+ , Y \&{ , L "U
]7 + @ , Z+ 8F `+ \7@ 6@ 7 + g " 3, L7 + f , ^ (U"* e+ 1L + g+ c
,, z, + /, + 0T +
+ ,^ ,^ , udd + , w+ !* + J.&
@"U* ,^ ,^ +` Y+X 8" 0+ I+ !" 0+ I+ ! *U*U* " 1+ I+ !" 1+ I+ !" 2+ I+ !" 2+ I+ !" 3+ I+ !" 3+ I *U*U* !+ I+X ?" /+ I+ -" 4+ I+ -" 4+ I+ -" 5+ I+ -" 5+ I+ - *U*U* )" 6+ I+ -" 6+ I+ -" 7+ I+ I+X G" 7+ I+ :" 8+ I+ :" 8 *U*U* 2+ I+ :" 9+ I+ :" 9+ I+ :" :+ I+ :" :+ I+ :" ;+ I+ I *U*U* :+X P" ;+ I+ F" <+ I+ F" <+ I+ F" =+ I+ F" =+ I+ F" > *U*T( C+ I+ F" >+ I+ F" ?+ I+ I+ I D, + / + J+ aj : x D
U* K,~ 0T + N@
16 + f+X ^> /+ Y 4+ Y 4+ Y 5+ Y *U*P T 5+ Y 6+ Y 6+ Y 7+ Y E+ Y E/6 @ : 0L 2+ d
*E
* e+ p+ p+` g(R b 0+ n(R b /+ n(R b 7+ n(R b ;+ n+ n K * m, H+ . 16 + p+ N`j + r: x > ,~ @ d* ,> , 7 + w A
( v,^ l* + ,^ A" ?+ m`j + + $$ /" . l* 2 + + `j + * ~ O, ml* + + taj : x ,~ d* 3@ + l* + 6@ + (D + ,> , 7 + ,^ l* + ,^ 3@ +
6@ ,@ 4 (@ )L@ + !+ !+ !+ !+ !+ !+ !+ + + + + + + *U*U* ?+ + -+ -+ -+ -+ -+ -+ -+ -+ "+ #+ %+ &+ (+ )+ ++ , *U*U* G+ :+ :+ :+ :+ :+ :+ :+ :+ :+ .+ 0+ 1+ 3+ 4+ 6+ 7+ 9 *U*U* P+ F+ F+ F+ F+ F+ F+ F+ F+ F+ F+ ;+ <+ >+ ?+ A+ B+ D *U*U* X+ E+ G+ G+ G+ G+ G+ G+ G+ + !+ .+ :+ Y+ Y+ Y+ Y+ Y *U*U* a+ Y+ Y+ Y+ P+ Q+ R+ S+ T+ U+ V+ W+ X+ Y+ m+ m+ m+ m *U*U* i+ m+ m+ m+ f+ h+ i+ k+ }+ }+ }+ }+ }+ }+ }+ }+ }+ } *U*U* r+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ } *U*U* z+ }+ }+ }+ }+ }+ y+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ } *U*U*
+ }+ }+ }+ }+ z+ z+ z+ z+ z+ z+ z+ z+ z+ z+ }+ }+ } *U*U*
+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ } *U*U*
+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ } *U*U*
+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ } *U*U*
%+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }+ }
- bq &cy !Y (
% P*dQ&di / ex~/ *9-i
6 DQ % " F < B"b
B2""& tB v b4,B
> b: T "B R
( b ~ z
b Zb " x BB cx@
Gb " B 8 @ bx " b
O
X
`
i B
B B B "
qB & *B . 2B 6 :B >
b
B f
z j r BBFJBNRBVZB^ b Bf j Bn r B $ 1B#D1F#1J#D1N#1R#D1V#1Z#D1^# 1b# D1f# 1j# D1n# 1r# D0 (
APLTAP! H
ONE OF THE FOLLOWING
R READ A TAPE
I INITIALIZE A TAPE FOR WR
W WRITE A WORKSPACE DUMP ONTO TAPE
T TERMINATE WRITING A TAPE
E EXIT H
?YOU AREMINTTHE)PROCESS OFrWRITING AdTAPE! H buXop(H 2 @
)COPY SYS:WSIN
.ZQ.ZQWSIN ' '
?UNEXPECTEDHEND OF A
?FIRSTHVECTOR IS NOT WSIS H
?FORMATE O @ ON 0 H
?SECOND VECTOR IS NOT TRANSLATE (
?TRANSLATE IS NOT A MATRIX H
?TRANSLATE HAS LESS THAN TWO COLUMNS H
?UNEXPECTED END OF FILE IN TRANSLATETABLE H
-
?CANNOTOHANDLETTHE BYTE
'CONVERSION COMPLETED' H$ -
?YOU ARE IN THE PROCESS OF W RITING A TAPE. TERMINATE TO CLOSE IT H NITIALIZE (TAPE) H 9pwsis 0 0 1043ptranslate 2 512 2 H
?UNEXPECTED ERROR ON TAPE H
?YOU HAVE NOT INIT @ IALIZED A TAPE H ERMINATE THE TAPE H H$ 6
?ERROR IN TAPE WRITE H
?IN ITIALIZE THE TAPE FIRST H RITE (WORKSPACE DUMP) H #
?ERROR WHILE WRITI @ (NG TAPE H &XIT (TO MONITOR) H *
?ILLEGAL COMMAND CODE H , 1
$ $ $ $ 9$
$
$ $ ( ( ( ( (
(
( (
?CAN ONLY HANDLE BYTE S BIZES BETWEEN 7 AND 10 H ?
?CAN ONLY HANDLE BYTE SIZES BETWEEN 7 AND 1 @ J0 BITS H F
?NUMBER EXPECTED BUTNOTFOUND H L @ {x P Y z#,
HY\ #ll, gLllP#llaj g 1 \
CB
vr 2 (T
K @ (T
Nu, sK+l=n K+ln< K+lu_ K+m +@5 #
atH .a6D K1+G\
k[L, g[LP
k[L
l, gP
l l , g=l P l6 'on, `r?nP 'on SzJ?|p KzJ@J LYfW) LYg < Y9* )> 0, `zaP 0Ll[eV~ HB( " HB) TUH, g}UHPTUHu["
-z * 3EG 6 3~f ), gRP) D
K L 5 * [, gS [P* [v6, g 6Pv6 8(, ` IZ(P 8( 9LN, ` NP 9LN 9N7 9s, `CP 9s
F, g5 FP
Fbn ,e D V`Og 0 =) " W IU P m> Q uP5 uP5 uP6 D" uP6
uP7 5 uP7 uP8 , uPH 7 uPI 2 uPI 7 uPJ * uPJ B D" uPK : uPK < uPL > uP\ @ uP] B uP] * uP^ b uP^ F uP X D" uPq e uPq i uPr l uPr o uPs r uPs v uPt y uQ | uQ D" uQ uQ uQ uQ
uQ
uQ D" uQ uQ uQ, uQ- uQ- uQ. ( uQ. uQ/ " uQ/ $ D" uQ0 & uQ@ ( uQA ( uQA * uQB V uQB 9 uQC L uQC P uQD O D" uVV Q uVV U uVW T uVi j uVi Z uVj \ uVj ` uVk uVk g D" uVl c uV| g uV} f uV} ~ uV~ m uV~ s uV | uV x uW x D" uW { uW uW uW uW uW J uW uW uW$ D" uW% uW% J uW& Y uW' uW( ! uW8 8 uW9 uW9 uW: D" uW: uW; uW; uW< uWL uWM ! uWN - uWN ? uWO " D" uWO # uWP % uW` & uWa ( uWa ) uWb + uWb , uWc . uWd : D" u\t G u\u . u\u 0 u\v 1 u\v 3 u\w 4 u\w 6 u\x 7 u] 9 D" u] : u]
F u]
P u] ; u] < u]
> u] ? u] A u] B D" u] D u] E u] G u] N u] N u]0 p u]1 f u]2 Y u]2 ^ D" u]3 P u]3 Q u]4 R u]D S u]E T u]E U u]F V u]F W u]G X D" u]G Y u]H d u]X b u]Y p u]Z n u]Z g u][ f u][ h u]\ i D" u]l k u]m m u]m r u]n t u]n u]o w u]p u^ m u^ y D" u^ z u^ } u^ u^ u^ u^ uc uc uc D" uc
U P Ib wsA wsf wu, D g[L pg g=l `r?n O|Z\ g|t (g}$ P I-" O` < O`C O`D
O`6 O`^ gi\6 H`za ]g}UH rOOqh OOrc D" gR V#A V#f gS [ g 6 ` IZ( ` N O*/k O*3 @ `C 'g5 F ^ # CA x c c 8 ( P 0