home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 15 / 15.iso / s / s199 / 1.img / M6809A.ABL < prev    next >
Encoding:
Text File  |  1986-02-04  |  1014 b   |  31 lines
  1. module m6809a 
  2. title '6809 memory decode
  3. Jean Designer    Data I/O Corp Redmond WA   24 Feb 1984'
  4.  
  5.                         U09a    device  'P14L4';
  6.         A15,A14,A13,A12,A11,A10 pin 1,2,3,4,5,6;
  7.         ROM1,IO,ROM2,DRAM       pin 14,15,16,17;
  8.  
  9.         H,L,X   = 1,0,.X.;
  10.         Address = [A15,A14,A13,A12, A11,A10,X,X, X,X,X,X, X,X,X,X];
  11.  
  12. equations
  13.         !DRAM   = (Address <= ^hDFFF);
  14.  
  15.         !IO     = (Address >= ^hE000) & (Address <= ^hE7FF);
  16.  
  17.         !ROM2   = (Address >= ^hF000) & (Address <= ^hF7FF);
  18.  
  19.         !ROM1   = (Address >= ^hF800);
  20.  
  21. test_vectors (Address -> [ROM1,ROM2,IO,DRAM])
  22.               ^h0000  -> [  H,  H,  H,   L ];
  23.               ^h4000  -> [  H,  H,  H,   L ];
  24.               ^h8000  -> [  H,  H,  H,   L ];
  25.               ^hC000  -> [  H,  H,  H,   L ];
  26.               ^hE000  -> [  H,  H,  L,   H ];
  27.               ^hE800  -> [  H,  H,  H,   H ];
  28.               ^hF000  -> [  H,  L,  H,   H ];
  29.               ^hF800  -> [  L,  H,  H,   H ];
  30. end m6809a  
  31.