Trailing-Edge
-
PDP-10 Archives
-
mit_emacs_170_teco_1220
-
emacs/babyl.exe
There are no other files named babyl.exe in the archive.
?p @ @ ) ?h ?x - W
' H j @. e @ @ %
x ? H Z[K3HJ?6l8 *(4x
&# y @ $:W e e e e e e e e e e e e e e e e e e e e e e e e e e e e e e t Kb,0 ,RH + 4 " Q :, \ 4i f 2 O xP- ( -x!
UM**U.U -x! EMACS ALDERSON BABYL EXE DXX EMACS BBOARD ELIB DXX EMACS BABYL EXE @D @H 2 C\,> ,> ,> + M ^ > *> \" e " Z O & J+ !> *> <+ O \ W< 1\ + a W- O` We7` g` Wy? g+ g+@h`,~ -7@ jF: + ^+ + + + + + + + + + + + + + + + + + + + + + + + + + + + ?+ + a+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + 6 '6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 $6 '6 '6 '6 '6 '+ 7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $7` $+ + + + + fW f\ N [[ 4 Lb [ ;, \ >@
r fP 7e 7e 7e 7e 7e 7e + ,; xH, . 8 l d 6
`<(p
P9
064
p:$p6 48 x xxxxxxxxxxxxxxxx @ #5V
@er babyl-build fW \, \F : f fW aI@ f' p) 8f0 0 m "a Z g , O, Q, O, Q -d %4, Q Q@
t fT @::::: %>V!(| #[ @ %
T @ Pq ( fW p)@ Y & ' ' &@ * &@
r V@ L & ; ^ &@
r V@ G ' & j@
r @ mE U m &@ h V@ m1 ' & j@ h )@ , V@ m1 ' m &@ , V@ . ' e & j @ % t. @ ${ . x) ]. x0+r or :d @ H (zr 8# ~ '@ *% i fr "v t Y
L@r # [[}~ r { r #9 7jr #?9 ";9 ";9 ";9 ";8`";8`";5@";5@"; +* 2 #9 'i2 #? U - m ) xx ! , & ' $ & " " ) , + " ' * $ ' ' & " " & " ) ' " )
w @
0 @ % H@ ) @ VB@
r @ @ @
r : Z~ Z} m0 X ` Y.
# : hf y83@ %#@
r@ %+ + O@
c!" \$ - OG @O@ 2 R ++
Internal error at 6$ EMACS:TECPUR.EXE.1220 @ 0 z e e e @ $@ %` @ #jh Y Y Y Y Y Y Y Y &@ $4@ $4 Y Y@ #n Y Y Y Y Y Y Y Y Y Y Y Y Y@ #x Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Y Y Y Y R R@ #HP R R R R R Z Z Z R R Z R R R R R R R R R R R R R U R R R R~ Z R R R R@ $1 R R R R R R R 3 R R 4 4 4 4 4 4 4 4 4 4 R@ $!:@ #s @ #h
@ #s! R@ #k= 4 &@ ",d ] 5 ' M
Z
Z
Z@ #p8@ $n A@ #kx9@ #lS@ #{@ %$%@ % @ $ 9@ #y/@ #|
@ #nr@ Q@ #q @ #xi R@ #x@ $ Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z R R R R R R R R R R R R R Y@ $4> R R@ #m} R R R R R R R R R R R R R@ $I+ R R R R R R R@ $ 3@ $9@ $V R@ $
7@ $[@ $ R R R 3@ $ f@ #1 4 4 4 4 4 4 4 4 4 4 R@ $!:@ #rg@ $?@ #s@ #1 @ $^@ $~@ $N@ $9@ $h@ $!@ $=@ $9 @ $g@ $2k@ $4>@ $Y@ $%@ #m}@ $$} R@ $%x@ $8D@ $"@ $72@ $ `@ $@ #~ @ #o @ %J!@ #qK R@ $+@ $ @ $@ $6_@ $ R Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z R R R@ $ Z@ $| R R R R R R R R@ $@ $& Z R R@ #m} R R R R R R R R R R R R R Y R R R R R R R R R R R R@ $(@ $ R R R 3 R R 4 4 4 4 4 4 4 4 4 4 R@ $6 R R R@ #5V@ $R@ $u@ ${ Y@ $
@ $7@ $k@ $<X@ $@ $&
Z@ $[ Y@ #m}@ $M@ #rG@ $\@ $+F@ $- R@ $ t@ $(@ %1x@ #ob@ %L% R U@ $u@ $1-@ $7@ $6_ Y R Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z Z R R R R@ $n 7g 7g 7j 7j f& e f @ % sA f
@ % @ M?sA f qx8 f @ "D@ Y0@ "D pX. f @ #Vc p8, f @ f' p) f @ f' p) f"P J J J J L L j oD@ &q ox( fL@ G] G] Gg G] J J Z G2 G2 GZ GZ GZ GZ P G( G( G( G( G0 G0 Z G G G G G% G% P G G G G G
7b
@er babyl-build init @y m(hfx*) - ..E Badvalue in q-reg ..E (output radix) 3 2<1 The'second argument was less than)the)first AFN Ambiguous FSAflagAname AOR Argument outAof range ARG Bad argument ) AVN Ambiguous variable orAmacroAname. ? BD" Bad condition after "A-- shouldAbe G,L,N,E,B,C,D,A or U A BEL AAbuilt-in ^R commandAcalled from]macro signaled an error 5 CMD AAcharAthatAisn'tAa TECO commandAwasAexecuted 9 CNM CallerAwasn't a macroA(it was TECO internal code) ' DCD AAdisabled command{wasAexecuted DSI Damned\screw.infinitely 3 ERP Attempted0:<0... ^\AwithEnoCclosingX>Efirst ESR Empty sort record FTL Filename too long ICB Illegal ^] command IEC Illegal "E" command IFC Illegal "F" command IFN Illegal FS flag name IQN Invalid q-register name ' ILN Invalid local q-register number ' ISK Invalid sort key - "^P" command & KCB Kill currently selected buffer / M^R Attempted to macro a meaningless number , NDO No device open for output - try "EW" $ NFC No free channels to pop into / NFI No file open for input - try doing "ER" ' NHP Nonexistent horizontal position 8 NIB You have addressed a character not in the buffer NIM Not inside a macro 7 NOP Specified type of IO channel hasn't been pushed NRA File not random access 5 N^R Not in ^R - command meaningful only inside ^R PDL Pushdown stack full $ PUR Attempted write in pure page , RDO Attempt to modify a read-only buffer 3 QIT ^G typed on TTY and FS NOQUIT$ was negative D QNB Q-register not buffer - attempt to select a string or number QNN Q-register not numeric ' QNS Q-register not string or buffer ( QRF Q-regs failed, probably TECO bug , QRP Q-register PDL overflow or underflow SFL Search failed " SNI Semicolon not in iteration 1 SNR There is no valid search string to repeat STL String argument too long ! STS Dispatch string too short < TMN Too many macro, ^]q-register, ^]^X, or ^]^Y nestings < UBP Unbalanced parentheses found with an FL-type command UCT Unseen catch tag 2 UEB FL-type command encountered end of buffer. ! UEC Unexpected end of command UGT Unseen go-tag ) UJC Undefined journal file characters ) UMC Unmatched ")" or ">" as a command / URK Buffer space or library space exhausted UTC Unterminated conditional 7 UTI Unterminated iteration or errset (missing ">"?) ( UVN Undefined variable or macro name ? WLO FS OFACCP$ when old access pointer wasn't multiple of 5 ! WNA Wrong number of arguments
M ~M~~L~wL No MM & Yes or No MM Make Space rvalG !* number of characters between auto-saves!
fs^rmdlywfs^rmcnt B !* Don't let cursor be in this percent of screen!
FS%BOTTOM h/ !* 1 => Searches ignore case!
FSBOTHCASEointB !* Center cursor this percentage down the screen!
FS%CENTERerse; !* 1 => Display mode line in standout mode!
FSINVMODngO !* 1 => Try real overprinting on the screen!
F"'NFS^HPRINW"'NFS^MPRIN t5 !* Number of lines in echo area!
FFSECHOLINESn; !* Leave this percent of screen blank at EOB!
FS%ENDa= !* 1 => display error messages in echo area!
FSECHOERR mn7 !* Page width for filling and grinding!
FSADLINE P !* Overwrite Mode status (see M-X Overwrite Mode)!
1FSMODECHWFS^RREPLACEode< !* 1 => Display chars 0-37 as SAIL graphics!
FFSSAIL System Output Holding7 !* 1 => let system handle C-S and C-Q!
FSTTYPAGE? !* Don't let cursor be in this percent of screen!
FS%TOP ModeJ !* 1 => word commands deal with LISP atoms!
:I.W"n:I.W@'1FSMODECHModeu !* nonzero => Auto Fill (break long lines at margin)!
1FSMODECH
32FS^RINITU "E '
M.M^R Auto-Fill SpaceU oint ^@ e+ * 1 => auto save under visited filename' !* 1 => digits and Minus before control chars set arg!
0FS^RINIT[2
"NM.M^R AutoargU2'
Q2-Q0"E 'Q2U-
Q2U0Q2U1Q2U2Q2U3Q2U4
Q2U5Q2U6Q2U7Q2U8Q2U9 ent nts
/8+1*8t Fundamental n^ !* Controls action of ) in showing the matching (!
"NM.M& Matching Paren'"#0'FS^RPAREN .?! aces deb !* -1 => Use tabs for indentation. 0 => only spaces.!
"EM.M& Indent without TabsUMM & Indent
M.M& Xindent without TabsUMM & Xindent '
M.M& Indent with TabsUMM & Indent
M.M& Xindent with TabsUMM & Xindent ISP
ies . '/ * Char to exit I-search and do nothing else Flag, * Nonzero => Auto Fill indents new linesE : : : : : : : : : : : : : : : : : : : : : : : :op2 MEMOXGPPRESS@XGPUNFASLOUTPUTOLREC N2s Visit File Save OldB * -1 => visiting new file saves old, 0 => don't, 1 => ask user efix Q..H"EMDirectory Lister'ame pe Fundamental t ies~pL UE Lisp MULTIPLE-VALUE Indent LISP
MM & Process Init Vars Inhibit Write ~iL Main Fundamental~bL de; !* non-0 => do auto saves!
"'N M(M.MAuto Save Mode) t5 !* non-0 => by default use auto save!
1FSMODECH
[SAVE].. Line EMACS Library Filename EMACS Version TWENEX Library Filenament FS:EJPAG-256"E '
QEcho Area HeightFSECHOLINES
0F[VARMAC
FSSAILUSAIL Character Mode
FS^MPRINTUDisplay Overprinting
n
:,.F .X~TL !PREFIX!F@:M(Q.XM.P) Control-X Q.X
t MM & Startup EMACSj *Initialization*~ ! EMACS (Fundamental) Main: !* -*- teco -*- *!
!* [toed.xkl.com]DXX:<EMACS>BABYL-BUILD.INIT.2, 10-Apr-96 14:18:14, Edit by ALDERSON!
!* [MIT-XX]PS:<EMACS>DUMP-BABYL.INIT.5, 27-Jun-83 22:38:50, Edit by FHSU!
!* [MIT-OZ]<EMACS>DUMP-BABYL.INIT.5, 10-Apr-83 20:01:23, Edit by ECC!
!* [MIT-OZ]<EMACS>DUMP-BABYL.INIT.4, 27-Jan-83 16:04:24, Edit by ECC!
!* [MIT-OZ]<EMACS>DUMP-BABYL.INIT.3, 15-Jul-82 12:46:13, Edit by ECC!
!* [MIT-OZ]<EMACS>DUMP-BABYL.INIT.2, 8-Jul-82 16:38:28, Edit by SHSU!
!* [BBNG]<FHSU>DUMP-BABYL.INIT.6, 27-Jun-82 09:40:49, Edit by: FHSU!
!* To dump: set your own EMACS and Babyl init and vars files invisible, if you!
!* have any, so that they do not get processed when we load Babyl now. Then!
!* go into TECO, let emacs; teco init run, which then runs emacs; emacs init,!
!* then do "@er babyl-build.init$ @y m(hfx*)$$ and hopefully it will dump!
!* something out somewhere...!
etDSK: fsHSNamefsDSNamew !* Default for check to home dir.!
e?BABYL.VARS"e :i*You must first set your BABYL.VARS invisible.fsErr'
e?BABYL.INIT"e :i*You must first set your BABYL.INIT invisible.fsErr'
e?EMACS.VARS"e :i*You must first set your EMACS.VARS invisible.fsErr'
e?EMACS.INIT"e :i*You must first set your EMACS.INIT invisible.fsErr'
mmRun LibraryMKDUMP !* dump this thing out!
m(m.mLoad Library)BABYL !* get pointer to babyl library!
!* Note that loading Babyl now will do its call to Babyl Setup Hook now, but!
!* that is really wrong -- needs to be done when this job starts up, after!
!* processing BABYL.VARS etc. so user can have it do things. See below.!
m(m.mLoad Library)BBOARD
:I*BABYLm.vEditor Name !* a change of name!
:I..jBABYL
@:i*|
fsRGetty-2"l
@m(m.aTRMTYPInit File Set Terminal Type)'
m(m.mProcess Babyl Init or Vars File) !* Process users Babyl init or!
!* vars file.!
qBabyl Setup Hookf"n[1 m1w ]1'w !* Run users hook if any.!
etDSK: fsHSNamefsDSNamew !* Default to home directory,!
etMAIL.TXT 1fsDVersionw !* and normal mail file.!
:m..L
|m.vMM & Startup BABYL
@:i*|< !* make us restartable!
0fsMode Macro !* what does this do??!
fsXJName:f6[1 !* start off with bboards?!
f~1BBOARD"e
m(m.m# Babyl ^B)' !* start BBoard reader!
]1
1,m(m.mBABYL) !* enter babyl!
160000. fs Exit> !* exit!
|m.v*Initialization*
m(m.mDump EMACS)emacs:BABYL.EXE !* out we go...!
@ft
BABYL Standalone Job Dumped
!* say so...!
160000. fs Exit !* bye for good.!
rary Dumped EMACS Name& * If non-0, is filename to dump to! Dumped EMACS Default FilenameC * If non-0, is default filename for dumped EMACS when it starts Dumped EMACS Quick Start?2 * If non-0, we dump out a quick-starting EMACS Dumped EMACS Startup Hook1 If non-0, will be called at dump startup time Dumped EMACS fsTTYMacroA Contains the fsTTYMacro to restore after libraries are loaded MKDUMP Loadedre. MM ~DOC~ Load Library
0 MM Dump EMACShem. MM ~DOC~ Dump EMACS MM Pre-MkDump Load Library ry) 1,(f):m(m.mPre-MkDump Load Library)raryV C Load a library of functions.
Takes filename as string arg; default FN2 is ELIB.
Tries both the specified (or home) directory and EMACS.
An argument means don't run the library's & Setup function.
Pre-comma argument means create variable <libname> Library Filename
for Dump Environment's use.
Returns a pointer to the file in core.
f[DFile
etDSK: fsHSNamefsDSNamew
qDumped EMACS Namef"nfsDFile'
"#w fsOSTecof"ew etTS DEMACS'
"#-1"e etDEMACS.EXE'
"# etDEMACS.SAV'''w
et
qEditor Nameu.1
1,m.m& StartUp .1"e
@:i*|m.m& Recursive ^R Set Modef[^REnter
q..0u..h
0fsQPUnwindw
:m..l | m.vMM & StartUp .1w
@:i.2|
fsClkIntf"Ew 5*3600'fsClkIntw
qDumped EMACS fsTTYMacrof(fsTTYMacrow
)"n m(fsTTYMacro)'
qDumped EMACS Startup Hook"n
mDumped EMACS Startup Hook'|
((ff"'n)&("'n))(qDumped EMACS Quick Start?)"n
@ft
Creating a quick-starting EMACS, no JCL.
@:i*| .2
etDSK: fsMSNamefsDSNamew !<! etFOO >
0fo..qDumped EMACS Default Filenamef"nfsDFilew'
q..hu..0
fs^RExit |m.v*Initialization*w'
"#
@ft
Creating a default-init EMACS.
@:i*| .2
etDSK:EMACS;
fsOSTeco"e er* EMACS'"# erEMACS.INIT' @y
:i* [..9
m(hfx*)
q..hu..0
fs^RExit |m.v*Initialization*w''
1,m(m.m& Get Library Pointer)PURIFY"e
m(m.mKill Variable)PURIFY Library Filenamew'
0fsTTYMacrouDumped EMACS fsTTYMacro
0fs^RArgPw
0u..H
0fo..qCache Enabled"N 1:<m(m.mPurge Cache)>w'
0u0 < q0*5-fq.b; q:.b(q0+4)[..O 1f? ]..O q:.b(q0)+q0u0 >
q.b[..O 1f? ]..O
q..q[..O 1f? ]..O
q..L( q..P(
fs:EJPage(
1,m.mDump Environment"E
f[DFile :ejDSK:EMACS;PURIFY ELIBw f]DFile '
m(m.mDump Environment)
)fs:EJPagew
)u..P )u..L
qDumped EMACS fsTTYMacro fsTTYMacrow
0u*Initialization*
fsDFile u.1
@ft
Dumped .1
fsOSTeco"E fsDFn2:f6'"# fsDFn1'u.1
0fsEchoActivew
-1fs^RLastw
0u.1 0u.2 0u.3
0 ACSW C Dump this EMACS out to file given by string argument.
Default is home directory, TS DEMACS on ITS, DEMACS.EXE on TWENEX,
DEMACS.SAV on TENEX. The dump, when started, will call the default
init-file (e.g. to do JCL processing) unless this command is invoked
with a numeric argument. For more information, see the documentation
for & Setup MKDUMP Library, or the INFO node.
Should probably only be called from top-level -mode, as it is
somewhat sensitive to what has been pushed onto the PDL.
This clobbers q-registers .1, .2, and .3 for necessary reasons -- do
not push them. IB.0 DXX:<EMACS>BABYL.ELIB.774 ~ BABYL Library Filename ry
SubDoc: If non0, command documentation mentions subroutine use Babyl Setup Hook; If non0, is run immediately after loading Babyl library Babyl Standalone Job$ Non0 means will exit to DDT/EXEC Babyl File VersionT * 0: read max version, write back to same;
1: read and write version 1, similar for other positive N;
-1: read max version, write back to next version
This only applies to Tenex or Tops-20 systems. Undigestify Keep DigestB * Describe M-x Undigestify Babyl Message for details on values Babyl F Default FOO TXT Babyl ^O Filename Next Screen Context Lines Survey Quietly Babyl Shh Text Babyl A Mode Display# * Non-0 lets A update mode line *Survey* Buffer Babyl Survey FROM/TO ControlA * Bits, 1 = enable prettification, 2 = shorten hosts, 4 = no hosts
Can also be a macro, which is given message, survey buffers as args.
Q1 gives point where from-to field starts in survey. It can update
that, e.g. if it wants to put something before the from-to area.
It should return number (bits as above). Babyl N After D? * 1 means N after a D, -1 means N or P, 0 means no movement From: ,
Subject: Babyl Reply-To Field/ * Automatic Reply-To field in mail if non-0 Babyl F Done Hook9 0 or a Teco program to run after F successfully exits Babyl F Hook; 0 or a Teco program to run after F sets up its template Babyl F ControlI * 0 (general edit), 1 (read To/Re then edit), 2 (read To/Re and send) Babyl Remail Control: * 0 (read To field and send), non0 (read To then edit) Babyl Remail Hook1 0 or Teco program to run after message set up --Text follows this line-- Babyl Header/Text SeparatorB * 1 line that separates header and text in recursive mail edit Babyl G Done Hookj User hook, run (if non0) after new mail is collected;
argument is 0 or message# for last new message Babyl Filenames Babyl O Filename Babyl Default File& * Set this to specify your normal Babyl file. If 0,
Babyl figures out the default filename to use. If that is
wrong, you can set this. Set it to a string, the filename.
This is especially for users whose Babyl file is not in their
home directory, or not named from the user name. E.g. you
might have a subdirectory full of mail-files, and set this
variable to (for Tops-20) PS:<SMYTHE.MAIL>SMYTHE.BABYL Babyl K Text Babyl Label Abbrevs Spec Babyl O Confirm New FileC * If non-0, you must confirm outputting a message to a new file Babyl O Done Hook If non-0, run when O is done Babyl O Message Hook "
m(m.m& Babyl R Done Hook) Babyl R Done Hookj 0 or a Teco program to run after R successfully exits.
Thepdefaultis,to labelthemessageanswered. BabylR Hook; 0tor aCTecolprogramitoirunoafter RBsets upcitstemplate CurrentfBabyliTemplateoNames 0 oriname ofntemplatebin use Recipient List * 0 will disable all removal of reply recipients,
-1 will disable automatic removal of INFO-xxx,*machine and BBOARD@ recipients Babyl Dont Reply ToF * 0 or a Teco search string of CCs to remove (null means yourself) Babyl Modified Messages Babyl Variables Reset Babyl Command HookK 0 or Teco program to run at times in command execution.
Its arg tells situation:
In normal Babyl com loop (Q0 has com char, Q5 has arg string):
1 before display, 2 after,
3 before com, 4 after.
In survey menu (Q..0 has com char):
5 before com, 6 after.
7 when entering SvM level (so you can bind things).* Babyl Reformation Merges From/Reply-ToD * Non-0: Reply-To merges with From.
This is part of header reformation which you can disable separately.
Surveys of merged messages will unfortunately mention the Reply-To,
not the From.V [Message-id] [Return-Path] [In-Reply-To] [Mail-From] [Rcvd-Date]
[Received]
* Babyl Reformation Flushes These FieldsH * Visibility control for fields.
0 or a string, with format [fieldname1] [fieldname2] ...
Fields mentioned in this string, and otherwise unknown will be
removed from the visible header Unknown Field Flusher Parsed Message Number Date: Sender: , MSG: Mail-from: Message-ID: Redistributed-By: , Rcvd-Date:
Unknown: Babyl Reformation Control * Non-zero speeds up reformation process.
1 - Do not worry about missing hosts.
2R-mDodnotprettify recipientbfieldseither. BeforelBabylizing FileCHook; Runhafteroreading butnbeforeBBabylizingnon-Babyl1files Babyl Autolabel Messages3 * Non-0wcausesnautolabelingafromTsubjectofields% Babyl ConvertoTNX,FlagsetoMLabels5 If nonzero,oconvertBwell knownkTNX MAIL.TXTeflags MessagenNumber Number ofmBabylMessages o BabyloKeepTTNX ReceivedtDate, Ifrnonzero,uaddtRcvd-Dateeline to header
m.m^R Babyl Yank[...Y
1,m.m^R Fill Indented Mail Region[...\
qParagraph Delimiteru2
fq2"g :i2 2-'"# :i2-'
q2[ParagraphDelimiterr BabyllDefault EditoMailrHook- DescribehEditfand MailrBufferaforsdetails Babyl EditoMail HookD 0loruafTecoCprogram/toCrunrbeforenrecursiveQedit-onAmailutoosend Babyl Require SubjectsH * If non-0 Babyl will require you to have a subject in outgoing mail Pre-*Mail* Buffer Window 1 Size COMSAT AUTHOR FIELD COMSAT RCPT FIELD COMSAT CLAIMED-FROM FIELD COMSAT FAKE-TO FIELD COMSAT FROM FIELD COMSAT FROM-PROGRAM FIELD COMSAT FROM-XUNAME FIELD COMSAT FROM-UNAME FIELD COMSAT TO FIELD COMSAT SUBJECT FIELD COMSAT HEADER-FORCE FIELD COMSAT REGISTERED FIELD COMSAT USER-HEADER FIELD $ & Default Babyl Queuing Function Babyl Queuing Function: Name of the mailer-dependent function for queuing mail Babyl Parser Control Flags Babyl Day of Week FlagM * (TNX only) If non-0 day of week is added to Date field of outgoing mail Babyl Personal NameS * (TNX only) A full name to use with user name as in Personal Name <ME at HERE> Babyl User NameI * (TNX only) A name to use in From field possibly overriding username
Non0 ==> Keep and read RSCAN; 0 ==> Dont keep and no RSCAN
Note that a special QUEUE-XMAIL is needed if you set this BBoard Sans Queryo BBoard Maximum Size BBoard Data File BBoard Babyl File; Last BBoard Argument^B BBoard Last Writtenen BBoard Last Read" d BBoard Crl Listirs BBoard Q on N at Last NoticeQ PS:<BBOARD>*.TXT$ BBoard Regular Naming ConventionA es= GENERAL=PS:<BBOARD>MAIL.TXT
SYSTEM=PS:<SYSTEM>MAIL.TXT
BBoard Names Liston> BABYL Loadedrs EMACS:<ALDERSON>BABYL.VARS.0eply Babyl No BBOARD Replyeply Babyl No SYSTEM Reply [1fsqpptr[2
m(m.mKill Variable)MM & Process Init Varsw
:g(m.aAUX& Process Init Vars)u1
q2fsqpunwin
f:m(q1(]1))
Babyl Init/Vars Processed AA | AA AA AA AA AA ( ) AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA / AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA AA l Q MM # Babyl Ql I MM # Babyl I ^N MM # Babyl ^NCS: OPN0104 TOED:<ALDERSON>BBOARD.ELIB.0 File not foundIB.0 DXX:<EMACS>BBOARD.ELIB.22 e~ BBOARD Library Filenamey* * Do not query user if this is nonzeroe= * Maximum Size of BBoard file before deleting old notices le< * Complete file name if not Switch.ini on Home Directory ile; 0 or the name of the Babyl File when BBoard was invoked t Last true Argument to ^Ben% Date and time BBoard Last WrittenRead" Date and time BBoard Last ReadstD If nonzero, it is the Q-Vector of BBoard Name, BBoard File pairsce8 * If nonzero, N at Last Notice causes an automatic Q$tionA 0 or Single Wild Card File Specification to find BBoard filesJ * List of BBoard Specifications <BBoardName>=<BBoardFileSpecification> BBOARD Loaded rye
QBBoard Babyl File"N @M(M.M # Babyl ^B) '
0[MM # Babyl Q
F@M(M.M # Babyl Q)
Q;
FS Z"E
0UBBoard Babyl File
0UBBoard Last Written '
QBBoard Babyl File"N
:I*I command not usable within BBoard FS Err '
0[MM # Babyl I
F@M(M.M # Babyl I)
Id
QBBoard Babyl File"N
1F<!Babyl-Command-Abort!
0[MM # Babyl ^N
FM(M.M # Babyl ^N)
>[0 Q0"N
@FT
0. 0 FS Echo ActiveW
QBBoard Q on N at Last Notice"N
ZJ @M(M.M # Babyl ^B) '
:FI U0
Q0- "E FI '
Q0- N"E FI '
Q0- n"E FI '
Q0- "E ZJ '
Q0- Q"E ZJ '
Q0- q"E ZJ ''
'
0[MM # Babyl ^N
F@M(M.M # Babyl ^N)
IB.0 BABYLame BABYL|
fsRGetty-2"l
@m(m.aTRMTYPInit File Set Terminal Type)'
m(m.mProcess Babyl Init or Vars File) !* Process users Babyl init or!
!* vars file.!
qBabyl Setup Hookf"n[1 m1w ]1'w !* Run users hook if any.!
etDSK: fsHSNamefsDSNamew !* Default to home directory,!
etMAIL.TXT 1fsDVersionw !* and normal mail file.!
:m..L
ABYL) < !* make us restartable!
0fsMode Macro !* what does this do??!
fsXJName:f6[1 !* start off with bboards?!
f~1BBOARD"e
m(m.m# Babyl ^B)' !* start BBoard reader!
]1
1,m(m.mBABYL) !* enter babyl!
160000. fs Exit> !* exit!
TOED:<ALDERSON>EMACS.INIT.0 Kill Variable ABYL" :ejEMACS:<EMACS>EMACS.ELIB.170w:ejEMACS:<EMACS>TWENEX.ELIB.1w:ejDXX:<EMACS>BABYL.ELIB.774w:ejDXX:<EMACS>BBOARD.ELIB.22wq.1u..l0u.1q.2u..p0u.2:m(q.3(0u.3)) Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@Y
L@@!1B + &@ !* -* @ %]*@ %` @ w@ X @ 26 @ %]1 @ %]? @ @ %]H @ %]U@ %]o @ G@ %]x@ @ %^@ %^ z@ %^'@ %^A @ %^N@ %^k @ %^u @ 8@ %^@ S@ % @ % z@
@ =@ B\ @ Bo@ I @ I"@ Em@ E @ E}@ 7+ @ 76@ <;@ <9@ <G@ F @ F @ 5 @ 5$@ 1S@ 1Q @ 4N @ 4X@ 4u @ 4}@ ;C @ ;K@ 0- @ 08@ 7 @ 6T @ 6^@ 6#@ 6@ 63@ N @ 9 @ 9 @ C$ @ C4@ 9 @ C`@ C^ @ CQ@ CJ @ /6@ /& @ M
043 @ Dx @ E @ J] @ <l@ <j @ 3r @ 3|@ M$ @ M3 @ 9% @ 93@ 9T @ 9_@ 7 @ 9o @ I @ II @ IT@ HZ@ HH@ Hg@ :@ 9}@ :@ :M @ :U@ A7 @ AF@ ?\@ ?1@ ?q@ >: @ >O@ 5H @ 5T@ 5q @ 5|@ 4* @ 46@ FB @ FO@ /h @ /r@ 2@ 2
@ 0 @ 0@ J4 @ JA@ Jk @ Jw@ 2B @ 2R@ ;i @ ;w@ D* @ D:@ I~ @ J@ <{ @ 1d@ 1^ @ %_Y @ Kp @ R@ L# @ R_@ Kf @ Qg@ L @ RL@ L
@ R7@ Q!@ Q @ Sg6LA @ KZ '@ QF@ L{@ L]@ SB@ L. @ S@ LH@ L>@ S!@ KO @ Q/@ B @ B@ %b @
@ G$ @ G4 @ GB @ GO @ Go @ G_ @ H @ G @ H) @ H
@ G @ H8 @ %a< @ %aB @ %aH @ %aR @ Cm @ %aZ @ :s @ ;@ %aa @ (@ @r @ %an@ @ %ay@ %b@ "%@ %b@ %b*@
} @ j U @ %bk @ 0@ %b{ @ N@ %c
#@ o@ %c@ <@ %c @ %c1@ C@ %c8@ 4 @ 4 @ %cQ@ G@ { @ %c[ @ K} @ R'@ %cf @ %cq @ %c| @ %d @ %d @ %d @ %d( @ %d3 @ %d> @ %dK @ %dX@ h @ %dd @ %do@ %d}@ $(` @ %e
@ %e @ %e @ %e( @ %e2 @ %e? @ W @ %eM @ %e_@ $*E @ %ei @ %es @ %e~ @ %f @ %f @ %f @ %f. @ A @ C @ A @ $l@r @ P^@ T& @ PT@ Sr @ Ph@ U @ %f?@ %
p @ %fR@ %> @ %f\@ %>V @ %fe@ #& @ %fK@ $ 3 @ %fs@ %4 @ %f|@ $ @ %g@ % @ %g@ %G @ %g$@ $PB @ n@ M? @ %g3@ %w @ %g<@ % @ %t@ $6 @ j@ % t @ %gG@ $! @
@ %@ #Q] @ %@ ,w @ $v@ %D @ %gX@ >@ %g\@ A @ %gl @ 1p @ C @ %gv @
@ %g@ ;@ %h@ %h @ @@ %h+@ @d @ %hF@ %hS@ Fs @ %ho@ ] @ %hy@ @ A& @ %i @ %i
@ A @ A$@ %i# D@ %i-@ ; @ ;@ %iI @ 5@ %iU@ K @ %i` @ H@ %j @ 2 @ S @ `@ %j$@ y@ %j0@ %jC@ ]@ %jN@ ; @ ; @ %j @ |@ r@ 1@ @
@
r @ @ %^k z? z? px @ %; @ $oD @ $TG @ $2* @ $~ @ #m @ #ol@ #tY@ $jG@ $L@ $_;@ $
@ $[@ $L@ $f@ #wQ @ #w@ $J @ $ B @ $
@ $= @ %,t@ %(M@ %(?@ %3L @ $$( @ #h
@ $ \@ %4: @ "$z @ $<&@ #K@ #s%@ $ A @ %?@ $U@ #YL@ #uE@ %%g@ #uv @ #W/ @ $ @ #vG@ $ " @ #sB @ #t@ %/J@ $ M @ $y @ $y E~0O rtQ&7 ~'S E0W G}@H I T KPY M|xC Oy'n OA'k OI'k OQ'l OY'l Oa'm Oi'm Oq'n
vQ' w' -\Y$w ]kq%q li%x *qq&! Zri&( s&* 5t&3 _u &:
u!&< 2u9&= Wy')
{9'= (}'K 5})'L [~ 'R [$j g[1$m H[A$n {]!$| !]9$} "`mA%~ "ymY% # r&# #TrQ&' $uI&> $&ua&@ $Rv&C %\y'* %y)', '%{i'@ '<|'B 'T|1'D 'j}9'M (k}Q'N ) ~q'X ),'Y ){~`R *t9&5 * x'! *D|q'H *{I'> +
i'o +q'p +y'p -Uz1&e /xa&X 4"9'G's 4O 4Oi'x 5] $z 5g\)$t 6\9$u 6`tI&6 6mta&8 6v~'R 8s)&, 9!zx3 A<}HH A>m@dl AJz '2 Iv!' KZ)$d K# F K3 fJ K3 fJ W#s9&- W-sI&. W@s &* WQs&+ WrsQ&/ Xsa&0 Xsi&0 X(sy&1 XAs!&, XNs1&- Xo|i&x [ wa' avi' cTwI' cw1' d7w ' d`wi' f vq' f f. f f. l3wQ' oZbQ%' o~bI%& p|9'E p |I'F p:g %J pDg%K pag9%M pmgI%N p`Y% q
`i% qt~)'T r~9'U r#`% r%_y% r0i%Z