
_main:

;LCD.mbas,21 :: 		main:
;LCD.mbas,22 :: 		OSCCON = %01110000 '8MHz
	MOVLW       112
	MOVWF       OSCCON+0 
;LCD.mbas,23 :: 		PLLEN_bit = 1 'Enable PLL (48MHz now)
	BSF         PLLEN_bit+0, BitPos(PLLEN_bit+0) 
;LCD.mbas,24 :: 		ANCON0 = %11111111 'All digital
	MOVLW       255
	MOVWF       ANCON0+0 
;LCD.mbas,25 :: 		ANCON1 = %00011111 'All digital
	MOVLW       31
	MOVWF       ANCON1+0 
;LCD.mbas,27 :: 		LCD_BL_Direction = 0
	BCF         TRISA5_bit+0, BitPos(TRISA5_bit+0) 
;LCD.mbas,28 :: 		LCD_BL = 1
	BSF         LATA5_bit+0, BitPos(LATA5_bit+0) 
;LCD.mbas,29 :: 		Lcd_Init()                     ' Initialize Lcd
	CALL        _Lcd_Init+0, 0
;LCD.mbas,30 :: 		Lcd_Cmd(_LCD_CLEAR)            ' Clear display
	MOVLW       1
	MOVWF       FARG_Lcd_Cmd_out_char+0 
	CALL        _Lcd_Cmd+0, 0
;LCD.mbas,31 :: 		Lcd_Cmd(_LCD_CURSOR_OFF)       ' Cursor off
	MOVLW       12
	MOVWF       FARG_Lcd_Cmd_out_char+0 
	CALL        _Lcd_Cmd+0, 0
;LCD.mbas,32 :: 		Lcd_Out(1,1,"    SimPLCv2    ")              ' Write text in first row
	MOVLW       1
	MOVWF       FARG_Lcd_Out_row+0 
	MOVLW       1
	MOVWF       FARG_Lcd_Out_column+0 
	MOVLW       32
	MOVWF       ?LocalText_main_0+0 
	MOVLW       32
	MOVWF       ?LocalText_main_0+1 
	MOVLW       32
	MOVWF       ?LocalText_main_0+2 
	MOVLW       32
	MOVWF       ?LocalText_main_0+3 
	MOVLW       83
	MOVWF       ?LocalText_main_0+4 
	MOVLW       105
	MOVWF       ?LocalText_main_0+5 
	MOVLW       109
	MOVWF       ?LocalText_main_0+6 
	MOVLW       80
	MOVWF       ?LocalText_main_0+7 
	MOVLW       76
	MOVWF       ?LocalText_main_0+8 
	MOVLW       67
	MOVWF       ?LocalText_main_0+9 
	MOVLW       118
	MOVWF       ?LocalText_main_0+10 
	MOVLW       50
	MOVWF       ?LocalText_main_0+11 
	MOVLW       32
	MOVWF       ?LocalText_main_0+12 
	MOVLW       32
	MOVWF       ?LocalText_main_0+13 
	MOVLW       32
	MOVWF       ?LocalText_main_0+14 
	MOVLW       32
	MOVWF       ?LocalText_main_0+15 
	CLRF        ?LocalText_main_0+16 
	MOVLW       ?LocalText_main_0+0
	MOVWF       FARG_Lcd_Out_text+0 
	MOVLW       hi_addr(?LocalText_main_0+0)
	MOVWF       FARG_Lcd_Out_text+1 
	CALL        _Lcd_Out+0, 0
;LCD.mbas,33 :: 		Lcd_Out(2,1,"www.dizzy.co.za ")              ' Write text in second row
	MOVLW       2
	MOVWF       FARG_Lcd_Out_row+0 
	MOVLW       1
	MOVWF       FARG_Lcd_Out_column+0 
	MOVLW       119
	MOVWF       ?LocalText_main_1+0 
	MOVLW       119
	MOVWF       ?LocalText_main_1+1 
	MOVLW       119
	MOVWF       ?LocalText_main_1+2 
	MOVLW       46
	MOVWF       ?LocalText_main_1+3 
	MOVLW       100
	MOVWF       ?LocalText_main_1+4 
	MOVLW       105
	MOVWF       ?LocalText_main_1+5 
	MOVLW       122
	MOVWF       ?LocalText_main_1+6 
	MOVLW       122
	MOVWF       ?LocalText_main_1+7 
	MOVLW       121
	MOVWF       ?LocalText_main_1+8 
	MOVLW       46
	MOVWF       ?LocalText_main_1+9 
	MOVLW       99
	MOVWF       ?LocalText_main_1+10 
	MOVLW       111
	MOVWF       ?LocalText_main_1+11 
	MOVLW       46
	MOVWF       ?LocalText_main_1+12 
	MOVLW       122
	MOVWF       ?LocalText_main_1+13 
	MOVLW       97
	MOVWF       ?LocalText_main_1+14 
	MOVLW       32
	MOVWF       ?LocalText_main_1+15 
	CLRF        ?LocalText_main_1+16 
	MOVLW       ?LocalText_main_1+0
	MOVWF       FARG_Lcd_Out_text+0 
	MOVLW       hi_addr(?LocalText_main_1+0)
	MOVWF       FARG_Lcd_Out_text+1 
	CALL        _Lcd_Out+0, 0
L_end_main:
	GOTO        $+0
; end of _main
