;//*******************************************************************
;文件名:并口打印機控制程序 FOR 8088

;功能：并口打印機控制打印字符、漢字
 
;接線：對應連接打印機接口模塊的BUSY、STROBE到8255模塊的PC0、PC5。
;      連接8255模塊的CS_8255到CPU模塊的200H。
;//********************************************************************
PA8255    EQU 200H        ;8255PA口地址
PB8255    EQU 201H        ;8255PB口地址

PC8255    EQU 202H        ;8255PC口地址
PCTL8255  EQU 203H        ;8255控制口地址

CODE    SEGMENT
ASSUME  CS:CODE,DS:CODE
START:   
        PUSH    CS
        POP     DS                           
        MOV     DX,PCTL8255
        MOV     AL,81H              ;設置PA、PC5出，PC0入
        OUT     DX,AL
        
BEGIN: 
        MOV     BX,OFFSET DATA1     ;打印數據區指針
        MOV     CX,59               ;發送16個ASCII碼
PRINT:	MOV     DX,PA8255
        MOV     AL,CS:[BX]	        ;取ASCII碼
        OUT     DX,AL	            ;發送ASCII碼

        MOV     DX,PCTL8255
        MOV     AL,0AH              ;PC5: STROBE置“0”，發送選通脈沖
        OUT     DX,AL
        NOP
        MOV     AL,0BH              ;PC5: STROBE置“1”，發送選通脈沖
        OUT     DX,AL  
WAIT1:   
        MOV     DX,PC8255         
        IN      AL,DX
        SHR     AL,1
        JC      WAIT1               ;忙，則等待  
        INC     BX                  ;不忙，指針增加1 
        LOOP    PRINT        
        
OK:     JMP     OK  
  
DATA1: ;DB       59                             ;1字符個數
       
       DB       0AH           ;走紙一行        ;1
       DB       1BH,36H,'H','E','L','L','O','!';8    
       DB       0DH           ;回車            ;1
       
       
       DB       0AH           ;走紙一行        ;1
       DB       1BH,38H,1     ;漢字打印命令    ;3
       DB       '浙','江','天','煌','科','技'  ;12
       DB       '實','業','有','限','公','司'  ;12
       DB       0DH           ;回車            ;1
      
       DB       1BH,36H,' ',' ',' '            ;5
       DB       1BH,38H,0,'天','堂','杭','州'  ;11
       DB       0AH           ;走紙一行        ;1
       DB       0AH           ;走紙一行        ;1
       DB       0AH           ;走紙一行        ;1
       DB       0AH           ;走紙一行        ;1  
                 


	 	CODE  ENDS
END     START