owarray.lst

ibutton from dallas implementation with microcontroller

***************************
11.10.2004 12:32:40
***************************
**********************
***   ROM memory   ***
**********************
Address      Instruction
------------------------
0000	GOTO	main
  ;--- procedure delays_delay_1us ---
0004	delays_delay_1us:
0004	nop
0005	RETURN
0006	;---endproc---
  ;--- procedure delays_delay_50us ---
0006	delays_delay_50us:
0006	MOVLW	16
0007	BCF	STATUS,RP1
0008	BCF	STATUS,RP0
0009	MOVWF	STACK_0
000A	DECFSZ	STACK_0,F
000B	GOTO	$-1
000C	nop
000D	RETURN
000E	;---endproc---
  ;--- procedure delays_delay_5500us ---
000E	delays_delay_5500us:
000E	MOVLW	8
000F	BCF	STATUS,RP1
0010	BCF	STATUS,RP0
0011	MOVWF	STACK_0
0012	MOVLW	255
0013	MOVWF	STACK_1
0014	DECFSZ	STACK_0,F
0015	GOTO	$+2
0016	GOTO	$+4
0017	DECFSZ	STACK_1,F
0018	GOTO	$-1
0019	GOTO	$-5
001A	MOVLW	30
001B	MOVWF	STACK_0
001C	DECFSZ	STACK_0,F
001D	GOTO	$-1
001E	RETURN
001F	;---endproc---
  ;--- procedure lcd_lcd_cmd ---
001F	lcd_lcd_cmd:
001F	BCF	STATUS,RP1
0020	BCF	STATUS,RP0
0021	MOVF	lcd_main_global_portaddress,W
0022	BCF	STATUS,IRP
0023	MOVWF	FSR
0024	MOVF	lcd_lcd_cmd_param_out_char,W
0025	MOVWF	lcd_lcd_cmd_param_out_char
0026	CLRF INDF
0027	BTFSC lcd_lcd_cmd_param_out_char,7
0028	BSF INDF,___DB7
0029	BTFSC lcd_lcd_cmd_param_out_char,6
002A	BSF INDF,___DB6
002B	BTFSC lcd_lcd_cmd_param_out_char,5
002C	BSF INDF,___DB5
002D	BTFSC lcd_lcd_cmd_param_out_char,4
002E	BSF INDF,___DB4
002F	MOVLW	1
0030	SUBWF	lcd_main_global_cmd,W
0031	BTFSS	STATUS,Z
0032	GOTO	L_lcd_1
0033	L_lcd_0:
0033	BCF INDF,___RS
0034	GOTO	L_lcd_2
0035	L_lcd_1:
0035	BSF INDF,___RS
0036	L_lcd_2:
0036	BSF INDF,___ENABLE
0037	CALL	delays_delay_1us
0038	BCF INDF,___ENABLE
0039	CLRF INDF
003A	BTFSC lcd_lcd_cmd_param_out_char,3
003B	BSF INDF,___DB7
003C	BTFSC lcd_lcd_cmd_param_out_char,2
003D	BSF INDF,___DB6
003E	BTFSC lcd_lcd_cmd_param_out_char,1
003F	BSF INDF,___DB5
0040	BTFSC lcd_lcd_cmd_param_out_char,0
0041	BSF INDF,___DB4
0042	MOVLW	1
0043	SUBWF	lcd_main_global_cmd,W
0044	BTFSS	STATUS,Z
0045	GOTO	L_lcd_5
0046	L_lcd_4:
0046	BCF INDF,___RS
0047	GOTO	L_lcd_6
0048	L_lcd_5:
0048	BSF INDF,___RS
0049	L_lcd_6:
0049	BSF INDF,___ENABLE
004A	CALL	delays_delay_1us
004B	BCF INDF,___ENABLE
004C	MOVLW	1
004D	SUBWF	lcd_main_global_cmd,W
004E	BTFSS	STATUS,Z
004F	GOTO	L_lcd_9
0050	L_lcd_8:
0050	CALL	delays_delay_5500us
0051	GOTO	L_lcd_10
0052	L_lcd_9:
0052	CALL	delays_delay_50us
0053	L_lcd_10:
0053	RETURN
0054	;---endproc---
  ;--- procedure delays_delay_500us ---
0054	delays_delay_500us:
0054	MOVLW	165
0055	BCF	STATUS,RP1
0056	BCF	STATUS,RP0
0057	MOVWF	STACK_0
0058	DECFSZ	STACK_0,F
0059	GOTO	$-1
005A	nop
005B	nop
005C	RETURN
005D	;---endproc---
  ;--- procedure delays_delay_80us ---
