Continue to Site

Welcome to EDAboard.com

Welcome to our site! EDAboard.com is an international Electronics Discussion Forum focused on EDA software, circuits, schematics, books, theory, papers, asic, pld, 8051, DSP, Network, RF, Analog Design, PCB, Service Manuals... and a whole lot more! To participate you need to register. Registration is free. Click here to register now.

Register Log in

[SOLVED] pic16f72 sinewave inverter with asm codes. not working.

Status
Not open for further replies.
Hello friends i just finished building this inverter,there is no output drive from all the osc outputs and i connected the mains sense transformer and the output transformer with its feedback winding is connected,when i presses the inverter on switch the buzzer beeps and on light comes on,there is no drive at all,if i remove the mains sense transformer from light the beep goes on still nothing works i need help from members.
 

I've made this circuit. A few of my acquaintances have also made this circuit. The consensus is that it is pretty poor.

The output waveform is not pure sine under all conditions. It is distorted.

Due to the low frequency, during operation, very loud audible sound can be heard, especially during charging.

Feedback is poor as the output regulation is far from tight.

Battery charging current isn't regulated, ie, it doesn't stay fixed when set and changes with changes in line voltage, etc.

The gate signal to the MOSFETs isn't clean square waves. Due to the discrete drivers, the rise time is very high. So, the drive signal is far from clean square wave.

Placement of the capacitors is very poor as it will result in much shortened life of the capacitors due to heating near it - from the heatsinks.

I think that's reason enough to put off someone from building this circuit. And whoever builds this, I warn him or her that the performance is far from satisfactory.

Hope this helps.
Tahmid.
 
  • Like
Reactions: Taswar

    T

    Taswar

    Points: 2
    Helpful Answer Positive Rating
Thank you tahmid i have gone far as i have make the pcb and fix all the component and i dont know why it can start ,can you tell me the methode of operation and also give me the hexfile you use.
 

Yes, it is of very poor quality and waveform is totally distorted and hence Mosfets become hot after few minutes. The sine Table is of only 8 steps, no feedback at all, humming sound is really irritating and the frequency is only 4 Khz. I think a square wave inverter is far better than this so called sine wave inverter. Trying with this is wastage of time and energy I guess.
 

Has anyone tried Mr Taner's Pic16f876 sinewave inverter?

---------- Post added at 23:40 ---------- Previous post was at 23:26 ----------

there is a pure sinewave IC sold in china quite good (TDS2285, HT1113) I've tried them
 
The issue lies with the code.The schematics is not different from commercial inverters, except for the driver chip.I simulate the code the output voltage control feedback is not working,AC sense is not working.
 

All i am saying is in real life i have connected the ac sense transformer to main the beep comes on,but no output from all the osc outputs
 

Dear all

any body finished this sine wave inverter

thanks
regards
vengu
 

@Vengu
see post #129
The output he got is a square wave so better not to make it
The problem most probably is in the hex code
also read post #137,#138 and #140
 
Last edited:

Thanks Tipu

i need Hex file for this circuit any body have plz post here

many more people build this circuit so he will also use

thanks
regards
vengu
 

Vengu said:
Thanks Tipu

i need Hex file for this circuit any body have plz post here

many more people build this circuit so he will also use

thanks
regards
vengu
Click to expand...
If you need hex file.
build this asm file in MPLAB IDE ver 8.33 or later.
And get hex.
Code: 
 LIST P=16F72, F=INHX8M
      include "P16F72.inc"
            

 __config _HS_OSC & _WDT_ON & _PWRTE_ON & _CP_OFF
W_TEMP equ 0x20	
BATTV equ 0x4D
AD_RESULT equ 0x33
SEL_CHANEL equ 0x32
goto init	
	nop
	nop
	nop
	goto isr	
	nop
	nop
	nop

table	    ADDWF   PCL , F
            RETLW   .0
            RETLW   .6
            RETLW   .13
            RETLW   .19
            RETLW   .25
            RETLW   .31
            RETLW   .37
            RETLW   .43
            RETLW   .49
            RETLW   .55
            RETLW   .60
            RETLW   .66
            RETLW   .71
            RETLW   .76
            RETLW   .81
            RETLW   .86
            RETLW   .91
            RETLW   .95
            RETLW   .99
            RETLW   .103
            RETLW   .106
            RETLW   .110
            RETLW   .113
            RETLW   .116
            RETLW   .118
            RETLW   .121
            RETLW   .122
            RETLW   .124
            RETLW   .126
            RETLW   .127
            RETLW   .127
            RETLW   .128
            RETLW   .128
            RETLW   .128
            RETLW   .127
            RETLW   .127
            RETLW   .126
            RETLW   .124
            RETLW   .122
            RETLW   .121
            RETLW   .118
            RETLW   .116
            RETLW   .113
            RETLW   .110
            RETLW   .106
            RETLW   .103
            RETLW   .99
            RETLW   .95
            RETLW   .91
            RETLW   .86
            RETLW   .81
            RETLW   .76
            RETLW   .71
            RETLW   .66
            RETLW   .60
            RETLW   .55
            RETLW   .49
            RETLW   .43
            RETLW   .37
            RETLW   .31
            RETLW   .25
            RETLW   .19
            RETLW   .13
            RETLW   .6
            RETLW   .0



