File RANJMS.SV (save files (Executable program)

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

??2CBP
>$	D(TYDI$,DW\ML0&L!+:$ADW\YM$WHX>L+8.D?H< BLO4W"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"B"BBB(ABC8!I]> -)IZ8!H> -)I-][I-]Y8 HXI-\I-]\8AHXH> ,",!C&BP?3<=BMBJBJCFB B CTCOB BMBJC?B(CTCOB)B B=B BMBJC?B(B)B B=B BG=9UUC:B0AGB0DCWCX	<B%YXI:XAI;XBI<XCI=]
-/:MY(F:BI?!/I 8!YYI-]YIY8AYYIYI!> *DH%X$X>D8D8F>X*&I^9D<XI
Y^I^=H*!I ?H*U*$I!?*UI^Y[I[8AY]8 I[Y\>D8F8F>X+BI^9D<XI
Y^I^=H*=I ?H*1+I!?*1I^YYIY8AYZI[8!IY>(*P8 0!0&0!+M:I"]\I.][X-\<BY&I&8J8HY%I%8J8HY$I$8J8HY/WH$8AX$H$> ,"K;YWIW8AYWMW0&0!+3H&> +.H%X$,"C;BMBJCJCCJD]*I[-+DEIA	I(X,I$A	I(X-I%A	I(X.I&A	I(X/JY]*IY-+DZIA	I(X4I$A	I(X5I%A	I(X6I&A	I(X7J.]*MY-+D/IA	I(YBI$A	I(YCI%A	I
YDI&A	I(YE8 HXKF]*H-+EGIA	I(YJI$A	I(YKI%A	I(YLI&A	I(YMK[]*L-+E\IA	I(YRI$A	I(YSI%A	I(YTI&A	I(YUI,YWMW0&0!+0:AIWYWMWIX> +.>D?<B(O%- NOT FOUND<(-3X I1XP%&-3<XI I
PP=*NXQ9P8DPQ*TXQ2IHQ8 DPHQ\P2A.DD=H I^9I]<X*+I\9PI <PR . H[%[H\%[%- DOES NOT EXIST:%-ILLEGAL SYNTAX%Z2II=XNIYXP\NPP+K2A-XD4LMIW<(+QIV<(+]I;<(+ IU/PLM%T+QLMIS<(+QIR%T+ H!> HU>(-3I	HOXZ;VX^K?%Q9F8FA"LZ\Z2AH IP<(%)X -OM9IN$6XTI?XM0Y*EI00\XU0ZIMXNLN<(*UHU>(,
PN*M.HU\MHMIL?H*EK-3K\M\M-K=+*<=3*^<A+Z<C+R<B+R=%+R>*E=1*E=D*9=6+7==*<.IJ*WII$6HUIH$6KLN> *B2I: ]G0!+H-FIEXU.ID$6/KICXU;X2I]12A.*
HMIB>(+*IQPT$6: XTHMXPLP$6: HM*DPT+AIQ+IYPT+3IQ$6XTHU$6/.K\MI?XNLN<(+	$6+;CPCTCRB:8!JE>(*72I:AM0X*M/X+MAX"];2A2J%0KH"J/> *)J0X(J1X	J2X&^3^4J5^6X"X)..OS8D?H(Q..GFVA<?"EB$CF+BD8%?HKCXKBXA:AXH(\H*AH7X\"1H6$S/EOL<(,?SSL+M??XPHP8J8J8J]HP]/S><(/]H==HIHH<6/]HUSH
SHWSHX>(/	H;]HXS/	I680!+80&:H:[7/6,4%0BAD
(AH3XOL4X!H!%JPOLO$Y<(J\JZP!*KJ9F8FH(2J$RC\P+9H(2J$RD\A+9H3XO$ZM88D8 ?P%J[[2.LO[1;XLO[0K18D?X+YK02> +Y%: K09DK18D?X+HK0H<+XK0X!K18!H19X[0.;Z[1K008!H!=H/[0.T4*0%0FHK(A: 2I\=,.S*/%%0HH??[(A/%$V!AF+9K0$YK2[2/.$>SAVE ERROR%+$> NOT FOUND$>TOO FEW ARGSF08 A3>(.
H.X[$>BAD CORE IMAGEM88H:HR?X. 2J$RIH=XR. F:]8%&2J$RK2A.-$>NO!!L!]TH&>(%OK8A[]HV]UHV[-LM\NSL+E/J=MF,W*+UK]
+0!+Q/T?/O)[\S)O)[[	-AD+%K[7K][]S)+M2J	,G<D<?2?>G?:O0L\L!LRLLLALXPC9J8J8JC?8A9H/7
"C*CI^JR< <BJT8!JC< <BZCI^8AY^<H?R<HPC"W<B*WI^J&< <BJ(8!JW< <BZWI^8AY^<H?Q<HPV",<B<B*,I^J=< <BJ;8!J,< <BZ,I^8AY^<HP*<H?PB<B<B<B+BI^KS< <BKQ8!KB< <B[BI^8AY^<HP?<H?OX<B<B<B+XI^K)< <BK	8!KX< <B[XI^8AY^<HQU<H?N.<B<B<B+.I^K?< <BK=8!K.< <B[.I^8AY^<HQ+<H?M8"B*BI
JQ< <BJB8!JS< <BZBI^8AY^<H?L<HRB"V<B*VI^J%< <BJ	8!JV< <BZVI^8AY^<H?K<HRU"+<B<B*+I^J<< <BJ+8!J:< <BZ+I^8AY^<HR)<H?JA<B<B<B+AI^KR< <BKA8!KP< <B[AI^8AY^<HR><H?IX<B<B<B<B+XI^K)< <BKX8!K	< <B[XI^8AY^<HST<H?H.<B<B<B+.I^K?< <BK.8!K=< <B[.I^8AY^<HS+<H?GJE\-JF\S,S

$,I^J[< <BL,H,< <B\,I^8AY^JY\,JZ\T,T- $+?FI^J3< <BL+H+< <B\+I^8AY^J1^4J2\U,U-!$*?E?<I^KK< <BL*H*< <B\*I^8AY^KI
LKJ\V,V-"$)?D?8I^K< <BL)H)< <B\)I^8AY^K!
$K"\W,W-$(?C?0I^JS< <BL(H(< <B\(I^8AY^JQ^TJR\X,X-$$	?B? I^J+< <BL	H	< <B\	I^8AY^J)^,J*\Y,Y-%$&?A?I^KC< <BL&H&< <B\&I^8AY^KA
DKB\Z,Z-&$%?>I^K[< <BL%H%< <B\%I^8AY^KY
\KZ\[,[-	$$>?<I^K3< <BL$H$< <B\$I^8AY^K1
4K2\\,\-($>>8I^JS< <BLH< <B\I^8AY^JQ^TJR\],]-)$">=0?>EAI^J+< <BL"H"< <B\"I^8AY^J)^,J*\
,
-*$^>< A?=DFI^KC< <BL^H^< <B\^I^8AY^KA
DKB\","-+$]>;PA?<RKI^K[< <BL]H]< <B\]I^8AY^KY
\KZ\,-,$\>:HA?;TEI^K3< <BL\H\< <B\\I^8AY^K1
4K2\$,$--$[>9DAW:?3RK8MRKBN$K?7CARD8EI^JS< <BL[H[< <B\[I^8AY^JQ^TJR\%,%-.$Z>8BANOTFUNI^J+< <BLZHZ< <B\ZI^8AY^J)^,J*\&,&-/$Y>7AADX8MBBI^KC< <BLYHY< <B\YI^8AY^KA
DKB\	,	-0$X>6!TDCOPYI^K[< <BLXHX< <B\XI^8AY^KY
\KZ\(,(-1$W>5QRFMUDSI^K3< <BLWHW< <B\WI^8AY^K1
4K2\),)-2$V>4I;$HOX*MLX,H"X%H!8!* I^JS< <BLVHV< <B\VI^8AY^JQ^TJR\*,*-3$U>3E$K?7RKI^J+< <BLUHU< <B\UI^8AY^J)^,J*\+,+-4$T>2C$K?3RKI^KC< <BLTHT< <B\TI^8AY^KA\TKB\,,,-5$S>1BN$K?=VTI^K[< <BLSHS< <B\SI^8AY^KY\SKZ\-,--6$R>0BN$K?/PII^K8< <BLRHR< <B\RK98A[9K9K:> /
[9K70&0!+3/6"BG>/J?4EPICSV?/LIB8RL??MTRPTC?=DX8MODSV?
INSTR1SV?/INSTR2SV?/JMPJMSSV?/JMPJMTSV?/EADDRSV?/RANDTSSV?/EXCHEKSV?/MEMADDSV?/EA8ESV?/MEXTSSV?/CHK4KSV?/KL8TSTSV?/RANTADSV?/RANISZSV?/RANDCASV?/]BDSBN$K?<;$HOX*MLX,H"X%H!8!* BC:Y^*CI^< <BI^8AY^*K<BI^IK< <BI^8AY^*U<B<BI^IL< <BI^8AY^* <B<B<BI^IM< <BI^8AY^*
<B<B<B<BI^IN< <BI^8AY^*9<B<B<B<B<BI^IO< <BI^8AY^+G<B<B<B<B<B<BI^IP< <BI^8AY^+V<B<B<B<B<B<B<BI^IQ< <BI^8AY^+&<B<B<B<B<B<B<B<BI^IR< <BI^8AY^+7<B<B<B<B<B<B<B<B<BI^IS< <BI^8AY^88*AI^IT< <BI^8AY^*J<BI^IU< <BI^8AY^*T<B<BI^IV< <BI^8AY^*
<B<B<BI^IW< <BI^8AY^*+<B<B<B<BI^IX< <BI^8AY^*8<B<B<B<B<BI^IY< <BI^8AY^+F<B<B<B<B<B<BI^IZ< <BI^8AY^+U<B<B<B<B<B<B<BI^I[< <BI^8AY^+%<B<B<B<B<B<B<B<BI^I\< <BI^8AY^+6<B<B<B<B<B<B<B<B<BI^I]< <BI^8AY^888JE\-JF\R,-,R,.I^J^< <BI^8AY^J\\,J]\S,,,S,/?,I^J.< <BI^8AY^
,\+J-\T,+,T.0?+I^J>< <BI^8AY^J<\*J=\U,*,U,1?*I^KN< <BI^8AY^KL\)KM\V,),V,2?)I^K^< <BI^8AY^K\\(K]\W,(,W,3?(I^K.< <BI^8AY^K,\	K-\X,	,X,4?	I^K>< <BI^8AY^K<\&K=\Y,&,Y,5?&I^JN< <BI^8AY^JL\%JM\Z,%,Z,6?%I^J^< <BI^8AY^J\\$J]\[,$,[,7?$I^J.< <BI^8AY^J,\J-\\,,\,8?I^J
< <BI^8AY^J<\"J=\],",],9?"I^KN< <BI^8AY^KL\
KM\^,
,^,:?!I^K^< <BI^8AY^K\\RK]\-,R,-,;? I^K.< <BI^8AY^K,\SK-\,,S,,,<?
I^K>< <BI^8AY^K<\TK=\+,T,+,=?^I^JN< <BI^8AY^JL\UJM\*,U,*,>?]I^J^< <BI^8AY^J\\VJ]\),V,)-B?\I^J.< <BI^8AY^J,\WJ-\(,W,(-C?[I^J>< <BI^8AY^J<\XJ=\	,X,	-D?ZI^KN< <BI^8AY^KL\YKM\&,Y,&-E?YI^K^< <BI^8AY^K\\ZK]\%,Z,%-F?XI^K.< <BI^8AY^K,\[K-\$,[,$-G?WI^K>< <BI^8AY^K
\\K=\,\,-H?VI^JN< <BI^8AY^JL\]JM\",],"-I?UI^J^< <BI^8AY^J\\^J]\
,^,
-J?TI^J(< <BI^8AY^.)?SPB>G:H.X[$>SYSTEM ERRH+?4OL=L?9?C+JB>G+:2CO7N DBBC%0FHK>H(&\%(A??2C,(HA\H()B0B >E 
PP8FCFB$BJBMC^C\8A68H?CODCE4O%EWCN9<D><C<B<ANP<EVBG?/?4?2[?1?0?.?=?%N5H?$IJC8HAF-M\SVF	N<HG5NHF]N-F<G1JB=K$C4G?KE>G8A? B.D??:?&<??6?>=RB = \.=X\X]X^X
I?X$: X%XLKI><(*JI=<HLKX+H+I<<(*4I;9I:>P*!I9H+9PI8>P*9HI7?*PH9HH$X H+A6<X*08F8F8FL \ P*PP%*9P$I5*IH> R. H\WH]WH^WH
>(.=I4!H
W.=WSO<H:OO< +L0!+T,[X+H+8J8J8J!H+!/WA6<(/!I3=HI2I=$S/!+/0!+-0&:I1[,/+O?LLK<(/7%0BAD,(AQE;P"\OIC[JSI?OIC9J8JKJ8J8JCSI80Y*;0\C2K>> *;2C.[>9O2LJY[ANBQK;Z08HNR=H+9BG8 [=NR[INB3>(<X*TK10&0Y*60Z*TS=.\J0> RR2K.0V0Q+EC /C ;KJZ"\
I[C8F8FC OI
IKJ8J8J8HC KCSI<
I*P9TJ0>(+,0LZ0R0+.K0[J+6K<[JBZC^A?0I+)0J[<KJ/;X*?2A?=33
B?=G5<REK 0\K?>(0Y+S2C/7RERERERERERERED;&ZBJE8 KLZ%;ZJ%Z)2LJN[9JPZDZEJG HJDZDJ%C>Z)J%8H>XK;ZPNDC<J)Z)NDNDRDC78!ZFNDRD7$ND9JPZA<XR)ZC7"JFK >(JXJC9JJ)7&JA77!*H7%9D< +&JFJX<P+6ZFJA8 B> 9XRA+G+FC=>(+27"9V7"7!+,7"7%> +/;$RB**+8RD>RD2K.D20 8HBF==2KP0CPHHH ?H+XK
I?M(/J%4OVERFLOW-*I&%)4	;PQK:	9	8/7;M9F8F8F/):X9J8J8J/..:JHU5T(,!B1?N.? D<?0",G[1K1	?[0	>.<(*EK=> /<	>.<(*BK=<(*L=+SK;[-	>W*+UK]
+0!+Q/T?/O)[\S)O)[[	-AD+%K[7K][]S)+M2J	,G<D<?2?>G?:O0L\L!LRLLLALXPC9J8J8JC?8A9H/7

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