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.

romtblsf.src 2.3KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081
  1. .page 'romtbl'
  2. dirtrk .byte 18 ; directory track #
  3. bamsiz .byte 4 ; # bytes/track in bam
  4. mapoff .byte 4 ; offset of bam in sector
  5. dsknam .byte $90 ; offset of disk name in bam sector
  6. ;
  7. ; command search table
  8. cmdtbl .byte 'VIDMBUP&CRSN'
  9. ; validate-dir init-drive duplicate
  10. ; memory-op block-op user
  11. ; position dskcpy utlodr rename scratch new
  12. ncmds =*-cmdtbl
  13. ; jump table low
  14. cjumpl .byte <verdir,<intdrv,<duplct
  15. .byte <mem,<block,<user
  16. .byte <record
  17. .byte <utlodr
  18. .byte <dskcpy
  19. .byte <rename,<scrtch,<new
  20. *=cjumpl+ncmds
  21. ; jump table high
  22. cjumph .byte >verdir,>intdrv,>duplct
  23. .byte >mem,>block,>user
  24. .byte >record
  25. .byte >utlodr
  26. .byte >dskcpy
  27. .byte >rename,>scrtch,>new
  28. *=cjumph+ncmds
  29. val=0 ; validate (verify) cmd #
  30. ; structure images for cmds
  31. pcmd =9
  32. .byte %01010001 ; dskcpy
  33. struct =*-pcmd ; cmds not parsed
  34. .byte %11011101 ; rename
  35. .byte %00011100 ; scratch
  36. .byte %10011110 ; new
  37. ldcmd =*-struct ; load cmd image
  38. .byte %00011100 ; load
  39. ; --- ---
  40. ; pgdrpgdr
  41. ; fs1 fs2
  42. ; bit reps: not pattern
  43. ; not greater than one file
  44. ; not default drive(s)
  45. ; required filename
  46. modlst .byte 'RWAM' ; mode table
  47. nmodes =*-modlst
  48. ;file type table
  49. tplst .byte 'DSPUL'
  50. typlst .byte 'DSPUR' ; del, seq, prog, user, relative
  51. ntypes =*-typlst
  52. tp1lst .byte 'EERSE'
  53. tp2lst .byte 'LQGRL'
  54. ledmsk .byte led0,led1
  55. ;
  56. ; error flag vars for bit
  57. ;
  58. er00 .byte 0
  59. er0 .byte $3f
  60. er1 .byte $7f
  61. er2 .byte $bf
  62. er3 .byte $ff
  63. ;
  64. numsec ; (4) sectors/track
  65. .byte 17,18,19,21
  66. vernum .byte fm4040 ; format type
  67. nzones .byte 4 ; # of zones
  68. maxtrk ; maximum track # +1
  69. trknum ; zone boundaries track numbers
  70. .byte 36,31,25,18
  71. offset ; for recovery
  72. .byte 1,$ff,$ff,1,0
  73. ;
  74. bufind
  75. .byte $03,$04,$05,$06,$07,$07
  76. ;
  77. ;.end