init	clrf STATUS
	clrf PORTC
	clrf PORTB
	bcf STATUS,RP1
	bsf STATUS,RP0	; switch to bank 1
	movlw b'11000111'
	movwf OPTION_REG
	movlw b'111111' 
	movwf TRISA
	movlw b'00000100'
	movwf TRISC
	movlw b'00000111'
	movwf TRISB
	movlw .0
	movwf ADCON1
	bcf STATUS,RP0	; switch to bank 0
	movlw b'11000000'
	movwf INTCON
	movlw .0
	movwf 0x10
	bcf STATUS,RP0	; switch to bank 0
	movlw b'10000001'
	movwf ADCON0
	clrf PORTA
	movlw b'00000111'
	movwf PORTC
	call LEVEL_3	
	movlw .5
	movwf 0x3C
	movwf 0x2A
	movlw .10
	movwf 0x3E
	call LEVEL_4	
	call LEVEL_4
	goto LEVEL_5	

LEVEL_3	movlw .80
	movwf W_TEMP
	movlw .33
	movwf FSR
LEVEL_6	clrf INDF
	incf FSR,f
	decfsz W_TEMP,f
	goto LEVEL_6	
	return

ANASCAN	movlw .5
	movwf W_TEMP
LEVEL_7	decfsz W_TEMP,f
	goto LEVEL_7	
	movf SEL_CHANEL,w
	movwf W_TEMP
	bcf STATUS,C
	rlf W_TEMP,f
	rlf W_TEMP,f
	rlf W_TEMP,f
	movlw .129
	iorwf W_TEMP,w
	movwf ADCON0
	movlw .20
	movwf 0x37
LEVEL_10	decfsz 0x37,f
	goto LEVEL_8	
	goto LEVEL_9	
LEVEL_8	btfss 0x2C,0
	goto LEVEL_10	
	call LEVEL_11	
LEVEL_9	bsf ADCON0,2
LEVEL_12	btfsc 0x2C,0
	call LEVEL_11
	btfsc ADCON0,2
	goto LEVEL_12	
	movf ADRES,w
	movwf AD_RESULT
	bcf 0xC,6
	return

isr	bcf INTCON,GIE
	movwf 0x31
	movf STATUS,w
	movwf 0x30
	bcf 0xC,0
	bcf 0x10,0
	btfsc 0x2B,0
	goto LEVEL_13	
	btfsc 0x2C,3
	goto LEVEL_14	
	goto exit	

LEVEL_16	bcf PORTC,4
	bcf PORTC,5
	movf 0x26,w
	movwf TMR1L
	comf TMR1L,f
	movf 0x27,w
	movwf TMR1H
	comf TMR1H,f
	bsf PORTC,0
	bsf PORTC,1
	bsf 0x2D,5
	bsf 0x10,0
	goto exit

LEVEL_14	btfss 0x2D,5
	goto LEVEL_16	
	bcf PORTC,4
	bcf PORTC,5
	movf 0x28,w
	movwf 0x26
	movf 0x29,w
	movwf 0x27
	movf 0x24,w
	movwf 0x22
	movwf TMR1L
	comf TMR1L,f
	movf 0x25,w
	movwf 0x23
	movwf TMR1H
	comf TMR1H,f
	bcf PORTC,0
	bcf PORTC,1
	bcf 0x2D,5
	bsf 0x10,0
	goto exit

LEVEL_13	btfss 0x2D,5
	goto LEVEL_17	
	bcf 0x2D,5
	bsf 0x2C,0
	movf 0x28,w
	movwf 0x26
	movf 0x29,w
	movwf 0x27
	movf 0x24,w
	movwf 0x22
	movwf TMR1L
	comf TMR1L,f
	movf 0x25,w
	movwf 0x23
	movwf TMR1H
	comf TMR1H,f
	movf 0x21,w
	btfss STATUS,Z
	goto LEVEL_18	
	movlw .8
	xorwf 0x2B,f
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

;DEAD BAND


;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
LEVEL_18	bsf 0x10,0
	btfsc 0x2B,3
	goto LEVEL_19	
	bcf PORTC,5
	bsf PORTC,0
	nop
	nop
	nop
	nop
	nop
	bsf PORTC,4
	bcf PORTC,1
	goto exit

LEVEL_19	bcf PORTC,4
	bsf PORTC,1
	nop
	nop
	nop
	nop
	nop
	bsf PORTC,5
	bcf PORTC,0
	goto exit
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

;DEAD BAND

;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
LEVEL_17	bcf PORTC,4
	bcf PORTC,5
	movf 0x26,w
	movwf TMR1L
	comf TMR1L,f
	movf 0x27,w
	movwf TMR1H
	comf TMR1H,f
	bcf PORTC,0
	bcf PORTC,1
	bsf 0x2D,5
	bsf 0x10,0

exit	movf 0x30,w
	movwf STATUS
	movf 0x31,w
	bsf INTCON,GIE
	retfie


