AN579

Size: px

Start display at page:

Download "AN579"

常莘
6 years ago
Views:

1 深圳市英锐恩科技有限公司单片机集成方案全方位解决服务商优质智能电子产品芯方案解决商 Microchip 产品用户参考手册深圳市英锐恩科技有限公司 ENROO-TECH(SHENZHEN)CO.,LTD 中国深圳市福田区福华路嘉汇新城汇商中心 27 楼 2701 Enroo-Tech Technologies CO., Limited Light-Tech International Limited 香港新界荃灣沙咀道號科技中心 5 樓 5 室联系电话 : , , , , 联系传真 : 联系邮件 :enroo@enroo.com 公司网站 : ; Add: 深圳市福田区福华路嘉汇新城汇商中心 27 楼 2701 Tel: , Fax:

$HIJKLM N O P45QRSTUV NWO XY E Z[\]^ _` ab>cd1xqr 1 45> cde1> fghij >k[ lj]^_`qm nlj]^ _`QR KLbQmk[O_opm_` KLNQRk[qr_ ` stqrwqmk[xuljv E FG Z[ewx yxz h.hij45{_` ab }.HIJ~7] NO > e1>-\ƒ ey >!$

2 !"#$ %&'( %)*+, -./ :;< = >?@ AB45CD EFG.HIJKLM N O P45QRSTUV NWO XY E Z[\]^ _` ab>cd1xqr 1 45> cde1> fghij >k[ lj]^_`qm nlj]^ _`QR KLbQmk[O_opm_` KLNQRk[qr_ ` stqrwqmk[xuljv E FG Z[ewx yxz h.hij45{_` ab }.HIJ~7] NO > e1>-\ƒ ey >! W "" 1># \ƒ $ 1> \ƒ }\ƒe > $ cdˆ Š Œr?EP NR ŽN > %$ QR e 1> }QR k[enr > %$ Š NR n.lj?enr > %& ' e1> > %& ˆ Š OR k[lj? P.H SNm Qm > %$ e1> šefg %$ W %$ >eš œ > %& E e1> cdˆ Š st žz[=]^ š=ÿ./01 ] Z[

