.title K11STD overlay for SET command prompting and parsing .ident /2.37/ ; 23-Oct-85 09:44:20 BDN Creation, removed from K11COM ; ; Copyright (C) 1985 Change Software, Inc. ; ; Place the main command list in an overlay ; Call LOACMD to get the overlay loaded and ; return the command list address in r0. Also ; do the same thing for REMOTE commands via a ; call to LOAREM. ; If it should happen that this should cause ; a problem due to overlays overwritting this ; routine then simply put this into the root. .include /IN:K11MAC.MAC/ .include /IN:K11CDF.MAC/ .iif ndf, k11inc, .error ; INCLUDE missing for K11MAC.MAC .psect $code loaset::mov #setcmd ,r0 return $cmglob = 1 command setcmd ,ATTRIBUTES,3 ,set$at,,string command setcmd ,BAUD ,3 ,set$sp,,decnum command setcmd ,BINARY-TYPE,3 ,set$bi,,string command setcmd ,BINARY_TYPE,3 ,set$bi,,string command setcmd ,BLOCK-CHECK-TYPE,3,set$bl,,string command setcmd ,BLOCK_CHECK_TYPE,3,set$bl,,string command setcmd ,CONSOLE,3 ,set$co,<7 or 8 bit ? >,string command setcmd ,DEBUG ,3 ,set$de,,string command setcmd ,DEFAULT,3 ,set$df,,string command setcmd ,DELAY ,3 ,set$dl,,decnum command setcmd ,DIRECTORY,3 ,set$df,,string command setcmd ,DTR ,3 ,set$dt command setcmd ,DUPLEX ,3 ,set$du,,string command setcmd ,END-OF-LINE,3 ,set$eo,,octnum command setcmd ,END_OF_LINE,3 ,set$eo,,octnum command setcmd ,ESCAPE ,3 ,set$es,,octnum command setcmd ,FILETYPE,3 ,set$fi,,string command setcmd ,FILE_TYPE,3 ,set$fi,,string command setcmd ,FILE-TYPE,3 ,set$fi,,string command setcmd ,HANDSHAKE,3 ,set$ha,,string command setcmd ,HAND_SHAKE,3 ,set$ha,,string command setcmd ,HAND-SHAKE,3 ,set$ha,,string command setcmd ,HOME ,3 ,set$ho command setcmd ,IBM ,3 ,set$ib,,string command setcmd ,LINE ,3 ,set$li,,string command setcmd ,LOCAL ,3 ,set$lc,,string command setcmd ,LOGFILE,3 ,set$lo,,string command setcmd ,LOG_FILE,3 ,set$lo,,string command setcmd ,LOG-FILE,3 ,set$lo,,string command setcmd ,MODEM-TYPE,3 ,set$mo,,string command setcmd ,MODEM_TYPE,3 ,set$mo,,string command setcmd ,NOATTRIBUTES,4 ,sat$of command setcmd ,NODEBUG,4 ,sd$off command setcmd ,NOUPDATE,4 ,set$nu command setcmd ,PACKET-LENGTH,3 ,set$pl,,decnum command setcmd ,PACKET_LENGTH,3 ,set$pl,,decnum command setcmd ,PARITY ,3 ,set$pa,,string command setcmd ,PAUSE ,3 ,set$ps,,decnum command setcmd ,PROMPT ,3 ,set$pr,,string command setcmd ,RANDOM ,3 ,set$ra,,string command setcmd ,RECEIVE,3 ,set$rc,,string command setcmd ,RECORD_FORMAT,4 ,set$rf,,string command setcmd ,RECORD-FORMAT,4 ,set$rf,,string command setcmd ,REPEAT ,3 ,set$rp,,string command setcmd ,REPEAT_CHAR,3 ,set$rp,,string command setcmd ,REPEAT-CHAR,3 ,set$rp,,string command setcmd ,RETRY ,3 ,set$re,,decnum command setcmd ,RSX ,2 ,set$rx,,string command setcmd ,RT11 ,2 ,set$rt,,string command setcmd ,RTFLOW ,3 ,set$cf,,string command setcmd ,SEED ,3 ,set$se,,decnum command setcmd ,SEND ,3 ,set$sn,,string command setcmd ,SPEED ,3 ,set$sp,,decnum command setcmd ,START_OF_PACKET,3 ,set$so,,octnum command setcmd ,START-OF-PACKET,3 ,set$so,,octnum command setcmd ,TERMINAL,3 ,set$tt,,string command setcmd ,TIMEOUT,3 ,set$ti,,decnum command setcmd ,TIME-OUT,3 ,set$ti,,decnum command setcmd ,TIME_OUT,3 ,set$ti,,decnum command setcmd ,UPDATE ,2 ,set$up,,decnum command setcmd .end