LEVEL_42	movlw .2                 
	movwf SEL_CHANEL
	call ANASCAN	                  ;LEVEL 21,22,23
	movf AD_RESULT,w
	sublw .67
	btfsc STATUS,C
	goto LEVEL_21	
	movf AD_RESULT,w
	sublw .138
	btfss STATUS,C
	goto LEVEL_21
	movf AD_RESULT,w
	sublw .68
	btfsc STATUS,C
	goto LEVEL_22	
	movf AD_RESULT,w
	sublw .135
	btfsc STATUS,C
	goto LEVEL_23	
LEVEL_22	clrf 0x55
	clrf 0x34
	clrf 0x35
	return


LEVEL_23	btfsc 0x2B,1
	return
	clrf 0x55
	movlw .4
	movwf 0x3D
	movlw .1
	addwf 0x34,f
	btfss STATUS,C
	return
	incf 0x35,f
	movf 0x35,w
	sublw .50
	btfsc STATUS,C
	return
	clrf 0x34
	clrf 0x35
	goto LEVEL_24	
LEVEL_21	btfsc 0x2B,0
	return
	incf 0x55,f
	clrf 0x34
	clrf 0x35
	movf 0x55,w
	sublw .15
	btfsc STATUS,C
	return
	goto LEVEL_25	
LEVEL_40	btfss 0xC,2
	goto LEVEL_26	
	bcf 0xC,2
	clrf 0x36
	goto LEVEL_27	
LEVEL_26	btfss 0x2C,6
	return
	incf 0x36,f
	movlw .4
	subwf 0x36,w
	btfss STATUS,C
	return
	clrf 0x36
LEVEL_25	btfss 0x2C,7
	goto LEVEL_28	
	btfsc 0x2B,0
	return
LEVEL_76	btfsc 0x2D,3
	return
	call LEVEL_29	
	movlw .7
	movwf 0x38
	call LEVEL_30	
	bsf PORTC,7
	call LEVEL_4
	call LEVEL_4
	clrf 0x34
	clrf 0x35
	clrf 0x55
	call LEVEL_31	
	bcf 0x2B,1
	bcf PORTB,4
	bcf PORTB,5
	bcf 0x2D,3
	bcf PORTB,7
	movlw .10
	movwf 0x3D
	bsf 0x2B,0
	movlw .0
	movwf 0x21
	call LEVEL_11
	bsf 0x2D,5
	movlw .200
	movwf TMR1L
	movlw .255
	movwf TMR1H
	bsf STATUS,RP0	; switch to bank 1
	bsf 0x8C,0
	bcf STATUS,RP0	; switch to bank 0
	bsf 0x10,0
	bsf INTCON,GIE
	clrf 0x40
	clrf 0x41
	clrf 0x42
	clrf 0x4C
	return

LEVEL_28	btfss 0x2C,3
	goto LEVEL_32	
	call LEVEL_29
	call LEVEL_31
LEVEL_32	clrf 0x55
	bcf 0x2B,1
	bcf PORTB,4
	return

LEVEL_27	btfsc 0x2B,1
	return
	movlw .1
	addwf 0x34,f
	btfss STATUS,C
	return
	incf 0x35,f
	movlw .10
	movwf 0x3D
	movf 0x35,w
	sublw .2
	btfsc STATUS,C
	return
	clrf 0x34
	clrf 0x35
LEVEL_24	call LEVEL_33	
	bsf 0x2B,1
	bsf PORTB,4
LEVEL_31	bcf PORTB,6
	bcf 0x2C,3
	movlw .100
	movwf 0x54
	movlw .50
	movwf 0x2F
	return
LEVEL_33	call LEVEL_29
	call LEVEL_4
	clrf 0x2E
	clrf 0x3A
	clrf 0x3B
	bcf 0x2B,0
	bcf 0x2D,3
	bcf PORTB,7
	bcf PORTB,5
	bcf PORTC,7
	call LEVEL_4
	return
LEVEL_4	clrwdt
	movlw .25
	movwf 0x38
LEVEL_30	clrwdt
	movlw .0
	movwf W_TEMP
LEVEL_34	clrwdt
	decfsz W_TEMP,f
	goto LEVEL_34	
	decfsz 0x38,f
	goto LEVEL_30
	return
LEVEL_54	movlw .1   
	movwf SEL_CHANEL
	call ANASCAN
	movf AD_RESULT,w
	addwf 0x43,f
	btfss STATUS,C
	goto LEVEL_35	
	movf 0x44,w
	addlw .1
	movwf 0x44
LEVEL_35	movf 0x45,w
	addlw .1
	movwf 0x45
	andlw .128
	btfsc STATUS,Z
	goto LEVEL_36	
	call LEVEL_37	
	movf BATTV,w
	sublw .215      
	btfsc STATUS,C
	goto LEVEL_36
	call LEVEL_29
	call LEVEL_31
LEVEL_36	goto LEVEL_38	
LEVEL_29	bcf INTCON,GIE
	bcf 0x10,0
	bcf 0x12,2
	bcf 0xC,0
	bcf 0xC,2
	bsf STATUS,RP0	; switch to bank 1
	bcf 0x8C,0
	bcf STATUS,RP0	; switch to bank 0
	bcf PORTC,4
	bcf PORTC,5
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	nop
	bsf PORTC,0
	bsf PORTC,1
	return
