home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / ENTERPRS / CPM / UTILS / S / ZEN2.LBR / ZGDPDEF.LIB < prev    next >
Text File  |  2000-06-30  |  2KB  |  56 lines
  1.  
  2. ;**    Z-100 GENERAL DATA PORT DEFINITIONS
  3. ;
  4. ;    HARDWARE IS A 6821
  5. ;
  6.  
  7. ;    PORT ASSIGNMENTS
  8.  
  9. GDPDATA    EQU    ZGDP+PIADATA        ;DATA PORT A
  10. GDPDDRA    EQU    ZGDP+PIADDRA        ;DATA DIRECTION PORT A
  11. GDPCTLA    EQU    ZGDP+PIACTLA        ;CONTROL PORT A
  12. GDPDATB    EQU    ZGDP+PIADATB        ;DATA PORT B
  13. GDPDDRB    EQU    ZGDP+PIADDRB        ;DATA DIRECTION PORT B
  14. GDPCTLB    EQU    ZGDP+PIACTLB        ;CONTROL PORT B
  15.  
  16. ;    CONTROL PORT A ASSIGNMENTS
  17.  
  18. GDPCAV    EQU    PIAC12+PIAC23+PIADDAC    ;INITIALIZATION VALUE
  19. LPENSI    EQU    PIAIRQ1            ;CA1 = LIGHT PEN STROBE
  20.                     ;      INTERRUPT ON 0->1
  21. VSYNCI    EQU    PIAIRQ2            ;CA2 = VERTICAL SYNC
  22.                     ;      INTERRUPT ON 0->1
  23.  
  24. ;    DATA DIRECTION PORT A ASSIGNMENTS
  25.  
  26. GDPDDAV    EQU    10101111B
  27.  
  28. ;    DATA PORT A ASSIGNMENTS
  29.  
  30. PPRTM10    EQU    00000011B        ;PRINTER D1-D0 MASK
  31. PPRTSTB    EQU    00000100B        ;PRINTER STROBE (OUTPUT ACTIVE LOW)
  32. PPRTPRM    EQU    00001000B        ;PRINTER PRIME (OUTPUT ACTIVE LOW)
  33. VSYNC    EQU    00010000B        ;VERTICAL SYNC (INPUT ACTIVE HIGH)
  34. VSYNCE    EQU    00100000B        ;VERT SYNC TO CA2 (0=DISABLE, 1=ENABLE)
  35. LPEN    EQU    01000000B        ;LIGHT PEN SWITCH (INPUT ACTIVE HIGH)
  36. LPENSE    EQU    10000000B    ;LIGHT PEN STROBE TO CA1 (0=DISABLE, 1=ENABLE)
  37.  
  38. ;    CONTROL PORT B ASSIGNMENTS
  39.  
  40. GDPCBV    EQU    PIAC12+PIAC20+PIADDAC    ;INITIALIZATION VALUE
  41. PRTACKI    EQU    PIAIRQ1            ;CB1 = PRINTER ACKNOWLEDGE
  42.                     ;      NO INTERRUPT ON 0->1
  43. PRTBSYI    EQU    PIAIRQ2            ;CB2 = PRINTER BUSY
  44.                     ;      NO INTERRUPT ON 1->0
  45.  
  46. ;    DATA DIRECTION PORT B ASSIGNMENTS
  47.  
  48. GDPBDDV    EQU    11111100B
  49.  
  50. ;    DATA PORT B ASSIGNMENTS
  51.  
  52. PPRTBSY    EQU    00000001B        ;PRINTER BUSY (INPUT ACTIVE HIGH)
  53. PPRTFLT    EQU    00000010B        ;PRINTER FAULT (INPUT ACTIVE LOW)
  54. PPRTM72    EQU    11111100B        ;PRINTER D7-D2 MASK
  55.  
  56.