PDP-10 Archive: more-games/b1.exe from walsh_goodStuff

Trailing-Edge - PDP-10 Archives - walsh_goodStuff_1600 - more-games/b1.exe

There are no other files named b1.exe in the archive.

?p`?xDDKb)3<l"3`INXQF:{#A)7C{BE@OS8
8

N+*>	`xx{Gxp TH   NA   CO   AU   HE   AL   EC   EV   AR   PH   BO   BA   DI   IN   RA   EA   SE   A    B    C    D    E    F    G    H    I    J    K    L    M    N    P    Q    R    S    T    U    V    W    X    Y    Z    1    2    3    4    5    6    7    8    9    (I)(A10,2F)(5A1)(4X,10F,I)(/////' YOU ARE THE PILOT OF A B-1/R BOMBER.'/' THE B-1/R CRUISES AT',F6.0,' KPH. WITH A RANGE OF'F7.0,' KM.'/' IT IS ARMED WITH ONE HALF-MEGATON HYDROGEN BOMB'/' IN A STAND-OFF DELIVERY PACKAGE WITH A RANGE OF',F5.0,' KM.'/' AND'I3' PHOENIX AIR-TO-AIR/GROUND DEFENSE MISSILES'/' WITH RANGES OF',F5.0,' KM.'/)(' DO YOU WANT A LIST OF TARGET CITIES? ',$)(A1)(//' TARGET CITIES:'/)(A2)(1X,A10)(//)(' DO YOU WANT A LIST OF SOVIET DEFENSE BASES? ',$)(//' SOVIET AIR DEFENSE BASES:'/)(/' YOU ARE FLYING OVER THULE AIRBASE AT',F6.0' METERS.'//' *** ATTENTION ***'/' *** HOT WAR ! ***')(//' YOU ARE ORDERED TO ATTACK ',A10,'.')(' YOUR FAILSAFE ARMING CODE IS ',A5,'.')(/I3,':',I2,':',I2,'   COMMAND:',$)(A2,6A5)(' VALID COMMANDS ARE (AT LEAST THE FIRST TWO LETTERS ','OF):'/' NAVIGATOR; CO-PILOT; AUTO-PILOT; HEADING CHANGE;'/' ALTITUDE CHANGE; ECM (ELECTRONIC COUNTER MEASURES);'/' EVASIVE ACTION; ARM BOMB; PHOENIX MISSILE ACTIVATION;'/' BOMB RELEASE; BAIL OUT; DITCH; INSTRUMENT READOUT;'/' RADAR READOUT; SEARCH FOR DEFENSE BASES.')(3F)(' SEARCH INITIATED.')(' NO DEFENSE BASES IN FORWARD (+,-)',F4.0,' DEGREE',1X,'SWEEP.')(' NAVIGATOR READY.  CITY:',$)(1X,A10,F6.0,'N',F6.0,A1)(' THULE AIR BASE',F6.0,'N',F6.0,A1)(F7.0,' KM.;',F7.1,' DEGREES FROM PRESENT HEADING.'/F7.0,' KM. CLOSEST APPROACH AT PRESENT HEADING.')(' ETA:   ',I2,':',I2,':',I2)(' NOT LISTED IN NAVIGATION DIRECTORY.')(' CO-PILOT READY.'/' LENGTH OF TIME FOR CO-PILOT TO FLY (SEC,MIN,HR):'$)(' ROGER. CO-PILOT NOW FLYING THE PLANE.')(' AUTO-PILOT ENGAGED.')(' COURSE CHANGE IN DEGREES:',$)(' ROGER.')(' NEW ALTITUDE IN METERS:',$)(' CLIMBING TO CEILING AT',F7.0,' METERS.')(' DROPPING TO TREE-TOP LEVEL AT 100. METERS.')(' DROPPING TO',F7.0,' METERS.')(' AIRCRAFT ALREADY AT',F7.0,' METERS.')(' CLIMBING TO',F7.0,' METERS.')(' ELECTRONIC COUNTER-MEASURES ACTIVATED.')(' EVASIVE ACTION INITIATED.')(' FAILSAFE CODE:',$)(A5)(' ARMING LIGHT IS OFF.')(' ARMING LIGHT IS ON.')(' PHOENIX MISSILE READY.  TARGET:',$)(' MISSILE ARMED IN HEAT-SEAKING MODE.')(' PHOENIX MISSILE SEES NO TARGET.  FIRING ABORTED.')(' PHOENIX MISSILE LOCKED ON INCOMING AIR-TO-AIR'1X'MISSILE.'/' PHOENIX MISSILE FIRED.')(' PHOENIX MISSILE MISSED TARGET.')(' PHOENIX MISSILE LOCKED ON INCOMING SAM-',I1,'.'/' PHOENIX MISSILE FIRED.')(' PHOENIX MISSILE LOCKED ON MIG-',I2,'.'/' PHOENIX MISSILE FIRED.')(' PHOENIX MISSLE DESTROYS TARGET.')(' BOMB IS NOT ARMED.')(' BOMB READY.  TARGET:',$)(' NOT A LISTED TARGET.')(' THIS IS A SECONDARY TARGET.'/' TYPE "C" TO CONFIRM:',$)(1X,A10,' OUT OF BOMB RANGE.')(' BOMB AWAY.'/' ',A10,' OBLITERATED.')(' READY TO BAIL OUT.  TYPE "C" TO CONFIRM:',$)(' CREW EJECTED.  B-1 CRASHES AND EXPLODES.')(' LOSE ALTITUDE BEFORE DITCHING.')(' B-1 IS DITCHED, SUFFERING MAJOR DAMAGE.')(' AIRSPEED:',F7.0,' KPH.'/' ALTITUDE:',F7.0,' METERS.'/'  COMPASS:',F4.0/' LATITUDE:',F4.0,A1,5X,'LONGITUDE:',F5.0,A1/'    CLOCK:',I4,':',I2,':',I2/5X,'FUEL:',I4,':',I2,':',I2/' PHOENIX MISSILES LEFT:',I3)(' *** BOMB ARMED ***')(' RADAR:',$)(/' *** INCOMING AIR-TO-AIR MISSILE FROM MIG-'I2' (',I2,') ***'$)(/' *** INCOMING SAM-'I1' FROM THE 'A10' COMPLEX ('I3,') ***'$)(/' *** MIG-',I2,' (OUT OF PHOENIX RANGE) ('I4') ***',$)(/' *** MIG-',I2,' (IN PHOENIX RANGE) ***',$)('  NO RADAR CONTACTS.')(/' ',I2,' BOGEYS ON RADAR.')(' NO BOMB.')(' NO PHOENIX MISSILES LEFT.')(' B-1 OUT OF FUEL AND LOSING ALTITUDE.')(1X,A10,' IN BOMB RANGE.',I5,':',I2,':',I2)(1X,A10,' OUT OF BOMB RANGE.',I5,':',I2,':',I2)(1X,A10,' DEFENSE COMPLEX IN PHOENIX RANGE.'I5':'I2':'I2)(1X,A10,' DEFENSE COMPLEX OUT OF PHOENIX RANGE.'I5':'I2':'I2)(' MIG-'I2' LAUNCHED AN AIR-TO-AIR MISSILE BEFORE IT',1X,'LEFT.')(' A MIG-'I2' HAS TAKEN OFF FROM THE 'A10' COMPLEX.'/I3,' MINUTES AND',I3,' SECONDS TO INTERCEPTION.')(' MIG-',I2,' IN PHOENIX RANGE.')(' MIG-',I2,' FIRING AIR-TO-AIR MISSILE.'/' MIG-',I2,' TURNING OFF AND FLYING OUT OF RANGE.')(' *** NUCLEAR AIRBURST NEAR B-1 ***')(' A SAM-'I1' HAS BEEN LAUNCHED FROM THE 'A10' COMPLEX.'/I4,' SECONDS TO INTERCEPTION.')(' ECM CAUSES SAM-'I1' TO SELF-DESTRUCT.')(' ECM CAUSES AIR-TO-AIR MISSILE FIRED BY MIG-'I2' TO LOSE LOCK-ON.')(' MIG-'I2' LOSES B-1 ON RADAR DUE TO ECM.'/' MIG-'I2' RETURNING TO 'A10' BASE COMPLEX.')(' B-1 LOSES SAM-',I1,' IN EVASIVE ACTION.')(' B-1 LOSES AIR-TO-AIR MISSILE FIRED BY MIG-'I2,' IN EVASIVE ACTION.')(' FUEL LOSS DUE TO DAMAGE FROM AIRBURST.')(' ENGINE DAMAGE DUE TO AIRBURST.')(' ALTITUDE LOSS DUE TO AIRBURST VORTEX.')(' B-1 EXPLODES IN A NUCLEAR FIREBALL.')(' PHOENIX MISSILE FIRED AT ',A10,' COMPLEX.'/1X,A10,' DEFENSE COMPLEX DESTROYED.')(1X,A10,' COMPLEX ALREADY DESTROYED.  FIRING ABORTED.')(1X,A10,' COMPLEX OUT OF RANGE.  FIRING ABORTED.')(' B-1 ALTITUDE IS',F6.1,' METERS.  PULL UP!!!')(' B-1 CRASHES INTO A HILLSIDE.')(' B-1 OUT OF FUEL.')(' CREW SURVIVES.')(' B-1 LANDS SAFELY AT THULE AIRBASE.')(' CREW DIES.')(//' SUMMARY OF MISSION STRIKES:')(1X,A10,' OBLITERATED. (SECONDARY TARGET)')(1X,A10,' OBLITERATED. (PRIMARY TARGET)')(I3,' DEFENSE COMPLEXES DESTROYED.')(//' DO YOU WANT TO GO AGAIN? ',$)(//' EVERYTHING SOMEDAY WILL BE GONE EXCEPT SILENCE,'/' EARTH WILL BE QUIET AGAIN,'/' SEAS FROM CLOUDS WILL WASH OFF THE ASHES OF VIOLENCE,'/' LEFT AS THE MEMORY OF MEN,'/' THERE WILL BE NO SURVIVOR MY FRIEND.'//)_P 0!y!v@YLf3 y~h 3M yLf3!\RwLf3sLf Lf3 f35rN#n9Lf3 ` 3MR:ZjDSK  SEQINB1.DAT    + -<> <E, <, 1T T1 Dv <,= p DS r D@dx $ DG $ D <,@d0 <, < ,
" $@h2 <!, ( <$,
.$8&

 <', <*,
" $ <+, ( <.,
.$8&<,3 H @@i1UD04v <,3 
!$. <7, <9, <<,
 2d(+*/$ D(7 x+Z <C, <F,
@d] <I,, <L, <O,
 2 a3F+4 b3FOf]3DWOf]6 ]+8 <Q,," $ <T, <W,
