Department of Computer Science and Information EngineeringNational Cheng Kung University, TAIWAN
HANELExample 15-4 (cont’)(c)CONTRBT EQU 83H ;PA=OUT,
PB=IN, PCL=IN, PCU=OUTAPORT EQU 20HBPORT EQU 21HCPORT EQU 22HCNTPORT EQU 23H...MOV A,#CONTRBYT ;PA=OUT,PB=IN,PCL=IN,PCU=OUTMOV R0,#CNTPORT ;LOAD CONTROL REG ADDRESSMOVX @R0,A;ISSUE CONTROL WORDMOV R0,#BPORT ;LOAD PB ADDRESSMOVX A,@R0 ;READ PBDEC R0;POINT TO PA(20H)MOVX @R0,A ;SEND IT TO PAMOV R0,#CPORT ;LOAD PC ADDRESSMOVX A,@R0 ;READ PCLANL A,#0FH;MASK UPPER NIBBLESWAP A;SWAP LOW AND HIGH NIBBLEMOVX @R0,A ;SEND TO PCUPROGRAMMING THE 8255Address Aliases
(cont’)