005D	delays_delay_80us:
005D	MOVLW	25
005E	BCF	STATUS,RP1
005F	BCF	STATUS,RP0
0060	MOVWF	STACK_0
0061	DECFSZ	STACK_0,F
0062	GOTO	$-1
0063	nop
0064	nop
0065	RETURN
0066	;---endproc---
  ;--- procedure delays_delay_8ms ---
0066	delays_delay_8ms:
0066	MOVLW	11
0067	BCF	STATUS,RP1
0068	BCF	STATUS,RP0
0069	MOVWF	STACK_0
006A	MOVLW	255
006B	MOVWF	STACK_1
006C	DECFSZ	STACK_0,F
006D	GOTO	$+2
006E	GOTO	$+4
006F	DECFSZ	STACK_1,F
0070	GOTO	$-1
0071	GOTO	$-5
0072	MOVLW	91
0073	MOVWF	STACK_0
0074	DECFSZ	STACK_0,F
0075	GOTO	$-1
0076	nop
0077	RETURN
0078	;---endproc---
  ;--- procedure lcd_lcd_chr ---
0078	lcd_lcd_chr:
0078	MOVLW	1
0079	BCF	STATUS,RP1
007A	BCF	STATUS,RP0
007B	SUBWF	lcd_lcd_chr_param_row,W
007C	BTFSS	STATUS,Z
007D	GOTO	L_lcd_13
007E	MOVLW	128
007F	MOVWF	lcd_lcd_chr_param_row
0080	GOTO	L_lcd_12
0081	L_lcd_13:
0081	MOVLW	2
0082	SUBWF	lcd_lcd_chr_param_row,W
0083	BTFSS	STATUS,Z
0084	GOTO	L_lcd_14
0085	MOVLW	192
0086	MOVWF	lcd_lcd_chr_param_row
0087	GOTO	L_lcd_12
0088	L_lcd_14:
0088	MOVLW	3
0089	SUBWF	lcd_lcd_chr_param_row,W
008A	BTFSS	STATUS,Z
008B	GOTO	L_lcd_15
008C	MOVLW	148
008D	MOVWF	lcd_lcd_chr_param_row
008E	GOTO	L_lcd_12
008F	L_lcd_15:
008F	MOVLW	4
0090	SUBWF	lcd_lcd_chr_param_row,W
0091	BTFSS	STATUS,Z
0092	GOTO	L_lcd_16
0093	MOVLW	212
0094	MOVWF	lcd_lcd_chr_param_row
0095	GOTO	L_lcd_12
0096	L_lcd_16:
0096	MOVLW	128
0097	MOVWF	lcd_lcd_chr_param_row
0098	L_lcd_12:
0098	MOVF	lcd_lcd_chr_param_column,W
0099	ADDWF	lcd_lcd_chr_param_row,W
009A	MOVWF	STACK_0
009B	MOVLW	1
009C	SUBWF	STACK_0,F
009D	MOVF	STACK_0,W
009E	MOVWF	lcd_lcd_chr_param_row
009F	MOVLW	1
00A0	MOVWF	lcd_main_global_cmd
00A1	MOVF	lcd_lcd_chr_param_row,W
00A2	MOVWF	lcd_lcd_cmd_param_out_char
00A3	CALL	lcd_lcd_cmd
00A4	CLRF	lcd_main_global_cmd
00A5	MOVF	lcd_lcd_chr_param_out_char,W
00A6	MOVWF	lcd_lcd_cmd_param_out_char
00A7	CALL	lcd_lcd_cmd
00A8	MOVLW	1
00A9	MOVWF	lcd_main_global_cmd
00AA	RETURN
00AB	;---endproc---
  ;--- function owlib_ow_read ---