3 s X E FG QR X ª Z[ EFG X (

4 ª Z[

5 ª ) Z[

6 ) "" Z[

7 «MPASM Released PSP64.ASM :03:44 PAGE 1 LOC OBJECT CODE LINE SOURCE TEXT VALUE ;********************************************************************* ;* 16C64/74 Parallel Slave port ;* This program demonstrates the Parallel Slave Port function of ;* the PIC16C64/74. The program is interrupt driven, when the PIC ;* is either read from or written to, an interrupt is generated. If ;* the interrupt was caused by a read, a register is incremented, and ;* the new count is placed in an output queue. If the interrupt was ;* caused by a write, the data is put on the Port B pins ; ; Program: PSP64.ASM ; Revision Date: ; Compatibility with MPASMWIN ; ;;******************************************************************** list p=16c ERRORLEVEL ; include "p16c64.inc" LIST ; P16C64.INC Standard Header File, Ver Microchip Technology, Inc LIST ;Register definitions FLAGREG equ 20h ;Flag bit register OUTDATA equ 21h ;Output data INDATA equ 22h ;Input data COUNT equ 23h ;Count of times output register read ;Bit definitions for flag register err equ 00h ;Error flag bit OUTRDY equ 01h ;Output data ready flag INFULL equ 02h ;Input data received flag org 0000h ;Reset Vector goto Start org 0005h ;Interrupt Vector goto Service_Int

8 Start A clrf OUTDATA ;Clear data registers A clrf INDATA bsf STATUS,RP0 ;Select register Bank movlw b' ' ;Set RD, WR, and CS as 000A movwf TRISE ; inputs, Enable Parallel Slave port 000B 30FF movlw 0FFh 000C movwf TRISB ;Set Port_B to all outputs 000D movlw b' ' ; 000E 008C movwf PIE1 ;Enable Parallel Slave Port interrupt 000F bcf STATUS,RP0 ;Select register Bank movf OUTDATA,W ;Set output Data in PORTD movwf PORTD C movlw b' ' ;Set GIE, PEIE (enable interrupts) B movwf INTCON Loop btfsc FLAGREG,INFULL ;Check if input data received goto Checkout ;No data ready, check output bcf FLAGREG,INFULL ;Clear input data ready flag movf INDATA,W ;Get Input data movwf PORTB ;Output input data to Port_B Checkout A btfsc FLAGREG,OUTRDY ;Check if data output already 001A goto Loop ;Not output yet, loop 001B 0AA incf COUNT, F ;Increment output data 001C movf COUNT,W ;Get output data 001D 00A movwf OUTDATA ;Put data in output queue 001E 14A bsf FLAGREG,OUTRDY ;Set flag for interrupt routine 001F goto Loop ;********************************************************************* ;*Interrupt Service Routine ;* Inputs: FLAGREG - Flag register to/from the main routine: ;* Bit 1: OUTRDY - To Service_Int, indicates ;* data ready in output queue ;* OUTDATA - Output data queue ;* PIR1 - Interrupt flag register ;* TRISE - Parallel slave port flag register ;* PORTD - Input data from slave port ;* ;* Outputs:

9 00080 ;* PORTD - Output data to slave port ;* INDATA - Input data queue ;* FLAGREG - Flag register to/from the main routine: ;* Bit 0: ERROR - From Service_Int, indicates ;* input buffer overflow ;* Bit 2: INFULL - From Service_Int, indicates ;* data received and in INDATA ;********************************************************************* Service_Int F8C btfss PIR1,PSPIF ;Test for Peripheral interrupt goto Intout ;Not a Peripheral interrupt, exit C bcf PIR1,PSPIF ;Clear Peripheral interrupt bsf STATUS,RP0 ;Select Bank F btfss TRISE,IBF ;Check if input data ready A goto Notinput ;No input, check output bcf STATUS,RP0 ;Input ready, select Bank bsf FLAGREG,INFULL ;Set flag for main routine movf PORTD,W ;Get input data A movwf INDATA ;Put byte in input queue 002A Notinput 002A 1B btfsc TRISE,OBF ;Check if output data read 002B goto Intout ;Not read, exit 002C bcf STATUS,RP0 ;Select Bank0 002D 1CA btfss FLAGREG,OUTRDY ;Check if data in output queue 002E goto Intout ;Output not read, exit 002F movf OUTDATA,W ;Get data from queue movf PORTD, F ;Put data in output buffer A bcf FLAGREG,OUTRDY ;Clear flag for main routine Intout bsf STATUS,RP0 ;Select Bank A btfsc TRISE,IBOV ;Check input buffer overflow flag goto Interror ;If not clear, error bcf STATUS,RP0 ;Select Bank retfie ;Re-enable GIE and return Interror bcf STATUS,RP0 ;Select Bank bsf FLAGREG,err ;Set error flag for main routin retfie ;Re-enable GIE and return end MEMORY USAGE MAP ('X' = Used, '-' = Unused) 0000 : X----XXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXX XXXXXXXXXX All other memory blocks unused.

10 Program Memory Words Used: 54 Program Memory Words Free: 1994 Errors : 0 Warnings : 0 reported, 0 suppressed Messages : 0 reported, 6 suppressed

11 深圳市英锐恩科技有限公司全球销售及服务网点单片机集成方案全方位解决服务商优质智能电子产品芯方案解决商联系信息 : 深圳市英锐恩科技有限公司 ENROO-TECH(SHENZHEN)CO.,LTD 中国深圳市福田区福华路嘉汇新城汇商中心 27 楼 2701 Enroo-Tech Technologies CO., Limited Light-Tech International Limited 香港新界荃灣沙咀道號科技中心 5 樓 5 室联系电话 : , , , , 联系传真 : 联系邮件 :enroo@enroo.com 公司网站 : ; Add: 深圳市福田区福华路嘉汇新城汇商中心 27 楼 2701 Tel: , Fax:

mdt1030

mdt1030 深圳市英锐恩科技有限公司第 1 页单片机集成方案全方位解决服务商优质智能电子产品芯方案解决商 Micon MDT1030 产品用户参考手册全球销售及服务联系信息 : 深圳市英锐恩科技有限公司 ENROO-TECH(SHENZHEN)CO.,LTD 中国深圳市福田区福华路嘉汇新城汇商中心 27 楼 2701 室 Enroo-Tech Technologies CO., Limited Light-Tech