File MAGSPY.SV (save files (Executable program)

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

}|gpHHt@4c)F)c )bDnbDf)r$+	yP@/$!f)2&*c*9F**4n(?&@?A$!Dn@OAH.b!f .bf"ObP.H@~bfD.QzR*bnb!~ mdmDH//Hdv ('`?Mt
/
	LAP
/
OPDEF TADI 1400 /MUST BE USED WITH LOC ON CURRENT PAGE
/
CNT1,	0
CNT2,	0
CNT3,	0
PNT1,	0
PNT2,	0
PNT3,	0
PNT4,	0
IFLAG,	0
/
/FUNCTION IHELP(IFLAG)
	ENTRY IHELP
IHELP, p{t	@
LI)
lJC&EK^ L01f l$K=% L%0) L)0 L1 1 ,6K L;1E AS0T q0Tu8`Up`gq~@~apRG TADI PNT2 DCA IFLAG /CARRIAGE-RETURN FLAG TAD CNT1 SPA CLA JMP SETUP /START NEW DISPLAY AT LAST FRAME OF PREVIOUS DISPLAY /
/MSPY2.SB, PAGE 2 / HELPER, TAD I HMAXP /CHANGE TO
C`I$=hO@DT  Q0CU0 SAK@P PI68K0 8T8U3N S C`23PN% 1T  QPCIcRF8K0 EPTI D 5 L @A6I3N ~B(tzB ZGMdbhebifbj n"x~ olfD M@ &E8sw {M(/j*kMf~@& C@ E@ C@ E@C / (B
Ox G C@ E@ O@@AzEb(gzB %G+B&BN& NbOO&E})EFb}FG})GHbn|`IHb|J n{H&H zG B@ Byx2 wHBfMkb(^zvw9@j!<BE @.xM@b~H/}"HzB -G|{2 <AMnkEfAH/~"Hz{B 8G|8J A
B y ,@E PQvQx (wrRQbv(XRb .Kkur K tH<M2 s{Mfrq&L yH(~ffb!|f@!.YhbQibRfbJRcM tHQQtRYD]r"M @@J@bjH*@ p?gUp+~x~adn@b&b!.chN
~!}(M Jc`~bK&K!.@d&d!.ehN |{M J@ze"`~dd& KbdL&L yH~~b(~fhL zgL xH w{L vH u{L tH s{g /r|2f(/g@"!YfhQ&f!.|Qc@qrp 'QYD_K"h ,o~rzofN) _ ? ~J.pfb ~{O }I~8N
|sN {Itsbq /!t"r /!f"}(/zs2!qft!.rfb!}fs .ntbn@/ybDxb@~wm&nD.nmb!nb{mbn!.smbDmfnD.nmb!ufn!.v@b!YfiQ&jR&fJ.QZ6ZH/nu"@v{Z@/vX>v(/uv2`u{Zh/tu;Xvb(s{) B*@vH/Z"hzuh/ Z"@zZbs~).}*|bRQtRYD{u2`(zXvb(%zvH/(s"~)zx&fJ. o&fJ.np&Kj"Nfb @zxy"(@zO x@L xI(Izl /P(
d w NW& d@ Dwn:Yv"H~uY&tQ&Ki" YK9Y"sH/rbYqbQKb! rp1dW 
VIpNi2(fK~ KKb!LbHHn Yfg /8})(|bZhR { ,Q KzRh R Q f ($Ry"RZdQ"xQ&Kw"KYdv+uO|Z&R {J Q@ K@tR& R@ Q@ f@ BORBsR&ZFJQr"QKbwK&Y:JvK2qKK!.Lq Jn Yfg /p}9*x'`DfyC0p<pF|Yy|~hR ~ ,Q K } ,Q | ,`2|&K|"KQb{Q&YJzy92hR ~ ,Q
K x ,Q | ,p2"|2&K|"KQbwQ&Y!JzK2vKLv LfK!.L.dKbiU&U uJ d@ Bt8V s ,r ,`x q ,r ,f o f@'/MMa%10~`DfyCp?<V ~K }K bG |K }K f@ p@V {K zK AGR yK zK K@V xK zK GR wK zK L@V vK zK JGR uK zK B@[(V
{ <z <xR y <z <BV { <t <xV { <s <xR r <s <@ zp:B1;aA,z\*QM%V ~K }K Gk /?E"(PzV |K {K GV zK {K E@V yK {K GR xK {K N@V wK {K GR vK {K O@P(V
| <{ < xR
u <{ <AP W B(t{s(/rq2(p{o(/nm2(l{o(/ko2(j{q*wsp @ )Odh62qa4({~(/ .(
z}|2{z"BbH~BMfk(/yx;'PH1~y(nwzf{[&y@/%{"({"H*zyzd[d.5*zD.zybDyf z"w@/vbw!N K@~rw$! l4Phhzal0"HpNba@VBPP& KJ aq@fJ8/z[!^wyxjH7HCd4@;
bbGn(X E L-Uhb "~`}S&.|`U{"UhH!~Vhhdz! f7 4nz`SS&4Phhzal0"0"HNba@VBPP& KJ jz,zaOA, wY,,],,^,]_l@axOR(f.n b5B(|8 T&]*
]-1]6]=V]VV]VV]VV]J, h  Z. ,,+}/m(/=m$`i"+:-9-Em" nf-?-Hlb hInmb!Hnj& nBZzno7 mbmEjmn"Hjb hIk+*g`@ ZPD |&!#%')N.~r@ax (?V, IV C(VzB V R Q) jr&6ML
H& w 1~[<$6}"An8zDb6|R( ~< j rFB{ /Mz /Kf.M K-!,O&,MkM X MUfBtLvx]zLojV7np;rD@ |&!#%')N.~rsvvN] PoxRC `0 &
c d0 c daf>atHf666b& bC n PhbP8b(J . Jhb&.fJ(b8J~&}f}a(]z  PJ |(2z{H/zy" P <X%
<_!lc (%bbcoz n r` gK?#%')N. p@`?M|vOOJb l4c)F)C )bDnbDf)r$+ y \&@/$!f)2& *C*9F**4 l(?&@?A$!Dn@OAH.b!f .bf"ObP.H@~bfD.QzR*bnb!~ mdmDH//Hdv ('`?Mt&c F4nH?! h(D )X 'Nh h
%V G~}w (&00bH ~1d~3 &2>&c|(H#[c* n/c_c)c+c,2bcc-b3f/_J n* ?s){2.n+-'-0BH.rD.b,-'V2bqn3>&D/8DAJDSO@TES OF ITS LOWER LEFT-HAND /CORNER, AND MUST END WITH THE @ CHARACTER. /IF THE X-COORD IS <0, THE ABSOLUTE VALUE IS USED, AND THE LINE IS /DISPLAYED WITH FULL-SIZED CHARACTERS. /IF THE X-C  pT # LI )0)
lJC&EKfL01],$K=%L%0) L) <L1 1 6K_L;1E LI )0)
lJC&EK  Ng^r VGW 31
PA-L20 "&;q"M/g%[q)!s L LLL L L LLLLLL LL LLLL L L L @g}i[.5)b')`&J/)~#`~=nIB\hWKk^ j*)nn=oHRcn aNl~2p?)-7676_7 B*)j).c77c l& C_g L )&/767-6-(6 B*-d-_7%7 )B720-7) l-& K8-7'7B7g)&JK87y2*7d776*@ @p @cN((bG*&(C[*c(]z7 lK <H%abE
H NI|z&l%+fr[2( |N)mBRzb nO`bPwjEOR)@Cz NN&O&PH/&.NNC|DP.PfNU:NP~! )bE;T;JQ C3$Wsf-JC;*SP*.f| MM7.|`SS7/;&SUJSM&SBS)tC _T&2S&/;&W>>
I)e3&Wenu:m 
)QFs l
@ vOy3ww|oryj" Gb l 6 C dbHzxCnbbfC!ccbbc88b:f:.<hV
2<3<44-JWDB()zgbhbf2(UzDLJ) .(/cH/^. dJ"()z[{/i3/s4<>oy" """'"19"CD"LR":Z23f2#Ea33)@3Z4'DBVDD#8DPDU,>UZTU3>UITU_Tf$9fOFf.GfZofw[Gnw&w,Ew>GD]wox&AR wcPp A `K`L?p `D`>cPp``0`` @F+@GC`CX
NTO#PTR8R`1#RN`!X NTO#ZOTR8L T8M`! 8K0S Y@pz `$X NTO # P`6I SAAA)@HTW@8+ 5q+ormRINC@ @ASNS Y@K N0`dx 8O8VC@`` C`2S(I@ D N`1F8E!Yz@R0 N@iHVCz  8S"
Y@`SL PC`2F8Li!0) VCz!KMP@ i NTP`NT(MP N@ C`2B3R@E5D`4` I SE`5-OUHo N CS +AH0HCR O S2X r-NOTIA@ 1 EPK@, u8`O<HE5D38E`
@CS2 N`IF(P`p0LTL@ 0P&`` O4@ @S
Y@o N Cl(P`a N AT(R8 0OMN O XH``TR() pF JPRlIVCz!  EL@! '@$ R FS!*F`
WD1``AABETR(0 z (`E`SUEC  EPM@(`Fr`  `PCAFE",GP`Ie 0(PS` NTLKMP @PN`!*@XS $Y NTP` Cl2P`` W3Nz!PfZ@@ vZCvP@@H wQ*&V`T
`P4CF` c5HK0 NT@T`P4CF` c5H 5B3R T`P4CF` `C`2B3R@F JPRlP``PPC T@`C SB3R0 WD1``AABETR0O ZqaZr!b BI42c`2@TLI58$TR`E EC8@0RMN `Q C`U NA `VN` PCE: (`
NR MNX`@l(` NBRMN`(`@`RMNX`@l( `QRMN``@RsP` XI@WTLK0M@<Q C@NB#``L `NB``USH F8(K0L 0S Y@D@NB#3 `E`S SA N8S $YD NB78 `B3R A N`4 PE6@E`1WTBHS0-5TRI3S Y@DzuZ@5 vl` Vwb@B2FTd F%e@`W:LRIl4  C5 3BR1@2@@ I3`R@`CLD`VI RPA NE)2 I% RXOL11`15A 2HRCTRN`!NB QPCi`PWzLRG#, 1 IDND2@sBR1` INBP9D@1W:L X S TN %CL@N`!IU 2&62`NrB28 `I,3  S(XPWzM  - ` SPI`3($R2R1@2 0zEH `$
XO`2To NOREELS!@ @W:H 1 A S;ZD!T@R@WzL XN3TI3@E;2`*#*Zs `FTV`N 8 O@ PPX(ERR`P 5N@8W:M  - P SPI`2($RR) p@pUMCR@`Q
WN2`5 HT5`R@`CED@`pASRN`!` C`2 Pz6P  ` P` L`@EKLP@D`Q WN2`NECP  C @@pXq N@TO 1PCz`PT CXI@VCz!   3T0uH`PCAF`&`` PC@2TR G@mT`EH`5`AE8K00uH`DT c 5N0T`}~y8B@sDDDD EbZn&
`By`{bY#|d}6CDNfD| ~G&G Fnf Hba,v|.fFM&}" l6}a,JbrB(|b"a@@'<KaA1OzAnM(D|"](yz|b}NdD,4@N8@^ |s (6((C(dKq 4KgVbYh `O!(8X %  <f~'(Bh hD&&DD4( ID lt [ L& CBtTJ[ ,t V&M!. GL ,( >LOjAS1 `Gab(`bHH/!FnnBh|Bzb{Di! YU,@u?|V pI : w756d666L49 GLx9 D0(//# (%x{8# <$~6
& I
' &,!DJ N6&0(Sz& 6&0(]z&< |' 
6& &#kJ &&#wJ A JM)f.c&cc4 ccccUC  4 cmh: mCmL%: - bbb@/*&8j!f(b@7z!bf(nH/?d.f mh b b Azc&b & bmcL /Z" ZzAb0^zX(HJ  'JUb ( u f/ PN(m{@/r/r&!.m+* r@? `PSP|| H/" !($zb J  DHhfi njSh " 6zjSh
"(Yz(/d"(5z(/5 "HYz!bhYzi(\  "i&56*Zh S8B `,*DTij$! h b n vhv(lr (}zv 87W3X
F XcX F> C KE3bapC)pkx1 y?0G@/>"(6zT /a<g& (f0P_G*.bQ.H/{"kG DbhLn`/4"Q Fa<@L};aHQ <V(  !XnhLQ b  b n .be"Q ?f%'?d)%^!!e?$^%?H/a!pb>?T(A?Xo?Foa?$>~?fQ)) ?A~?A3L<xci F`aHr*r@p88pY=&X<vV!`!p@((@@^)A@SiR)
?Qz)!F8#(V)%R)'@"P "-aDh&PHa~
a,* Vf&&B& ( LCC4##bqCcCp@#k#&;=C0BbapC)p*k`L4AD4b*h*a 5 {G niBb&& /`&"H1~&o`f.^&"n&&bD`/5(iWJha, CK`iC&h(!if ##4&&b n 5h&5(iqJb? f%'?d)%^!!e?$^%?H/a!pb>?T(A?Xo?Foa?$>~?fQ)) ?A~?A3L<xci F`aHr*r@p88pY=&X<vV!`!p@((@@^)A@SiR)
?Qz)!F8#(V)%R)'@"P "-Vbhal@e&hPHoabaH * &h5k@
JJ4##bsJcJO@#kOX#<&D=k165a,p0+q0P{?pa9P(czD6bk+hk+Ha@: <>>I(&H1f8&azf_j.f.70:Xa,& JKc]0>lJ&k( ##4lj > n::s f%'?d)%^!!e?$^%?H/a!pb>?T(A?Xo?Foa?$>~?fQ)) ?A~?A3L<xci F`aHr*r@p88pY=&X<vV!`!p@((@@^!A@SiR)
?Qz)!F8#(V)%R)'@"P "- 4cDcKA~A?a XIaBbVn~&!
f !.hyz+bpA(f&4b!bbH!~UUb!bHDzU&UH.H(oUfU!.+UbbSf`bppA!~a,H/!o.A!baa@S`D+QJ"b d2.a, K"fn&aD0&V;64c*h; l**4 n* <*F <R8l;Z. ; T8!f[8a<a/Jb[ * <K !f.SfZ"SB`Hz[haa@ HO8*;aH[ >Izaq@fJ8/zma,au$s8*e]b[mzk2f~&4Vn,&$6 ~ $C$F$$4x; ].bH]d]& <D7.*alG $K@
B<;6al#, !a ] ,jZ [ \ ,j ]_&a@p0P P  jz,zaOA, wY,,],,^,]_l_]b[N_,*RD PHYSICAL DEVICE BLOCKS. /METHOD 3 USES BLOCKS OF ANY SIZE (UP TO 1000 OCTAL WORDS). / /TO DISPLAY A PS/8 BLOCK, TYPE D AND WAIT FOR THE COMMAND DECODER /TO ECHO A STAR (*). AFTER THE S 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