LEVEL_5	movlw .0
	movwf TMR0
	movlw .4
	movwf 0x17
	clrf 0x3A
	clrf 0x3B
	clrf 0x2E
	movlw .10
	movwf 0x39
	movlw .100
	movwf 0x54
	movlw .10
	movwf 0x3E
	clrf 0x34
	clrf 0x35
	clrf 0x55
	movlw .25
	movwf 0x2A
	movlw .50
	movwf 0x2F
	bcf 0x2C,7
	bcf 0xC,2
	movlw .10
	movwf 0x3D
	bcf PORTC,7
	call LEVEL_4
	call LEVEL_4
	call LEVEL_4
LEVEL_38	clrwdt
	bcf 0x2C,6
	btfsc INTCON,T0IF
	bsf 0x2C,6
	bcf INTCON,T0IF
	btfsc 0x2C,0
	call LEVEL_11
	btfsc PORTA,4
	goto LEVEL_39	
	call LEVEL_40	
	goto LEVEL_41	
LEVEL_39	call LEVEL_42	
LEVEL_41	call LEVEL_43	
	btfsc 0x2B,1
	goto LEVEL_44	
	goto LEVEL_45	
LEVEL_45	btfss 0x2B,0
	goto LEVEL_46	
	btfsc 0x2C,7
	goto LEVEL_47	
	call LEVEL_33
	goto LEVEL_46
LEVEL_47	movf 0x2E,w
	btfss STATUS,Z
	goto LEVEL_46
	movlw .4                   
	movwf SEL_CHANEL
	call ANASCAN
	movf AD_RESULT,w
	sublw .120
	btfss STATUS,C
	goto LEVEL_48	
	movf AD_RESULT,w
	sublw .60
	btfsc STATUS,C
	goto LEVEL_49	
	movlw .10
	movwf 0x3D
	movlw .1
	addwf 0x3A,f
	btfss STATUS,C
	goto LEVEL_49
	incf 0x3B,f
	movf 0x3B,w
	sublw .5
	btfsc STATUS,C
	goto LEVEL_49
LEVEL_48	call LEVEL_29
	clrf 0x3A
	clrf 0x3B
	movlw .50
	movwf 0x2E
	movlw .50
	movwf 0x3D
	bsf PORTB,5
	goto LEVEL_46
LEVEL_49	bcf PORTB,5
	movf BATTV,w
	btfsc STATUS,Z
	goto LEVEL_50	
	bcf 0x2D,3            
	sublw .154         
	btfss STATUS,C
	goto LEVEL_50
	bsf 0x2D,3            
	movf BATTV,w
	sublw .148       
	btfss STATUS,C
	goto LEVEL_50
	call LEVEL_29
	bsf 0x2D,3
	goto LEVEL_46
LEVEL_50	movlw .0         
	movwf SEL_CHANEL
	call ANASCAN
	movf AD_RESULT,w
	addwf 0x40,f
	btfss STATUS,C
	goto LEVEL_51	
	movf 0x41,w
	addlw .1	
	movwf 0x41
LEVEL_51	movf 0x42,w
	addlw .1	
	movwf 0x42
	andlw b'00100000'
	btfsc STATUS,Z
	goto LEVEL_46
	call LEVEL_52	
	call LEVEL_53	
LEVEL_46	goto LEVEL_54	
LEVEL_44	btfss 0x2B,1
	goto LEVEL_55	
	btfsc 0x2C,3
	goto LEVEL_56	
	movf BATTV,w
	sublw .201             
	btfss STATUS,C
	goto LEVEL_55
	movf 0x2F,w
	btfss STATUS,Z
	goto LEVEL_55
	bsf 0x2C,3
	bsf PORTB,4
	bsf PORTB,6
	clrf 0x46
	clrf 0x47
	clrf 0x48
	clrf 0x4E
	movlw .100
	movwf 0x54
	call LEVEL_57	; LEVEL_57 = 0x346
	movlw .200
	movwf TMR1L
	movlw .255
	movwf TMR1H
	bsf 0x2D,5
	bsf STATUS,RP0	; switch to bank 1
	bsf 0x8C,0
	bcf STATUS,RP0	; switch to bank 0
	bsf 0x10,0
	bsf INTCON,GIE
	goto LEVEL_55
LEVEL_56	movlw .3    
	movwf SEL_CHANEL
	call ANASCAN
	movf AD_RESULT,w
	sublw .180
	btfsc STATUS,C
	goto LEVEL_58	
	call LEVEL_29
	call LEVEL_31
	goto LEVEL_55
LEVEL_58	movf AD_RESULT,w
	addwf 0x46,f
	btfss STATUS,C
	goto LEVEL_59	
	movf 0x47,w
	addlw .1
	movwf 0x47
LEVEL_59	movf 0x48,w
	addlw .1
	movwf 0x48
	andlw .32
	btfsc STATUS,Z
	goto LEVEL_55
	call LEVEL_60	
	call LEVEL_61	
LEVEL_55	goto LEVEL_54
LEVEL_52	movlw .5
	movwf W_TEMP
