tailieunhanh - NIGEL PIC Tutorial Hardware phần 7

Để hoàn thành tất cả các hướng dẫn, bạn sẽ yêu cầu hai bo mạch chính, hai Ban IR, Ban LCD, Ban Switch, và Ban LED, bằng văn bản hai hướng dẫn đầu tiên sử dụng Ban LCD và Ban Đổi trên Porta và Hội đồng hồng ngoại trên PORTB - như Hội đồng I2C không sử dụng một trong hai chân 'khó khăn' cho Porta, chân 4 và 5, là đầu ra. Tải tập tin hướng dẫn nén. | retlw 0x00 LCD_Line1 movlw call retlw 0x80 LCD_Cmd 0x00 move to 1st row first column LCD_Line2 movlw 0xc0 move to 2nd row first column call LCD_Cmd retlw 0x00 LCD_CurOn movlw 0x0d Set block cursor on call LCD_Cmd retlw 0x00 LCD_CurOff movlw 0x0c Set block cursor off call LCD_Cmd retlw 0x00 LCD_Clr movlw 0x01 Clear display call LCD_Cmd retlw 0x00 LCD_HEX movwf tmpl display W as hexadecimal byte swapf tmpl w andlw 0x0f call HEX_Table call LCD_Char movf tmpl w andlw 0x0f call HEX_Table call LCD_Char retlw 0x00 Pulse_e bsf LCD_PORT LCD_E nop bcf LCD_PORT LCD_E retlw 0x00 end of LCD routines joystick routines JOY_Init setup joystick port bsf STATUS RP0 select bank 1 bcf JOY_TRIS PotX make PotX an output bcf JOY_PORT PotX discharge capacitor bcf JOY_TRIS PotY make PotY an output bcf JOY_PORT PotY discharge capacitor bcf STATUS RP0 select bank 0 retlw 0x00 ReadX clrf HiX reset counter registers clrf LoX bsf STATUS RP0 select bank 1 bsf JOY_TRIS PotX make PotX an input bcf STATUS RP0 select bank 0 x1 btfsc JOY_PORT PotX keep going until input high goto EndX incfsz LoX f goto x1 incfsz HiX f goto x1 EndX bsf STATUS RPO select bank 1 bcf JOY_TRIS PotX make PotX an output bcf JOY_PORT PotX discharge capacitor bcf STATUS RPO select bank O retlw OxOO ReadY clrf HiY reset counter registers clrf LoY call Delay5 bsf statUs RPO select bank 1 bsf JOY_TRIS PotY make PotY an input bcf STATUS RPO select bank O y1 btfsc JOY_PORT PotY keep going until input high goto EndY incfsz LoY f goto y1 incfsz HiY f goto y1 EndY bsf STATUS RPO select bank 1 bcf JOY_TRIS PotY make PotY an output bcf JOY_PORT PotY discharge capacitor bcf STATUS RPO select bank O retlw OxOO ReadSW btfss JOY_PORT SW1 call Sw1On btfss JOY_PORT SW2 call Sw2On btfsc JOY_PORT SW1 call Sw1Off btfsc JOY_PORT SW2 call Sw2Off retlw OxOO Sw1On bsf Flags SW1_ Flag retlw OxOO Sw2On bsf Flags SW2_ Flag retlw OxOO Sw1Off bcf Flags SW1_ Flag retlw OxOO Sw2Off bcf Flags SW2_ Flag retlw OxOO end of joystick routines Delay routines .