;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Nokia 3310 LCD JAL Library by Andre Miller
;; (andre@100acre.org)
;;
;; Based on the following C source libraries:
;;
;; - Various projects using LPH7779 with PICC by Michel Bavin
;;   http://users.skynet.be/bk317494/index.htm
;; - Nokia LCD Lib for AVR by Louis Frigon
;;   http://www.microsyl.com/nokialcd/nokialcd.html


include f877_20
include jlib
include nokia_lcd_p
include nokia_lcd
include font_5x7

;; pragma target fuses 0x3F32
disable_a_d_functions

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; For flashing LED
var bit LED is pin_a0
pin_a0_direction = output


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Main program starts here


;; Flash a LED for sanity checking
for 2 loop
  delay_100ms( 1 )
  LED = high
  delay_100ms( 1 )
  LED = low
end loop

;; Init the LCD display
NLCD_Init()

forever loop
        NLCD_Clear()
        NLCD_GotoXY (5,0)
        print_char_5x7("H")
        print_char_5x7("E")
        print_char_5x7("L")
        print_char_5x7("L")
        print_char_5x7("O")
        print_char_5x7(" ")
        print_char_5x7("W")
        print_char_5x7("O")
        print_char_5x7("R")
        print_char_5x7("L")
        print_char_5x7("D")
        print_char_5x7("!")

        NLCD_GotoXY (0,2)
        print_char_5x7_i(" ")
        print_char_5x7_i("h")
        print_char_5x7_i("e")
        print_char_5x7_i("l")
        print_char_5x7_i("l")
        print_char_5x7_i("o")
        print_char_5x7_i(" ")
        print_char_5x7_i("w")
        print_char_5x7_i("o")
        print_char_5x7_i("r")
        print_char_5x7_i("l")
        print_char_5x7_i("d")
        print_char_5x7_i("!")
        print_char_5x7_i(" ")

        NLCD_GotoXY (5,4)
        print_char_5x7("+")
        print_char_5x7("1")
        print_char_5x7("2")
        print_char_5x7("3")
        print_char_5x7("4")
        print_char_5x7("5")
        print_char_5x7("6")
        print_char_5x7("7")
        print_char_5x7("8")
        print_char_5x7("9")
        print_char_5x7("0")
        print_char_5x7("+")
        delay_1s (10)
        
        NLCD_Test_1()
        delay_1s (1)
        
        NLCD_Test_2()
        delay_1s (1)
        
end loop