perm filename BB[206,LSP] blob sn#627061 filedate 1981-11-30 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	Load BB programs, do initialization, and print "help" message
C00003 ENDMK
CāŠ—;
;;;Load BB programs, do initialization, and print "help" message
(PROG NIL
;;;(ioc w)
(setq ā†‘w t)
    (REQUIRE BBCLT MCL DSK (/206 LSP))
    (REQUIRE BBHELP MCL DSK (/206 LSP))
;;;(ioc v)
(setq ā†‘w nil)
    (SETQ SETVALUESLIST 
      (QUOTE (BBFCNS
         BBLIST
	 BBPROPS
	 FIN
	 HIN
	 MAXF
	 PPLISTLPT
	 PPLISTPUB
	 SIN)))
    (SETVALUES SETVALUESLIST)
    (BBINIT BBPP)
    (LCASE VAR)
    (PRINC '|BB files loaded|)
    (TERPRI)
    (PRINC '|Type "(BBHELP)" to find out what the BB program can do|)
    (TERPRI)
    (RETURN 'BBready)
)