LEVEL_62	bcf STATUS,C
	rrf 0x41,f
	rrf 0x40,f
	decfsz W_TEMP,f
	goto LEVEL_62	
	movf 0x40,w
	movwf 0x4C
	clrf 0x40
	clrf 0x41
	clrf 0x42
	return
LEVEL_37	movlw .7
	movwf W_TEMP
LEVEL_63	bcf STATUS,C
	rrf 0x44,f
	rrf 0x43,f
	decfsz W_TEMP,f
	goto LEVEL_63	
	movf 0x43,w
	movwf BATTV
	clrf 0x43
	clrf 0x44
	clrf 0x45
	return
LEVEL_60	movlw .5
	movwf W_TEMP
LEVEL_64	bcf STATUS,C
	rrf 0x47,f
	rrf 0x46,f
	decfsz W_TEMP,f
	goto LEVEL_64	
	movf 0x46,w
	movwf 0x4E
	clrf 0x46
	clrf 0x47
	clrf 0x48
	return
LEVEL_43	btfss 0x2C,6
	goto LEVEL_65	
	btfss 0x2C,3
	goto LEVEL_66	
	btfsc 0x2C,5
	goto LEVEL_66
	movlw .128
	subwf 0x54,w
	btfsc STATUS,C
	goto LEVEL_67	
	incf 0x54,f
	goto LEVEL_67
LEVEL_66	btfss 0x2B,0
	goto LEVEL_67
	btfsc 0x2B,7
	goto LEVEL_67
	movlw .128
	subwf 0x39,w
	btfsc STATUS,C
	goto LEVEL_67
	incf 0x39,f
LEVEL_67	btfsc PORTB,2
	goto LEVEL_68	
	movf 0x2A,w
	btfsc STATUS,Z
	goto LEVEL_69	
	decfsz 0x2A,f
	goto LEVEL_70	
	btfsc 0x2B,5
	goto LEVEL_69
	bsf 0x2B,5
	btfsc 0x2C,7
	goto LEVEL_71	
	bsf 0x2C,7
	bsf PORTB,3
	movlw .10
	movwf 0x3D
	goto LEVEL_70
LEVEL_71	bcf 0x2C,7
	bcf PORTB,3
	movlw .10
	movwf 0x3D
	btfsc 0x2B,0
	call LEVEL_33
	movlw .10
	movwf 0x39
	movlw .10
	movwf 0x3E
	goto LEVEL_70
LEVEL_68	bcf 0x2B,5
LEVEL_69	movlw .30
	movwf 0x2A
LEVEL_70	decfsz 0x3C,f
	goto LEVEL_65
	movlw .20
	movwf 0x3C
	btfss 0x2D,3
	goto LEVEL_72	
	movlw .10
	movwf 0x3D
	movlw .128
	xorwf PORTB,f
LEVEL_72	btfss 0x2B,1
	goto LEVEL_73	
	btfss 0x2C,3
	goto LEVEL_74	
	movlw .64
	xorwf PORTB,f
LEVEL_74	movf 0x2F,w
	btfss STATUS,Z
	decf 0x2F,f
LEVEL_73	btfss 0x2B,0
	goto LEVEL_75	
	movf 0x2E,w
	btfsc STATUS,Z
	goto LEVEL_75
	decfsz 0x2E,f
	goto LEVEL_75
	movlw .10
	movwf 0x39
	movlw .10
	movwf 0x3E
	call LEVEL_76	
LEVEL_75	movf 0x3D,w
	btfsc STATUS,Z
	goto LEVEL_65
	movlw b'1000000' 
	xorwf PORTC,f
	decfsz 0x3D,f
	goto LEVEL_65
	bcf PORTC,6
LEVEL_65	return
LEVEL_61	movf 0x4E,w
	sublw .5
	btfsc STATUS,C
	goto LEVEL_57
	bcf 0x2C,5
	movf 0x4E,w
	subwf 0x54,w
	movwf 0x52
	btfss STATUS,C
	goto LEVEL_77	
	sublw .2
	btfss STATUS,C
	goto LEVEL_78	
	return

LEVEL_78	bcf STATUS,C
	rrf 0x52,f
	clrf 0x53
	movlw .1
	movwf 0x52
	movf 0x24,w
	addwf 0x52,f
	btfsc STATUS,C
	incf 0x53,f
	movf 0x25,w
	addwf 0x53,f
	movf 0x52,w
	sublw .0
	movf 0x53,w
	movwf W_TEMP
	btfss STATUS,C
	incf W_TEMP,f
	movf W_TEMP,w
	sublw .2
	btfsc STATUS,C
	goto LEVEL_79	
	movlw .0	
	movwf 0x24
	movlw .2	
	movwf 0x25
	goto LEVEL_80	
LEVEL_79	movf 0x52,w
	movwf 0x24
	movf 0x53,w
	movwf 0x25
	goto LEVEL_80
