PIC12F675 OLED12864

;*******************************************************
;12864 OLED Commands
;Programmer: Gregory Michalik
;Email: gregory954(a)gmail.com
;*******************************************************
;**************************
;Fonts:
;0,6,10,18,51,120,123
;**************************

 UDATA_SHR
font    res 1                   ; Set Font (0 default)

 global OLED_Init
 global OLED_Orgin
 global OLED_StartScreen
 global OLED_Clear
 global OLED_ClearScreen
 global OLED_Rotate180
 global OLED_StartText
 global OLED_SendNull
 global OLED_NextLine
 global OLED_EEPROM
 global OLED_DMNULL
 global OLED_DMNOT
 global OLED_TextPos
 global OLED_FillRect
 global OLED_DrawRect
 global OLED_DrawLine
 extern Delay1000
 extern Delay125
 extern UART_SendByte
 extern baud

 code

OLED_Init
        call    Delay1000       ; Delay for Boot Screen
        call    Delay1000
        movlw   0x18            ; 9600bps(4Mhz)
        movwf   baud
        call    OLED_SetBaud19.2k
        movlw   0x0A            ; 19200bps(4Mhz)
        movwf   baud
        call    OLED_Clear
        return
OLED_SetBaud19.2k
        movlw   "S"
        call    UART_SendByte
        movlw   "B"
        call    UART_SendByte
        movlw   "1"
        call    UART_SendByte
        movlw   "9"
        call    UART_SendByte
        movlw   "2"
        call    UART_SendByte
        movlw   "0"
        call    UART_SendByte
        movlw   "0"
        call    UART_SendByte
        call    OLED_SendNull
        return
OLED_FillRect   ;FR(X,Y,X2,Y2)
        movlw   "F"
        call    UART_SendByte
        movlw   "R"
        call    UART_SendByte
        return
OLED_DrawRect   ;DR(X,Y,X2,Y2)
        movlw   "D"
        call    UART_SendByte
        movlw   "R"
        call    UART_SendByte
        return
OLED_DrawLine   ;LN(X,Y,X2,Y2)
        movlw   "L"
        call    UART_SendByte
        movlw   "N"
        call    UART_SendByte
        return
OLED_Orgin
        movlw   "T"
        call    UART_SendByte
        movlw   "P"
        call    UART_SendByte
        movlw   0x00
        call    UART_SendByte
        movlw   0x00
        call    UART_SendByte
        return
OLED_TextPos    ;TP(X,Y) (x,y are based on size of font)
        movlw   "T"
        call    UART_SendByte
        movlw   "P"
        call    UART_SendByte
        return
OLED_StartScreen
        movlw   "D"
        call    UART_SendByte
        movlw   "S"
        call    UART_SendByte
        movlw   "S"
        call    UART_SendByte
        movlw   "1"
        call    UART_SendByte
        call    Delay1000
        return
OLED_Clear
        movlw   "C"
        call    UART_SendByte
        movlw   "L"
        call    UART_SendByte
        return
OLED_ClearScreen
        call    OLED_CS
        call    OLED_DMNOT
        call    OLED_CS
        call    OLED_DMNULL
        return
OLED_CS
        movlw   "F"
        call    UART_SendByte
        movlw   "R"
        call    UART_SendByte
        movlw   0x00
        call    UART_SendByte
        movlw   0x00
        call    UART_SendByte
        movlw   0x80
        call    UART_SendByte
        movlw   0x41
        call    UART_SendByte
        return
OLED_DMNOT
        movlw   "D"
        call    UART_SendByte
        movlw   "M"
        call    UART_SendByte
        movlw   "!"
        call    UART_SendByte
        return
OLED_DMNULL
        movlw   "D"
        call    UART_SendByte
        movlw   "M"
        call    UART_SendByte
        movlw   0x00
        call    UART_SendByte
        return
OLED_Rotate180
        call    OLED_Clear
        movlw   "S"
        call    UART_SendByte
        movlw   "D"
        call    UART_SendByte
        movlw   "2"
        call    UART_SendByte
        return
OLED_StartText
        movlw   "T"
        call    UART_SendByte
        movlw   "T"
        call    UART_SendByte
        return
OLED_SendNull
        movlw   0x00
        call    UART_SendByte
        call    Delay125
        return
OLED_NextLine
        movlw   "T"
        call    UART_SendByte
        movlw   "R"
        call    UART_SendByte
        movlw   "T"
        call    UART_SendByte
        return
 END