6 ]+? <X, ( <[,
.$8&96 ]+C <],, <`,, <c, <f,
@d] 2 a3F+J b3FOf]3DWOf] <g, <j,
6 ]+P <l,," $6 ]+U <o, ( <r,
 <s, <v,
.$8&Q6 ]+Z <x,, D uDu JDJ@dS DH@dj@f. FR <,3 z z @G @ <{, <~,
 <,3S@ @g <,t @i <,w @h <,3 @ @1 <, 1( <,
 1 

 ` Hl <,Y j z @0@w@( U0 FU g0 Fg D[ <, <,
,T&aFT <,3 	@@ @\ <

,3  $( \$&.. Fg 
-
TfF Fw DK&& Fh"h$$.w&$ Dh"h$("h$&.w. Fv  F <, <,
 <, <,
 rZDu u ^3F2+	*d	 <,,+	 u1D+	./$4D

J5d"$.u4D

5d

"$.u4DW5d

"$.u4D5d"$.u4D
~5d"$.u4D
P5d
c"$.u4$	R4D
=+
L <,	 <,
6d2+	2 . D2 2 D. D2 <,, u D1@du" $ >. H1 
~
R JT
T1 Hl <,Y @0 
T
 1i0 H`3hm+	D!* J` `2(m+	G!(} H` <
,( @`2`2+	L 02(1+	L H1 Du.$8&	86Du+	g <, <",
$#D$D+ <),
" $ Du u )3D2+	c:u8&	W" $ Du u L3D2+	g:u8&	\ 22D]+
;$D2@dKD)+	j"u`FKF) &"F2+	ju>FK ~F)&F2 <	,3Y @0 T 1i0 D13dm+	}!& F1 12$m+
!$} D1 <,( @`"11$ Dl <,Y 0 D1 `3$o+
	 0 F1"Ti 1 F15&
"h`!$lK D1!(') HTT1 Dl <,Y @K"1K D13dm+
!& F1 12$m+
!$} D1 <,( @U X D7dT+
 ` D"Kw$4 D 20D+
% <+, u( <.,
0D+
) <1, u( <4,
0D+
, <7, <:,
 <<, <?,
jg 0Tf F F1&& F0"0$$.1&$ D1"0$("1$&..F1 <B, <E,
+G,,+
{ <J,	 <N,
!&a0!$D DHd5d
H <P,, <S, <V,
+
? g.DH,<Y,,@dj@dS+
6D2+
V <d,, <g, <j,
#2D D"2dg3dS+
["Sfg6$g+
] SDg <,t @i <,w @ <k,, $ D +
6d+
j <s,, <v, <y,
 ^2d+
n <{, <~,
 D+
{!$H3$+
r <,, D+
{ G4D
w5d
y <, <,
+
{ <, <
,
+
{ <, <,
$\D$3D+t@( <,,+[Od) <,3ut@w <,,+
{7 [+

} <,, <, <,
 23Di+ <,,@dK+ < ,,OdK $
D($D+&, <),
" $ Du u L3D2+E:u8& <+,,f <,3@ @u" $ D .u D3d+(".h  g 
j2*+, 
j.*
2j+43(G+C3h8+/6j8+J:8&$4<.,,$7D$D+
"&.F( <{,32`q+9@fG+T <;,  <>,
"&.F(]<z,32`t+9@f8 <y,3sp@U j2hg Fj <@,, $ D  D+

} <C,, $,D $,D+
"u$1DuquP)3D2+i:u8&bV<M,, $ D  D+
$uD$RDW2D2+ F03f+| <X,( <[,
$\D$uD+,
	<x,3&	d0gDl <w,Y 	   @ @  u D0Od[ <v,3@ @U <u,3@ @g@dK+
 W2D2+

 <h,,+!$H2$G+

 <k,,+$!D$ D+'R FTT1 Dl <t,Y @0 T 1i0 D`3dm+

(!& F` `2$m+

*!$} D` <s,( @`"Ti 1 D14d

0 SF` F`"10 H13hm+

5!$ D1 12$m+

7!$} D1 <r,( FU X D7dT+

< ` D"0w$4 D \ F^5$

A ^ F^"f!$aT D2 <q, <t,
6 K+

G <|,,@$"D $ D+
j2j+

Q 
j.*
2*:
23hG:
23h8:
23h8+

U6J8:
2.$8&

Mf2 <q,3@ @ @ " $ g 
j2j+

d 
j.*
3*+

d j.(
/g/  H5(

b@j <, <,
 G3(g+

l G/g/  H5(

i@j <, ( <
,
 83(g+

r 8/g/  H5(

p@j<<,
 82(g+

w7H8+

w <, <,
.$8&

[6d2+

z <,,4d
+,,+$ D  $ D+

/$.Di$Df<p,3dD$D.g.dg H0F3dH+\$(.g. H@f2 g2&w+
T
>
G3* 
JG3hG+
T
>
G2j 
JG3fw+
T
>jG3&w+ 
G3*n+7 [+

R
"`. H02h+

 <*,
@,"L2+( <0,
@h2.$8&u u"
~
R
">. H02d+

u(

 <6,
U,"L+u( <<,
@h0u6Hj+6H8+
+u02dJ+

GL~

^,

> <o,Y

 <n,32`+ 0J Dl <m,Y @ <l,3  	 @ @1 1.g D 8 <k,3 p  8.$dD D jOdj <j,3 	@ @ @ $

1&, L1"1$$.D1 <C,

u(

 <F,
 u 82(g+Ohj <I, <L,
 u j2(g+ <N, <Q,
@h8Ohj u7Dj+ u"(
.g3(j+:2@hj <i,3q @UOhj <S,, u6HG+) 03hJ2d+0

^,

> <h,Y

 <g,32`+0 0J Hl <f,Y @ <e,3 H 	 @ @1 1.g HGOhj <d,3@ @ @3 <V, u( <Y,
 u G2hg+0 <[,,:2 <c,3q @g@hG6 \+T u7HG+<"
GJ
^*
( <b,32`+< <^, <a,
@hG <a,3ot@g u7Hj+G j2(g+G 
(J <`,32`+G <c, <f,
 <_,3ut@U@hj u7H8+T 8.(2/gh!*R
(
 <^,32`+T <g, u( <j,
@h8 Hj <],3ut@U6 )+w T>!*H
 <\,3!(r8hG3(n+ H <[,3S @g <Z,t @i <Y,w @ u7HG+k 
wJ <X,32`+k <m, <p,
 <W,3ut@g@hG u7Hj+w j2(g+w"
GJ
^*
w <V,32`+w <q, <t,
C<U,3sw@U@hj:u8&o D26 K+!$d2 <T,3 22d+$ <S,3!$2d+ <R,32d+ D2 <Q,33`t+	!$ D2 <P,3"2$"g.whdgD Dw w&( Hh"
h$*.
w&* Jh"h$."

h$,.

w.

Lv<v,,+&<O,3op@T<y,,+& <N,3 h@G G D <|,,3$n++& <,,+:u8&|"R".i D1 RR .. Fl <M,Y @0 10 D13dm+2!& F1 12$m+4!$} D1 <L,( @` Ri". D15$:"f`#`2&o+= 03&n+ g2&w+7 j+A *2JS+
 u   H@h > H2 
> J> H> ~ H2 
~ J~ H~(w/ u(

0ww(w u L F2  
 L JL F L 3 F2 
 3 J3 F 3 G F2 
 G JG F G/(h <K,3 @ @2".& $ D .2 D3$+i (/.h 7Dj+l:8&e  j F2 u 
 j Jj

(j L j F(j 8 F2

 8 L8

(8 L 8 F(8 $ F2

 $ L$

($ L $ F($"

(~

"(>. F0",.L"*.J(u Fl <J,Y

,p<I,3	 @ @ +
,
+: <, u( <,
+: G&H <H,32`+ <, <,
+,,+ <,,+

 <G,32`v+ <,,+ <,,+ < ,, <#,,". D26 [+% 03H1+% <&, 0( <),
6 [+* 02H1+* <+, 1( <.,
4d- </, <2,
@fx <4,, <7, <:,
 2 a3F+4 b3FOfx3DWOfx  F" $@f8 FG Fj@f.$8(7" $@h2.$8&;7 x+ <F,32 t+A <E,W <;,, <E,W <E,

xvxvxvxvxlxvx1xlxvxvxvxvxvxvxvxvxvxvxvxgxgxvxvxvxvxvxvxvxvxvxvxvxlxvx0xvxvxvxvxlxvx0xvxvx1x`xlxvxvxlxvxvxvxvxvxvxvxvxvxvxgxgx1xlxlx1xlxvx`xlxvxvxvxlxvxgxgxvxvxvxvxvp1TP~x^y^zXM$XN0 f(`(XM$XN0 w(>(~POi@0`XO(T(-((u(^(J(((w(U(g$(XGP(T(-($((uXGoXGt(2XGtXw()XGw0 fXGxXGyXGt(2XM$2XG~XGw0 wXw(LXGxXG
(GXG

0fXG(iXG$\$$XG(2@!XG P:!(2XG:XG=(.XGCXG(2XGF0f((U(XGF0w((U(XGI((U(XGM
(0(`(1XGW$0$1$1XGZP:!(1(1(0XG^XG:(1(1(0XGfXGjP:!(2XGmXG:(2XGpP:!(XGrXG:(XGu(^XGyXG~(XG(XG(XG	XGXGXG(2XGXGXGXGw(2XGXG!XG&	XG/XG3$3XG;$$XGBXGFXGHXGw(2XGKXGNXGt(2XGT0fXGW0fXG[XGt(2XG`XGdXGhXGl(2(G(`((^(U($\$$$h$h$v$(XGXGXG$$$XG

$30 w$XG$$$XG$$XGXG$2XG"XG$XG'XG+00f$\$$XG00 f$\$$XG500w$\$$XG;0 w$\$$XGA$$XGH
$X$00w$1$1XGR$$XGV	$$$$XGXGc	$30w$1XGXGl$3XGq$$XGx	$$$$0wXG$3XG$$XGfXGK0fXGO$2XGSXGt(2XGW	`Z(X^. >S.~(3~+B	~+MZ. \x <x*<x .ez+I!"	b+  "J	b+Z. h+ggM?}
&O	b+>,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1,>DO@+XgR~@1,>D@@,>,>@6 w+e"0B+`!"A`X#p5@]/#p!"X#p+e\p+ea.9'1,>D,>,>O@+e,>
6+ _4`m"`Q@,> <,,^,> <,
,^*bj+x,> <,,^7@+s,> <,
,^+u,> <,
,^Z5"x,> <,
,^,7@,

,> <,,^,,> <",,^,> <%,
,^(@qd1@,,

1@#+0@*+x,><',,^+x,^,^,^,~('eTypeGtohContinue,Xto Exit,TTotrace.'/2H*,$)(A1)(1H@14A5/)(1HA5,1X,O6)PAUSESTOP.pXpXppjpDXX~pxC~01,>D#p2`7+54@4+ "`7 @9,> <:,Y,^p+  @9,> <:,>,^7!p8,~ 8,~+PO0:@,~ 0 9~j Y~jx9ACOS OF ARG > 1.0 IN MAGNITUDECR

h#p+[  ,~>attempt to take SQRT of negative argG?@1,>D p+ +xg&t@1,>D p+ +xG?1,>D p+xg&p1,>D p B#`3b
D3b+%"(D?d$7"@($)B

7 ,~_k*}43"_aLmLsm=i!v@!\Rw 9~j 0S2`1,>DZ.O@$,~Y<1,>DZ.@@$,~i&lP1,>D D1 F1	b	&"j0 D2&" D2S Ao-&. "B 2-&.[p(F{5F#[w0F+,+% ph& `f~+, "B 2&"t D2-&. "B 2&$2 $D 1 1,~ 1 1,~&" "B $D+ep1,>D ;%<)(B~.d``.  @<[BGQ @>,~%hg&(71,>D pd `1@ A @<,~g6(71,>D < Ap,~EY\FQ<X\G*+