home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / pub / rt11 / krtsj.mac < prev    next >
Text File  |  2020-01-01  |  736b  |  26 lines
  1.     .title    KRTSJ    Kermit-11 root module for RT-11FB,SB,SJ or TSX-Plus
  2.     .ident    "V03.63"
  3.  
  4. ; /63/  27-Sep-97  Billy Youdelman  V03.63
  5. ;
  6. ;    for LOW MEMORY OVERLAYS
  7.  
  8. xmflow    == 0                   ; dummies for XM stuff
  9. xmftop    == 0                   ; unused in this version
  10.  
  11.     .ASECT                   ; /62/ support SET RUN VBGEXE
  12. . = 4                       ; /62/ $JSX job definition word
  13.     .word    200               ; /62/ set the VBGEXE$ bit
  14.  
  15.     .psect    $RTQUE    ,rw,d,gbl,rel,con
  16.     .psect    RTDIR    ,rw,d,gbl,rel,con  ; /BBS/ force into root
  17.     .psect    IMGTYPE    ,ro,d,lcl,rel,con
  18. imgtyp::.word    0               ; /62/ flag it's SJ/FB image
  19. $limit::.limit                   ; /62/ here to match KRTXM..
  20.     .psect    USERMD    ,rw,d,gbl,rel,con
  21.     .psect    FBSTART    ,ro,i,lcl,rel,con
  22.  
  23. fbstart::jmp    kermit               ; force transfer address here
  24.  
  25.     .end    fbstart
  26.