00AB	owlib_ow_read:
00AB	BCF	STATUS,RP1
00AC	BCF	STATUS,RP0
00AD	CLRF	owlib_ow_read_result
00AE	MOVLW	1
00AF	MOVWF	owlib_ow_read_local_tet
00B0	MOVF	owlib_ow_read_param_pin,W
00B1	MOVWF	STACK_0
00B2	L_owlib_4:
00B2	MOVF	STACK_0,W
00B3	BTFSC	STATUS,Z
00B4	GOTO	L_owlib_5
00B5	RLF	owlib_ow_read_local_tet,F
00B6	BCF	owlib_ow_read_local_tet,0
00B7	DECFSZ	STACK_0,F
00B8	GOTO	L_owlib_4
00B9	L_owlib_5:
00B9	CLRF	owlib_ow_read_local_i
00BA	L_owlib_6:
00BA	MOVLW	7
00BB	MOVWF	STACK_0
00BC	MOVF	owlib_ow_read_local_i,W
00BD	SUBWF	STACK_0,W
00BE	BTFSS	STATUS,C
00BF	GOTO	L_owlib_7
00C0	MOVF	owlib_ow_read_param_port,W
00C1	MOVWF	FSR
00C2	MOVLW	254
00C3	MOVWF	STACK_1
00C4	MOVF	owlib_ow_read_param_pin,W
00C5	MOVWF	STACK_2
00C6	BTFSC	STATUS,Z
00C7	GOTO	$+5
00C8	RLF	STACK_1,F
00C9	BSF	STACK_1,0
00CA	DECFSZ	STACK_2,F
00CB	GOTO	$-5
00CC	MOVF	STACK_1,W
00CD	ANDWF	INDF,F
00CE	bsf fsr,7
00CF	COMF	owlib_ow_read_local_tet,W
00D0	ANDWF	INDF,W
00D1	MOVWF	INDF
00D2	CALL	delays_delay_1us
00D3	BCF	STATUS,RP1
00D4	BCF	STATUS,RP0
00D5	MOVF	owlib_ow_read_local_tet,W
00D6	IORWF	INDF,W
00D7	MOVWF	INDF
00D8	bcf fsr,7
00D9	CALL	delays_delay_1us
00DA	BCF	STATUS,RP1
00DB	BCF	STATUS,RP0
00DC	MOVF	owlib_ow_read_local_tet,W
00DD	ANDWF	INDF,W
00DE	MOVWF	owlib_ow_read_local_j
00DF	MOVLW	0
00E0	SUBWF	owlib_ow_read_local_j,W
00E1	BTFSC	STATUS,Z
00E2	GOTO	L_owlib_10
00E3	L_owlib_9:
00E3	MOVLW	1
00E4	BCF	STATUS,RP1
00E5	BCF	STATUS,RP0
00E6	MOVWF	owlib_ow_read_local_ma
00E7	MOVF	owlib_ow_read_local_i,W
00E8	MOVWF	STACK_2
00E9	L_owlib_13:
00E9	BCF	STATUS,RP1
00EA	BCF	STATUS,RP0
00EB	MOVF	STACK_2,W
00EC	BTFSC	STATUS,Z
00ED	GOTO	L_owlib_14
00EE	RLF	owlib_ow_read_local_ma,F
00EF	BCF	owlib_ow_read_local_ma,0
00F0	DECFSZ	STACK_2,F
00F1	GOTO	L_owlib_13
00F2	L_owlib_14:
00F2	BCF	STATUS,RP1
00F3	BCF	STATUS,RP0
00F4	MOVF	owlib_ow_read_local_ma,W
00F5	IORWF	owlib_ow_read_result,W
00F6	MOVWF	owlib_ow_read_result
00F7	GOTO	L_owlib_11
00F8	L_owlib_10:
00F8	L_owlib_11:
00F8	CALL	delays_delay_50us
00F9	CALL	delays_delay_50us
00FA	L_owlib_8:
00FA	CLRF	STACK_1
00FB	INCF	STACK_1,F
00FC	MOVF	owlib_ow_read_local_i,W
00FD	ADDWF	STACK_1,W
00FE	MOVWF	owlib_ow_read_local_i
00FF	GOTO	L_owlib_6
0100	L_owlib_7:
0100	RETURN
0101	;---endproc---
  ;--- procedure lcd_lcd_init ---
