`LMOD !Y 24999-16296 REV.2024 79.11.01@LMOD *<z .MPY .DST .ENTREXEC CLRIOTERM INPUTSNDATSNAP SYSTMRTE NAMR FOPENREIO LOGLUIGET FREADMOVE CMDLNWCLOSE`Jfq( ;`hB "$BdDt)$;``*-06tdt 66+tdt+dT,Adt+d 6tI0 `AJ `T= RTE-L MEMORY/DISC UTILITY VERS 79.11.01 `F$KQ `I TYPE ?? FOR HELP 4`[8QW 4[7ܴt`7ܶtdT,h,}dtܴdD`M SNAP FILE, SYSTEM FILE:<`c!^lts&d t{ 7"tP;4,,h7<`` td,,7涀tdT,,7K;td,,;`bI[dDt$dۆ t dt4 d,ΰ,7 `FBц;  `Aa`Ba6 `Do`C``C >>+* TERM c@TERM `A`B VINPUT )c@-INPUT  3RBUF !c@RBUF  !NSECS c@&NSECS `A`` BASE c@BASE `B`C`A`A`A`D %SNDAT c@+SNDAT  BSNAP c@SNAP  QSYSTM c@3SYSTM  IO c@ɐIO `B`G`BMEME LFOPEN .c@$FOPEN  .ENTRFMPEROPEN <`a0d%D&Dtd'D&Dtd)D&Dtd*D&Dt$( $+ `C-!t$d$`I;K% OPENF  MFREAD 0c@FREAD  .ENTRFMPERREADF;`a5Bd&D'Dtd(D'Dtd)D'Dt$*+d+t%,",# `D!d/t%d% `Ea& `D:,READF  lCMDLN Ic@CMDLN <.ENTREXEC TERM RBUF BASE PARSEUPDATSYMBLSTABLCLISTDLIST DMODF SETIO FWORD SECTS MEMRYMDUMPSETBATRACE/CALC DVT IFT ID ;`c10d)D,T- ,%,&,d)D,T),0,32,#:`^Zm3Pd*D,T.,<,?d/,#d*D, T0,H,Qd2D,tO4P1O,#;``QPd*D,T3,Z,]6\,#d*D, T4,f,ih,#d*D,T5,r<``q,u t,#d*D,T6,~, ,#d*D,T7Z,, ,#d*D,T8<`aݶZ,, ,#d*D,T9,, ,#Pd*D,T:,, 6,#d*;``*gD,T;,,,#d*D,T<Z,,Ɇ,#d*D,T=,,<`a҆,#d*D,T>,,,#Pd*D,T?,,6,#d*D,T@<``j,,,#d*D,TAZ,,,#d*D,TB,,,#d*D,(`U_TC,,,##*D6+dHt_dHt_`H]d)P/ELI `W"|2DI??DLDMIODSFINSLMLRMDBATRCADVIFID WHAT??  ,d>`Aa?`CrAMEDI`A`E`AAH VFWRIT ,c@,FWRIT  .ENTRFMPERWRITF;`aa6d$t#d%D&Dtd'D&Dtd(D&Dt&)"t# `B$!d#`HG$ WRITF  eGETEM Qc@(GETEM  .DIV .ENTRSYSTMIGET MOD FREAD<``6dGtEDH,,,CdI,,dJtE,CdK;`aL ,$,CB FDHtL06FDHtM6LtNdMDOdPDN,C `D,AdJtEdE `FrFMEDI`BEO DIGIS wc@DIGIS ,.MPY .DIV .ENTRIABS MOD SETDBCPUT :`^ 6dd,,dftedhtgdi,djte,+dkte<`_#Ptgdi,+dltedctmdmDptq4&gqdg tgdmDotmDn;``-B,-ditr$JrM6edntmdmDpDtuDvtsZsdmPDntmDc,O`B`c `Af0 `E_ h1 - `Ca0n`Cbt0  ~SHOW Uc@SHOW +{.ENTREXEC DISPLINVRS<`ec(0(4)*&NtMdODPt<?)N$Ѐ<OQdM,KdQDStT$KR(TdM+`BdO`B`R++ DISPL c@#DISPL \.ENTRGETEMBASE DIGISASCIIMOVE <`e ( : 6dtdDtdtdt<`^ %Zd ,*,9dDDtd ,4dtdDtd>tdd<`\&C,F,{dDtdDtddDT,]dDtdd 4``>_,cd Dt$h$m $r &ut{$dtd`B``C )`C R) `DN}SCMEM  SHOWB [c@$SHOWB g .ENTREXEC KCVT DIGISASCII;`jբ ( ): tP0$Q0't dRDS<`Zb*tUdTUdVDStUdWUDX,8,GdRDStUdYUdZDStUdYUdVDS`JR DtUdYUM$ZO `FO  ( `EV):  ׀BITS Zc@BITS 8{.ENTREXEC SETDBCPUT MOD ROTAE;`ee( B dMtL0LNdPtO OS TM,((NdUtT. OtVdM0`Zй1DV,6dWtT9TdODRtODQX,dLtY$JX Y`BM `D`P`AU0 `BW1 ! dROTAE cINTEGER FUNCTION TO ROTATE WORD @+ROTAEN.ENTR`NCyP@  , `A`` OCTAL c@/OCTAL .ENTRINPUTSETSBSETDBKHAR CPUT ZPUT NAMR <`asdttsdvtu!s%&udxtwdvt dvTw,1,F&4yty<`_S+5dzTy,>dxDwtwdv Ty,E,n,*IytydzTyt{dvTy4{5`^@Tt}d|Ty4},],a&`y,Ff$~tdttn u6d trdr`A`t`A`v`A`x`Az, `A|D `B~B, [UPDAT @c@-UPDAT *->.ENTREXEC SHOW PATCHRBUF IO TERM BASE OCTALREIO ABREGPARSE DIGIS ASCII `JH PATCH MADE TO "`YDPATCH TO ?`Aab!;`_tl**d D"t(d#D" T$,;d%t dD" T&,Ed%t d ,M;`^$IL't(d D(td'D(Zd ,Zd D(t(d D(,`,d)Dt*h*(;`bgZ,l,d+Dt*u$'* ,$y-. ~& .+d+t/d't0d#D"T1<`]9,d2t0d!T/Z,,Pd#D"T3,,d0D(t(d D(tPd D(D0<``,Zdtd)Dt*  $*(d D"td5D6t $À4d D"t;``ƶd7D6t $ڀd8D6td D"t &׀d)Dt*  *&d+Dt*;`_$'*9'd: T9,,d D"t$(tZd,,dD;t=d<=d>)`V T,dD;t=d?=  0(4* `Da `H "+R D '`Bbc+`H)1^ /E `C:YESC`B>MEM ** vASCII cMAKE WORD INTO TWO ASCII CHARS@ ASCIIN.ENTR/`X;״Zt4ZpL dL d `D`  XFMPER cREPORT FMP ERRORS @(FMPER ^ .ENTREXEC TERM KCVT CNUMD`SI : FMP ERROR - IN FILE `B`:`^LddtdDDtqdZq,,,dtdDtq;`ZƦ1dDDqdDtqdDDqdDtqdDDqdDtqdD;`\^KXDt&RqdDtqdDDqdDtqdZDDqdDtqd;`]gZDDqdDDtqr4qT,x,dDDPtd,,d9`]#DDtdDZDdDtddDt0&d`Ca `H  `EY - XISEQL *c@ISEQL N.ENTR:`^6d%t#d$t&d&D'Dt(d&PD'D(,,!d&PD$t&`E+, d)t#d#`B`g$`A`g'`Aj)# CINVRS cMOD FOR L-SERIES J. BRIDGES 10.18.79@2INVRS v.ENTR.DIV .SBT ;`^Idtt8 @t>t3d9t4t5t6;,Rd5 ,e:l=l<$`P#P|7D?d6ڠ,EL4<7,&dt8d5,5 `Ee9p;`_?$@Y}4Z9P$6Zt6P,5dQ ,+,d5PbDDhd5cd3$5;`]2^d$5,5|l l|<,t,.d:t4t7<d5P,`E5f{L4<7,v<,k<`\sP,5t6\dZd6,5dQd,5d,5,57`c ?C|l8\>,5|8l  Z ;`` | ϶d4T9,lL9l ` ` ܬϠT`LGDDD%:(@`NZtddQdI<`]td!dZl4|# L" LL,l4L#|<##<,`I#L#|# :`h463d!dD8@H ؄(0z8{l@FHFPU[XU\`hpxH@:`m;\a;@b+HL@I=HM TH@a;b+HLI=HM N a< @O} N:`mp TNa<b,NO}NSSTT SW@TTz:`mST TT SW @T T  z  ATA E5@TT@@:`mląÄ݄̈́@t@| $Id@v I^SSSBSCVVVV\*\+:`mV{j{kZ[ւփ~>@gPg׌ ׌ Ñ‘ƔŔǕ ʤCDˤkˤl:`m=سس ٴ ȺȺST#$/5ZZ\&e0fP ghGG:`mjZ[⋂ꋃBC̹֓֔3ZZ:`mܸzݸ}́}S>TS==} Yv] *짧*{b *Y*à:`m hH鰿鰿qxŀ[Tb H FW 'K 2 읟`OgT Y H z c" 3uOCVT cConvert to two digit octal ASCII @OCVT N.ENTR`O p@D800 MEMRY <cProcess LM and LR commands@3MEMRY .ENTRPARMSTERM RBUF BASE OCTALGPARMLMEM ;`d Z2, ,0 4t3$42t5&7t6d4D8T9,!,)( 3`M3$$5:;6035&;6`A`t2`A`w4 `E7#LM ҈LMEM dc@LMEM N.ENTREXEC BASE DIGISLSTM :`c REL DISPLAY FROM Btd tZt d[T ,#,2d\t :`^(%dXD]t>d>,/d\t d Dtd ,7,Kd_D`t>?^0>EX#`TvC&YKX$€abP$dct dct dZt `B`X `I!W[   LSTM c@LSTM -.ENTREXEC IO IFBRKGETEMDISPLKCVT INVRS`Cɯ ( ) ;`]*6**t+*Dt*D,=*tdtdDt_dPDD*_<`_1G*tL,dDt_d_X6dDt_a_6dDtdD<`axftrjrdDtru$rdDt~$,dDtdDDd`GePDtD,I-`A``A``Bd`A` `De `A`-- rIFT cDisplay IFT @IFT $ B.ENTREXEC TERM IO GPARMSYMBLGETEMCNUMDROTAEOCVT LSTM :`hu ID. # EXT WORDS = t6tdt$"$':`^_($,dDtdD4,8,dDt$@dtdDt<``a`FdT,M,RdDDt,8dDtXYXdDta6e4t8`bfdtdDt o v0 {6dT,, $`Hb= IFT EXTENSION: `OH 6dDt $`A``A``A``A``C $IFTA `C$IFT# `A` `Fc  `CaA?`B  DVT cDisplay DVT @DVT $ B.ENTREXEC IO TERM GPARMSYMBLGETEMROTAECNUMDOCVT LSTM ;`j DD. # DVR PARMS = t6t &%6*$:`^^)*dDtdPD4,6,dDt>BtdtdD;`_8HtdT,P,UdDDt,6dDt[\[dDtd&h /`]g6tdtdDt r6 y$ ~$ $ `F DVR PARMS: `OH~ 6dDt $`A``A``B``C$DVTA `C$DVT# `A``A` `Fa `Ca=?`B  ID [cDisplay ID@ɅID .MPY .ENTRTERM IO GPARMSYMBLGETEMLSTM <`gZ&EEtD 6GtF$HIJ&IM$HNO!&NRdDDRtSdD0`\Ӯ'DH4S,-,B2HT0U7TXdZDDXDMtYBY&XF`A`E`B`G`C7J$IDA `CO$ID# `C#TU$IDSZ `A`Z ЋCALC }c@CALC  y.MPY .DIV .ENTRPARMSTERM RBUF SHOWBBITS GPARM;``4dlDmDn, ,doD tqdrDmtq&pdrDmt ,j!<`c9E Zs,%,j)uutt.nwtv3sutxdyTv,=dxDttzd{ Tv,G;``CdxDttzd| Tv,Qdxttzdw Tv,^dt 6xtzdoD tqf`H;c$qpzj6z `Exl!'`B`r`A`u`Aw/ `Ay+ `B{- *  TRACE c@TRACE /! .ENTREXEC PARMSTERM IO OCTALGPARMGETEMDIGIS IFBRK <`n - ( ): ( ): FWA OF MEM BLK CONTENTS LI:`^.NK/$ 5,9,dDtddDtddT,NdDt<`e@VLdQtV°t[°t`tdti$$odD;`iiqtwʰ|˰ 0 0 0 0&dT4`Z="tdT4,,dζtdT,, $Z,,o/ `EaH `DEM DISC`Aa`Aa`Aa`Aa `A) `Aa`A// ASETBA 0c@(SETBA .ENTREXEC TERM BASE RBUF CNUMOOCTAL;`dR BASE ADDR =  d*D+ T,,,#d-D.t4"4/),' `D$&&/t `G$)    VSECTS 3c@)SECTS J.ENTREXEC NSECSTERM RBUF CNUMD;`c-# SECTORS/TRACK=   d,D-T.,,d/D-t ,)d0D1t"# "`G#)24+ `Hg-+    SETIO c@6SETIO .ENTREXEC IO RBUF TERM `IINPUT= /OUTPUT=;`^  dD TtPdDT , ,UdDtd dDtd ;`[L)dDtddDtddDTZ,AdDtddD<``'D T,NdDtdT6,}dDZTtdDT45`ZXd,idDt PdDTtdDPT4,}dDt  `Ecs  `Bd `G M SCDIME  SYMBL c@,SYMBL ' Z.ENTREXEC ISEQLIFBRKDISPLTERM IO SNAP SNDAT RWNDFFREADCNUMO`HaH ;`d4WMRUNCMABRP0'  +dt0,6PtdD,=;`^<,dDtFdDtGH$ FG,L,dtdDd,Y,d;`_3ZDtpdDXDDp$gdtdDtpr4'pt dT6`[y,}dDt &/,dDtD3,-dtd,, `Ev NOT FOUND`HK /6d `B``G/$`A<RP`C`  STABL c@ STABL %* .ENTREXEC IFBRKDISPL RBUF TERM IO SNAP SNDAT RWNDFFREADCNUMOMOVE `Ij `E MRUNCMABRP`Aa <`aƷ%%,  06dtdDT,>dDtdtC,d;`^FDtL6tdD,S,dDtbdDDDbdDtbdb;`_JddDtil$ڀidDttdDtv &xt+vtdtdD T$`R,dDt $dDtD3,@%`C` `C7 `F>4 `C] RP%% LCLIST #c@ CLIST V.ENTRRBUF TERM HELP 5`\dDT, d t d DT!,d"t `F   ٍHELP nc@HELP  <>.ENTRPRINT;`e(l ,, ,dat,t4 E??{/EN xLIMD oDI:`m]' DSFINLM*LR:BA hTRCANSIO~DL DMDVIFID INPUT Function$ $ ?? Help$:`m-T /E Exit$ N See/modify system $ LI List Symbol from SNAP $ LM List Memory $ LR List :`m memory relative to BASE $ TR TRace list$ CA CAlculate or display$ BA Set BASE addr for:`ma LR command $ MD Memory Dump $ DI Display snap & contents $ DL List disc $ DM Disc :`m\Modify $ IO See/set input/output$ FI FInd (search) system for values $ DS Search disc f:`mor values$ DV Device Table$ IF Interface Table $ ID ID Segment$ NS See/set # sectors/t:`m5rack (for DS)$ $ Type ??,INPUT for more help$\ FI,1st addr,last addr,<3 words max@ or :`m:bASCII word of 6 chars> $\ MD,1st addr,last addr$\ ??[,command][,list LU]$\ Symbol value :`m$(octal) shown as:$ RP = value replaces JSB symbol $ MR = memory resident addr$ CM:`m = addr in COMMON$\ DS,LU,TRAK,<3 words max @or ASCII word of 6 chars> $\ DL,LU,TR[,SECT]:`m^[,# SECTS]$\ NS[,# sectors (64 word)]$\ DI[,list LU] $\ TR,fwa[,ofset][,terminator][list :`m}LU] $\ CA,P1[,Operator (+,-,*,/)][,P2]$\ LM,1st ADDR[,count][,list lu]$\ LR,1st ADDR[,coun:`mT'Ct][,list lu] $ ADDR added to base (See BA) $ LRX > dec disp rel loc $\ BA[,New BAse ad:`mpdr]$ Use for LR command $\ IO[,MEm or DIsc][,MEm or DIsc]$\ DV,DVT # $\ IF,IFT # $\ ID,:`mID # $\ NO MORE HELP!$\ DM,LU,track[,sector]$ DISC MOD SUBPROCESSOR (PROMPT = --) $ Rea:`mds disc tr/sect into 64 wd buff$ LI = List Buffer$ N = See/modify word N in buffer$ :`m This is just like N command$ for system. View or modify $ buffer and e:`m$xit in same way$ /E = Exit subprocessor. If any$ patch to buffer, you will be $ :`mQ asked if you wish to write the $ buffer to the disc before exit$\ N[,R[,D]] $:`mV~ R : N is added to BASE address $ D : In R mode, read N as decimal $ N = octal addr.:`m Location of addr is $ input (memory or system file) $ shown by IO command. Conten:`mts are $ shown in octal, decimal & ascii.$ Enter:$ $ cr View next addres:`m"Bs$ cr = return key$ N cr Patch current loc to N $ (trail:`m)2ing B for octal) $ ,/E cr Exit from view mode$ $ Patches go to output shown by I`O2_O$ \b NOT A VALID COMMAND $\ FE PRINT vc@-PRINT *1.ENTREXEC SETSBSETDBKHAR CPUT :`ck(B(dktj4(&jldntm$:m=6otodpTo,E,hdq To,L6`^ÃK,:drTo,S,^V6odsTm,],^,:dmtugt$ڀ)u,4*`Bݮk}`A`n `E!gp\ @ $ P** bMDUMP Gc@2MDUMP C-6.ENTREXEC PARMSTERM IO GPARMOCTALMOD IFBRKMIN0 CNUMO GETEM FLINE KCVT `C ( ):`Qm0 LOC THRU FROM ;`c8CCI Z",M,Q$t#U"t%&Y$t&^$Z% D%t%d D&t'd D&<`]ft(k( D'D)t&d+t*d+t,d-D.tdd!D.td/d0TP,:`^#%d!D.td1d%t24,d6D2t' '&t5d5D2,,d2t7;`a$* t*$,8t,d+ T*,,d9D.t $2d6D7t' '&t:d;D.<`c°t :Ƅ "#<0= "#&0!d+t>d>D7t'd=D>D@t '߶d>D=t>;`^D?,d$DAt 6Bd"DAtC&,Cd$DAtCd$DADDECd9DB8`\/t'  "#&'d=D*t*dFD,t,d7D t7D5,d2D3t2D&,C`Ca `Aah$`Aai)`Aal+ `ES[-/SCMEM `Aa3@`Aa6?`Ba8P`C; `Cf?`CD) CC FWORD c@#FWORD Y<.MPY .DIV .ENTREXEC ISEQL PARMSIO RBUF NSECSRTE SNDATSYSTMTERM OCTALGETEMIFBRKSHOW GPARM MOVE ʶCNUMDKCVT DIGISASCII<`g7E SECT: WD: Ydtdtc,g,dDT;`[l,p,dDtdDdDtdâDdDtdDdt;`\!,dDDŶtdtdDtdDɢDdDtD,dD<`_ T,,t˄td˶tdtdDƶtdDDtǀd<``u/´PDtD,,dtdDZD#,,dDDt $߀B,;`^̷,dDt 4/dӶtdDtD,dD͢tD,, ;`czD7t 6tdtd׶D;t,d °t"ԤGd<`^&#tdT,,,Od϶Dt141GdD;tڢdD,=Z,OdDt<``AdDtKdDذtO$KdtdDtV $YVB,],dtdD:`^kFatefցedDtzdzdDtzq6zdDtzdDt|}$ځzށ|dD<``stdDt$ɁdDtdDt&/EdDtD,Q`K dDtD, d, `F NOT FOUND! `I/6dtY `Eb! `K/P _ A`Cl DS`AbN@`BfQA`BS?`Ab`A٠G `E DT: `AbYY FLINE c@FLINE .MPY .ENTRDIGISSETDBCPUT ZPUT SETSBKHAR `A <``D6dtdDDDt-d6DDt/$0-/dPDtD, d;`b8=dtBdDDtJMJ6dDtD,?W6dt<``"Z$^dtctdDtdD4,pdtsdDtD,` `Dz}`A``I * `A` DMODF qc@_DMODF <n.MPY .DIV .ENTREXEC PARMSRTE RBUF HEADR TERM SNAP SYSTMCLOSEGPARMMOVE CNUMD REIO ABREGPARSEHELP  FLINESHOWBFOPEN<`f}d&t"',,&)*t(&'*t+&$*t,d, ;`b0''t-d'D(t. )$.-%+-d),t/d/60D)D1td)D2t &0 `PO6(7 +7  ,7 ';7 3`HRTYPE ?? FOR HELP<`f#K  ';R64d5D;t. $'.6)d7D;t.$).8$!9:&&:Kd)TK<``ݚ+,-,td'D; T<,6,d'D;T=Z,?,DC>;, Pd'D;T?;`b47K,M, S';@) Y6';73d)tAdAD2t`$c`DdDt. l';.dA<`\mPDCtADB,[, d'D;ZtEdED0tFd)DE4F,,d5D;t.dED2t;`c.Ed7D;t.$).8$9:&:Kd*TKZ,,dGt"dED2t`FZd'D;d5D;`OdYZPATCH MADE TO SECTOR BUFFER: <``$ft. '.&ZHdED2t;EPd#D;T*,,d)DEtE,xdID;T<(`T#tFdJD; T<4F,, d",,d5D;`HiiWRITE TO DISC? <`c 氒t. '.&iKd7D;t.).68dLT,,d/60D)D1t 40d'(`X; D(t. '$.-%+- ';M6Q  `Eb#`Bbl)`I80@,-- `F";K/E??DMLI `BbB9`KG YE DONE !  DLIST c@"DLIST E-.MPY .DIV .ENTREXEC PARMSHEADR TERM RTE SYSTM GPARMIFBRKMOVE CNUMD FLINE;`eEEK Z,O,ЄSt׶dDt[&t`&te&tj4<`cjtdtdtr,Рd 0t $+&dTZ,d<`d\Dt + װ7 7  7 $؄ 76dtdDt;``Rdt $dPDtD,dDtdPDtD,oE `Ea`Ba `EA+@ `Bam9EE 'HEADR c@HEADR `T LU: TR: SECT: