mmc_test.asm

mmc/sd卡的实现源码

$0612	$0E04	MOVLW	4
$0614	$	L_printhex_0:
$0614	$E005	BZ 	L_printhex_1
$0616	$0102	MOVLB	2
$0618	$334F	RRCF 	printhex_hi_L0,F, 1
$061A	$9F4F	BCF 	printhex_hi_L0,7, 1
$061C	$0FFF	ADDLW 	255
$061E	$D7FA	BRA	L_printhex_0
$0620	$	L_printhex_1:
$0620	$0E30	MOVLW	48
$0622	$0102	MOVLB	2
$0624	$254F	ADDWF	printhex_hi_L0,W, 1
$0626	$6F4F	MOVWF 	printhex_hi_L0, 1
$0628	$0E39	MOVLW	57
$062A	$6E00	MOVWF 	STACK_0, 0
$062C	$514F	MOVF	printhex_hi_L0,W, 1
$062E	$5C00	SUBWF	STACK_0,W, 0
$0630	$E203	BC	L_printhex_2
$0632	$0E07	MOVLW	7
$0634	$254F	ADDWF	printhex_hi_L0,W, 1
$0636	$6F4F	MOVWF 	printhex_hi_L0, 1
$0638	$	L_printhex_2:
$0638	$0E0F	MOVLW	15
$063A	$0102	MOVLB	2
$063C	$1551	ANDWF 	printhex_argh0,W, 1
$063E	$6E00	MOVWF	STACK_0, 0
$0640	$0E30	MOVLW	48
$0642	$2600	ADDWF 	STACK_0,F, 0
$0644	$5000	MOVF 	STACK_0,W, 0
$0646	$6F50	MOVWF 	printhex_lo_L0, 1
$0648	$0E39	MOVLW	57
$064A	$6E00	MOVWF 	STACK_0, 0
$064C	$5150	MOVF	printhex_lo_L0,W, 1
$064E	$5C00	SUBWF	STACK_0,W, 0
$0650	$E203	BC	L_printhex_3
$0652	$0E07	MOVLW	7
$0654	$2550	ADDWF	printhex_lo_L0,W, 1
$0656	$6F50	MOVWF 	printhex_lo_L0, 1
$0658	$	L_printhex_3:
$0658	$0102	MOVLB	2
$065A	$514F	MOVF 	printhex_hi_L0,W, 1
$065C	$6F5F	MOVWF 	Usart_Write_argh0, 1
$065E	$EC9C	F001	CALL	_Usart_Write
$0662	$0102	MOVLB	2
$0664	$5150	MOVF 	printhex_lo_L0,W, 1
$0666	$6F5F	MOVWF 	Usart_Write_argh0, 1
$0668	$EC9C	F001	CALL	_Usart_Write
$066C	$0012	RETURN
$066E	$	_MMC_Read_CSD:
$066E	$0102	MOVLB	2
$0670	$6B54	CLRF 	MMC_Read_CSD_i_L0, 1
$0672	$	L_MMC_Read_CSD_40:
$0672	$0E10	MOVLW	16
$0674	$0102	MOVLB	2
$0676	$5D54	SUBWF	MMC_Read_CSD_i_L0,W, 1
$0678	$E214	BC	L_MMC_Read_CSD_41
$067A	$0E01	MOVLW	1
$067C	$0354	MULWF	MMC_Read_CSD_i_L0, 1
$067E	$50F3	MOVF	PRODL,W, 0
$0680	$6E02	MOVWF	STACK_2, 0
$0682	$50F4	MOVF	PRODH,W, 0
$0684	$6E03	MOVWF	STACK_3, 0
$0686	$5002	MOVF	STACK_2,W, 0
$0688	$2555	ADDWF	MMC_Read_CSD_argh0_1,W, 1
$068A	$6E00	MOVWF	STACK_0, 0
$068C	$5156	MOVF	MMC_Read_CSD_argh0_2,W, 1
$068E	$2003	ADDWFC	STACK_3,W, 0
$0690	$6E01	MOVWF	STACK_1, 0
$0692	$5000	MOVF 	STACK_0,W, 0
$0694	$6EE9	MOVWF 	FSR0L, 0
$0696	$5001	MOVF 	STACK_1,W, 0
$0698	$6EEA	MOVWF 	FSR0H, 0
$069A	$6AEF	CLRF 	INDF0, 0
$069C	$	L_MMC_Read_CSD_42:
$069C	$0102	MOVLB	2
$069E	$2B54	INCF	MMC_Read_CSD_i_L0,F, 1
$06A0	$D7E8	BRA	L_MMC_Read_CSD_40
$06A2	$	L_MMC_Read_CSD_41:
$06A2	$0E09	MOVLW	9
$06A4	$0102	MOVLB	2
$06A6	$6F63	MOVWF 	MMC_Send_Command_argh0, 1
$06A8	$6B64	CLRF 	MMC_Send_Command_argh1_1, 1
$06AA	$6B65	CLRF 	MMC_Send_Command_argh1_2, 1
$06AC	$6B66	CLRF 	MMC_Send_Command_argh1_3, 1
$06AE	$6B67	CLRF 	MMC_Send_Command_argh1_4, 1
$06B0	$0EFF	MOVLW	255
$06B2	$6F68	MOVWF 	MMC_Send_Command_argh2, 1
$06B4	$ECE4	F000	CALL	_MMC_Send_Command
$06B8	$6A00	CLRF 	STACK_0, 0
$06BA	$5000	MOVF	STACK_0,W, 0
$06BC	$0102	MOVLB	2
$06BE	$5D5F	SUBWF	_MMC_Send_Command_local_result,W, 1
$06C0	$E003	BZ	L_MMC_Read_CSD_43
$06C2	$0E01	MOVLW	1
$06C4	$6F4F	MOVWF 	_MMC_Read_CSD_local_result, 1
$06C6	$0012	RETURN 
$06C8	$	L_MMC_Read_CSD_43:
$06C8	$0102	MOVLB	2
$06CA	$6B54	CLRF 	MMC_Read_CSD_i_L0, 1
$06CC	$	L_MMC_Read_CSD_44:
$06CC	$0E10	MOVLW	16
$06CE	$0102	MOVLB	2
$06D0	$5D54	SUBWF	MMC_Read_CSD_i_L0,W, 1
$06D2	$E22A	BC	L_MMC_Read_CSD_45
$06D4	$0E01	MOVLW	1
$06D6	$0354	MULWF	MMC_Read_CSD_i_L0, 1
$06D8	$50F3	MOVF	PRODL,W, 0
$06DA	$6E02	MOVWF	STACK_2, 0
$06DC	$50F4	MOVF	PRODH,W, 0
$06DE	$6E03	MOVWF	STACK_3, 0
$06E0	$5002	MOVF	STACK_2,W, 0
$06E2	$2555	ADDWF	MMC_Read_CSD_argh0_1,W, 1
$06E4	$6E00	MOVWF	STACK_0, 0
$06E6	$5156	MOVF	MMC_Read_CSD_argh0_2,W, 1
$06E8	$2003	ADDWFC	STACK_3,W, 0
$06EA	$6E01	MOVWF	STACK_1, 0
$06EC	$0EFF	MOVLW	255
$06EE	$6F6A	MOVWF 	MMC_SPI_argh0, 1
$06F0	$5000	MOVF	STACK_0,W, 0
$06F2	$6F50	MOVWF	Mirror_MMC_Read_CSD_STACK_0, 1
$06F4	$5001	MOVF	STACK_1,W, 0
$06F6	$6F51	MOVWF	Mirror_MMC_Read_CSD_STACK_1, 1
$06F8	$5002	MOVF	STACK_2,W, 0
$06FA	$6F52	MOVWF	Mirror_MMC_Read_CSD_STACK_2, 1
$06FC	$5003	MOVF	STACK_3,W, 0
$06FE	$6F53	MOVWF	Mirror_MMC_Read_CSD_STACK_3, 1
$0700	$EC14	F000	CALL	_MMC_SPI
$0704	$0102	MOVLB	2
$0706	$5150	MOVF	Mirror_MMC_Read_CSD_STACK_0,W, 1
$0708	$6E00	MOVWF	STACK_0, 0
$070A	$5151	MOVF	Mirror_MMC_Read_CSD_STACK_1,W, 1
$070C	$6E01	MOVWF	STACK_1, 0
$070E	$5152	MOVF	Mirror_MMC_Read_CSD_STACK_2,W, 1
$0710	$6E02	MOVWF	STACK_2, 0
$0712	$5153	MOVF	Mirror_MMC_Read_CSD_STACK_3,W, 1
$0714	$6E03	MOVWF	STACK_3, 0
$0716	$5000	MOVF 	STACK_0,W, 0
$0718	$6EE9	MOVWF 	FSR0L, 0
$071A	$5001	MOVF 	STACK_1,W, 0
$071C	$6EEA	MOVWF 	FSR0H, 0
$071E	$5169	MOVF 	_MMC_SPI_local_result,W, 1
$0720	$6EEF	MOVWF 	INDF0, 0
$0722	$	L_MMC_Read_CSD_46:
$0722	$0102	MOVLB	2
$0724	$2B54	INCF	MMC_Read_CSD_i_L0,F, 1
$0726	$D7D2	BRA	L_MMC_Read_CSD_44
$0728	$	L_MMC_Read_CSD_45:
$0728	$0102	MOVLB	2
$072A	$6B4F	CLRF 	_MMC_Read_CSD_local_result, 1
$072C	$0012	RETURN 
$072E	$	_Usart_Data_Ready:
$072E	$6A00	CLRF	STACK_0, 0
$0730	$BA9E	BTFSC	PIR1,5, 0
$0732	$2A00	INCF	STACK_0,F, 0
$0734	$5000	MOVF 	STACK_0,W, 0
$0736	$0102	MOVLB	2
$0738	$6F4F	MOVWF 	_Usart_Data_Ready_local_result, 1
$073A	$0012	RETURN 
$073C	$	_Usart_Read:
$073C	$50AE	MOVF 	RCREG,W, 0
$073E	$0102	MOVLB	2
$0740	$6F50	MOVWF 	Usart_Read_tmp_L0, 1
$0742	$6A00	CLRF 	STACK_0, 0
$0744	$6A01	CLRF	STACK_1, 0
$0746	$B2AB	BTFSC	RCSTA,1, 0
$0748	$2A01	INCF	STACK_1,F, 0
$074A	$5001	MOVF	STACK_1,W, 0
$074C	$5C00	SUBWF	STACK_0,W, 0
$074E	$E002	BZ	L_Usart_Read_2
$0750	$98AB	BCF	RCSTA,4, 0
$0752	$88AB	BSF	RCSTA,4, 0
$0754	$	L_Usart_Read_2:
$0754	$0102	MOVLB	2
$0756	$5150	MOVF 	Usart_Read_tmp_L0,W, 1
$0758	$6F4F	MOVWF 	_Usart_Read_local_result, 1
$075A	$0012	RETURN 
$075C	$	_MMC_Read_Sector:
$075C	$0102	MOVLB	2
$075E	$515A	MOVF	MMC_Read_Sector_argh0_2,W, 1
$0760	$6E26	MOVWF	Math_main_global_Y_2, 0
$0762	$5159	MOVF	MMC_Read_Sector_argh0_1,W, 1
$0764	$6E25	MOVWF	Math_main_global_Y_1, 0
$0766	$515B	MOVF	MMC_Read_Sector_argh0_3,W, 1
$0768	$6E1D	MOVWF	Math_main_global_Yhi_1, 0
$076A	$515C	MOVF	MMC_Read_Sector_argh0_4,W, 1
$076C	$6E1E	MOVWF	Math_main_global_Yhi_2, 0
$076E	$0E02	MOVLW	2
$0770	$6E28	MOVWF	Math_main_global_X_2, 0
$0772	$0E00	MOVLW	0
$0774	$6E27	MOVWF	Math_main_global_X_1, 0
$0776	$0E00	MOVLW	0
$0778	$BE28	BTFSC	Math_main_global_X_2,7, 0
$077A	$0EFF	MOVLW	255
$077C	$6E23	MOVWF	Math_main_global_Xhi_1, 0
$077E	$6E24	MOVWF	Math_main_global_Xhi_2, 0
$0780	$EC84	F001	CALL	math_mul_32x32_u
$0784	$5027	MOVF	Math_main_global_X_1,W, 0
$0786	$0102	MOVLB	2
$0788	$6F54	MOVWF	MMC_Read_Sector_byte_start_L0_1, 1
$078A	$5028	MOVF	Math_main_global_X_2,W, 0
$078C	$6F55	MOVWF	MMC_Read_Sector_byte_start_L0_2, 1
$078E	$5028	MOVF	Math_main_global_X_2,W, 0
$0790	$6F55	MOVWF	MMC_Read_Sector_byte_start_L0_2, 1
$0792	$5023	MOVF	Math_main_global_Xhi_1,W, 0
$0794	$6F56	MOVWF	MMC_Read_Sector_byte_start_L0_3, 1
$0796	$5024	MOVF	Math_main_global_Xhi_2,W, 0
$0798	$6F57	MOVWF	MMC_Read_Sector_byte_start_L0_4, 1
$079A	$0E11	MOVLW	17
$079C	$6F63	MOVWF 	MMC_Send_Command_argh0, 1
$079E	$5154	MOVF 	MMC_Read_Sector_byte_start_L0_1,W, 1
$07A0	$6F64	MOVWF 	MMC_Send_Command_argh1_1, 1
$07A2	$5155	MOVF 	MMC_Read_Sector_byte_start_L0_2,W, 1
$07A4	$6F65	MOVWF 	MMC_Send_Command_argh1_2, 1
$07A6	$5156	MOVF 	MMC_Read_Sector_byte_start_L0_3,W, 1
$07A8	$6F66	MOVWF 	MMC_Send_Command_argh1_3, 1
$07AA	$5157	MOVF 	MMC_Read_Sector_byte_start_L0_4,W, 1
$07AC	$6F67	MOVWF 	MMC_Send_Command_argh1_4, 1
$07AE	$0EFF	MOVLW	255
$07B0	$6F68	MOVWF 	MMC_Send_Command_argh2, 1
$07B2	$ECE4	F000	CALL	_MMC_Send_Command
$07B6	$0102	MOVLB	2
$07B8	$515F	MOVF 	_MMC_Send_Command_local_result,W, 1
$07BA	$6F58	MOVWF 	MMC_Read_Sector_response_L0, 1
$07BC	$6A00	CLRF 	STACK_0, 0
$07BE	$5000	MOVF	STACK_0,W, 0
$07C0	$5D58	SUBWF	MMC_Read_Sector_response_L0,W, 1
$07C2	$E003	BZ	L_MMC_Read_Sector_17
$07C4	$5158	MOVF 	MMC_Read_Sector_response_L0,W, 1
$07C6	$6F4F	MOVWF 	_MMC_Read_Sector_local_result, 1
$07C8	$0012	RETURN 
$07CA	$	L_MMC_Read_Sector_17:
$07CA	$	L_MMC_Read_Sector_18:
$07CA	$0EFF	MOVLW	255
$07CC	$0102	MOVLB	2
$07CE	$6F6A	MOVWF 	MMC_SPI_argh0, 1
$07D0	$EC14	F000	CALL	_MMC_SPI
$07D4	$0EFE	MOVLW	254
$07D6	$0102	MOVLB	2
$07D8	$5D69	SUBWF	_MMC_SPI_local_result,W, 1
$07DA	$E002	BZ	L_MMC_Read_Sector_19
$07DC	$EFE5	F003	GOTO 	L_MMC_Read_Sector_18
$07E0	$	L_MMC_Read_Sector_19:
$07E0	$0102	MOVLB	2
$07E2	$6B52	CLRF 	MMC_Read_Sector_i_L0_1, 1
$07E4	$6B53	CLRF 	MMC_Read_Sector_i_L0_2, 1
$07E6	$	L_MMC_Read_Sector_20:
$07E6	$0E00	MOVLW	0
$07E8	$6E00	MOVWF 	STACK_0, 0
$07EA	$0E02	MOVLW	2
$07EC	$6E01	MOVWF 	STACK_1, 0
$07EE	$0102	MOVLB	2
$07F0	$5153	MOVF	MMC_Read_Sector_i_L0_2,W, 1
$07F2	$6E02	MOVWF	STACK_2, 0
$07F4	$5001	MOVF	STACK_1,W, 0
$07F6	$5E02	SUBWF	STACK_2,F, 0
$07F8	$E102	BNZ	L_MMC_Read_Sector_23
$07FA	$5000	MOVF	STACK_0,W, 0
$07FC	$5D52	SUBWF	MMC_Read_Sector_i_L0_1,W, 1
$07FE	$	L_MMC_Read_Sector_23:
$07FE	$E21F	BC	L_MMC_Read_Sector_21
$0800	$0102	MOVLB	2
$0802	$5152	MOVF	MMC_Read_Sector_i_L0_1,W, 1
$0804	$255D	ADDWF	MMC_Read_Sector_argh1_1,W, 1
$0806	$6E00	MOVWF	STACK_0, 0
$0808	$515E	MOVF	MMC_Read_Sector_argh1_2,W, 1
$080A	$2153	ADDWFC	MMC_Read_Sector_i_L0_2,W, 1
$080C	$6E01	MOVWF	STACK_1, 0
$080E	$0EFF	MOVLW	255
$0810	$6F6A	MOVWF 	MMC_SPI_argh0, 1
$0812	$5000	MOVF	STACK_0,W, 0
$0814	$6F50	MOVWF	Mirror_MMC_Read_Sector_STACK_0, 1
$0816	$5001	MOVF	STACK_1,W, 0
$0818	$6F51	MOVWF	Mirror_MMC_Read_Sector_STACK_1, 1
$081A	$EC14	F000	CALL	_MMC_SPI
$081E	$0102	MOVLB	2
$0820	$5150	MOVF	Mirror_MMC_Read_Sector_STACK_0,W, 1
$0822	$6E00	MOVWF	STACK_0, 0
$0824	$5151	MOVF	Mirror_MMC_Read_Sector_STACK_1,W, 1
$0826	$6E01	MOVWF	STACK_1, 0
$0828	$5000	MOVF 	STACK_0,W, 0
$082A	$6EE9	MOVWF 	FSR0L, 0
$082C	$5001	MOVF 	STACK_1,W, 0
$082E	$6EEA	MOVWF 	FSR0H, 0
$0830	$5169	MOVF 	_MMC_SPI_local_result,W, 1
$0832	$6EEF	MOVWF 	INDF0, 0
$0834	$	L_MMC_Read_Sector_22:
$0834	$0102	MOVLB	2
$0836	$2B52	INCF	MMC_Read_Sector_i_L0_1,F, 1
$0838	$B4D8	BTFSC	STATUS,Z, 0
$083A	$2B53	INCF	MMC_Read_Sector_i_L0_2,F, 1
$083C	$D7D4	BRA	L_MMC_Read_Sector_20
$083E	$	L_MMC_Read_Sector_21:
$083E	$0EFF	MOVLW	255
$0840	$0102	MOVLB	2
$0842	$6F6A	MOVWF 	MMC_SPI_argh0, 1
$0844	$EC14	F000	CALL	_MMC_SPI
$0848	$0EFF	MOVLW	255
$084A	$0102	MOVLB	2
$084C	$6F6A	MOVWF 	MMC_SPI_argh0, 1
$084E	$EC14	F000	CALL	_MMC_SPI
$0852	$0102	MOVLB	2
$0854	$6B4F	CLRF 	_MMC_Read_Sector_local_result, 1
$0856	$0012	RETURN 
$0858	$	math_Div_16x16_U:
$0858	$0100	MOVLB	0
$085A	$6A15	CLRF math_main_global_Remainder_1, 0
$085C	$6A16	CLRF math_main_global_Remainder_2, 0
$085E	$0E10	MOVLW 16
$0860	$6E1C	MOVWF math_main_global_LoopCount, 0
$0862	$3428	RLCF math_main_global_X_2,W, 0
$0864	$3615	RLCF math_main_global_Remainder_1,F, 0
$0866	$3616	RLCF math_main_global_Remainder_2,F, 0
$0868	$5025	MOVF math_main_global_Y_1,W, 0
$086A	$5E15	SUBWF math_main_global_Remainder_1,F, 0
$086C	$5026	MOVF math_main_global_Y_2,W, 0
$086E	$A0D8	BTFSS STATUS,C,0
$0870	$3C26	INCFSZ math_main_global_Y_2,W, 0
$0872	$5E16	SUBWF math_main_global_Remainder_2,F, 0
$0874	$B0D8	BTFSC STATUS,C,0
$0876	$EF44	F004	GOTO $+8
$087A	$5025	MOVF math_main_global_Y_1,W, 0
$087C	$2615	ADDWF math_main_global_Remainder_1,F, 0
$087E	$5026	MOVF math_main_global_Y_2,W, 0
$0880	$B0D8	BTFSC STATUS,C,0
$0882	$3C26	INCFSZ math_main_global_Y_2,W, 0
$0884	$2616	ADDWF math_main_global_Remainder_2,F, 0
$0886	$90D8	BCF STATUS,C,0
$0888	$3627	RLCF math_main_global_X_1,F, 0
$088A	$3628	RLCF math_main_global_X_2,F, 0
$088C	$2E1C	DECFSZ math_main_global_LoopCount,F, 0
$088E	$EF31	F004	GOTO $-21
$0892	$0012	RETURN
$0894	$	_main:
$0894	$6A82	CLRF 	PORTC, 0
$0896	$0E19	MOVLW	25
$0898	$6EAF	MOVWF	SPBRG, 0
$089A	$84AC	BSF	TXSTA, BRGH, 0
$089C	$ECA9	F001	CALL	_Usart_Init
$08A0	$0ED3	MOVLW	211
$08A2	$6E94	MOVWF 	TRISC, 0
$08A4	$0E50	MOVLW	80
$08A6	$0102	MOVLB	2
$08A8	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08AA	$EC9C	F001	CALL	_Usart_Write
$08AE	$0E49	MOVLW	73
$08B0	$0102	MOVLB	2
$08B2	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08B4	$EC9C	F001	CALL	_Usart_Write
$08B8	$0E43	MOVLW	67
$08BA	$0102	MOVLB	2
$08BC	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08BE	$EC9C	F001	CALL	_Usart_Write
$08C2	$0E2D	MOVLW	45
$08C4	$0102	MOVLB	2
$08C6	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08C8	$EC9C	F001	CALL	_Usart_Write
$08CC	$0E53	MOVLW	83
$08CE	$0102	MOVLB	2
$08D0	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08D2	$EC9C	F001	CALL	_Usart_Write
$08D6	$0E74	MOVLW	116
$08D8	$0102	MOVLB	2
$08DA	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08DC	$EC9C	F001	CALL	_Usart_Write
$08E0	$0E61	MOVLW	97
$08E2	$0102	MOVLB	2
$08E4	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08E6	$EC9C	F001	CALL	_Usart_Write
$08EA	$0E72	MOVLW	114
$08EC	$0102	MOVLB	2
$08EE	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08F0	$EC9C	F001	CALL	_Usart_Write
$08F4	$0E74	MOVLW	116
$08F6	$0102	MOVLB	2
$08F8	$6F5F	MOVWF 	Usart_Write_argh0, 1
$08FA	$EC9C	F001	CALL	_Usart_Write
$08FE	$0E65	MOVLW	101
$0900	$0102	MOVLB	2
$0902	$6F5F	MOVWF 	Usart_Write_argh0, 1
$0904	$EC9C	F001	CALL	_Usart_Write
$0908	$0E64	MOVLW	100
$090A	$0102	MOVLB	2
$090C	$6F5F	MOVWF 	Usart_Write_argh0, 1
$090E	$EC9C	F001	CALL	_Usart_Write
$0912	$0E0D	MOVLW	13
$0914	$0102	MOVLB	2
$0916	$6F5F	MOVWF 	Usart_Write_argh0, 1
$0918	$EC9C	F001	CALL	_Usart_Write
$091C	$0E0A	MOVLW	10
$091E	$0102	MOVLB	2
$0920	$6F5F	MOVWF 	Usart_Write_argh0, 1
$0922	$EC9C	F001	CALL	_Usart_Write
$0926	$ECBA	F001	CALL	_MMC_Init
$092A	$0102	MOVLB	2
$092C	$514F	MOVF 	_MMC_Init_local_result,W, 1
$092E	$6F4D	MOVWF 	main_i_L0_1, 1
$0930	$6B4E	CLRF 	main_i_L0_2, 1
$0932	$0E01	MOVLW	1
$0934	$6E00	MOVWF 	STACK_0, 0
$0936	$514E	MOVF	main_i_L0_2,W, 1