0101	lcd_lcd_init:
0101	CALL	delays_delay_5500us
0102	CALL	delays_delay_5500us
0103	CALL	delays_delay_5500us
0104	BCF	STATUS,RP1
0105	BCF	STATUS,RP0
0106	MOVF	lcd_lcd_init_param_port,W
0107	MOVWF	FSR
0108	MOVLW	0
0109	MOVWF	INDF
010A	MOVF   lcd_lcd_init_param_port,w
010B	MOVWF  lcd_main_global_portaddress
010C	MOVWF  FSR
010D	BSF    FSR,7
010E	CLRF   INDF
010F	BCF    FSR,7
0110	CALL	delays_delay_8ms
0111	BSF	INDF,___DB5
0112	BSF	INDF,___DB4
0113	BSF	INDF,___ENABLE
0114	CALL	delays_delay_1us
0115	BCF	INDF,___ENABLE
0116	CALL	delays_delay_8ms
0117	BSF	INDF,___DB5
0118	BSF	INDF,___DB4
0119	BSF	INDF,___ENABLE
011A	CALL	delays_delay_1us
011B	BCF	INDF,___ENABLE
011C	CALL	delays_delay_50us
011D	CALL	delays_delay_50us
011E	BSF	INDF,___DB5
011F	BSF	INDF,___DB4
0120	BSF	INDF,___ENABLE
0121	CALL	delays_delay_1us
0122	BCF	INDF,___ENABLE
0123	CALL	delays_delay_8ms
0124	BSF	INDF,___DB5
0125	BCF	INDF,___DB4
0126	BSF	INDF,___ENABLE
0127	CALL	delays_delay_1us
0128	BCF	INDF,___ENABLE
0129	CALL	delays_delay_50us
012A	BSF	INDF,___DB5
012B	BCF	INDF,___DB4
012C	BSF	INDF,___ENABLE
012D	CALL	delays_delay_1us
012E	BCF	INDF,___ENABLE
012F	BSF	INDF,___DB7
0130	BCF	INDF,___DB6
0131	BSF	INDF,___ENABLE
0132	CALL	delays_delay_1us
0133	BCF	INDF,___ENABLE
0134	CALL	delays_delay_50us
0135	MOVLW	0
0136	MOVWF	INDF
0137	BSF	INDF,___ENABLE
0138	CALL	delays_delay_1us
0139	BCF	INDF,___ENABLE
013A	BSF	INDF,___DB7
013B	BSF	INDF,___DB6
013C	BSF	INDF,___DB5
013D	BSF	INDF,___DB4
013E	BSF	INDF,___ENABLE
013F	CALL	delays_delay_1us
0140	BCF	INDF,___ENABLE
0141	CALL	delays_delay_50us
0142	MOVLW	0
0143	MOVWF	INDF
0144	BSF	INDF,___ENABLE
0145	CALL	delays_delay_1us
0146	BCF	INDF,___ENABLE
0147	BSF	INDF,___DB4
0148	BSF	INDF,___ENABLE
0149	CALL	delays_delay_1us
014A	BCF	INDF,___ENABLE
014B	CALL	delays_delay_8ms
014C	MOVLW	0
014D	MOVWF	INDF
014E	BSF	INDF,___ENABLE
014F	CALL	delays_delay_1us
0150	BCF	INDF,___ENABLE
0151	BSF	INDF,___DB6
0152	BSF	INDF,___DB5
0153	BSF	INDF,___ENABLE
0154	CALL	delays_delay_1us
0155	BCF	INDF,___ENABLE
0156	CALL	delays_delay_50us
0157	MOVLW	1
0158	MOVWF	lcd_main_global_cmd
0159	RETURN
015A	;---endproc---
  ;--- procedure lcd_lcd_out ---
015A	lcd_lcd_out:
015A	MOVLW	1
015B	BCF	STATUS,RP1
015C	BCF	STATUS,RP0
015D	SUBWF	lcd_lcd_out_param_row,W
015E	BTFSS	STATUS,Z
015F	GOTO	L_lcd_21
0160	MOVLW	128
0161	MOVWF	lcd_lcd_out_param_row
0162	GOTO	L_lcd_20
0163	L_lcd_21:
0163	MOVLW	2
0164	SUBWF	lcd_lcd_out_param_row,W
0165	BTFSS	STATUS,Z
0166	GOTO	L_lcd_22
0167	MOVLW	192
0168	MOVWF	lcd_lcd_out_param_row
0169	GOTO	L_lcd_20
016A	L_lcd_22:
016A	MOVLW	3
016B	SUBWF	lcd_lcd_out_param_row,W
016C	BTFSS	STATUS,Z
016D	GOTO	L_lcd_23
016E	MOVLW	148
016F	MOVWF	lcd_lcd_out_param_row
0170	GOTO	L_lcd_20
0171	L_lcd_23:
0171	MOVLW	4
0172	SUBWF	lcd_lcd_out_param_row,W
0173	BTFSS	STATUS,Z
0174	GOTO	L_lcd_24
0175	MOVLW	212
0176	MOVWF	lcd_lcd_out_param_row
0177	GOTO	L_lcd_20
0178	L_lcd_24:
0178	MOVLW	128
0179	MOVWF	lcd_lcd_out_param_row
017A	L_lcd_20:
017A	MOVF	lcd_lcd_out_param_column,W
017B	ADDWF	lcd_lcd_out_param_row,W
017C	MOVWF	STACK_0
017D	MOVLW	1
017E	SUBWF	STACK_0,F