$4#14 OBJ&GOTO OBJ`IF14 OBJ3SET OBJDBSUPERMITDQC`%UPDATE DQCwxgSUPERMITFIX},IF OBJtIF14 OBJrD # Copyright 1985, Logic Associates (v1.4) Purpose: Resolves array references on command line. Format: # ... file(recno) ... (must be ASCII file) Surround with extra blanks to prevent appending. Given-- Files: A. B. C2.X Record 1: FIL.ONE ERA Record 2: FIL.TWO TYPE TEXT # ERA A(1) A(2) --> ERAFIL.ONEFIL.TWO # ERA A(1) A(2) --> ERA FIL.ONE FIL.TWO # B(1) FIL.TWO --> ERA FIL.TWO # B(1) A(C2.X) --> ERA FIL.TWO # B(C?.*) --> TYPE TEXT ************************************************** * This is SUPERMIT module 4 of 4. The SUPERMIT * * Manual is available for $9.95, only from Logic * * Associates, 1433 W. Thome, Chicago, IL 60660. * ************************************************** *** ABORT: BIOS not found ***= NOELEM NOSTOP$$$ SUB ? W o }  8!9" 1 * |= 97_7ͪ͌7S77 :Y^ ̀ Y 2>222!5 "!"+" " +"> 2 :O!5 ì# ¯2 y2"~(ž"#~# !"ý~ +"*{z><>2ɯg*+|ʌ! ͙H ͙>"|>+|ʌ*+"|:A2XÓ!Q !"~2N2>§™)))_§0 :  w# N>2>!4 :Gy2*~# $ y2 N =NN*#",-`d*~rp>2!"͂!Ă6ͣ :ͣ4 !N Q 6 > A.# !>~*1. )(%>>AxG#x>?7,#~+:~@##  *ͺ͕: p:=2 *#ͺ̀>?!  #ˆͥ <> <>=L:<̯ :  : :̶2! n   ~#o|g x !N> #, # :G:9 2y2 Q s#r^#V Y ~# U !s z #t ~g =2!N# ~# † ~:† +6:22< /3&-5 n  :- _ =_!^#V!| Abort: index or array filename too long array file not found index file not found index is 0 index points beyond end of array file resolved line too long ccp not found unallocated array (empty file) ccp not found :S :S T  *n S  " M " *  I !" !4 " ͪ#6>2~ **zm })m +V+^,-ˆ ~ˆ } s ! *{zҨ " "y   !   I W ʜ !6#6#6  * * Q ͋ " ɀ"G bk"E `i"C  !6 #( *C DM*E *G c _ { c :~  * #" ~} ͋ > >2~  * "* * I * #ì #~¨ p͋  * # GOTO Copyright 1985, Logic Associates, Chicago (v1.1) % Purpose: Branching within a SUBMIT file Required: Keyword "START" on first line of .SUB file Format: GOTO n go to line n GOTO +n go down n lines (+0 = current line) GOTO -n go back n lines (-0 = current line) GOTO filename.typ where "filename.typ" gives value; if ambiguous, filled at run time. Note: Bad value kills job, unless "NOSTOP" on same line. % Examples: GOTO 8 GOTO LINE.15 GOTO +2 GOTO OK.* GOTO LIN16 GOTO X*.VAR NOSTOP ************************************************** * This is SUPERMIT module 2 of 4. The SUPERMIT * * Manual is available for $9.95, only from Logic * * Associates, 1433 W. Thome, Chicago, IL 60660. * **************************************************%*********************************************** * This is SUPERMIT module 2 of 4. The SUPERMIT * * Manual is available for $9.95, only from Logic * * Associates, 1433 W. $$$ SUBNOSTOPSTARTPr0  B ) S h !91 2̮ <! c :] QM~+-" #x2 BH}H2<> J>2!] >?c U q> 2{s$ *! {zʕ> 2Ö<͟!]ͷ!eͷ# y~+-0 ұ+ # :w*]!!|{2\!lU -P!p W Lͦ<ʘ :2ͤ̓82:D>2`:N2x:B 2&͓:_G29ʞ •xÀx2>> 2:G:!_ʽ/<ʽ!<2!_==!<>2: :=j:_̓ȯ29:x>2 "p>2!6#6!p!^#a+ag>2p\> 2p>2:Ÿ<>2jpº>2!`W :2:~2~p>2<!J" !F#" 2!F#" #x: # % < >J!W :2N ~#X W_ o # ~z n   W_ ~ʑ – #Æ :G:_§ <2ä > # =- %_ =_!^#V!   :2< /3_&-kP;!C C   C ~#o|g xC g- â /2= abort: $$$.SUB contains more than 128 records % abort: invalid parameter for GOTO %͘ abort: "START" missing from line 1 % abort: GOTO exceeds range -128 to +128 % abort: $$$.SUB not found % abort: unable to close $$$.SUB % abort: error reading $$$.SUB % abort: error writing $$$.SUB % abort: error remaking $$$.SUB % abort: parameter file not found %͘ z abort: out-of-range "goto" to line %IF Copyright 1985, Logic Associates, Chicago (v1.4) Purpose: Conditional execution of command lines. Format: IF [NOT] filename [THEN] command1 [ELSE command2] where "commandx" = any cp/m command. Operation: If "filename" is [not] in directory, command1 is [not] executed. If command1 is not executed, command2 (if present) is executed. Examples: IF ASSETS.BAD THEN SUBMIT RECOVERY IF NOT A:DONE THEN B:PROG1 IF NOT A:DONE THEN B:PROG1 ELSE PROG2 IF OK THEN IF X THEN Y ELSE Z ELSE ERROR ************************************************** * This is SUPERMIT module 1 of 4. The SUPERMIT * * Manual is available for $9.95, only from Logic * * Associates, 1433 W. Thome, Chicago, IL 60660. * *************************************************** O NOSTOPNOTTHEN IF ELSE *** ABORT: BIOS not found ***$$$ SUB!91o  ~C!L : IF]\<9>!yMT<=!q W! "E >2D !bw:D <2D Éi‰:D =2D ʕ#e"B "B 69!ͼpͼ ͼ~#o|g x¼!N > /C**p*"@ q *@  *B #6#6qgʁ̓V*͝> ""*>2!"Q**zœ})œ+V+^,-·~·¬2< /3_&-6!*{z"#"yKS%S4!S4SFʇʕ !6#6#6Iͽ*Q*E  I"Qɀ"bk"`i" !t#f*DM**͡_"J{"͡J:̽*E #"E ~»> >2u*#"***E ##~pͽ*E #Js#r^#V ~# "# ~> 9 #0 #:sN>2y\!l ssȾ#s<͙t͙-Nœ|*E #_½!N# ~# ~:+:!F# 2x:x#x* #  , >SET Copyright 1985, Logic Associates, Chicago (v1.2) Purpose: Modifying file names. Format: SET fname1 operation fnam2 Examples: SET AR.BAS REPLACE *.ASC SET MASTER CREATE *.001 SET F*.BAS SWITCH ?????ABC. SET F*.M20 + 3 SET -300A * 56.CNT SET +1506 / DAYS.365 SET OLD4.9* - *.NEW SET OLD4.9* .- *.NEW ************************************************** * This is SUPERMIT module 3 of 4. The SUPERMIT * * Manual is available for $9.95, only from Logic * * Associates, 1433 W. Thome, Chicago, IL 60660. * **************************************************$$$ SUB00000001.NOSTOPhowy|~SWITCHREPLACE+.+-.-/./*.* X .X CREATE ;ÄÞÙéäÔÏ>9>9}g /Am !912 d  |=8>:͎#:#x#>ʈ #͛  :] >ʈ͝ !G̀ !U !\0U !\U ʆ _>2!"+~2!U ! ~w¬d  _#OG~ #~: xgʈ!0U >È _j * {> ˆ:O*Lf"y2Ƀ ~ _ _#M ~# g g+> ˆ͘>ʈ!LN#F#x¡>Èʑ{2K!! U !| _* #+~!_ > ʈ! ~ #6 #  >2<>2>*K&)!!> ~ H?M j1]v!!_~#=;_>È>2A~?Œ #=„_>2<>+ë>2<>-2i>+2YQ!ac  2y+xN :>> Èv > ʈx >+2Y2i!qt >2=!aͪ :<2=!!Qͪ :=2<2< /3_&->2<~:h/OdxX!xv > ʈ Q!Q+ !a G:Y!i!y6+6->2<: ~!a !aS !QS X!hXN a!S ʧQ!S !a !q+ >/2x¥~0 # H +   +A >0#U >0!a>0#A > È90_ /2@Û 0:+ڏ 4  0ʛ >2@҂ ~6= t >2? ~+ - +>- >+:? 2>>+_!E  U 2BÈ>?! _# > È:=* : 8 >2= : ~0G M #< #^ ~0^ M +ɰ r #g ɰ!! U ! >2<!x ʦ ~1ژ ÷ -ʽ +ʽ :y-> È:@:y >+_~0 >2?+ ɰ!| :O*H !   ._# !  ` ɰ>ÈO ~*Z ._ _ _xG#" #~+:~@2## ɰx>?` C :!͉  ͉ - ͉ ~#o|g x‰ ͈ ʪ >È!A46  !U _M M > ʈQ  _ M M ! =  U M >ÈM !~6< <* :C) <~#V ! > #g >È>0À  > w#€ ! 怶w# !~ʳ D͹ #ʠ >2C#_ʷ  =  c ! ~ :B >.2B_~# =- _ =_!^#V!|Y  (Unchanged) (new) abort:  template segment too long invalid character in template file not found directory error during rename name already used template defect newname would be blank keyword not found directory full ambiguous template unmatched by any file arithmetic overflow division by zero -->vSUPERMIT.DOCW ! #"%$'&)(*,+-.o/102354786:9;<=>?A@CBEDGFHJLKNIMPQRSTUOVCc~BIEoO|E Z9v_OGVS뫽 h;zA*m|4Bo;z8+5kA2u+e#V6WV{Qs5w ?B5/X:Y[ofb cJBC%fvV=T>绷z{3|Z(m8_>/H_ Y{QUg%:ax>#<u8Q>,6/.o_8x?ˠm/F7 o;U{mxx\S7Ktvwfaā]~.sF4TS+%."##럯;;Go{P~mX( G7z:7ƧsH z|l qWT d{>u}XC%f6:P뿉CQW2d:Wf0ƧoУ<~(.|'M&Ɗz)b0Ts]Ś)&PGQo? V0Ԓ?ꛇcy_1kAjo=ECߑ_t,aؾ?_t}vA gy~5x_8<5,GJ|&skX$[oCc~5c*1PWl}F|p,y>5,[o,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,TNx+ao6T>@*1Ϸo GMZe{+|'G~"weduPNGJLJkuV{흇WN|О\'b|h1_oڃ)j*>oeDA ZEf}~q?ݛ_MZmpm$V? =r:~@\3<2T$:~(|':=Wlkz yeO%Y_JL-:]8NZC5L vc|J7\{xRw؆JO S^7[o6r;s{O$u.ʩ_?ˠ=2Tb<~H5:bkX#5TS.bsXoחj#Y{!m 鿮z?.djoH Ylk@HI9;;c/2I7!EaXټ7[o6@.;7ڛσX"۰tlDE護XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXz-,L-{뭷M??ܱs99ms;} .75 j#YcM(6w'HG3ozx O$K< ކ26| C%й?ꛇ26|;=?@A3zx}M8Fmz/ڝg?ך-Ǵx\,`SgH8rcZ<.{[.֭k~477J2KT RG5?%Rrw3Vt2#j8