tailieunhanh - NIGEL PIC Tutorial Hardware phần 5

Tôi đã mở rộng thường xuyên trễ để cung cấp một sự lựa chọn của sự chậm trễ khác nhau (từ 0mS 250ms), được gọi là hướng dẫn đơn giản 'cuộc gọi, thường xuyên trễ cũng có thể được gọi trực tiếp - chỉ đơn giản là tải chậm trễ cần thiết vào sổ đăng ký W và' cuộc gọi và khác nhau của Hội đồng I2C, như viết các hướng dẫn sử dụng Ban LCD trên Porta | Message2 movf call count w Text2 put counter value in W get a character from the text table EndMessage xorlw btf sc goto call incf goto 0x00 STATUS Z EndMessage LCD_Char count f Message2 is it a zero Stop goto Stop endless loop Subroutines and text tables LCD routines -Initialise LCD LCD_Init movlw call 0x20 LCD_Cmd Set 4 bit mode movlw call 0x28 LCD_Cmd Set display shift movlw call 0x06 LCD_Cmd Set display character mode command movlw call 0x0d LCD_Cmd Set display on off and cursor call LCD_Clr clear display retlw 0x00 command set LCD_Cmd routine movwf swapf andlw movwf bcf call templcd templcd 0x0f LCD_PORT LCD_PORT Pulse_e LCD_ w RS send upper nibble clear upper 4 bits of RS line to 0 Pulse the E line high W movf andlw movwf bcf call call retlw templcd 0x0f LCD_PORT LCD_PORT Pulse_e Delay5 0x00 LCD_ w RS send lower nibble clear upper 4 bits of RS line to 0 Pulse the E line high W LCD_CharD LCD_Char addlw movwf swapf andlw movwf bsf call 0x30 templcd templcd 0x0f LCD_PORT LCD_PORT Pulse_e LCD_ w RS send upper nibble clear upper 4 bits of RS line to 1 Pulse the E line high W movf andlw movwf bsf call call retlw templcd 0x0f LCD_PORT LCD_PORT Pulse_e Delay5 0x00 w LCD_RS send lower nibble clear upper 4 bits of W RS line to 1 Pulse the E line high LCD_Line1 movlw call retlw 0x80 LCD_Cmd 0x00 move to 1st row first column LCD_Line2 movlw call retlw 0xc0 LCD_Cmd 0x00 move to 2nd row first column LCD_Line1W addlw call retlw 0x80 LCD_Cmd 0x00 move to 1st row column W LCD_Line2W addlw call retlw 0xc0 LCD_Cmd 0x00 move to 2nd row column W LCD_CurOn command movlw call retlw 0x0d LCD_Cmd 0x00 Set display on off and cursor LCD_CurOff command movlw call retlw 0x0c LCD_Cmd 0x00 Set display on off and cursor LCD_Clr movlw call retlw 0x01 LCD_Cmd 0x00 Clear display LCD_HEX movwf swapf andlw call call movf andlw call call retlw tmp1 tmp1 w 0x0f HEX_Table LCD_Char tmp1 w 0x0f HEX_Table LCD_Char 0x00 Delay255 Delay100 Delay50 Delay2 0 Delay5 d0 d1 movlw goto movlw goto movlw goto .