You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

romtbl 2.0KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586
  1. .PAGE 'ROMTBL'
  2. DIRTRK .BYT 39 ;DIRECTORY TRACK #
  3. BAMSIZ .BYT 5 ;# BYTES/TRACK IN BAM
  4. MAPOFF .BYT 6 ;OFFSET OF BAM IN SECTOR
  5. DSKNAM .BYT 6 ;OFFSET OF DISK NAME IN BAM SECTOR
  6. BAMTRK .BYT 38,38,39 ;BAM LINK TABLE
  7. BAMSEC .BYT 0,3,1 ;BAM LINK TABLE
  8. ;
  9. ;
  10. ; COMMAND SEARCH TABLE
  11. CMDTBL .BYT 'VIDMBUPC&RSN'
  12. ; VALIDATE-DIR INIT-DRIVE DUPLICATE
  13. ; MEMORY-OP BLOCK-OP USER
  14. ; POSITION DSKCPY UTLODR RENAME SCRATCH NEW
  15. NCMDS =*-CMDTBL
  16. ; JUMP TABLE LOW
  17. CJUMPL .BYT <VERDIR,<INTDRV,<DUPLCT
  18. .BYT <MEM,<BLOCK,<USER
  19. .BYT <RECORD
  20. .BYT <DSKCPY
  21. .BYT <UTLODR,<RENAME,<SCRTCH,<NEW
  22. *=CJUMPL+NCMDS
  23. ; JUMP TABLE HIGH
  24. CJUMPH .BYT >VERDIR,>INTDRV,>DUPLCT
  25. .BYT >MEM,>BLOCK,>USER
  26. .BYT >RECORD
  27. .BYT >DSKCPY
  28. .BYT >UTLODR,>RENAME,>SCRTCH,>NEW
  29. *=CJUMPH+NCMDS
  30. VAL=0 ;VALIDATE (VERIFY) CMD #
  31. .SKIP
  32. ; STRUCTURE IMAGES FOR CMDS
  33. PCMD =8
  34. .BYT %01010001 ; DSKCPY
  35. STRUCT =*-PCMD ; CMDS NOT PARSED
  36. .BYT 0 ; UTLODR
  37. .BYT %11011101 ; RENAME
  38. .BYT %00011100 ; SCRATCH
  39. .BYT %10011110 ; NEW
  40. LDCMD =*-STRUCT ; LOAD CMD IMAGE
  41. .BYT %00011100 ; LOAD
  42. ; --- ---
  43. ; PGDRPGDR
  44. ; FS1 FS2
  45. .SKIP
  46. ; BIT REPS: NOT PATTERN
  47. ; NOT GREATER THAN ONE FILE
  48. ; NOT DEFAULT DRIVE(S)
  49. ; REQUIRED FILENAME
  50. .SKIP
  51. MODLST .BYT 'RWAM' ; MODE TABLE
  52. NMODES =*-MODLST
  53. ;FILE TYPE TABLE
  54. TPLST .BYT 'DSPUL'
  55. TYPLST .BYT 'DSPUR' ;DEL, SEQ, PROG, USER, RELATIVE
  56. NTYPES =*-TYPLST
  57. TP1LST .BYT 'EERSE'
  58. TP2LST .BYT 'LQGRL'
  59. ;
  60. ; ERROR FLAG VARS FOR BIT
  61. ;
  62. ER00 .BYT 0
  63. ER0 .BYT $3F
  64. ER1 .BYT $7F
  65. ER2 .BYT $BF
  66. ER3 .BYT $FF
  67. ;
  68. IPBM .BYTE $41,$42
  69. DRIVER
  70. ;NUMSEC (TAB1): (4) SECTORS/TRACK
  71. .BYTE 23,25,27,29
  72. ;GAP1: HEADER GAP, GAP2: TAIL GAP (FORMAT), VERNUM: FORMAT TYPE
  73. .BYTE 20, 11, FM8050
  74. ;ACTJOB, PHASE(2), STPTRK, NZONES
  75. .BYTE 0, 0,0, 4, 4
  76. ;SYNDLY, WPSW(2), LWPT(2), PBI, CFLG2, NSIDES
  77. .BYTE 3, 1,1, 0,0, 7, 0, 1
  78. ;UNUSED(3)
  79. .BYTE 0,0,0
  80. ;TRKNUM (TAB3): ZONE BOUNDARIES TRACK NUMBERS
  81. .BYTE 78,65,54,40, 0,0,0,0
  82. ;OFFSET: FOR RECOVERY
  83. .BYTE 1,$FF,$FF,1,2,$FE,$FE,2,0
  84. CTBSIZ =*-DRIVER
  85. .SKIP
  86. .END