z.abl

来自「这是一个和proteus结合的 使用gal的实例 和好噢」· ABL 代码 · 共 19 行

module P16v8
title 'P16v8'
U4 device 'p16v8r';
A15,A14,A13,A12,A11,A10,AR,WR PIN 7,9,2,3,4,6,1;
U9,MAX691,U8,U5,U7CS,LCDRW,U7OE,LCDE  PIN 12,13,14,15,16,17,18,19 ISTYPE 'COM';
H,L,X=1,0,.X.;
address=[A15,A14,A13,A12,A11,A10,X,X,X,X,X,X,X,X,X,X];
@dcset
EQUATIONS
address.clk=WR;
!U5:=(address<=^h7fff);
!MAX691:=(address<=^h7fff);
!U7CS:=(address>=^h8000)&(address<=^hdfff);
!U7OE:=(address>=^h8000)&(address<=^hdfff);
!U9:=(address>=^he000)&(address<=^he7ff);
!U8:=(address>=^he800)&(address<=^hefff);
!LCDE:=(address>=^hf000)&(address<=^hffff);
!LCDRW:=(address>=^hf000)&(address<=^hffff);
end