LEVEL_77	comf 0x52,f
	incf 0x52,f
	movf 0x52,w
	sublw .2
	btfsc STATUS,C
	return
	bcf STATUS,C
	rrf 0x52,f
	clrf 0x53
	movlw .5
	movwf 0x52
	movf 0x52,w
	subwf 0x24,f
	movwf 0x52
	btfss STATUS,C
	incf 0x53,f
	movf 0x53,w
	subwf 0x25,f
	movwf 0x53
	btfsc STATUS,C
	goto LEVEL_80
LEVEL_57	bsf 0x2C,5
	movlw .20
	movwf 0x24
	movlw .0
	movwf 0x25
LEVEL_80	bcf STATUS,C
	movf 0x25,w
	movwf W_TEMP
	movf 0x24,w
	sublw .200
	movwf 0x28
	btfss STATUS,C
	incf W_TEMP,f
	movf W_TEMP,w
	sublw .2
	movwf 0x29
	return

LEVEL_53	movf 0x4C,w
	sublw .5
	btfsc STATUS,C
	goto LEVEL_81	
	bcf 0x2B,7
	bcf 0x2B,2
	movf 0x4C,w
	subwf 0x39,w
	movwf 0x52
	btfsc STATUS,C
	goto LEVEL_82	
	bsf 0x2B,2
	comf 0x52,f
	incf 0x52,f
LEVEL_82	movf 0x52,w
	sublw .2
	btfss STATUS,C
	goto LEVEL_83	
	return

LEVEL_83	bcf STATUS,C
	rrf 0x52,f
	rrf 0x52,f
	movlw .1
	movwf 0x52
	btfss 0x2B,2
	goto LEVEL_84	
	movf 0x52,w
	subwf 0x3E,f
	movf 0x3E,w
	sublw .89
	btfss STATUS,C
	goto LEVEL_85	
	return

LEVEL_84	movf 0x52,w
	addwf 0x3E,f
	movf 0x3E,w
	sublw .89
	btfsc STATUS,C
	return
	movlw .89
	movwf 0x3E
	return

LEVEL_81	bsf 0x2B,7
	movlw .10
	movwf 0x39

LEVEL_85	movlw .10
	movwf 0x3E
	return

LEVEL_11	bcf 0x2C,0
	incf 0x21,f
	btfss 0x21,6
	goto LEVEL_86	
	clrf 0x21

LEVEL_86	movf 0x21,w
	call table	
	movwf 0x50
	movf 0x3E,w
	movwf 0x51
	call LEVEL_88	
	bcf STATUS,C
	rrf 0x53,f
	rrf 0x52,f
	bcf STATUS,C
	rrf 0x53,f
	rrf 0x52,f
	bcf STATUS,C
	rrf 0x53,f
	rrf 0x52,f
	bcf STATUS,C
	rrf 0x53,f
	rrf 0x52,f
	movf 0x52,w
	movwf 0x24
	movf 0x53,w
	movwf 0x25
	bcf STATUS,C
	movf 0x24,w
	sublw .200
	movwf 0x28
	movf 0x25,w
	movwf W_TEMP
	btfss STATUS,C
	incf W_TEMP,f
	movf W_TEMP,w
	sublw .2
	movwf 0x29
	return

