home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / pub / rt11 / krtstd.mac < prev    next >
Text File  |  2020-01-01  |  4KB  |  121 lines
  1.     .title    KRTSTD    SET command list overlay
  2.     .ident    "V03.63"
  3.  
  4. ; /63/    27-Sep-97  Billy Youdelman  V03.63
  5. ;
  6. ;    consolidate local data..
  7. ;    add SET WILDCARDS
  8.  
  9. ; /62/    27-Jul-93  Billy Youdelman  V03.62
  10. ;
  11. ;    move BREAK to SET CONSOLE, CREATE-SIZE and VOLUME to SET FILE
  12. ;    move SETTLE-TIME to SET DIAL ..
  13.  
  14. ; /BBS/     1-Dec-91  Billy Youdelman  V03.61
  15.  
  16. ;    23-Oct-85  09:44:20  BDN  Creation, removed from KRTCOM
  17. ;
  18. ;    Copyright 1985 Change Software, Inc.
  19. ;
  20. ;    Call LOASET to get the overlay loaded and
  21. ;    return the command list address in r0
  22.  
  23.  
  24.     .include "IN:KRTMAC.MAC"
  25.     .iif ndf  KRTINC  .error    <; .include for IN:KRTMAC.MAC failed>
  26.     .include "IN:KRTCDF.MAC"
  27.     .iif ndf  KRTCDF  .error    <; .include for IN:KRTCDF.MAC failed>
  28.  
  29.  
  30.     .psect    $pdata
  31.     .sbttl    Local data        ; /63/ consolidate data here..
  32.  
  33. std.01:    .asciz    "On, Off? "
  34. std.02:    .asciz    "Value: "
  35. std.03:    .asciz    "File type: "
  36. std.04:    .asciz    "1, 2 or 3? "
  37. std.05:    .asciz    "Line, Ports or Units? "
  38. std.06:    .asciz    "Option: "
  39. std.07:    .asciz    "Unprefix or Prefix? "
  40. std.08:    .asciz    "Mode: "
  41. std.09:    .asciz    "Directory: "
  42. std.10:    .asciz    "Seconds: "
  43. std.11:    .asciz    "Half or Full? "
  44. std.12:    .asciz    "Octal 1-36: "
  45. std.13:    .asciz    "Exit, Noexit? "
  46. std.14:    .asciz    "ASCII, Auto or Binary? "
  47. std.15:    .asciz    "RTS/CTS or XOFF? "
  48. std.16:    .asciz    "Type? "
  49. std.17:    .asciz    "Keep or Discard? "
  50. std.18:    .asciz    "Device name: "
  51. std.19:    .asciz    "Modem name: "
  52. std.20:    .asciz    "Odd, Even, Mark, Space or None? "
  53. std.21:    .asciz    "New prompt: "
  54. std.22:    .asciz    "Initial or Packet? "
  55. std.23:    .asciz    "Random-number seed: "
  56. std.24:    .asciz    "On or Off, KED or NOKED? "
  57. std.25:    .asciz    "Interval: "
  58. std.26:    .asciz    "Local or Remote? "
  59.     .even
  60.  
  61.  
  62.     .psect    $code
  63.     .sbttl    Define the SET commands
  64.  
  65. loaset::mov    #setcmd    ,r0        ; calling this also loads this overlay
  66.     return
  67.  
  68.     command    setcmd    ,ATTRIBUTES    ,1    ,set$at    ,std.01
  69.     command setcmd    ,BAUD        ,2    ,set$sp    ,std.02
  70.     command    setcmd    ,BINARY-TYPE    ,2    ,set$bi    ,std.03
  71.     command    setcmd    ,BLOCK-CHECK-TYPE,2    ,set$bl    ,std.04
  72.     command setcmd    ,CL:        ,2    ,set$cl    ,std.05
  73.     command setcmd    ,CONSOLE    ,2    ,set$co    ,std.06
  74.     command setcmd    ,CONTROL-CHARACTER,4    ,set$ct    ,std.07
  75.     command setcmd    ,DEBUG        ,3    ,set$de    ,std.08
  76.     command setcmd    ,DEFAULT    ,3    ,c$cwd    ,std.09
  77.     command    setcmd    ,DELAY        ,3    ,set$dl    ,std.10
  78.     command setcmd    ,DIAL        ,2    ,set$di    ,std.06
  79.     command setcmd    ,DTR        ,2    ,set$dt
  80.     command setcmd    ,DUPLEX        ,2    ,set$du    ,std.11
  81.     command    setcmd    ,END-OF-LINE    ,2    ,set$eo    ,std.12
  82.     command setcmd    ,EOF        ,2    ,set$ef    ,std.13
  83.     command setcmd    ,ESCAPE        ,2    ,set$es    ,std.12
  84.     command    setcmd    ,FILE-TYPE    ,2    ,set$fi    ,std.14
  85.     command setcmd    ,FLOW-CONTROL    ,2    ,set$km    ,std.15
  86.     command setcmd    ,HANDSHAKE    ,2    ,set$ha    ,std.16
  87.     command setcmd    ,HOME        ,2    ,set$ho    ,std.09
  88.     command setcmd    ,INCOMPLETE-FILE-DISPOSITION ,1    ,set$in    ,std.17
  89.     command setcmd    ,LD:        ,2    ,set$ld    ,std.06
  90.     command setcmd    ,LINE        ,2    ,set$li    ,std.18
  91.     command setcmd    ,LOCAL-ECHO    ,3    ,set$lc    ,std.01
  92.     command setcmd    ,LOGFILE    ,3    ,set$lo
  93.     command setcmd    ,LONG-PACKETS    ,3    ,set$lp    ,std.01
  94.     command setcmd    ,MODEM-TYPE    ,1    ,set$mo    ,std.19
  95.     command    setcmd    ,NOATTRIBUTES    ,3    ,st$nat
  96.     command setcmd    ,NODEBUG    ,3    ,sd$off
  97.     command    setcmd    ,NOLONG-PACKETS    ,3    ,st$nlp
  98.     command setcmd    ,NOREPEAT-QUOTING,3    ,rep$of
  99.     command setcmd    ,NOUPDATE    ,3    ,set$nu
  100.     command    setcmd    ,PARITY        ,3    ,set$pa    ,std.20
  101.     command    setcmd    ,PAUSE        ,3    ,set$ps    ,std.10
  102.     command setcmd    ,PHONE        ,2    ,set$ph    ,std.06
  103.     command setcmd    ,PROMPT        ,2    ,set$pr    ,std.21
  104.     command setcmd    ,RANDOM        ,2    ,set$ra    ,std.01
  105.     command setcmd    ,RECEIVE    ,3    ,set$rc    ,std.06
  106.     command setcmd    ,REPEAT-QUOTING    ,3    ,set$rp    ,std.01
  107.     command    setcmd    ,RETRY        ,3    ,set$re    ,std.22
  108.     command setcmd    ,SEED        ,3    ,set$se    ,std.23
  109.     command    setcmd    ,SEND        ,3    ,set$sn    ,std.06
  110.     command setcmd    ,SERVER        ,3    ,set$sv    ,std.06
  111.     command setcmd    ,SL        ,2    ,set$sl    ,std.24
  112.     command setcmd    ,SPEED        ,2    ,set$sp    ,std.02
  113.     command    setcmd    ,START-OF-PACKET,2    ,set$so    ,std.12
  114.     command setcmd    ,TERMINAL    ,2    ,set$tt    ,std.16
  115.     command setcmd    ,TT:        ,2    ,set$tt    ,std.16
  116.     command setcmd    ,UPDATE        ,1    ,set$up    ,std.25
  117.     command    setcmd    ,VLSWCH        ,1    ,set$vl    ,std.26
  118.     command    setcmd
  119.  
  120.     .end
  121.