File ROCKET.SV (save files (Executable program)

Directory of image this file is from
This file as a plain text file

?>2C8H$MH8B0APP]HMH]LVXFT!P]HHX!T
(!0O0ADP6TD0ADPP7TF0AD P8TH0AD0P9TI0AEPLTK(!&^0AHPWTIPXTDPYTHPZTF(!&$<!PFHVT!PHHHT"PFHVT)PSHOLIXMH)">^H\!T]0\0PVT^(!.,0 PPMHIT!PSHO\!XCLVT0  PHHIT!PSHOT"PHT)PO\H)>^H"\!*T]0 %P	T^(!.,0 0PEX
(	-P(!,,0E0PNTMPPTO0HP=APQD=N<J<PPF<J<PPRHH<J<PPKXI<J<P=1PQ<K=!0H =A<ITS0H%PUTT0H	PV<CXS(	]0H(PITWPDTXPHTYPFTZ=A=1PR<K< =!(!&;0H0PEXS(%+50H5PEXS(&(I0IP[XS(%	50IPP\XS(	(I0I =A=1PS<K<P<P<P<PPQ<K=!0I0=A<ITS(!	]0LPPKXIDNDE(	)E0L PNXT(%&$0L0PTT]PSH]KDINO CRAFT
DAMAGE.]])F^%%CV F?$NU2 F5%H&CRAFT DAMAGE0 =A< < =1PA<K< < =!05=A=1PB<K< =!0A=A=1PC<K< =!0AP=A=1PD<K< =!0AU=A=1PE<K< =!0AW=A=1PF<K< < =!0A =A=1PG<K< =!0A0=A=1PH<K< =!0B=A=1PI<K< =!0BP=A< =1PJ<K< =!0D=A=1PK<K< < < =!0DP=A=1PL<K<PPM<K<PPN<K<PPO<K<PPP<K< =!0
 PETDPGTFPCTHPJTIPLTK0E0PNTMPPTO0HP=APQD=N<J<PPF<J<PPRHH<J<PPKXI<J<P=1PQ<K=!0H =A<ITS0H%PUTT0H	PV<CXS(	]0H(PITWPDTXPHTYPFTZ=A=1PR<K< =!(!&;0H0PEXS(%+50H5PEXS(&(I0IP[XS(%	50IPP\XS(	(I0I =A=1PS<K<P<P<P<PPQ<K=!0I0=A<ITS(!	]0LPPKXIDNDE(	)E0L PNXT(%&$0L0PTT]PS
]KDI(	(	0MPKXILST]0MPPCT^(!.,0M PEX
(	-P0M0PEXH(	(?0M5PEX (%-10NPCT^(!,,0PP=A=1PT<K=!PD<J=1PU<K< =!0P PH<CT!PHHHT"PFHVHM">^!LMT]0P0P]HMHTH0QP]DTD0TP=A=1PV<K=!PD<J=1PU<K< =!0TQPHHRT0TT=A=1PW<K=!P<J=1PX<K< =!0T =A=1PY<K=!PKXI<J=1PZ<K< =!0T0PCX("*.0U=A=1P[<K< =!(!+50UPPUX("*>0UR=A=1P\<K< =!(!+
0U P$X("+N0U"=A=1P]<K< =!(!+50U0P%X("+^0U2=A=1P^<K< =!(!+50V=A=1P
<K< =!0VE=A=1P <K=!P&H<J=1P!<K< =!0VP=A< < =1P"<K=!0VR=A=1H=!PCTPC=1P=!=
T=!0VS=1PD$=!(&%+=1PD%=!(&1K=1PD&=!(&050VU=A< =1P	<K< =!(!1W0XP]DTD0XPP]XTTT0X PSH]XITI0X0P
TF0YP TH0YPPCX^(&(I0Y P	X^(&.^0\PP(X](%).0\ PFHVT!PHHHT"PFHVT)PSHOLIXMH)">^H\!T]0\0PVT^(!.,0 PPMHIT!PSHO\!XCLVT0  PHHIT!PSHOT"PHT)PO\H)>^H"\!*T]0 %P	T^(!.,0 0PEX
(	-P(!,,0!PPEX ("(I0! PEXH(	(I(!-10$PSH]LIT+0$EPEX+(	0!0$PP]HMHT!P+<CT"PVTP+<>LVX"T)P	TP+<>L	X)T-P,TP+<>L,X-T/P.TP+<>L.X/HO!T 0$ P]HMH]LVXFT!P]HHX!T"P]HOT)PV\+T-PVTP+<>L0-T/P	TP+<>L1/T2P,TP+<>L32T4P.TP+<>L54H)"T
0$0PCX^(&(-0%PVX^(&,,0%PP	X^(&.V0AP]HMHT 0APP]HMH]LVXFT!P]HHX!T
(!0O0ADP6TD0ADPP7TF0AD P8TH0AD0P9TI0AEPLTK(!&^0AHPWTIPXTDPYTHPZTF(!&$<!?NYOU MAY SET THE FUEL RATE (K) TO ZERO OR ANY VALUE?NBETWEEN 8 AND 200 LBS PER SECOND.  A NEGATIVE FUEL?QESTIMATED FREE FALL IMPACT TIME IS 120 SECONDS. ?SIS -2, IN WHICH CASE THE CUR
ENT POSITION IS  ?TRATE WILL ABORT THE LANDING, UNLESS THE RATE?YTRY AGAIN? (Y,N,RESTART, OR LOW WINDOW) ?YIN FACT YOU BLASTED A NEW LUNAR CRATER  ?ZCRAFT DAMAGE -- BETTER LUCK NEXT TIME.?\SAVED FOR LATER RECALL UPON RESTART.?]VERY GOOD LANDING, NOT PERFE
T YET. ?]SORRY, BUT THERE WERE NO SURVIVORS. ?]PERFECT LANDING!  CONGRATULATIONS!! ? A FAIR LANDING, NO CRAFT DAMAGE.?"FIRST RADAR CHECK COMING UP...?"CONTROL CALLING LUNAR MODULE..?CAPSULE WEIGHT IS 32,500 LBS. ?%YOU HAVE 16000 LBS OF FUEL. ?)BEGIN LANDI
G PROCEDURE ?-SAVED YOUR POSITION ?-IMPACT VELOCITY OF  ?1ON THE MOON AT  ?3VELOCITY(MPH) ?4NOT POSSIBLE?4FUEL OUT AT ?5 FEET DEEP. ?5CONTROL OUT ?6TIME(SECS)?6HEIGHT(MI)?6FUEL LEFT ?7FUEL(LBS) ?7FUEL RATE ?:M.P.H.?;SECS. ?<LBS.??Y ??R ??L ??K 1Y2I>86*2I?
2C2I?N2]2I?N3(2I?T3P2I?S4=2I?\7J2I?%272I?Q6:2I?6Z2I?"7Y2I?)8)2I?68/2I?68E2I?38;2I?79A2I?79X2I??7&2I?-8M2I?48T2I?49K2I?;7<2I?1712I?-9G2I?:852I?69O2I?<562I?]5P2I?]6I2I? 4)2I?Z52I?]4T2I?Y8[2I?53?2I?Y1>2I?89R2I??9T2I??9V2I??8"2I?5APG^O
/POPGP?7PX$7A\3L2PL\HDTBPDPHYEYF^??Q11BX?9T^.D?<Y&Y&CPCTCXDXETE^HQ BSC0$?>PFLOORDP"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"
*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M"0*M<H**K?XHK>XI2I\H\H\H2A2J	=HLI<(*
ZV:A2J	<B	;JV8A2I\H2A*N:A2J	<B9G*(J8A2I\H2IO:2A
92J	<I/8878;8?9CBRTSSVBASICAFBASICSFBASICFFBASICUFO7C
9H8J< /K2AK08F8DC
K*[Y2AO.8[YK[
.8O.<K!K/> +*KY
.S0+R2A: K0/K9!LA>P7ZO?0>O7Y??:I:N>G;GB?81>CH(ZF	?\??.S!*P	?\P2ISKO>C=K<2A>(O;K:> +K">(GKUZ2QO(Z29O([GJ
(2QKG
(S(* 2A9VJ
;8AJ
9O9
8SK	7JG?HGO
^OS
ROS *;K6
5K6
4
3/22J	1GA/4K!>("K0
5K/
4/52I;R;Q9Y9Y2I$
2B2B;U?6??K.C^K-[^*6>5O4 BG9DP A2K"G?BC]>E>-19K?W?QM->"=8G8?0>G

Note: Lines longer than 256 characters were wrapped



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search