LEVEL_88	clrf 0x53
	clrf 0x52
	movf 0x50,w
	bcf STATUS,C
	btfsc 0x51,0
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,1
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,2
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,3
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,4
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,5
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,6
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	btfsc 0x51,7
	addwf 0x53,f
	rrf 0x53,f
	rrf 0x52,f
	retlw .0
	addlw .166
	addlw .255
	addlw .255
	addlw .255
	addlw .255
	movlw .10
	addwf 0x52,f
	btfsc STATUS,C
	incf 0x53,f
	movlw .8
	addwf 0x53,f
	movf 0x53,w
	movwf PCLATH
	movf 0x52,w
	movwf PCL
	retlw .0	
	retlw .0
	retlw .0	
	retlw .0	
	retlw .227
	retlw .54
	retlw .0
	retlw .227
	retlw .62
	retlw .0
	retlw .228
	retlw .8	
	retlw .0	
	retlw .228
	retlw .20
	retlw .0
	retlw .228
	retlw .34
	retlw .0
	retlw .228
	retlw .54
	retlw .0	
	retlw .229
	retlw .32
	retlw .0
	retlw .230
	retlw .48
	retlw .0
	retlw .231
	retlw .16
	retlw .0
	retlw .231
	retlw .44
	retlw .0	
	retlw .232
	retlw .4	
	retlw .0	
	retlw .232
	retlw .54
	retlw .0
	retlw .233
	retlw .6	
	retlw .0	
	retlw .233
	retlw .60
	retlw .0
	retlw .234
	retlw .27
	retlw .0
	retlw .234
	retlw .36
	retlw .0
	retlw .227
	retlw .57
	retlw .0	
	retlw .228
	retlw .17
	retlw .0
	retlw .228
	retlw .41
	retlw .0
	retlw .229
	retlw .1
	retlw .0
	retlw .229
	retlw .25
	retlw .0
	retlw .229
	retlw .49
	retlw .0
	retlw .230
	retlw .9
	retlw .0
	retlw .230
	retlw .33
	retlw .0
	retlw .230
	retlw .57
	retlw .0
	retlw .231
	retlw .17
	retlw .0
	retlw .231
	retlw .41
	retlw .0
	retlw .232
	retlw .1
	retlw .0
	retlw .232
	retlw .25
	retlw .0
	retlw .232
	retlw .49
	retlw .0
	retlw .233
	retlw .9
	retlw .0
	retlw .233
	retlw .33
	retlw .0
	retlw .227
	retlw .60
	retlw .0
	retlw .228
	retlw .21
	retlw .0
	retlw .228
	retlw .44
	retlw .0
	retlw .229
	retlw .4
	retlw .0
	retlw .229
	retlw .28
	retlw .0
	retlw .229
	retlw .52
	retlw .0
	retlw .230
	retlw .12
	retlw .0
	retlw .230
	retlw .36
	retlw .0
	retlw .230
	retlw .60
	retlw .0
	retlw .231
	retlw .20
	retlw .0
	retlw .231
	retlw .45
	retlw .0
	retlw .232
	retlw .5
	retlw .0
	retlw .232
	retlw .28
	retlw .0	
	retlw .232
	retlw .52
	retlw .0
	retlw .233
	retlw .12
	retlw .0
	retlw .233
	retlw .36
	retlw .0
	retlw .227
	retlw .63
	retlw .0
	retlw .228
	retlw .23
	retlw .0
	retlw .228
	retlw .47
	retlw .0
	retlw .229
	retlw .7
	retlw .0
	retlw .229
	retlw .31
	retlw .0	
	retlw .229
	retlw .55
	retlw .0
	retlw .230
	retlw .15
	retlw .0	
	retlw .230
	retlw .39
	retlw .0
	retlw .230
	retlw .63
	retlw .0
	retlw .231
	retlw .23
	retlw .0
	retlw .231
	retlw .47
	retlw .0
	retlw .232
	retlw .7
	retlw .0
	retlw .232
	retlw .31
	retlw .0
	retlw .232
	retlw .55
	retlw .0
	retlw .233
	retlw .15
	retlw .0
	retlw .233
	retlw .39
	retlw .0
	retlw .228
	retlw .2
	retlw .0
	retlw .228
	retlw .26
	retlw .0	
	retlw .228
	retlw .50
	retlw .0
	retlw .229
	retlw .10
	retlw .0
	retlw .229
	retlw .34
	retlw .0
	retlw .229
	retlw .58
	retlw .0
	retlw .230
	retlw .18
	retlw .0	
	retlw .230
	retlw .42
	retlw .0
	retlw .231
	retlw .2
	retlw .0
	retlw .231
	retlw .26
	retlw .0
	retlw .231
	retlw .50
	retlw .0
	retlw .232
	retlw .10
	retlw .0
	retlw .232
	retlw .34
	retlw .0
	retlw .232
	retlw .58
	retlw .0
	retlw .233
	retlw .18
	retlw .0
	retlw .233
	retlw .42
	retlw .0	
	retlw .228
	retlw .5
	retlw .0
	retlw .228
	retlw .29
	retlw .0
	retlw .228
	retlw .53
	retlw .0
	retlw .229
	retlw .13
	retlw .0
	retlw .229
	retlw .37
	retlw .0
	retlw .229
	retlw .61
	retlw .0
	retlw .230
	retlw .21
	retlw .0
	retlw .230
	retlw .45
	retlw .0
	retlw .231
	retlw .5
	retlw .0
	retlw .231
	retlw .29
	retlw .0
	retlw .231
	retlw .53
	retlw .0
	retlw .232
	retlw .13
	retlw .0
	retlw .232
	retlw .37
	retlw .0
	retlw .232
	retlw .61
	retlw .0
	retlw .233
	retlw .21
	retlw .0
	retlw .233
	retlw .45
	retlw .0
	retlw .228
	retlw .9
	retlw .0	
	retlw .228
	retlw .32
	retlw .0
	retlw .228
	retlw .56
	retlw .0
	retlw .229
	retlw .16
	retlw .0
	retlw .229
	retlw .40
	retlw .0
	retlw .230
	retlw .0
	retlw .0
	retlw .230
	retlw .24
	retlw .0	
	retlw .230
	retlw .31
	retlw .0
	retlw .231
	retlw .8
	retlw .0
	retlw .231
	retlw .32
	retlw .0
	retlw .231
	retlw .56
	retlw .0
	retlw .232
	retlw .16
	retlw .0
	retlw .232
	retlw .40
	retlw .0
	retlw .233
	retlw .0
	retlw .0
	retlw .233
	retlw .24
	retlw .0
	retlw .233
	retlw .48
	retlw .0
	retlw .228
	retlw .11
	retlw .0
	retlw .228
	retlw .35
	retlw .0
	retlw .228
	retlw .59
	retlw .0
	retlw .229
	retlw .19
	retlw .0
	retlw .229
	retlw .43
	retlw .0
	retlw .230
	retlw .3
	retlw .0
	retlw .230
	retlw .27
	retlw .0
	retlw .230
	retlw .51
	retlw .0
	retlw .231
	retlw .11
	retlw .0
	retlw .231
	retlw .35
	retlw .0
	retlw .231
	retlw .59
	retlw .0
	retlw .232
	retlw .19
	retlw .0
	retlw .232
	retlw .43
	retlw .0
	retlw .233
	retlw .3
	retlw .0
	retlw .233
	retlw .27
	retlw .0
	retlw .233
	retlw .51
	retlw .0
	retlw .228
	retlw .14
	retlw .0
	retlw .228
	retlw .38
	retlw .0
	retlw .228
	retlw .62
	retlw .0
	retlw .229
	retlw .22
	retlw .0
	retlw .229
	retlw .46
	retlw .0
	retlw .230
	retlw .6
	retlw .0
	retlw .230
	retlw .30
	retlw .0
	retlw .230
	retlw .54
	retlw .0
	retlw .231
	retlw .14
	retlw .0
	retlw .231
	retlw .38
	retlw .0
	retlw .231
	retlw .62
	retlw .0
	retlw .232
	retlw .22
	retlw .0
	retlw .232
	retlw .46
	retlw .0
	retlw .233
	retlw .7
	retlw .0
	retlw .233
	retlw .30
	retlw .0
	retlw .233
	retlw .54
	movlw .199
	addwf 0x52,f
	btfsc STATUS,C
	incf 0x53,f
	movlw .9
	addwf 0x53,f
	movf 0x53,w
	movwf PCLATH
	movf 0x52,w
	movwf PCL
	retlw .0	
	retlw .0	
	retlw .0
	retlw .0	
	retlw .0	
	retlw .0	
	retlw .8	
	retlw .0	
	retlw .0	
	retlw .1
	retlw .0
	retlw .0
	retlw .8	
	retlw .0
	retlw .0
	retlw .5
	retlw .0
	retlw .0
	retlw .8
	retlw .0	
	retlw .1
	retlw .0
	retlw .0	
	retlw .0
	retlw .8	
	retlw .0	
	retlw .1	
	retlw .6	
	retlw .0	
	retlw .0	
	retlw .8	
	retlw .0	
	retlw .2
	retlw .3	
	retlw .0
	retlw .0
	retlw .8	
	retlw .0	
	retlw .3	
	retlw .3	
	retlw .0	
	retlw .0	
	retlw .8	
	retlw .0	
	retlw .5	
	retlw .4	
	retlw .0
	retlw .0
	retlw .8	
	retlw .0	
	retlw .9	
	retlw .4
	retlw .0	
	retlw .0
	retlw .8	
	retlw .1	
	retlw .1
	retlw .0
	retlw .0	
	retlw .0	
	retlw .8	
	retlw .1	
	retlw .2
	retlw .4	
	retlw .0	
	retlw .0	
	retlw .8
	retlw .1	
	retlw .3	
	retlw .6
	retlw .0	
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .3	; d'3' b'11' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .9	; d'9' b'1001' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .2	; d'2' b'10' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .4	; d'4' b'100' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .7	; d'7' b'111' a'¶'
	retlw .6	; d'6' b'110' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .1	; d'1' b'1' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .5	; d'5' b'101' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .8	; d'8' b'1000' a'¶'
	retlw .0	; d'0' b'0' a'¶'
	retlw .2
	retlw .2
	retlw .0
	retlw .0
	retlw .8
	retlw .0
	retlw .3
	retlw .4
	retlw .0
	retlw .0
	retlw .8
	retlw .0
	retlw .4
	retlw .6
	retlw .0
	retlw .0
	retlw .8
	retlw .0
	retlw .5
    end
 
Last edited:
Thanks for your replay

This code will be checked ?
This code is same circuit ?

Please replay

regards
vengu
 

Vengu said:
Thanks for your replay

This code will be checked ?
This code is same circuit ?

Please replay

regards
vengu
Click to expand...
yes this asm file is for same pic16F72 schematic.
 

the hex file is already given on page 6 post #101 by "pnjbtr"
is it not the same?
 
  • Like
Reactions: jumek

    J

    jumek

    Points: 2
    Helpful Answer Positive Rating
Try to compile and compare with hex on page 6.
This ASM code is for Same circuit upload by AKBAR ZAHID.
 

the inverter works but need some adjustment on the source code,the feedback is not working , and is a sinewave use fan capacitor to filter it .
 

I simulated the code ,the purse width is too small.and feedback is not working.How does the adc readings interact with the purse width to adjust the output voltage can any body explain this aspect of the code.
 

For better output voltage regulation try to keep voltage from 0.5 to 2.4v,
at Channel 0 pin 2 of 16F72.
Increase value of R44 220 ohm instead of 100.
Use 2k pot(RV1),instead of 1k.
These two components are important for feed back.
Mains transformer,s secondary should be 7.5v to 8v max.
And try to keep tabs in primary 220v 230v 250v and 270v.
Its better way to choose volts according to your choice.
In low pass filter try to increase fan cap 2.5uf,3.5uf till 5uf 400v ac.
 
  • Like
Reactions: jumek

    J

    jumek

    Points: 2
    Helpful Answer Positive Rating
I also build this one, but the the result is not good.
inv.JPG
 
Status
Not open for further replies.

Similar threads

Part and Inventory Search

Welcome to EDABoard.com

Sponsor

Back
Top