;  Assembly code generated by mikroVirtualMachine - V. 5.0.0.3
;  Date/Time: 16/05/2007 1:37:36
;  Info: http://www.mikroe.com


; ADDRESS	OPCODE	ASM
; ----------------------------------------------
$0000	$158A			BSF	PCLATH, 3
$0001	$2800			GOTO	_main
$0068	$	_res032:
$0068	$1303			BCF	STATUS, RP1
$0069	$1283			BCF	STATUS, RP0
;math_double.ppas,56 :: 		
;math_double.ppas,61 :: 		
$006A	$01F2			CLRF	STACK_2
;math_double.ppas,62 :: 		
$006B	$01F1			CLRF	STACK_1
;math_double.ppas,63 :: 		
$006C	$01F0			CLRF	STACK_0
;math_double.ppas,64 :: 		
$006D	$01F8			CLRF	STACK_8
;math_double.ppas,65 :: 		
$006E	$01F3			CLRF	STACK_3
;math_double.ppas,66 :: 		
$006F	$3000			MOVLW	0
;math_double.ppas,67 :: 		
$0070	$	math_double_L_3:
;math_double.ppas,68 :: 		
$0070	$0008			RETURN
$0071	$	_setfun32:
$0071	$1303			BCF	STATUS, RP1
$0072	$1283			BCF	STATUS, RP0
;math_double.ppas,71 :: 		
;math_double.ppas,78 :: 		
$0073	$157B			BSF	STACK_11, 2
;math_double.ppas,79 :: 		
$0074	$1FFB			BTFSS	STACK_11, 7
;math_double.ppas,80 :: 		
$0075	$287D			GOTO	SETFUN32EEE
;math_double.ppas,81 :: 		
$0076	$3001			MOVLW	0X01
;math_double.ppas,82 :: 		
$0077	$00F3			MOVWF	STACK_3
;math_double.ppas,83 :: 		
$0078	$01F2			CLRF	STACK_2
;math_double.ppas,84 :: 		
$0079	$01F1			CLRF	STACK_1
;math_double.ppas,85 :: 		
$007A	$01F0			CLRF	STACK_0
;math_double.ppas,86 :: 		
$007B	$0DFA			RLF	STACK_10, F
;math_double.ppas,87 :: 		
$007C	$0CF2			RRF	STACK_2, F
;math_double.ppas,88 :: 		
$007D	$	SETFUN32EEE:
;math_double.ppas,89 :: 		
$007D	$30FF			MOVLW	0XFF
;math_double.ppas,90 :: 		
$007E	$	math_double_L_4:
;math_double.ppas,91 :: 		
$007E	$0008			RETURN
$007F	$	_fixsign32:
$007F	$1303			BCF	STATUS, RP1
$0080	$1283			BCF	STATUS, RP0
;math_double.ppas,45 :: 		
;math_double.ppas,49 :: 		
$0081	$1FFA			BTFSS	STACK_10, 7
;math_double.ppas,50 :: 		
$0082	$13F2			BCF	STACK_2, 7
;math_double.ppas,51 :: 		
$0083	$3000			MOVLW	0
;math_double.ppas,52 :: 		
$0084	$	math_double_L_2:
;math_double.ppas,53 :: 		
$0084	$0008			RETURN
$0085	$	_setfov32:
$0085	$1303			BCF	STATUS, RP1
$0086	$1283			BCF	STATUS, RP0
;math_double.ppas,11 :: 		
;math_double.ppas,18 :: 		
$0087	$14FB			BSF	STACK_11, 1
;math_double.ppas,19 :: 		
$0088	$1FFB			BTFSS	STACK_11, 7
;math_double.ppas,20 :: 		
$0089	$2891			GOTO	SETFOV32EEE
;math_double.ppas,21 :: 		
$008A	$30FF			MOVLW	0XFF
;math_double.ppas,22 :: 		
$008B	$00F3			MOVWF	STACK_3
;math_double.ppas,23 :: 		
$008C	$00F2			MOVWF	STACK_2
;math_double.ppas,24 :: 		
$008D	$00F1			MOVWF	STACK_1
;math_double.ppas,25 :: 		
$008E	$00F0			MOVWF	STACK_0
;math_double.ppas,26 :: 		
$008F	$0DFA			RLF	STACK_10, F
;math_double.ppas,27 :: 		
$0090	$0CF2			RRF	STACK_2, F
;math_double.ppas,28 :: 		
$0091	$	SETFOV32EEE:
;math_double.ppas,29 :: 		
$0091	$30FF			MOVLW	0XFF
;math_double.ppas,30 :: 		
$0092	$	math_double_L_0:
;math_double.ppas,31 :: 		
$0092	$0008			RETURN
$0093	$	_nrm4032:
$0093	$1303			BCF	STATUS, RP1
$0094	$1283			BCF	STATUS, RP0
;math_double.ppas,178 :: 		
;math_double.ppas,187 :: 		
$0095	$187C			BTFSC	STACK_12, 0
;math_double.ppas,188 :: 		
$0096	$28CB			GOTO	NRMRND4032
;math_double.ppas,189 :: 		
$0097	$18FC			BTFSC	STACK_12, 1
;math_double.ppas,190 :: 		
$0098	$289C			GOTO	NRM4032
;math_double.ppas,191 :: 		
$0099	$197C			BTFSC	STACK_12, 2
;math_double.ppas,192 :: 		
$009A	$28EA			GOTO	JMPSETFOV32
;math_double.ppas,193 :: 		
$009B	$2895			GOTO	$-6
;math_double.ppas,194 :: 		
$009C	$	NRM4032:
;math_double.ppas,195 :: 		
$009C	$01A0			CLRF	MATH_DOUBLE___MATH_TEMPBD
;math_double.ppas,196 :: 		
$009D	$0872			MOVF	STACK_2, W
;math_double.ppas,197 :: 		
$009E	$1D03			BTFSS	STATUS, Z
;math_double.ppas,198 :: 		
$009F	$28BC			GOTO	NORM4032
;math_double.ppas,199 :: 		
$00A0	$0871			MOVF	STACK_1, W
;math_double.ppas,200 :: 		
$00A1	$00F2			MOVWF	STACK_2
;math_double.ppas,201 :: 		
$00A2	$0870			MOVF	STACK_0, W
;math_double.ppas,202 :: 		
$00A3	$00F1			MOVWF	STACK_1
;math_double.ppas,203 :: 		
$00A4	$0878			MOVF	STACK_8, W
;math_double.ppas,204 :: 		
$00A5	$00F0			MOVWF	STACK_0
;math_double.ppas,205 :: 		
$00A6	$01F8			CLRF	STACK_8
;math_double.ppas,207 :: 		
$00A7	$15A0			BSF	MATH_DOUBLE___MATH_TEMPBD, 3
;math_double.ppas,208 :: 		
$00A8	$0872			MOVF	STACK_2, W
;math_double.ppas,209 :: 		
$00A9	$1D03			BTFSS	STATUS, Z
;math_double.ppas,210 :: 		
$00AA	$28BC			GOTO	NORM4032
;math_double.ppas,211 :: 		
$00AB	$0871			MOVF	STACK_1, W
;math_double.ppas,212 :: 		
$00AC	$00F2			MOVWF	STACK_2
;math_double.ppas,213 :: 		
$00AD	$0870			MOVF	STACK_0, W
;math_double.ppas,214 :: 		
$00AE	$00F1			MOVWF	STACK_1
;math_double.ppas,215 :: 		
$00AF	$01F0			CLRF	STACK_0
;math_double.ppas,216 :: 		
$00B0	$11A0			BCF	MATH_DOUBLE___MATH_TEMPBD, 3
;math_double.ppas,218 :: 		
$00B1	$1620			BSF	MATH_DOUBLE___MATH_TEMPBD, 4
;math_double.ppas,219 :: 		
$00B2	$0872			MOVF	STACK_2, W
;math_double.ppas,220 :: 		
$00B3	$1D03			BTFSS	STATUS, Z
;math_double.ppas,221 :: 		
$00B4	$28BC			GOTO	NORM4032
;math_double.ppas,222 :: 		
$00B5	$0871			MOVF	STACK_1, W
;math_double.ppas,223 :: 		
$00B6	$00F2			MOVWF	STACK_2
;math_double.ppas,224 :: 		
$00B7	$01F1			CLRF	STACK_1
;math_double.ppas,226 :: 		
$00B8	$15A0			BSF	MATH_DOUBLE___MATH_TEMPBD, 3
;math_double.ppas,227 :: 		
$00B9	$0872			MOVF	STACK_2, W
;math_double.ppas,228 :: 		
$00BA	$1903			BTFSC	STATUS, Z
;math_double.ppas,229 :: 		
$00BB	$28DE			GOTO	JMPRES032
;math_double.ppas,230 :: 		
$00BC	$	NORM4032:
;math_double.ppas,231 :: 		
$00BC	$0820			MOVF	MATH_DOUBLE___MATH_TEMPBD, W
;math_double.ppas,232 :: 		
$00BD	$02F3			SUBWF	STACK_3, F
;math_double.ppas,233 :: 		
$00BE	$1D03			BTFSS	STATUS, Z
;math_double.ppas,234 :: 		
$00BF	$1C03			BTFSS	STATUS, C
;math_double.ppas,235 :: 		
$00C0	$28E2			GOTO	JMPSETFUN32
;math_double.ppas,236 :: 		
$00C1	$1003			BCF	STATUS, C
;math_double.ppas,237 :: 		
$00C2	$	NORM4032A:
;math_double.ppas,238 :: 		
$00C2	$1BF2			BTFSC	STACK_2, 7
;math_double.ppas,239 :: 		
$00C3	$28CB			GOTO	NRMRND4032
;math_double.ppas,240 :: 		
$00C4	$0DF8			RLF	STACK_8, F
;math_double.ppas,241 :: 		
$00C5	$0DF0			RLF	STACK_0, F
;math_double.ppas,242 :: 		
$00C6	$0DF1			RLF	STACK_1, F
;math_double.ppas,243 :: 		
$00C7	$0DF2			RLF	STACK_2, F
;math_double.ppas,244 :: 		
$00C8	$0BF3			DECFSZ	STACK_3, F
;math_double.ppas,245 :: 		
$00C9	$28C2			GOTO	NORM4032A
;math_double.ppas,246 :: 		
$00CA	$28E2			GOTO	JMPSETFUN32
;math_double.ppas,247 :: 		
$00CB	$	NRMRND4032:
;math_double.ppas,248 :: 		
$00CB	$1B7B			BTFSC	STACK_11, 6
;math_double.ppas,249 :: 		
$00CC	$1C70			BTFSS	STACK_0, 0
;math_double.ppas,250 :: 		
$00CD	$28E6			GOTO	JMPFIXSIGN32
;math_double.ppas,251 :: 		
$00CE	$1FF8			BTFSS	STACK_8, 7
;math_double.ppas,252 :: 		
$00CF	$28E6			GOTO	JMPFIXSIGN32
;math_double.ppas,253 :: 		
$00D0	$0AF0			INCF	STACK_0, F
;math_double.ppas,254 :: 		
$00D1	$1903			BTFSC	STATUS, Z
;math_double.ppas,255 :: 		
$00D2	$0AF1			INCF	STACK_1, F
;math_double.ppas,256 :: 		
$00D3	$1903			BTFSC	STATUS, Z
;math_double.ppas,257 :: 		
$00D4	$0AF2			INCF	STACK_2, F
;math_double.ppas,258 :: 		
$00D5	$1D03			BTFSS	STATUS, Z
;math_double.ppas,259 :: 		
$00D6	$28E6			GOTO	JMPFIXSIGN32
;math_double.ppas,260 :: 		
$00D7	$0CF2			RRF	STACK_2, F
;math_double.ppas,261 :: 		
$00D8	$0CF1			RRF	STACK_1, F
;math_double.ppas,262 :: 		
$00D9	$0CF0			RRF	STACK_0, F
;math_double.ppas,263 :: 		
$00DA	$0AF3			INCF	STACK_3, F
;math_double.ppas,264 :: 		
$00DB	$1903			BTFSC	STATUS, Z
;math_double.ppas,265 :: 		
$00DC	$28EA			GOTO	JMPSETFOV32
;math_double.ppas,266 :: 		
$00DD	$28E6			GOTO	JMPFIXSIGN32
;math_double.ppas,267 :: 		
$00DE	$	JMPRES032:
;math_double.ppas,268 :: 		
$00DE	$3001			MOVLW	0X01
;math_double.ppas,269 :: 		
$00DF	$00FC			MOVWF	STACK_12
;math_double.ppas,271 :: 		
$00E0	$2068			CALL	_res032
;math_double.ppas,273 :: 		
$00E1	$28ED			GOTO	NRM4032EEE
;math_double.ppas,274 :: 		
$00E2	$	JMPSETFUN32:
;math_double.ppas,275 :: 		
$00E2	$3002			MOVLW	0X02
;math_double.ppas,276 :: 		
$00E3	$00FC			MOVWF	STACK_12
;math_double.ppas,278 :: 		
$00E4	$2071			CALL	_setfun32
;math_double.ppas,280 :: 		
$00E5	$28ED			GOTO	NRM4032EEE
;math_double.ppas,281 :: 		
$00E6	$	JMPFIXSIGN32:
;math_double.ppas,282 :: 		
$00E6	$3004			MOVLW	0X04
;math_double.ppas,283 :: 		
$00E7	$00FC			MOVWF	STACK_12
;math_double.ppas,285 :: 		
$00E8	$207F			CALL	_fixsign32
;math_double.ppas,287 :: 		
$00E9	$28ED			GOTO	NRM4032EEE
;math_double.ppas,288 :: 		
$00EA	$	JMPSETFOV32:
;math_double.ppas,289 :: 		
$00EA	$3008			MOVLW	0X08
;math_double.ppas,290 :: 		
$00EB	$00FC			MOVWF	STACK_12
;math_double.ppas,292 :: 		
$00EC	$2085			CALL	_setfov32
;math_double.ppas,294 :: 		
$00ED	$	NRM4032EEE:
;math_double.ppas,295 :: 		
$00ED	$0000			NOP
;math_double.ppas,296 :: 		
$00EE	$	math_double_L_6:
;math_double.ppas,297 :: 		
$00EE	$0008			RETURN
$00EF	$	_nrm3232:
$00EF	$1303			BCF	STATUS, RP1
$00F0	$1283			BCF	STATUS, RP0
;math_double.ppas,100 :: 		
;math_double.ppas,108 :: 		
$00F1	$01A0			CLRF	MATH_DOUBLE___MATH_TEMPBD
;math_double.ppas,109 :: 		
$00F2	$0872			MOVF	STACK_2, W
;math_double.ppas,110 :: 		
$00F3	$1D03			BTFSS	STATUS, Z
;math_double.ppas,111 :: 		
$00F4	$2906			GOTO	NORM3232
;math_double.ppas,112 :: 		
$00F5	$0871			MOVF	STACK_1, W
;math_double.ppas,113 :: 		
$00F6	$00F2			MOVWF	STACK_2
;math_double.ppas,114 :: 		
$00F7	$0870			MOVF	STACK_0, W
;math_double.ppas,115 :: 		
$00F8	$00F1			MOVWF	STACK_1
;math_double.ppas,116 :: 		
$00F9	$01F0			CLRF	STACK_0
;math_double.ppas,118 :: 		
$00FA	$15A0			BSF	MATH_DOUBLE___MATH_TEMPBD, 3
;math_double.ppas,119 :: 		
$00FB	$0872			MOVF	STACK_2, W
;math_double.ppas,120 :: 		
$00FC	$1D03			BTFSS	STATUS, Z
;math_double.ppas,121 :: 		
$00FD	$2906			GOTO	NORM3232
;math_double.ppas,122 :: 		
$00FE	$0871			MOVF	STACK_1, W
;math_double.ppas,123 :: 		
$00FF	$00F2			MOVWF	STACK_2
;math_double.ppas,124 :: 		
$0100	$01F1			CLRF	STACK_1
;math_double.ppas,125 :: 		
$0101	$11A0			BCF	MATH_DOUBLE___MATH_TEMPBD, 3
;math_double.ppas,127 :: 		
$0102	$1620			BSF	MATH_DOUBLE___MATH_TEMPBD, 4
;math_double.ppas,128 :: 		
$0103	$0872			MOVF	STACK_2, W
;math_double.ppas,129 :: 		
$0104	$1903			BTFSC	STATUS, Z
;math_double.ppas,130 :: 		
$0105	$2914			GOTO	JPNRES032
;math_double.ppas,131 :: 		
$0106	$	NORM3232:
;math_double.ppas,132 :: 		
$0106	$0820			MOVF	MATH_DOUBLE___MATH_TEMPBD, W
;math_double.ppas,133 :: 		
$0107	$02F3			SUBWF	STACK_3, F
;math_double.ppas,134 :: 		
$0108	$1D03			BTFSS	STATUS, Z
;math_double.ppas,135 :: 		
$0109	$1C03			BTFSS	STATUS, C
;math_double.ppas,136 :: 		
$010A	$2918			GOTO	JPNSETFUN32
;math_double.ppas,137 :: 		
$010B	$1003			BCF	STATUS, C
;math_double.ppas,138 :: 		
$010C	$	NORM3232A:
;math_double.ppas,139 :: 		
$010C	$1BF2			BTFSC	STACK_2, 7
;math_double.ppas,140 :: 		
$010D	$291C			GOTO	JMPNFIXSIGN32
;math_double.ppas,141 :: 		
$010E	$0DF0			RLF	STACK_0, F
;math_double.ppas,142 :: 		
$010F	$0DF1			RLF	STACK_1, F
;math_double.ppas,143 :: 		
$0110	$0DF2			RLF	STACK_2, F
;math_double.ppas,144 :: 		
$0111	$0BF3			DECFSZ	STACK_3, F
;math_double.ppas,145 :: 		
$0112	$290C			GOTO	NORM3232A
;math_double.ppas,146 :: 		
$0113	$2918			GOTO	JPNSETFUN32
;math_double.ppas,147 :: 		
$0114	$	JPNRES032:
;math_double.ppas,148 :: 		
$0114	$3001			MOVLW	0X01
;math_double.ppas,149 :: 		
$0115	$00FC			MOVWF	STACK_12
;math_double.ppas,151 :: 		
$0116	$2068			CALL	_res032
;math_double.ppas,153 :: 		
$0117	$291F			GOTO	NORM32EEE
;math_double.ppas,154 :: 		
$0118	$	JPNSETFUN32:
;math_double.ppas,155 :: 		
$0118	$3002			MOVLW	0X02
;math_double.ppas,156 :: 		
$0119	$00FC			MOVWF	STACK_12
;math_double.ppas,158 :: 		
$011A	$2071			CALL	_setfun32
;math_double.ppas,160 :: 		
$011B	$291F			GOTO	NORM32EEE
;math_double.ppas,161 :: 		
$011C	$	JMPNFIXSIGN32:
;math_double.ppas,162 :: 		
$011C	$3004			MOVLW	0X04
;math_double.ppas,163 :: 		
$011D	$00FC			MOVWF	STACK_12
;math_double.ppas,165 :: 		
$011E	$207F			CALL	_fixsign32
;math_double.ppas,167 :: 		
$011F	$	NORM32EEE:
;math_double.ppas,168 :: 		
$011F	$	math_double_L_5:
;math_double.ppas,169 :: 		
$011F	$0008			RETURN
$0120	$	_byte2double:
$0120	$1303			BCF	STATUS, RP1
$0121	$1283			BCF	STATUS, RP0
;math_double.ppas,1649 :: 		
;math_double.ppas,1656 :: 		
$0122	$	FLO08U32:
;math_double.ppas,1657 :: 		
$0122	$0870			MOVF	STACK_0, W
;math_double.ppas,1659 :: 		
$0123	$00F8			MOVWF	STACK_8
;math_double.ppas,1660 :: 		
$0124	$01FB			CLRF	STACK_11
;math_double.ppas,1662 :: 		
$0125	$01FC			CLRF	STACK_12
;math_double.ppas,1663 :: 		
$0126	$309E			MOVLW	0X9E
;math_double.ppas,1664 :: 		
$0127	$00F3			MOVWF	STACK_3
;math_double.ppas,1665 :: 		
$0128	$01FA			CLRF	STACK_10
;math_double.ppas,1666 :: 		
$0129	$01F2			CLRF	STACK_2
;math_double.ppas,1667 :: 		
$012A	$01F1			CLRF	STACK_1
;math_double.ppas,1668 :: 		
$012B	$01F0			CLRF	STACK_0
;math_double.ppas,1669 :: 		
$012C	$3002			MOVLW	0X02
;math_double.ppas,1670 :: 		
$012D	$00FC			MOVWF	STACK_12
;math_double.ppas,1672 :: 		
$012E	$2093			CALL	_nrm4032
$012F	$	math_double_L_17:
;math_double.ppas,1673 :: 		
$012F	$0008			RETURN
$0130	$	_add_32x32_fp:
$0130	$1303			BCF	STATUS, RP1
$0131	$1283			BCF	STATUS, RP0
;math_double.ppas,306 :: 		
;math_double.ppas,319 :: 		
$0132	$0872			MOVF	STACK_2, W
;math_double.ppas,320 :: 		
$0133	$0676			XORWF	STACK_6, W
;math_double.ppas,322 :: 		
$0134	$00A0			MOVWF	MATH_DOUBLE___MATH_TEMPBD
;math_double.ppas,323 :: 		
$0135	$01F8			CLRF	STACK_8
;math_double.ppas,325 :: 		
$0136	$01F9			CLRF	STACK_9
;math_double.ppas,326 :: 		
$0137	$0873			MOVF	STACK_3, W
;math_double.ppas,327 :: 		
$0138	$0277			SUBWF	STACK_7, W
;math_double.ppas,328 :: 		
$0139	$1C03			BTFSS	STATUS, C
;math_double.ppas,330 :: 		
$013A	$2953			GOTO	USEA32
;math_double.ppas,331 :: 		
$013B	$0877			MOVF	STACK_7, W
;math_double.ppas,332 :: 		
$013C	$00FD			MOVWF	STACK_13
;math_double.ppas,333 :: 		
$013D	$0873			MOVF	STACK_3, W
;math_double.ppas,334 :: 		
$013E	$00F7			MOVWF	STACK_7
;math_double.ppas,335 :: 		
$013F	$087D			MOVF	STACK_13, W
;math_double.ppas,337 :: 		
$0140	$00F3			MOVWF	STACK_3
;math_double.ppas,338 :: 		
$0141	$0876			MOVF	STACK_6, W
;math_double.ppas,339 :: 		
$0142	$00FD			MOVWF	STACK_13
;math_double.ppas,340 :: 		
$0143	$0872			MOVF	STACK_2, W
;math_double.ppas,341 :: 		
$0144	$00F6			MOVWF	STACK_6
;math_double.ppas,342 :: 		
$0145	$087D			MOVF	STACK_13, W
;math_double.ppas,344 :: 		
$0146	$00F2			MOVWF	STACK_2
;math_double.ppas,345 :: 		
$0147	$0875			MOVF	STACK_5, W
;math_double.ppas,346 :: 		
$0148	$00FD			MOVWF	STACK_13
;math_double.ppas,347 :: 		
$0149	$0871			MOVF	STACK_1, W
;math_double.ppas,348 :: 		
$014A	$00F5			MOVWF	STACK_5
;math_double.ppas,349 :: 		
$014B	$087D			MOVF	STACK_13, W
;math_double.ppas,351 :: 		
$014C	$00F1			MOVWF	STACK_1
;math_double.ppas,352 :: 		
$014D	$0874			MOVF	STACK_4, W
;math_double.ppas,353 :: 		
$014E	$00FD			MOVWF	STACK_13
;math_double.ppas,354 :: 		
$014F	$0870			MOVF	STACK_0, W
;math_double.ppas,355 :: 		
$0150	$00F4			MOVWF	STACK_4
;math_double.ppas,356 :: 		
$0151	$087D			MOVF	STACK_13, W
;math_double.ppas,357 :: 		
$0152	$00F0			MOVWF	STACK_0
;math_double.ppas,358 :: 		
$0153	$	USEA32:
;math_double.ppas,359 :: 		
$0153	$0877			MOVF	STACK_7, W
;math_double.ppas,360 :: 		
$0154	$1903			BTFSC	STATUS, Z
;math_double.ppas,361 :: 		
$0155	$29CC			GOTO	JMPEEE
;math_double.ppas,362 :: 		
$0156	$0872			MOVF	STACK_2, W
;math_double.ppas,363 :: 		
$0157	$00FA			MOVWF	STACK_10
;math_double.ppas,364 :: 		
$0158	$17F2			BSF	STACK_2, 7
;math_double.ppas,365 :: 		
$0159	$17F6			BSF	STACK_6, 7
;math_double.ppas,366 :: 		
$015A	$0877			MOVF	STACK_7, W
;math_double.ppas,367 :: 		
$015B	$0273			SUBWF	STACK_3, W
;math_double.ppas,368 :: 		
$015C	$00F7			MOVWF	STACK_7
;math_double.ppas,369 :: 		
$015D	$1903			BTFSC	STATUS, Z
;math_double.ppas,370 :: 		
$015E	$2986			GOTO	ALIGNED32
;math_double.ppas,371 :: 		
$015F	$3008			MOVLW	8
;math_double.ppas,372 :: 		
$0160	$0277			SUBWF	STACK_7, W
;math_double.ppas,373 :: 		
$0161	$1C03			BTFSS	STATUS, C
;math_double.ppas,374 :: 		
$0162	$297C			GOTO	ALIGNB32
;math_double.ppas,375 :: 		
$0163	$00F7			MOVWF	STACK_7
;math_double.ppas,376 :: 		
$0164	$0874			MOVF	STACK_4, W
;math_double.ppas,377 :: 		
$0165	$00F9			MOVWF	STACK_9
;math_double.ppas,378 :: 		
$0166	$0875			MOVF	STACK_5, W
;math_double.ppas,379 :: 		
$0167	$00F4			MOVWF	STACK_4
;math_double.ppas,380 :: 		
$0168	$0876			MOVF	STACK_6, W
;math_double.ppas,381 :: 		
$0169	$00F5			MOVWF	STACK_5
;math_double.ppas,382 :: 		
$016A	$01F6			CLRF	STACK_6
;math_double.ppas,383 :: 		
$016B	$3008			MOVLW	8
;math_double.ppas,384 :: 		
$016C	$0277			SUBWF	STACK_7, W
;math_double.ppas,385 :: 		
$016D	$1C03			BTFSS	STATUS, C
;math_double.ppas,386 :: 		
$016E	$297C			GOTO	ALIGNB32
;math_double.ppas,387 :: 		
$016F	$00F7			MOVWF	STACK_7
;math_double.ppas,388 :: 		
$0170	$0874			MOVF	STACK_4, W
;math_double.ppas,389 :: 		
$0171	$00F9			MOVWF	STACK_9
;math_double.ppas,390 :: 		
$0172	$0875			MOVF	STACK_5, W
;math_double.ppas,391 :: 		
$0173	$00F4			MOVWF	STACK_4
;math_double.ppas,392 :: 		
$0174	$01F5			CLRF	STACK_5
;math_double.ppas,393 :: 		
$0175	$3008			MOVLW	8
;math_double.ppas,394 :: 		
$0176	$0277			SUBWF	STACK_7, W
;math_double.ppas,395 :: 		
$0177	$1C03			BTFSS	STATUS, C
;math_double.ppas,396 :: 		
$0178	$297C			GOTO	ALIGNB32
;math_double.ppas,397 :: 		
$0179	$087A			MOVF	STACK_10, W
;math_double.ppas,398 :: 		
$017A	$00F2			MOVWF	STACK_2
;math_double.ppas,399 :: 		
$017B	$29CC			GOTO	JMPEEE
;math_double.ppas,400 :: 		
$017C	$	ALIGNB32:
;math_double.ppas,401 :: 		
$017C	$0877			MOVF	STACK_7, W
;math_double.ppas,402 :: 		
$017D	$1903			BTFSC	STATUS, Z
;math_double.ppas,403 :: 		
$017E	$2986			GOTO	ALIGNED32
;math_double.ppas,404 :: 		
$017F	$	ALOOPB32:
;math_double.ppas,405 :: 		
$017F	$1003			BCF	STATUS, C
;math_double.ppas,406 :: 		
$0180	$0CF6			RRF	STACK_6, F
;math_double.ppas,407 :: 		
$0181	$0CF5			RRF	STACK_5, F
;math_double.ppas,408 :: 		
$0182	$0CF4			RRF	STACK_4, F
;math_double.ppas,409 :: 		
$0183	$0CF9			RRF	STACK_9, F
;math_double.ppas,410 :: 		
$0184	$0BF7			DECFSZ	STACK_7, F
;math_double.ppas,411 :: 		
$0185	$297F			GOTO	ALOOPB32
;math_double.ppas,412 :: 		
$0186	$	ALIGNED32:
;math_double.ppas,413 :: 		
$0186	$1FA0			BTFSS	MATH_DOUBLE___MATH_TEMPBD, 7
;math_double.ppas,414 :: 		
$0187	$2993			GOTO	AOK32
;math_double.ppas,415 :: 		
$0188	$09F9			COMF	STACK_9, F
;math_double.ppas,416 :: 		
$0189	$09F4			COMF	STACK_4, F
;math_double.ppas,417 :: 		
$018A	$09F5			COMF	STACK_5, F
;math_double.ppas,418 :: 		
$018B	$09F6			COMF	STACK_6, F
;math_double.ppas,419 :: 		
$018C	$0AF9			INCF	STACK_9, F
;math_double.ppas,420 :: 		
$018D	$1903			BTFSC	STATUS, Z
;math_double.ppas,421 :: 		
$018E	$0AF4			INCF	STACK_4, F
;math_double.ppas,422 :: 		
$018F	$1903			BTFSC	STATUS, Z
;math_double.ppas,423 :: 		
$0190	$0AF5			INCF	STACK_5, F
;math_double.ppas,424 :: 		
$0191	$1903			BTFSC	STATUS, Z
;math_double.ppas,425 :: 		
$0192	$0AF6			INCF	STACK_6, F
;math_double.ppas,426 :: 		
$0193	$	AOK32:
;math_double.ppas,427 :: 		
$0193	$0879			MOVF	STACK_9, W
;math_double.ppas,428 :: 		
$0194	$07F8			ADDWF	STACK_8, F
;math_double.ppas,429 :: 		
$0195	$0874			MOVF	STACK_4, W
;math_double.ppas,430 :: 		
$0196	$1803			BTFSC	STATUS, C
;math_double.ppas,431 :: 		
$0197	$0F74			INCFSZ	STACK_4, W
;math_double.ppas,432 :: 		
$0198	$07F0			ADDWF	STACK_0, F
;math_double.ppas,433 :: 		
$0199	$0875			MOVF	STACK_5, W
;math_double.ppas,434 :: 		
$019A	$1803			BTFSC	STATUS, C
;math_double.ppas,435 :: 		
$019B	$0F75			INCFSZ	STACK_5, W
;math_double.ppas,436 :: 		
$019C	$07F1			ADDWF	STACK_1, F
;math_double.ppas,437 :: 		
$019D	$0876			MOVF	STACK_6, W
;math_double.ppas,438 :: 		
$019E	$1803			BTFSC	STATUS, C
;math_double.ppas,439 :: 		
$019F	$0F76			INCFSZ	STACK_6, W
;math_double.ppas,440 :: 		
$01A0	$07F2			ADDWF	STACK_2, F
;math_double.ppas,441 :: 		
$01A1	$1BA0			BTFSC	MATH_DOUBLE___MATH_TEMPBD, 7
;math_double.ppas,442 :: 		
$01A2	$29AC			GOTO	ACOMP32
;math_double.ppas,443 :: 		
$01A3	$1C03			BTFSS	STATUS, C
;math_double.ppas,444 :: 		
$01A4	$29BC			GOTO	JMPNRMRND4032
;math_double.ppas,445 :: 		
$01A5	$0CF2			RRF	STACK_2, F
;math_double.ppas,446 :: 		
$01A6	$0CF1			RRF	STACK_1, F
;math_double.ppas,447 :: 		
$01A7	$0CF0			RRF	STACK_0, F
;math_double.ppas,448 :: 		
$01A8	$0CF8			RRF	STACK_8, F
;math_double.ppas,449 :: 		
$01A9	$0FF3			INCFSZ	STACK_3, F
;math_double.ppas,450 :: 		
$01AA	$29BC			GOTO	JMPNRMRND4032
;math_double.ppas,451 :: 		
$01AB	$28EA			GOTO	JMPSETFOV32
;math_double.ppas,452 :: 		
$01AC	$	ACOMP32:
;math_double.ppas,453 :: 		
$01AC	$1803			BTFSC	STATUS, C
;math_double.ppas,454 :: 		
$01AD	$29C0			GOTO	JMPNRM4032
;math_double.ppas,455 :: 		
$01AE	$09F8			COMF	STACK_8, F
;math_double.ppas,456 :: 		
$01AF	$09F0			COMF	STACK_0, F
;math_double.ppas,457 :: 		
$01B0	$09F1			COMF	STACK_1, F
;math_double.ppas,458 :: 		
$01B1	$09F2			COMF	STACK_2, F
;math_double.ppas,459 :: 		
$01B2	$0AF8			INCF	STACK_8, F
;math_double.ppas,460 :: 		
$01B3	$1903			BTFSC	STATUS, Z
;math_double.ppas,461 :: 		
$01B4	$0AF0			INCF	STACK_0, F
;math_double.ppas,462 :: 		
$01B5	$1903			BTFSC	STATUS, Z
;math_double.ppas,463 :: 		
$01B6	$0AF1			INCF	STACK_1, F
;math_double.ppas,464 :: 		
$01B7	$1903			BTFSC	STATUS, Z
;math_double.ppas,465 :: 		
$01B8	$0AF2			INCF	STACK_2, F
;math_double.ppas,466 :: 		
$01B9	$3080			MOVLW	0X80
;math_double.ppas,467 :: 		
$01BA	$06FA			XORWF	STACK_10, F
;math_double.ppas,468 :: 		
$01BB	$29C4			GOTO	JMPNRM32
;math_double.ppas,469 :: 		
$01BC	$	JMPNRMRND4032:
;math_double.ppas,470 :: 		
$01BC	$3001			MOVLW	0X01
;math_double.ppas,471 :: 		
$01BD	$00FC			MOVWF	STACK_12
;math_double.ppas,473 :: 		
$01BE	$2093			CALL	_nrm4032
;math_double.ppas,475 :: 		
$01BF	$29CE			GOTO	ADD32EEE
;math_double.ppas,476 :: 		
$01C0	$	JMPNRM4032:
;math_double.ppas,477 :: 		
$01C0	$3002			MOVLW	0X02
;math_double.ppas,478 :: 		
$01C1	$00FC			MOVWF	STACK_12
;math_double.ppas,480 :: 		
$01C2	$2093			CALL	_nrm4032
;math_double.ppas,482 :: 		
$01C3	$29CE			GOTO	ADD32EEE
;math_double.ppas,483 :: 		
$01C4	$	JMPNRM32:
;math_double.ppas,484 :: 		
$01C4	$3004			MOVLW	0X04
;math_double.ppas,485 :: 		
$01C5	$00FC			MOVWF	STACK_12
;math_double.ppas,487 :: 		
$01C6	$20EF			CALL	_nrm3232
;math_double.ppas,489 :: 		
$01C7	$29CE			GOTO	ADD32EEE
;math_double.ppas,490 :: 		
$01C8	$	JMPSETFOV32:
;math_double.ppas,491 :: 		
$01C8	$3008			MOVLW	0X08
;math_double.ppas,492 :: 		
$01C9	$00FC			MOVWF	STACK_12
;math_double.ppas,494 :: 		
$01CA	$2085			CALL	_setfov32
;math_double.ppas,496 :: 		
$01CB	$29CE			GOTO	ADD32EEE
;math_double.ppas,497 :: 		
$01CC	$	JMPEEE:
;math_double.ppas,498 :: 		
$01CC	$3000			MOVLW	0X00
;math_double.ppas,499 :: 		
$01CD	$00FC			MOVWF	STACK_12
;math_double.ppas,500 :: 		
$01CE	$	ADD32EEE:
;math_double.ppas,501 :: 		
$01CE	$0000			NOP
;math_double.ppas,502 :: 		
$01CF	$	math_double_L_7:
;math_double.ppas,503 :: 		
$01CF	$0008			RETURN
$0004	$	_interrupt:
$0004	$00FF			MOVWF	STACK_15
$0005	$0E03			SWAPF	STATUS, 0
$0006	$0183			CLRF	STATUS
$0007	$1683			BSF	STATUS, RP0
$0008	$00A7			MOVWF	?saveSTATUS
$0009	$0804			MOVF	FSR, 0
$000A	$00A6			MOVWF	?saveFSR
$000B	$080A			MOVF	PCLATH, 0
$000C	$00A8			MOVWF	?savePCLATH
$000D	$018A			CLRF	PCLATH
$000E	$087D			MOVF	STACK_13, 0
$000F	$00C4			MOVWF	STSAVED_13
$0010	$087C			MOVF	STACK_12, 0
$0011	$00C3			MOVWF	STSAVED_12
$0012	$087B			MOVF	STACK_11, 0
$0013	$00C2			MOVWF	STSAVED_11
$0014	$087A			MOVF	STACK_10, 0
$0015	$00C1			MOVWF	STSAVED_10
$0016	$0879			MOVF	STACK_9, 0
$0017	$00C0			MOVWF	STSAVED_9
$0018	$0878			MOVF	STACK_8, 0
$0019	$00BF			MOVWF	STSAVED_8
$001A	$0877			MOVF	STACK_7, 0
$001B	$00BE			MOVWF	STSAVED_7
$001C	$0876			MOVF	STACK_6, 0
$001D	$00BD			MOVWF	STSAVED_6
$001E	$0875			MOVF	STACK_5, 0
$001F	$00BC			MOVWF	STSAVED_5
$0020	$0874			MOVF	STACK_4, 0
$0021	$00BB			MOVWF	STSAVED_4
$0022	$0873			MOVF	STACK_3, 0
$0023	$00BA			MOVWF	STSAVED_3
$0024	$0872			MOVF	STACK_2, 0
$0025	$00B9			MOVWF	STSAVED_2
$0026	$0871			MOVF	STACK_1, 0
$0027	$00B8			MOVWF	STSAVED_1
$0028	$0870			MOVF	STACK_0, 0
$0029	$00B7			MOVWF	STSAVED_0
;test_ronald3.pbas,35 :: 		sub procedure interrupt
;test_ronald3.pbas,36 :: 		counter = counter+1          ' Increment value of counter on every interrupt
$002A	$3001			MOVLW	1
$002B	$00F0			MOVWF	STACK_0
$002C	$2120			CALL	_byte2double
$002D	$0821			MOVF	_counter, 0
$002E	$00F4			MOVWF	STACK_4
$002F	$0822			MOVF	_counter+1, 0
$0030	$00F5			MOVWF	STACK_4+1
$0031	$0823			MOVF	_counter+2, 0
$0032	$00F6			MOVWF	STACK_4+2
$0033	$0824			MOVF	_counter+3, 0
$0034	$00F7			MOVWF	STACK_4+3
$0035	$2130			CALL	_add_32x32_fp
$0036	$0870			MOVF	STACK_0, 0
$0037	$00A1			MOVWF	_counter
$0038	$0871			MOVF	STACK_0+1, 0
$0039	$00A2			MOVWF	_counter+1
$003A	$0872			MOVF	STACK_0+2, 0
$003B	$00A3			MOVWF	_counter+2
$003C	$0873			MOVF	STACK_0+3, 0
$003D	$00A4			MOVWF	_counter+3
;test_ronald3.pbas,37 :: 		TMR0   =  10
$003E	$300A			MOVLW	10
$003F	$0081			MOVWF	TMR0
;test_ronald3.pbas,38 :: 		INTCON = $20          ' Set T0IE, claer T0IF
$0040	$3020			MOVLW	32
$0041	$008B			MOVWF	INTCON
$0042	$	test_ronald3_L_0:
$0042	$	L_Interrupt_end:
$0042	$1683			BSF	STATUS, RP0
$0043	$0844			MOVF	STSAVED_13, 0
$0044	$00FD			MOVWF	STACK_13
$0045	$0843			MOVF	STSAVED_12, 0
$0046	$00FC			MOVWF	STACK_12
$0047	$0842			MOVF	STSAVED_11, 0
$0048	$00FB			MOVWF	STACK_11
$0049	$0841			MOVF	STSAVED_10, 0
$004A	$00FA			MOVWF	STACK_10
$004B	$0840			MOVF	STSAVED_9, 0
$004C	$00F9			MOVWF	STACK_9
$004D	$083F			MOVF	STSAVED_8, 0
$004E	$00F8			MOVWF	STACK_8
$004F	$083E			MOVF	STSAVED_7, 0
$0050	$00F7			MOVWF	STACK_7
$0051	$083D			MOVF	STSAVED_6, 0
$0052	$00F6			MOVWF	STACK_6
$0053	$083C			MOVF	STSAVED_5, 0
$0054	$00F5			MOVWF	STACK_5
$0055	$083B			MOVF	STSAVED_4, 0
$0056	$00F4			MOVWF	STACK_4
$0057	$083A			MOVF	STSAVED_3, 0
$0058	$00F3			MOVWF	STACK_3
$0059	$0839			MOVF	STSAVED_2, 0
$005A	$00F2			MOVWF	STACK_2
$005B	$0838			MOVF	STSAVED_1, 0
$005C	$00F1			MOVWF	STACK_1
$005D	$0837			MOVF	STSAVED_0, 0
$005E	$00F0			MOVWF	STACK_0
$005F	$0828			MOVF	?savePCLATH, 0
$0060	$008A			MOVWF	PCLATH
$0061	$0826			MOVF	?saveFSR, 0
$0062	$0084			MOVWF	FSR
$0063	$0E27			SWAPF	?saveSTATUS, 0
$0064	$0083			MOVWF	STATUS
$0065	$0EFF			SWAPF	STACK_15, 1
$0066	$0E7F			SWAPF	STACK_15, 0
$0067	$0009			RETFIE
$01D0	$	_mul_32x32_u:
$01D0	$1303			BCF	STATUS, RP1
$01D1	$1283			BCF	STATUS, RP0
;math.ppas,1569 :: 		
;math.ppas,1578 :: 		
$01D2	$3022			MOVLW	34
;math.ppas,1579 :: 		
$01D3	$00FC			MOVWF	STACK_12
;math.ppas,1580 :: 		
$01D4	$01F8			CLRF	STACK_8
;math.ppas,1581 :: 		
$01D5	$01F9			CLRF	STACK_9
;math.ppas,1582 :: 		
$01D6	$01FA			CLRF	STACK_10
;math.ppas,1584 :: 		
$01D7	$01FB			CLRF	STACK_11
;math.ppas,1588 :: 		
$01D8	$	_NEXT:
;math.ppas,1589 :: 		
$01D8	$03FC			DECF	STACK_12, F
;math.ppas,1590 :: 		
$01D9	$1903			BTFSC	STATUS, Z
;math.ppas,1591 :: 		
$01DA	$2A06			GOTO	_EXIT2
;math.ppas,1593 :: 		
$01DB	$1003			BCF	STATUS, C
;math.ppas,1602 :: 		
$01DC	$	_LOOP:
;math.ppas,1603 :: 		
$01DC	$0CFB			RRF	STACK_11, F
;math.ppas,1604 :: 		
$01DD	$0CFA			RRF	STACK_10, F
;math.ppas,1605 :: 		
$01DE	$0CF9			RRF	STACK_9, F
;math.ppas,1606 :: 		
$01DF	$0CF8			RRF	STACK_8, F
;math.ppas,1607 :: 		
$01E0	$0CF3			RRF	STACK_3, F
;math.ppas,1608 :: 		
$01E1	$0CF2			RRF	STACK_2, F
;math.ppas,1609 :: 		
$01E2	$0CF1			RRF	STACK_1, F
;math.ppas,1614 :: 		
$01E3	$0CF0			RRF	STACK_0, F
;math.ppas,1615 :: 		
$01E4	$1C03			BTFSS	STATUS, C
;math.ppas,1616 :: 		
$01E5	$29D8			GOTO	_NEXT
;math.ppas,1617 :: 		
$01E6	$03FC			DECF	STACK_12, F
;math.ppas,1618 :: 		
$01E7	$1903			BTFSC	STATUS, Z
;math.ppas,1625 :: 		
$01E8	$29F8			GOTO	_EXIT1
;math.ppas,1626 :: 		
$01E9	$0874			MOVF	STACK_4, W
;math.ppas,1627 :: 		
$01EA	$07F8			ADDWF	STACK_8, F
;math.ppas,1628 :: 		
$01EB	$0875			MOVF	STACK_5, W
;math.ppas,1629 :: 		
$01EC	$1803			BTFSC	STATUS, C
;math.ppas,1630 :: 		
$01ED	$0F75			INCFSZ	STACK_5, W
;math.ppas,1631 :: 		
$01EE	$07F9			ADDWF	STACK_9, F
;math.ppas,1632 :: 		
$01EF	$0876			MOVF	STACK_6, W
;math.ppas,1633 :: 		
$01F0	$1803			BTFSC	STATUS, C
;math.ppas,1634 :: 		
$01F1	$0F76			INCFSZ	STACK_6, W
;math.ppas,1635 :: 		
$01F2	$07FA			ADDWF	STACK_10, F
;math.ppas,1636 :: 		
$01F3	$0877			MOVF	STACK_7, W
;math.ppas,1637 :: 		
$01F4	$1803			BTFSC	STATUS, C
;math.ppas,1638 :: 		
$01F5	$0F77			INCFSZ	STACK_7, W
;math.ppas,1640 :: 		
$01F6	$07FB			ADDWF	STACK_11, F
;math.ppas,1642 :: 		
$01F7	$29DC			GOTO	_LOOP
;math.ppas,1647 :: 		
$01F8	$	_EXIT1:
;math.ppas,1648 :: 		
$01F8	$0874			MOVF	STACK_4, W
;math.ppas,1649 :: 		
$01F9	$07F8			ADDWF	STACK_8, F
;math.ppas,1650 :: 		
$01FA	$0875			MOVF	STACK_5, W
;math.ppas,1651 :: 		
$01FB	$1803			BTFSC	STATUS, C
;math.ppas,1652 :: 		
$01FC	$0F75			INCFSZ	STACK_5, W
;math.ppas,1653 :: 		
$01FD	$07F9			ADDWF	STACK_9, F
;math.ppas,1654 :: 		
$01FE	$0876			MOVF	STACK_6, W
;math.ppas,1655 :: 		
$01FF	$1803			BTFSC	STATUS, C
;math.ppas,1656 :: 		
$0200	$0F76			INCFSZ	STACK_6, W
;math.ppas,1657 :: 		
$0201	$07FA			ADDWF	STACK_10, F
;math.ppas,1658 :: 		
$0202	$0877			MOVF	STACK_7, W
;math.ppas,1659 :: 		
$0203	$1803			BTFSC	STATUS, C
;math.ppas,1660 :: 		
$0204	$0F77			INCFSZ	STACK_7, W
;math.ppas,1663 :: 		
$0205	$07FB			ADDWF	STACK_11, F
;math.ppas,1664 :: 		
$0206	$	_EXIT2:
;math.ppas,1665 :: 		
$0206	$	math_L_13:
;math.ppas,1666 :: 		
$0206	$0008			RETURN
$0207	$	_setiov3224:
$0207	$1303			BCF	STATUS, RP1
$0208	$1283			BCF	STATUS, RP0
;math_double.ppas,888 :: 		
;math_double.ppas,894 :: 		
$0209	$147B			BSF	STACK_11, 0
;math_double.ppas,895 :: 		
$020A	$1FFB			BTFSS	STACK_11, 7
;math_double.ppas,897 :: 		
$020B	$2A14			GOTO	SETIOV3224EEE
;math_double.ppas,898 :: 		
$020C	$01F2			CLRF	STACK_2
;math_double.ppas,899 :: 		
$020D	$1FFA			BTFSS	STACK_10, 7
;math_double.ppas,900 :: 		
$020E	$30FF			MOVLW	0XFF
;math_double.ppas,901 :: 		
$020F	$00F2			MOVWF	STACK_2
;math_double.ppas,902 :: 		
$0210	$00F1			MOVWF	STACK_1
;math_double.ppas,903 :: 		
$0211	$00F0			MOVWF	STACK_0
;math_double.ppas,904 :: 		
$0212	$0DFA			RLF	STACK_10, F
;math_double.ppas,905 :: 		
$0213	$0CF2			RRF	STACK_2, F
;math_double.ppas,906 :: 		
$0214	$	SETIOV3224EEE:
;math_double.ppas,907 :: 		
$0214	$30FF			MOVLW	0XFF
;math_double.ppas,908 :: 		
$0215	$	math_double_L_11:
;math_double.ppas,909 :: 		
$0215	$0008			RETURN
$0216	$	_mul_32x32_s:
$0216	$1303			BCF	STATUS, RP1
$0217	$1283			BCF	STATUS, RP0
;math.ppas,1674 :: 		
;math.ppas,1680 :: 		
$0218	$01FD			CLRF	STACK_13
;math.ppas,1683 :: 		
$0219	$	_IF_FIRST:
;math.ppas,1684 :: 		
$0219	$1FF3			BTFSS	STACK_3, 7
;math.ppas,1686 :: 		
$021A	$2A28			GOTO	_IF_SECOND
;math.ppas,1691 :: 		
$021B	$	_INVERCE_FIRST:
;math.ppas,1692 :: 		
$021B	$09F0			COMF	STACK_0, F
;math.ppas,1693 :: 		
$021C	$09F1			COMF	STACK_1, F
;math.ppas,1694 :: 		
$021D	$09F2			COMF	STACK_2, F
;math.ppas,1701 :: 		
$021E	$09F3			COMF	STACK_3, F
;math.ppas,1702 :: 		
$021F	$0AF0			INCF	STACK_0, F
;math.ppas,1703 :: 		
$0220	$1903			BTFSC	STATUS, Z
;math.ppas,1704 :: 		
$0221	$0AF1			INCF	STACK_1, F
;math.ppas,1705 :: 		
$0222	$1903			BTFSC	STATUS, Z
;math.ppas,1706 :: 		
$0223	$0AF2			INCF	STACK_2, F
;math.ppas,1707 :: 		
$0224	$1903			BTFSC	STATUS, Z
;math.ppas,1708 :: 		
$0225	$0AF3			INCF	STACK_3, F
;math.ppas,1709 :: 		
$0226	$3081			MOVLW	129
;math.ppas,1711 :: 		
$0227	$07FD			ADDWF	STACK_13, F
;math.ppas,1714 :: 		
$0228	$	_IF_SECOND:
;math.ppas,1715 :: 		
$0228	$1FF7			BTFSS	STACK_7, 7
;math.ppas,1717 :: 		
$0229	$2A36			GOTO	_MULT
;math.ppas,1722 :: 		
$022A	$	_INBERSE_SECOND:
;math.ppas,1723 :: 		
$022A	$09F4			COMF	STACK_4, F
;math.ppas,1724 :: 		
$022B	$09F5			COMF	STACK_5, F
;math.ppas,1725 :: 		
$022C	$09F6			COMF	STACK_6, F
;math.ppas,1732 :: 		
$022D	$09F7			COMF	STACK_7, F
;math.ppas,1733 :: 		
$022E	$0AF4			INCF	STACK_4, F
;math.ppas,1734 :: 		
$022F	$1903			BTFSC	STATUS, Z
;math.ppas,1735 :: 		
$0230	$0AF5			INCF	STACK_5, F
;math.ppas,1736 :: 		
$0231	$1903			BTFSC	STATUS, Z
;math.ppas,1737 :: 		
$0232	$0AF6			INCF	STACK_6, F
;math.ppas,1738 :: 		
$0233	$1903			BTFSC	STATUS, Z
;math.ppas,1739 :: 		
$0234	$0AF7			INCF	STACK_7, F
;math.ppas,1741 :: 		
$0235	$0AFD			INCF	STACK_13, F
;math.ppas,1742 :: 		
$0236	$	_MULT:
;math.ppas,1744 :: 		
$0236	$21D0			CALL	_mul_32x32_u
;math.ppas,1748 :: 		
$0237	$1C7D			BTFSS	STACK_13, 0
;math.ppas,1754 :: 		
$0238	$2A50			GOTO	_EXIT
;math.ppas,1755 :: 		
$0239	$09F0			COMF	STACK_0, F
;math.ppas,1756 :: 		
$023A	$09F1			COMF	STACK_1, F
;math.ppas,1757 :: 		
$023B	$09F2			COMF	STACK_2, F
;math.ppas,1763 :: 		
$023C	$09F3			COMF	STACK_3, F
;math.ppas,1764 :: 		
$023D	$09F8			COMF	STACK_8, F
;math.ppas,1765 :: 		
$023E	$09F9			COMF	STACK_9, F
;math.ppas,1766 :: 		
$023F	$09FA			COMF	STACK_10, F
;math.ppas,1776 :: 		
$0240	$09FB			COMF	STACK_11, F
;math.ppas,1777 :: 		
$0241	$0AF0			INCF	STACK_0, F
;math.ppas,1778 :: 		
$0242	$1903			BTFSC	STATUS, Z
;math.ppas,1779 :: 		
$0243	$0AF1			INCF	STACK_1, F
;math.ppas,1780 :: 		
$0244	$1903			BTFSC	STATUS, Z
;math.ppas,1781 :: 		
$0245	$0AF2			INCF	STACK_2, F
;math.ppas,1782 :: 		
$0246	$1903			BTFSC	STATUS, Z
;math.ppas,1783 :: 		
$0247	$0AF3			INCF	STACK_3, F
;math.ppas,1784 :: 		
$0248	$1903			BTFSC	STATUS, Z
;math.ppas,1785 :: 		
$0249	$0AF8			INCF	STACK_8, F
;math.ppas,1786 :: 		
$024A	$1903			BTFSC	STATUS, Z
;math.ppas,1787 :: 		
$024B	$0AF9			INCF	STACK_9, F
;math.ppas,1788 :: 		
$024C	$1903			BTFSC	STATUS, Z
;math.ppas,1789 :: 		
$024D	$0AFA			INCF	STACK_10, F
;math.ppas,1790 :: 		
$024E	$1903			BTFSC	STATUS, Z
;math.ppas,1791 :: 		
$024F	$0AFB			INCF	STACK_11, F
;math.ppas,1792 :: 		
$0250	$	_EXIT:
;math.ppas,1793 :: 		
$0250	$	math_L_14:
;math.ppas,1794 :: 		
$0250	$0008			RETURN
$0251	$	_compare_double:
$0251	$1303			BCF	STATUS, RP1
$0252	$1283			BCF	STATUS, RP0
;math_double.ppas,1909 :: 		
;math_double.ppas,1919 :: 		
$0253	$01FA			CLRF	STACK_10
;math_double.ppas,1920 :: 		
$0254	$0873			MOVF	STACK_3, W
;math_double.ppas,1921 :: 		
$0255	$1D03			BTFSS	STATUS, Z
;math_double.ppas,1922 :: 		
$0256	$147A			BSF	STACK_10, 0
;math_double.ppas,1923 :: 		
$0257	$0877			MOVF	STACK_7, W
;math_double.ppas,1924 :: 		
$0258	$1D03			BTFSS	STATUS, Z
;math_double.ppas,1926 :: 		
$0259	$14FA			BSF	STACK_10, 1
;math_double.ppas,1927 :: 		
$025A	$087A			MOVF	STACK_10, W
;math_double.ppas,1928 :: 		
$025B	$1903			BTFSC	STATUS, Z
;math_double.ppas,1929 :: 		
$025C	$2A9D			GOTO	COMPARE_EQU
;math_double.ppas,1930 :: 		
$025D	$3A03			XORLW	0X03
;math_double.ppas,1931 :: 		
$025E	$1903			BTFSC	STATUS, Z
;math_double.ppas,1933 :: 		
$025F	$2A68			GOTO	COMPARE_NOTZERO
;math_double.ppas,1934 :: 		
$0260	$187A			BTFSC	STACK_10, 0
;math_double.ppas,1935 :: 		
$0261	$2A65			GOTO	COMPARE_XNOTZERO
;math_double.ppas,1936 :: 		
$0262	$	COMPARE_YNOTZERO:
;math_double.ppas,1937 :: 		
$0262	$1FF6			BTFSS	STACK_6, 7
;math_double.ppas,1938 :: 		
$0263	$2A9B			GOTO	COMPARE_LT
;math_double.ppas,1939 :: 		
$0264	$2A99			GOTO	COMPARE_GT
;math_double.ppas,1940 :: 		
$0265	$	COMPARE_XNOTZERO:
;math_double.ppas,1941 :: 		
$0265	$1FF2			BTFSS	STACK_2, 7
;math_double.ppas,1942 :: 		
$0266	$2A99			GOTO	COMPARE_GT
;math_double.ppas,1944 :: 		
$0267	$2A9B			GOTO	COMPARE_LT
;math_double.ppas,1945 :: 		
$0268	$	COMPARE_NOTZERO:
;math_double.ppas,1946 :: 		
$0268	$0872			MOVF	STACK_2, W
;math_double.ppas,1947 :: 		
$0269	$3980			ANDLW	0X80
;math_double.ppas,1948 :: 		
$026A	$00FA			MOVWF	STACK_10
;math_double.ppas,1950 :: 		
$026B	$13F2			BCF	STACK_2, 7
;math_double.ppas,1951 :: 		
$026C	$0876			MOVF	STACK_6, W
;math_double.ppas,1952 :: 		
$026D	$3980			ANDLW	0X80
;math_double.ppas,1954 :: 		
$026E	$13F6			BCF	STACK_6, 7
;math_double.ppas,1955 :: 		
$026F	$067A			XORWF	STACK_10, W
;math_double.ppas,1956 :: 		
$0270	$1903			BTFSC	STATUS, Z
;math_double.ppas,1958 :: 		
$0271	$2A76			GOTO	COMPARE_TESTALL
;math_double.ppas,1959 :: 		
$0272	$087A			MOVF	STACK_10, W
;math_double.ppas,1960 :: 		
$0273	$1903			BTFSC	STATUS, Z
;math_double.ppas,1961 :: 		
$0274	$2A99			GOTO	COMPARE_GT
;math_double.ppas,1963 :: 		
$0275	$2A9B			GOTO	COMPARE_LT
;math_double.ppas,1964 :: 		
$0276	$	COMPARE_TESTALL:
;math_double.ppas,1965 :: 		
$0276	$0877			MOVF	STACK_7, W
;math_double.ppas,1966 :: 		
$0277	$0273			SUBWF	STACK_3, W
;math_double.ppas,1967 :: 		
$0278	$1903			BTFSC	STATUS, Z
;math_double.ppas,1968 :: 		
$0279	$2A7D			GOTO	COMPARE_C1
;math_double.ppas,1969 :: 		
$027A	$1C03			BTFSS	STATUS, C
;math_double.ppas,1970 :: 		
$027B	$2A91			GOTO	GT_FALSE
;math_double.ppas,1971 :: 		
$027C	$2A95			GOTO	GT_TRUE
;math_double.ppas,1972 :: 		
$027D	$	COMPARE_C1:
;math_double.ppas,1973 :: 		
$027D	$0876			MOVF	STACK_6, W
;math_double.ppas,1974 :: 		
$027E	$0272			SUBWF	STACK_2, W
;math_double.ppas,1975 :: 		
$027F	$1903			BTFSC	STATUS, Z
;math_double.ppas,1976 :: 		
$0280	$2A84			GOTO	COMPARE_C2
;math_double.ppas,1977 :: 		
$0281	$1C03			BTFSS	STATUS, C
;math_double.ppas,1978 :: 		
$0282	$2A91			GOTO	GT_FALSE
;math_double.ppas,1979 :: 		
$0283	$2A95			GOTO	GT_TRUE
;math_double.ppas,1980 :: 		
$0284	$	COMPARE_C2:
;math_double.ppas,1981 :: 		
$0284	$0875			MOVF	STACK_5, W
;math_double.ppas,1982 :: 		
$0285	$0271			SUBWF	STACK_1, W
;math_double.ppas,1983 :: 		
$0286	$1903			BTFSC	STATUS, Z
;math_double.ppas,1984 :: 		
$0287	$2A8B			GOTO	COMPARE_C3
;math_double.ppas,1985 :: 		
$0288	$1C03			BTFSS	STATUS, C
;math_double.ppas,1986 :: 		
$0289	$2A91			GOTO	GT_FALSE
;math_double.ppas,1987 :: 		
$028A	$2A95			GOTO	GT_TRUE
;math_double.ppas,1988 :: 		
$028B	$	COMPARE_C3:
;math_double.ppas,1989 :: 		
$028B	$0874			MOVF	STACK_4, W
;math_double.ppas,1990 :: 		
$028C	$0270			SUBWF	STACK_0, W
;math_double.ppas,1991 :: 		
$028D	$1903			BTFSC	STATUS, Z
;math_double.ppas,1992 :: 		
$028E	$2A9D			GOTO	COMPARE_EQU
;math_double.ppas,1993 :: 		
$028F	$1803			BTFSC	STATUS, C
;math_double.ppas,1995 :: 		
$0290	$2A95			GOTO	GT_TRUE
;math_double.ppas,1996 :: 		
$0291	$	GT_FALSE:
;math_double.ppas,1997 :: 		
$0291	$08FA			MOVF	STACK_10, F
;math_double.ppas,1998 :: 		
$0292	$1903			BTFSC	STATUS, Z
;math_double.ppas,1999 :: 		
$0293	$2A9B			GOTO	COMPARE_LT
;math_double.ppas,2000 :: 		
$0294	$2A99			GOTO	COMPARE_GT
;math_double.ppas,2001 :: 		
$0295	$	GT_TRUE:
;math_double.ppas,2002 :: 		
$0295	$08FA			MOVF	STACK_10, F
;math_double.ppas,2003 :: 		
$0296	$1903			BTFSC	STATUS, Z
;math_double.ppas,2004 :: 		
$0297	$2A99			GOTO	COMPARE_GT
;math_double.ppas,2006 :: 		
$0298	$2A9B			GOTO	COMPARE_LT
;math_double.ppas,2009 :: 		
$0299	$	COMPARE_GT:
;math_double.ppas,2010 :: 		
$0299	$1403			BSF	STATUS, C
;math_double.ppas,2011 :: 		
$029A	$0008			RETURN
;math_double.ppas,2014 :: 		
$029B	$	COMPARE_LT:
;math_double.ppas,2015 :: 		
$029B	$1003			BCF	STATUS, C
;math_double.ppas,2016 :: 		
$029C	$0008			RETURN
;math_double.ppas,2019 :: 		
$029D	$	COMPARE_EQU:
;math_double.ppas,2020 :: 		
$029D	$1403			BSF	STATUS, C
;math_double.ppas,2021 :: 		
$029E	$1503			BSF	STATUS, Z
;math_double.ppas,2022 :: 		
$029F	$0008			RETURN
;math_double.ppas,2023 :: 		
$02A0	$	math_double_L_23:
;math_double.ppas,2024 :: 		
$02A0	$0008			RETURN
$02A1	$	_double2longint:
$02A1	$1303			BCF	STATUS, RP1
$02A2	$1283			BCF	STATUS, RP0
;math_double.ppas,1095 :: 		
;math_double.ppas,1103 :: 		
$02A3	$	INT3232:
;math_double.ppas,1104 :: 		
$02A3	$01FB			CLRF	STACK_11
;math_double.ppas,1105 :: 		
$02A4	$01FC			CLRF	STACK_12
;math_double.ppas,1106 :: 		
$02A5	$01F8			CLRF	STACK_8
;math_double.ppas,1107 :: 		
$02A6	$0873			MOVF	STACK_3, W
;math_double.ppas,1108 :: 		
$02A7	$1903			BTFSC	STATUS, Z
;math_double.ppas,1109 :: 		
$02A8	$2B19			GOTO	INT3232EOK
;math_double.ppas,1110 :: 		
$02A9	$0872			MOVF	STACK_2, W
;math_double.ppas,1111 :: 		
$02AA	$00FA			MOVWF	STACK_10
;math_double.ppas,1112 :: 		
$02AB	$17F2			BSF	STACK_2, 7
;math_double.ppas,1113 :: 		
$02AC	$309E			MOVLW	158
;math_double.ppas,1114 :: 		
$02AD	$02F3			SUBWF	STACK_3, F
;math_double.ppas,1115 :: 		
$02AE	$1FF3			BTFSS	STACK_3, 7
;math_double.ppas,1116 :: 		
$02AF	$2B09			GOTO	SETIOV32
;math_double.ppas,1117 :: 		
$02B0	$09F3			COMF	STACK_3, F
;math_double.ppas,1119 :: 		
$02B1	$0AF3			INCF	STACK_3, F
;math_double.ppas,1120 :: 		
$02B2	$3008			MOVLW	8
;math_double.ppas,1121 :: 		
$02B3	$0273			SUBWF	STACK_3, W
;math_double.ppas,1122 :: 		
$02B4	$1C03			BTFSS	STATUS, C
;math_double.ppas,1123 :: 		
$02B5	$2ADE			GOTO	TSHIFT3232
;math_double.ppas,1124 :: 		
$02B6	$00F3			MOVWF	STACK_3
;math_double.ppas,1125 :: 		
$02B7	$0DF8			RLF	STACK_8, F
;math_double.ppas,1126 :: 		
$02B8	$0870			MOVF	STACK_0, W
;math_double.ppas,1127 :: 		
$02B9	$00F8			MOVWF	STACK_8
;math_double.ppas,1128 :: 		
$02BA	$0871			MOVF	STACK_1, W
;math_double.ppas,1129 :: 		
$02BB	$00F0			MOVWF	STACK_0
;math_double.ppas,1130 :: 		
$02BC	$0872			MOVF	STACK_2, W
;math_double.ppas,1131 :: 		
$02BD	$00F1			MOVWF	STACK_1
;math_double.ppas,1133 :: 		
$02BE	$01F2			CLRF	STACK_2
;math_double.ppas,1134 :: 		
$02BF	$3008			MOVLW	8
;math_double.ppas,1135 :: 		
$02C0	$0273			SUBWF	STACK_3, W
;math_double.ppas,1136 :: 		
$02C1	$1C03			BTFSS	STATUS, C
;math_double.ppas,1137 :: 		
$02C2	$2ADE			GOTO	TSHIFT3232
;math_double.ppas,1138 :: 		
$02C3	$00F3			MOVWF	STACK_3
;math_double.ppas,1139 :: 		
$02C4	$0DF8			RLF	STACK_8, F
;math_double.ppas,1140 :: 		
$02C5	$0870			MOVF	STACK_0, W
;math_double.ppas,1141 :: 		
$02C6	$00F8			MOVWF	STACK_8
;math_double.ppas,1142 :: 		
$02C7	$0871			MOVF	STACK_1, W
;math_double.ppas,1143 :: 		
$02C8	$00F0			MOVWF	STACK_0
;math_double.ppas,1145 :: 		
$02C9	$01F1			CLRF	STACK_1
;math_double.ppas,1146 :: 		
$02CA	$3008			MOVLW	8
;math_double.ppas,1147 :: 		
$02CB	$0273			SUBWF	STACK_3, W
;math_double.ppas,1148 :: 		
$02CC	$1C03			BTFSS	STATUS, C
;math_double.ppas,1149 :: 		
$02CD	$2ADE			GOTO	TSHIFT3232
;math_double.ppas,1150 :: 		
$02CE	$00F3			MOVWF	STACK_3
;math_double.ppas,1151 :: 		
$02CF	$0DF8			RLF	STACK_8, F
;math_double.ppas,1152 :: 		
$02D0	$0870			MOVF	STACK_0, W
;math_double.ppas,1153 :: 		
$02D1	$00F8			MOVWF	STACK_8
;math_double.ppas,1155 :: 		
$02D2	$01F0			CLRF	STACK_0
;math_double.ppas,1156 :: 		
$02D3	$3008			MOVLW	8
;math_double.ppas,1157 :: 		
$02D4	$0273			SUBWF	STACK_3, W
;math_double.ppas,1158 :: 		
$02D5	$1C03			BTFSS	STATUS, C
;math_double.ppas,1159 :: 		
$02D6	$2ADE			GOTO	TSHIFT3232
;math_double.ppas,1160 :: 		
$02D7	$00F3			MOVWF	STACK_3
;math_double.ppas,1161 :: 		
$02D8	$0DF8			RLF	STACK_8, F
;math_double.ppas,1162 :: 		
$02D9	$01F8			CLRF	STACK_8
;math_double.ppas,1163 :: 		
$02DA	$0873			MOVF	STACK_3, W
;math_double.ppas,1164 :: 		
$02DB	$1D03			BTFSS	STATUS, Z
;math_double.ppas,1165 :: 		
$02DC	$1003			BCF	STATUS, C
;math_double.ppas,1166 :: 		
$02DD	$2AE8			GOTO	SHIFT3232OK
;math_double.ppas,1167 :: 		
$02DE	$	TSHIFT3232:
;math_double.ppas,1168 :: 		
$02DE	$0873			MOVF	STACK_3, W
;math_double.ppas,1169 :: 		
$02DF	$1903			BTFSC	STATUS, Z
;math_double.ppas,1170 :: 		
$02E0	$2AE8			GOTO	SHIFT3232OK
;math_double.ppas,1171 :: 		
$02E1	$	SHIFT3232:
;math_double.ppas,1172 :: 		
$02E1	$1003			BCF	STATUS, C
;math_double.ppas,1173 :: 		
$02E2	$0CF2			RRF	STACK_2, F
;math_double.ppas,1174 :: 		
$02E3	$0CF1			RRF	STACK_1, F
;math_double.ppas,1175 :: 		
$02E4	$0CF0			RRF	STACK_0, F
;math_double.ppas,1176 :: 		
$02E5	$0CF8			RRF	STACK_8, F
;math_double.ppas,1177 :: 		
$02E6	$0BF3			DECFSZ	STACK_3, F
;math_double.ppas,1178 :: 		
$02E7	$2AE1			GOTO	SHIFT3232
;math_double.ppas,1179 :: 		
$02E8	$	SHIFT3232OK:
;math_double.ppas,1180 :: 		
$02E8	$1B7B			BTFSC	STACK_11, 6
;math_double.ppas,1181 :: 		
$02E9	$1C78			BTFSS	STACK_8, 0
;math_double.ppas,1182 :: 		
$02EA	$2AF6			GOTO	INT3232OK
;math_double.ppas,1183 :: 		
$02EB	$1C03			BTFSS	STATUS, C
;math_double.ppas,1184 :: 		
$02EC	$2AF6			GOTO	INT3232OK
;math_double.ppas,1185 :: 		
$02ED	$0AF8			INCF	STACK_8, F
;math_double.ppas,1186 :: 		
$02EE	$1903			BTFSC	STATUS, Z
;math_double.ppas,1187 :: 		
$02EF	$0AF0			INCF	STACK_0, F
;math_double.ppas,1188 :: 		
$02F0	$1903			BTFSC	STATUS, Z
;math_double.ppas,1189 :: 		
$02F1	$0AF1			INCF	STACK_1, F
;math_double.ppas,1190 :: 		
$02F2	$1903			BTFSC	STATUS, Z
;math_double.ppas,1191 :: 		
$02F3	$0AF2			INCF	STACK_2, F
;math_double.ppas,1192 :: 		
$02F4	$1BF2			BTFSC	STACK_2, 7
;math_double.ppas,1193 :: 		
$02F5	$2B16			GOTO	JPISETIOV3224
;math_double.ppas,1194 :: 		
$02F6	$	INT3232OK:
;math_double.ppas,1195 :: 		
$02F6	$1FFA			BTFSS	STACK_10, 7
;math_double.ppas,1197 :: 		
$02F7	$2B19			GOTO	INT3232EOK
;math_double.ppas,1198 :: 		
$02F8	$09F2			COMF	STACK_2, F
;math_double.ppas,1199 :: 		
$02F9	$09F1			COMF	STACK_1, F
;math_double.ppas,1200 :: 		
$02FA	$09F0			COMF	STACK_0, F
;math_double.ppas,1201 :: 		
$02FB	$09F8			COMF	STACK_8, F
;math_double.ppas,1202 :: 		
$02FC	$0AF8			INCF	STACK_8, F
;math_double.ppas,1203 :: 		
$02FD	$1903			BTFSC	STATUS, Z
;math_double.ppas,1204 :: 		
$02FE	$0AF0			INCF	STACK_0, F
;math_double.ppas,1205 :: 		
$02FF	$1903			BTFSC	STATUS, Z
;math_double.ppas,1206 :: 		
$0300	$0AF1			INCF	STACK_1, F
;math_double.ppas,1207 :: 		
$0301	$1903			BTFSC	STATUS, Z
;math_double.ppas,1208 :: 		
$0302	$0AF2			INCF	STACK_2, F
;math_double.ppas,1209 :: 		
$0303	$2B19			GOTO	INT3232EOK
;math_double.ppas,1210 :: 		
$0304	$	IRES032:
;math_double.ppas,1211 :: 		
$0304	$01F2			CLRF	STACK_2
;math_double.ppas,1212 :: 		
$0305	$01F1			CLRF	STACK_1
;math_double.ppas,1213 :: 		
$0306	$01F0			CLRF	STACK_0
;math_double.ppas,1214 :: 		
$0307	$01F8			CLRF	STACK_8
;math_double.ppas,1215 :: 		
$0308	$2B19			GOTO	INT3232EOK
;math_double.ppas,1216 :: 		
$0309	$	SETIOV32:
;math_double.ppas,1217 :: 		
$0309	$147B			BSF	STACK_11, 0
;math_double.ppas,1218 :: 		
$030A	$1FFB			BTFSS	STACK_11, 7
;math_double.ppas,1220 :: 		
$030B	$2B1C			GOTO	INT3232EER
;math_double.ppas,1221 :: 		
$030C	$01F2			CLRF	STACK_2
;math_double.ppas,1222 :: 		
$030D	$1FFA			BTFSS	STACK_10, 7
;math_double.ppas,1223 :: 		
$030E	$2B1C			GOTO	INT3232EER
;math_double.ppas,1224 :: 		
$030F	$00F2			MOVWF	STACK_2
;math_double.ppas,1225 :: 		
$0310	$00F1			MOVWF	STACK_1
;math_double.ppas,1226 :: 		
$0311	$00F0			MOVWF	STACK_0
;math_double.ppas,1227 :: 		
$0312	$00F8			MOVWF	STACK_8
;math_double.ppas,1228 :: 		
$0313	$0DFA			RLF	STACK_10, F
;math_double.ppas,1229 :: 		
$0314	$0CF2			RRF	STACK_2, F
;math_double.ppas,1230 :: 		
$0315	$2B1C			GOTO	INT3232EER
;math_double.ppas,1231 :: 		
$0316	$	JPISETIOV3224:
;math_double.ppas,1232 :: 		
$0316	$3001			MOVLW	0X01
;math_double.ppas,1233 :: 		
$0317	$00FC			MOVWF	STACK_12
;math_double.ppas,1234 :: 		
$0318	$2B1E			GOTO	INT3232EEE
;math_double.ppas,1235 :: 		
$0319	$	INT3232EOK:
;math_double.ppas,1236 :: 		
$0319	$3000			MOVLW	0X00
;math_double.ppas,1237 :: 		
$031A	$00FC			MOVWF	STACK_12
;math_double.ppas,1238 :: 		
$031B	$2B1E			GOTO	INT3232EEE
;math_double.ppas,1239 :: 		
$031C	$	INT3232EER:
;math_double.ppas,1240 :: 		
$031C	$30FF			MOVLW	0XFF
;math_double.ppas,1241 :: 		
$031D	$00FC			MOVWF	STACK_12
;math_double.ppas,1245 :: 		
$031E	$	INT3232EEE:
;math_double.ppas,1247 :: 		
$031E	$08FC			MOVF	STACK_12, F
;math_double.ppas,1248 :: 		
$031F	$1903			BTFSC	STATUS, Z
;math_double.ppas,1249 :: 		
$0320	$2B22			GOTO	L_DOUBLE2LONGINT_0
;math_double.ppas,1251 :: 		
$0321	$2207			CALL	_setiov3224
;math_double.ppas,1253 :: 		
$0322	$	L_DOUBLE2LONGINT_0:
;math_double.ppas,1254 :: 		
$0322	$0872			MOVF	STACK_2, W
;math_double.ppas,1255 :: 		
$0323	$00F3			MOVWF	STACK_3
;math_double.ppas,1256 :: 		
$0324	$0871			MOVF	STACK_1, W
;math_double.ppas,1257 :: 		
$0325	$00F2			MOVWF	STACK_2
;math_double.ppas,1258 :: 		
$0326	$0870			MOVF	STACK_0, W
;math_double.ppas,1259 :: 		
$0327	$00F1			MOVWF	STACK_1
;math_double.ppas,1260 :: 		
$0328	$0878			MOVF	STACK_8, W
;math_double.ppas,1261 :: 		
$0329	$00F0			MOVWF	STACK_0
;math_double.ppas,1262 :: 		
$032A	$	math_double_L_13:
;math_double.ppas,1263 :: 		
$032A	$0008			RETURN
$032B	$	_longint2double:
$032B	$1303			BCF	STATUS, RP1
$032C	$1283			BCF	STATUS, RP0
;math_double.ppas,1768 :: 		
;math_double.ppas,1775 :: 		
$032D	$0870			MOVF	STACK_0, W
;math_double.ppas,1776 :: 		
$032E	$00F8			MOVWF	STACK_8
;math_double.ppas,1777 :: 		
$032F	$0871			MOVF	STACK_1, W
;math_double.ppas,1778 :: 		
$0330	$00F0			MOVWF	STACK_0
;math_double.ppas,1779 :: 		
$0331	$0872			MOVF	STACK_2, W
;math_double.ppas,1780 :: 		
$0332	$00F1			MOVWF	STACK_1
;math_double.ppas,1781 :: 		
$0333	$0873			MOVF	STACK_3, W
;math_double.ppas,1782 :: 		
$0334	$00F2			MOVWF	STACK_2
;math_double.ppas,1784 :: 		
$0335	$01F3			CLRF	STACK_3
;math_double.ppas,1785 :: 		
$0336	$	FLO3232:
;math_double.ppas,1786 :: 		
$0336	$01FB			CLRF	STACK_11
;math_double.ppas,1788 :: 		
$0337	$01FC			CLRF	STACK_12
;math_double.ppas,1789 :: 		
$0338	$309E			MOVLW	158
;math_double.ppas,1790 :: 		
$0339	$00F3			MOVWF	STACK_3
;math_double.ppas,1791 :: 		
$033A	$01FA			CLRF	STACK_10
;math_double.ppas,1792 :: 		
$033B	$1FF2			BTFSS	STACK_2, 7
;math_double.ppas,1793 :: 		
$033C	$2B49			GOTO	FLO3232EEE
;math_double.ppas,1794 :: 		
$033D	$09F8			COMF	STACK_8, F
;math_double.ppas,1795 :: 		
$033E	$09F0			COMF	STACK_0, F
;math_double.ppas,1796 :: 		
$033F	$09F1			COMF	STACK_1, F
;math_double.ppas,1797 :: 		
$0340	$09F2			COMF	STACK_2, F
;math_double.ppas,1798 :: 		
$0341	$0AF8			INCF	STACK_8, F
;math_double.ppas,1799 :: 		
$0342	$1903			BTFSC	STATUS, Z
;math_double.ppas,1800 :: 		
$0343	$0AF0			INCF	STACK_0, F
;math_double.ppas,1801 :: 		
$0344	$1903			BTFSC	STATUS, Z
;math_double.ppas,1802 :: 		
$0345	$0AF1			INCF	STACK_1, F
;math_double.ppas,1803 :: 		
$0346	$1903			BTFSC	STATUS, Z
;math_double.ppas,1804 :: 		
$0347	$0AF2			INCF	STACK_2, F
;math_double.ppas,1805 :: 		
$0348	$17FA			BSF	STACK_10, 7
;math_double.ppas,1806 :: 		
$0349	$	FLO3232EEE:
;math_double.ppas,1807 :: 		
$0349	$3002			MOVLW	0X02
;math_double.ppas,1808 :: 		
$034A	$00FC			MOVWF	STACK_12
;math_double.ppas,1810 :: 		
$034B	$2093			CALL	_nrm4032
$034C	$	math_double_L_20:
;math_double.ppas,1811 :: 		
$034C	$0008			RETURN
$034D	$	_setfdz32:
$034D	$1303			BCF	STATUS, RP1
$034E	$1283			BCF	STATUS, RP0
;math_double.ppas,34 :: 		
;math_double.ppas,38 :: 		
$034F	$15FB			BSF	STACK_11, 3
;math_double.ppas,39 :: 		
$0350	$30FF			MOVLW	0XFF
;math_double.ppas,40 :: 		
$0351	$	math_double_L_1:
;math_double.ppas,41 :: 		
$0351	$0008			RETURN
$0352	$	_vdelay_ms:
;delays.pbas,59 :: 		dim NumberOfCyc as LongInt
;delays.pbas,60 :: 		Time_ms = Time_ms-10
$0352	$300A			MOVLW	10
$0353	$1303			BCF	STATUS, RP1
$0354	$1683			BSF	STATUS, RP0
$0355	$022D			SUBWF	FARG_Vdelay_ms, 0
$0356	$00F0			MOVWF	STACK_0
$0357	$3000			MOVLW	0
$0358	$1C03			BTFSS	STATUS, C
$0359	$3F01			ADDLW	1
$035A	$022E			SUBWF	FARG_Vdelay_ms+1, 0
$035B	$00F1			MOVWF	STACK_0+1
$035C	$0870			MOVF	STACK_0, 0
$035D	$00AD			MOVWF	FARG_Vdelay_ms
$035E	$0871			MOVF	STACK_0+1, 0
$035F	$00AE			MOVWF	FARG_Vdelay_ms+1
;delays.pbas,61 :: 		NumberOfCyc = Clock_MHz * 250 ' this will be done by compiler, no asm will be genereated except that for assignment
$0360	$30D0			MOVLW	208
$0361	$00AF			MOVWF	_vdelay_ms_local_numberofcyc
$0362	$3007			MOVLW	7
$0363	$00B0			MOVWF	_vdelay_ms_local_numberofcyc+1
$0364	$01B1			CLRF	_vdelay_ms_local_numberofcyc+2
$0365	$01B2			CLRF	_vdelay_ms_local_numberofcyc+3
;delays.pbas,62 :: 		NumberOfCyc =  NumberOfCyc * Time_ms
$0366	$3000			MOVLW	0
$0367	$00F2			MOVWF	STACK_0+2
$0368	$00F3			MOVWF	STACK_0+3
$0369	$30D0			MOVLW	208
$036A	$00F4			MOVWF	STACK_4
$036B	$3007			MOVLW	7
$036C	$00F5			MOVWF	STACK_4+1
$036D	$3000			MOVLW	0
$036E	$00F6			MOVWF	STACK_4+2
$036F	$3000			MOVLW	0
$0370	$00F7			MOVWF	STACK_4+3
$0371	$2216			CALL	_mul_32x32_s
$0372	$0870			MOVF	STACK_0, 0
$0373	$1683			BSF	STATUS, RP0
$0374	$00AF			MOVWF	_vdelay_ms_local_numberofcyc
$0375	$0871			MOVF	STACK_0+1, 0
$0376	$00B0			MOVWF	_vdelay_ms_local_numberofcyc+1
$0377	$0872			MOVF	STACK_0+2, 0
$0378	$00B1			MOVWF	_vdelay_ms_local_numberofcyc+2
$0379	$0873			MOVF	STACK_0+3, 0
$037A	$00B2			MOVWF	_vdelay_ms_local_numberofcyc+3
;delays.pbas,63 :: 		NumberOfCyc =  NumberOfCyc >> 5 ' Dec and While below take around 32 instructions
$037B	$3005			MOVLW	5
$037C	$00F4			MOVWF	STACK_4
$037D	$0870			MOVF	STACK_0, 0
$037E	$00AF			MOVWF	_vdelay_ms_local_numberofcyc
$037F	$0871			MOVF	STACK_0+1, 0
$0380	$00B0			MOVWF	_vdelay_ms_local_numberofcyc+1
$0381	$0872			MOVF	STACK_0+2, 0
$0382	$00B1			MOVWF	_vdelay_ms_local_numberofcyc+2
$0383	$0873			MOVF	STACK_0+3, 0
$0384	$00B2			MOVWF	_vdelay_ms_local_numberofcyc+3
$0385	$0874			MOVF	STACK_4, 0
$0386	$	L_Vdelay_ms_0:
$0386	$1903			BTFSC	STATUS, Z
$0387	$2B91			GOTO	L_Vdelay_ms_1
$0388	$0CB2			RRF	_vdelay_ms_local_numberofcyc+3, 1
$0389	$0CB1			RRF	_vdelay_ms_local_numberofcyc+2, 1
$038A	$0CB0			RRF	_vdelay_ms_local_numberofcyc+1, 1
$038B	$0CAF			RRF	_vdelay_ms_local_numberofcyc, 1
$038C	$13B2			BCF	_vdelay_ms_local_numberofcyc+3, 7
$038D	$1B32			BTFSC	_vdelay_ms_local_numberofcyc+3, 6
$038E	$17B2			BSF	_vdelay_ms_local_numberofcyc+3, 7
$038F	$3FFF			ADDLW	255
$0390	$2B86			GOTO	L_Vdelay_ms_0
$0391	$	L_Vdelay_ms_1:
;delays.pbas,64 :: 		while NumberOfCyc <> 0
$0391	$	delays_L_18:
$0391	$3000			MOVLW	0
$0392	$00F0			MOVWF	STACK_0
$0393	$0632			XORWF	_vdelay_ms_local_numberofcyc+3, 0
$0394	$1D03			BTFSS	STATUS, Z
$0395	$2BA0			GOTO	L_Vdelay_ms_2
$0396	$0870			MOVF	STACK_0, 0
$0397	$0631			XORWF	_vdelay_ms_local_numberofcyc+2, 0
$0398	$1D03			BTFSS	STATUS, Z
$0399	$2BA0			GOTO	L_Vdelay_ms_2
$039A	$0870			MOVF	STACK_0, 0
$039B	$0630			XORWF	_vdelay_ms_local_numberofcyc+1, 0
$039C	$1D03			BTFSS	STATUS, Z
$039D	$2BA0			GOTO	L_Vdelay_ms_2
$039E	$082F			MOVF	_vdelay_ms_local_numberofcyc, 0
$039F	$3A00			XORLW	0
$03A0	$	L_Vdelay_ms_2:
$03A0	$1903			BTFSC	STATUS, Z
$03A1	$2BAB			GOTO	delays_L_19
;delays.pbas,65 :: 		Dec(NumberOfCyc)
$03A2	$3001			MOVLW	1
$03A3	$02AF			SUBWF	_vdelay_ms_local_numberofcyc, 1
$03A4	$1C03			BTFSS	STATUS, C
$03A5	$02B0			SUBWF	_vdelay_ms_local_numberofcyc+1, 1
$03A6	$1C03			BTFSS	STATUS, C
$03A7	$02B1			SUBWF	_vdelay_ms_local_numberofcyc+2, 1
$03A8	$1C03			BTFSS	STATUS, C
$03A9	$02B2			SUBWF	_vdelay_ms_local_numberofcyc+3, 1
$03AA	$2B91			GOTO	delays_L_18
$03AB	$	delays_L_19:
;delays.pbas,66 :: 		wend
$03AB	$	delays_L_16:
$03AB	$0008			RETURN
$03AC	$	_usart_data_ready:
;usart_c67.ppas,47 :: 		
;usart_c67.ppas,50 :: 		
$03AC	$3000			MOVLW	0
$03AD	$1303			BCF	STATUS, RP1
$03AE	$1283			BCF	STATUS, RP0
$03AF	$1A8C			BTFSC	PIR1, 5
$03B0	$3001			MOVLW	1
$03B1	$00F1			MOVWF	STACK_1
$03B2	$0871			MOVF	STACK_1, 0
$03B3	$1683			BSF	STATUS, RP0
$03B4	$00AD			MOVWF	_usart_data_ready_local_result
$03B5	$	usart_c67_L_18:
$03B5	$082D			MOVF	_usart_data_ready_local_result, 0
$03B6	$00F0			MOVWF	STACK_0
;usart_c67.ppas,51 :: 		
$03B7	$0008			RETURN
$03B8	$	_usart_read:
;usart_c67.ppas,53 :: 		
;usart_c67.ppas,55 :: 		
$03B8	$1303			BCF	STATUS, RP1
$03B9	$1283			BCF	STATUS, RP0
$03BA	$081A			MOVF	RCREG, 0
$03BB	$1683			BSF	STATUS, RP0
$03BC	$00AD			MOVWF	_usart_read_local_result
;usart_c67.ppas,61 :: 		
$03BD	$3000			MOVLW	0
$03BE	$1283			BCF	STATUS, RP0
$03BF	$1898			BTFSC	RCSTA, 1
$03C0	$3001			MOVLW	1
$03C1	$00F1			MOVWF	STACK_1
$03C2	$0871			MOVF	STACK_1, 0
$03C3	$3A01			XORLW	1
$03C4	$1D03			BTFSS	STATUS, Z
$03C5	$2BC8			GOTO	usart_c67_L_21
$03C6	$	usart_c67_L_20:
;usart_c67.ppas,63 :: 		
$03C6	$1218			BCF	RCSTA, 4
$03C7	$	usart_c67_L_24:
;usart_c67.ppas,64 :: 		
$03C7	$	usart_c67_L_25:
$03C7	$1618			BSF	RCSTA, 4
$03C8	$	usart_c67_L_26:
;usart_c67.ppas,65 :: 		
$03C8	$	usart_c67_L_21:
$03C8	$	usart_c67_L_22:
$03C8	$	usart_c67_L_19:
$03C8	$1683			BSF	STATUS, RP0
$03C9	$082D			MOVF	_usart_read_local_result, 0
$03CA	$00F0			MOVWF	STACK_0
;usart_c67.ppas,66 :: 		
$03CB	$0008			RETURN
$03CC	$	_eeprom_write:
;eepromlib_e_a.ppas,20 :: 		
;eepromlib_e_a.ppas,22 :: 		
$03CC	$0000			NOP
;eepromlib_e_a.ppas,23 :: 		
$03CD	$	eepromlib_e_a_L_3:
$03CD	$3000			MOVLW	0
$03CE	$1703			BSF	STATUS, RP1
$03CF	$1683			BSF	STATUS, RP0
$03D0	$188C			BTFSC	EECON1, 1
$03D1	$3001			MOVLW	1
$03D2	$00F1			MOVWF	STACK_1
$03D3	$0871			MOVF	STACK_1, 0
$03D4	$3A01			XORLW	1
$03D5	$1D03			BTFSS	STATUS, Z
$03D6	$2BD9			GOTO	eepromlib_e_a_L_4
;eepromlib_e_a.ppas,24 :: 		
$03D7	$0000			NOP
$03D8	$2BCD			GOTO	eepromlib_e_a_L_3
$03D9	$	eepromlib_e_a_L_4:
;eepromlib_e_a.ppas,25 :: 		
$03D9	$1303			BCF	STATUS, RP1
$03DA	$082D			MOVF	FARG_EEprom_write, 0
$03DB	$1703			BSF	STATUS, RP1
$03DC	$1283			BCF	STATUS, RP0
$03DD	$008D			MOVWF	EEADR
;eepromlib_e_a.ppas,26 :: 		
$03DE	$1303			BCF	STATUS, RP1
$03DF	$1683			BSF	STATUS, RP0
$03E0	$082E			MOVF	FARG_EEprom_write+1, 0
$03E1	$1703			BSF	STATUS, RP1
$03E2	$1283			BCF	STATUS, RP0
$03E3	$008C			MOVWF	EEDATA
;eepromlib_e_a.ppas,27 :: 		
$03E4	$307F			MOVLW	127
$03E5	$1683			BSF	STATUS, RP0
$03E6	$050C			ANDWF	EECON1, 0
$03E7	$00F0			MOVWF	STACK_0
$03E8	$0870			MOVF	STACK_0, 0
$03E9	$008C			MOVWF	EECON1
;eepromlib_e_a.ppas,28 :: 		
$03EA	$3004			MOVLW	4
$03EB	$0470			IORWF	STACK_0, 0
$03EC	$008C			MOVWF	EECON1
;eepromlib_e_a.ppas,30 :: 		
$03ED	$138B			BCF	INTCON, 7
;eepromlib_e_a.ppas,31 :: 		
$03EE	$3055			MOVLW	85
$03EF	$008D			MOVWF	EECON2
;eepromlib_e_a.ppas,32 :: 		
$03F0	$30AA			MOVLW	170
$03F1	$008D			MOVWF	EECON2
;eepromlib_e_a.ppas,35 :: 		
$03F2	$148C			BSF	EECON1, WR
;eepromlib_e_a.ppas,37 :: 		
$03F3	$178B			BSF	INTCON, 7
;eepromlib_e_a.ppas,39 :: 		
$03F4	$110C			BCF	EECON1, 2
$03F5	$	eepromlib_e_a_L_1:
;eepromlib_e_a.ppas,40 :: 		
$03F5	$0008			RETURN
$03F6	$	_ceil:
;ceil.ppas,7 :: 		
;ceil.ppas,9 :: 		
$03F6	$1303			BCF	STATUS, RP1
$03F7	$1683			BSF	STATUS, RP0
$03F8	$0830			MOVF	FARG_ceil+3, 0
$03F9	$00F0			MOVWF	STACK_0
$03FA	$3000			MOVLW	0
$03FB	$3000			MOVLW	0
$03FC	$00F1			MOVWF	STACK_0+1
$03FD	$307F			MOVLW	127
$03FE	$0270			SUBWF	STACK_0, 0
$03FF	$00F4			MOVWF	STACK_4
$0400	$3000			MOVLW	0
$0401	$1C03			BTFSS	STATUS, C
$0402	$3F01			ADDLW	1
$0403	$0271			SUBWF	STACK_0+1, 0
$0404	$00F5			MOVWF	STACK_4+1
$0405	$0874			MOVF	STACK_4, 0
$0406	$00B5			MOVWF	_ceil_local_expon
$0407	$0875			MOVF	STACK_4+1, 0
$0408	$00B6			MOVWF	_ceil_local_expon+1
;ceil.ppas,10 :: 		
$0409	$3080			MOVLW	128
$040A	$0675			XORWF	STACK_4+1, 0
$040B	$00F0			MOVWF	STACK_0
$040C	$3080			MOVLW	128
$040D	$0270			SUBWF	STACK_0, 0
$040E	$1D03			BTFSS	STATUS, Z
$040F	$2C12			GOTO	L_ceil_0
$0410	$3000			MOVLW	0
$0411	$0274			SUBWF	STACK_4, 0
$0412	$	L_ceil_0:
$0412	$1803			BTFSC	STATUS, C
$0413	$2C39			GOTO	ceil_L_2
$0414	$	ceil_L_1:
;ceil.ppas,12 :: 		
$0414	$01F4			CLRF	STACK_4
$0415	$01F5			CLRF	STACK_4+1
$0416	$01F6			CLRF	STACK_4+2
$0417	$01F7			CLRF	STACK_4+3
$0418	$082D			MOVF	FARG_ceil, 0
$0419	$00F0			MOVWF	STACK_0
$041A	$082E			MOVF	FARG_ceil+1, 0
$041B	$00F1			MOVWF	STACK_0+1
$041C	$082F			MOVF	FARG_ceil+2, 0
$041D	$00F2			MOVWF	STACK_0+2
$041E	$0830			MOVF	FARG_ceil+3, 0
$041F	$00F3			MOVWF	STACK_0+3
$0420	$2251			CALL	_compare_double
$0421	$30FF			MOVLW	255
$0422	$1803			BTFSC	STATUS, C
$0423	$3000			MOVLW	0
$0424	$00F0			MOVWF	STACK_0
$0425	$0870			MOVF	STACK_0, 0
$0426	$1903			BTFSC	STATUS, Z
$0427	$2C2E			GOTO	ceil_L_5
$0428	$	ceil_L_4:
;ceil.ppas,13 :: 		
$0428	$1683			BSF	STATUS, RP0
$0429	$01B1			CLRF	_ceil_local_result
$042A	$01B2			CLRF	_ceil_local_result+1
$042B	$01B3			CLRF	_ceil_local_result+2
$042C	$01B4			CLRF	_ceil_local_result+3
$042D	$2C38			GOTO	ceil_L_6
;ceil.ppas,14 :: 		
$042E	$	ceil_L_5:
$042E	$1303			BCF	STATUS, RP1
$042F	$1683			BSF	STATUS, RP0
;ceil.ppas,15 :: 		
$0430	$3000			MOVLW	0
$0431	$00B1			MOVWF	_ceil_local_result
$0432	$3000			MOVLW	0
$0433	$00B2			MOVWF	_ceil_local_result+1
$0434	$3000			MOVLW	0
$0435	$00B3			MOVWF	_ceil_local_result+2
$0436	$307F			MOVLW	127
$0437	$00B4			MOVWF	_ceil_local_result+3
$0438	$	ceil_L_6:
;ceil.ppas,16 :: 		
$0438	$2C88			GOTO	ceil_L_0
;ceil.ppas,17 :: 		
$0439	$	ceil_L_2:
$0439	$	ceil_L_3:
;ceil.ppas,18 :: 		
$0439	$0836			MOVF	_ceil_local_expon+1, 0
$043A	$3C00			SUBLW	0
$043B	$1D03			BTFSS	STATUS, Z
$043C	$2C3F			GOTO	L_ceil_1
$043D	$0835			MOVF	_ceil_local_expon, 0
$043E	$3C18			SUBLW	24
$043F	$	L_ceil_1:
$043F	$1803			BTFSC	STATUS, C
$0440	$2C4A			GOTO	ceil_L_8
$0441	$	ceil_L_7:
;ceil.ppas,20 :: 		
$0441	$082D			MOVF	FARG_ceil, 0
$0442	$00B1			MOVWF	_ceil_local_result
$0443	$082E			MOVF	FARG_ceil+1, 0
$0444	$00B2			MOVWF	_ceil_local_result+1
$0445	$082F			MOVF	FARG_ceil+2, 0
$0446	$00B3			MOVWF	_ceil_local_result+2
$0447	$0830			MOVF	FARG_ceil+3, 0
$0448	$00B4			MOVWF	_ceil_local_result+3
;ceil.ppas,21 :: 		
$0449	$2C88			GOTO	ceil_L_0
;ceil.ppas,22 :: 		
$044A	$	ceil_L_8:
$044A	$	ceil_L_9:
;ceil.ppas,23 :: 		
$044A	$082D			MOVF	FARG_ceil, 0
$044B	$00F0			MOVWF	STACK_0
$044C	$082E			MOVF	FARG_ceil+1, 0
$044D	$00F1			MOVWF	STACK_0+1
$044E	$082F			MOVF	FARG_ceil+2, 0
$044F	$00F2			MOVWF	STACK_0+2
$0450	$0830			MOVF	FARG_ceil+3, 0
$0451	$00F3			MOVWF	STACK_0+3
$0452	$22A1			CALL	_double2longint
$0453	$232B			CALL	_longint2double
$0454	$0870			MOVF	STACK_0, 0
$0455	$1683			BSF	STATUS, RP0
$0456	$00B1			MOVWF	_ceil_local_result
$0457	$0871			MOVF	STACK_0+1, 0
$0458	$00B2			MOVWF	_ceil_local_result+1
$0459	$0872			MOVF	STACK_0+2, 0
$045A	$00B3			MOVWF	_ceil_local_result+2
$045B	$0873			MOVF	STACK_0+3, 0
$045C	$00B4			MOVWF	_ceil_local_result+3
;ceil.ppas,24 :: 		
$045D	$082D			MOVF	FARG_ceil, 0
$045E	$00F4			MOVWF	STACK_4
$045F	$082E			MOVF	FARG_ceil+1, 0
$0460	$00F5			MOVWF	STACK_4+1
$0461	$082F			MOVF	FARG_ceil+2, 0
$0462	$00F6			MOVWF	STACK_4+2
$0463	$0830			MOVF	FARG_ceil+3, 0
$0464	$00F7			MOVWF	STACK_4+3
$0465	$2251			CALL	_compare_double
$0466	$30FF			MOVLW	255
$0467	$1803			BTFSC	STATUS, C
$0468	$3000			MOVLW	0
$0469	$00F0			MOVWF	STACK_0
$046A	$0870			MOVF	STACK_0, 0
$046B	$1903			BTFSC	STATUS, Z
$046C	$2C88			GOTO	ceil_L_11
$046D	$	ceil_L_10:
;ceil.ppas,25 :: 		
$046D	$1683			BSF	STATUS, RP0
$046E	$0831			MOVF	_ceil_local_result, 0
$046F	$00F0			MOVWF	STACK_0
$0470	$0832			MOVF	_ceil_local_result+1, 0
$0471	$00F1			MOVWF	STACK_0+1
$0472	$0833			MOVF	_ceil_local_result+2, 0
$0473	$00F2			MOVWF	STACK_0+2
$0474	$0834			MOVF	_ceil_local_result+3, 0
$0475	$00F3			MOVWF	STACK_0+3
$0476	$3000			MOVLW	0
$0477	$00F4			MOVWF	STACK_4
$0478	$3000			MOVLW	0
$0479	$00F5			MOVWF	STACK_4+1
$047A	$3000			MOVLW	0
$047B	$00F6			MOVWF	STACK_4+2
$047C	$307F			MOVLW	127
$047D	$00F7			MOVWF	STACK_4+3
$047E	$2130			CALL	_add_32x32_fp
$047F	$0870			MOVF	STACK_0, 0
$0480	$1683			BSF	STATUS, RP0
$0481	$00B1			MOVWF	_ceil_local_result
$0482	$0871			MOVF	STACK_0+1, 0
$0483	$00B2			MOVWF	_ceil_local_result+1
$0484	$0872			MOVF	STACK_0+2, 0
$0485	$00B3			MOVWF	_ceil_local_result+2
$0486	$0873			MOVF	STACK_0+3, 0
$0487	$00B4			MOVWF	_ceil_local_result+3
$0488	$	ceil_L_11:
$0488	$	ceil_L_12:
$0488	$	ceil_L_0:
$0488	$1303			BCF	STATUS, RP1
$0489	$1683			BSF	STATUS, RP0
$048A	$0831			MOVF	_ceil_local_result, 0
$048B	$00F0			MOVWF	STACK_0
$048C	$0832			MOVF	_ceil_local_result+1, 0
$048D	$00F1			MOVWF	STACK_0+1
$048E	$0833			MOVF	_ceil_local_result+2, 0
$048F	$00F2			MOVWF	STACK_0+2
$0490	$0834			MOVF	_ceil_local_result+3, 0
$0491	$00F3			MOVWF	STACK_0+3
;ceil.ppas,26 :: 		
$0492	$0008			RETURN
$0493	$	_eeprom_read:
;eepromlib_e_a.ppas,6 :: 		
;eepromlib_e_a.ppas,8 :: 		
$0493	$1303			BCF	STATUS, RP1
$0494	$1683			BSF	STATUS, RP0
$0495	$082D			MOVF	FARG_EEprom_read, 0
$0496	$1703			BSF	STATUS, RP1
$0497	$1283			BCF	STATUS, RP0
$0498	$008D			MOVWF	EEADR
;eepromlib_e_a.ppas,9 :: 		
$0499	$1683			BSF	STATUS, RP0
$049A	$138C			BCF	EECON1, 7
;eepromlib_e_a.ppas,12 :: 		
$049B	$138C			BCF	EECON1, EEPGD
;eepromlib_e_a.ppas,13 :: 		
$049C	$140C			BSF	EECON1, RD
;eepromlib_e_a.ppas,14 :: 		
$049D	$0000			NOP
;eepromlib_e_a.ppas,15 :: 		
$049E	$0000			NOP
;eepromlib_e_a.ppas,17 :: 		
$049F	$1283			BCF	STATUS, RP0
$04A0	$080C			MOVF	EEDATA, 0
$04A1	$1303			BCF	STATUS, RP1
$04A2	$1683			BSF	STATUS, RP0
$04A3	$00AE			MOVWF	_eeprom_read_local_result
$04A4	$	eepromlib_e_a_L_0:
$04A4	$082E			MOVF	_eeprom_read_local_result, 0
$04A5	$00F0			MOVWF	STACK_0
;eepromlib_e_a.ppas,18 :: 		
$04A6	$0008			RETURN
$04A7	$	_usart_init:
;usart_c67.ppas,21 :: 		
;usart_c67.ppas,24 :: 		
$04A7	$	usart_c67_L_1:
$04A7	$1303			BCF	STATUS, RP1
$04A8	$1683			BSF	STATUS, RP0
$04A9	$1698			BSF	TXSTA, 5
$04AA	$	usart_c67_L_2:
;usart_c67.ppas,25 :: 		
$04AA	$3090			MOVLW	144
$04AB	$1283			BCF	STATUS, RP0
$04AC	$0098			MOVWF	RCSTA
;usart_c67.ppas,31 :: 		
$04AD	$	usart_c67_L_3:
$04AD	$1683			BSF	STATUS, RP0
$04AE	$1787			BSF	TRISC, 7
$04AF	$	usart_c67_L_4:
;usart_c67.ppas,32 :: 		
$04AF	$1307			BCF	TRISC, 6
$04B0	$	usart_c67_L_6:
;usart_c67.ppas,35 :: 		
$04B0	$	usart_c67_L_8:
$04B0	$3000			MOVLW	0
$04B1	$1283			BCF	STATUS, RP0
$04B2	$1A8C			BTFSC	PIR1, 5
$04B3	$3001			MOVLW	1
$04B4	$00F1			MOVWF	STACK_1
$04B5	$0871			MOVF	STACK_1, 0
$04B6	$3A01			XORLW	1
$04B7	$1903			BTFSC	STATUS, Z
$04B8	$2CB0			GOTO	usart_c67_L_8
;usart_c67.ppas,36 :: 		
$04B9	$	usart_c67_L_9:
$04B9	$	usart_c67_L_0:
;usart_c67.ppas,37 :: 		
$04B9	$0008			RETURN
$04BA	$	_int2double:
$04BA	$1303			BCF	STATUS, RP1
$04BB	$1283			BCF	STATUS, RP0
;math_double.ppas,1681 :: 		
;math_double.ppas,1687 :: 		
$04BC	$0870			MOVF	STACK_0, W
;math_double.ppas,1688 :: 		
$04BD	$00F8			MOVWF	STACK_8
;math_double.ppas,1689 :: 		
$04BE	$0871			MOVF	STACK_1, W
;math_double.ppas,1690 :: 		
$04BF	$00F0			MOVWF	STACK_0
;math_double.ppas,1691 :: 		
$04C0	$01F1			CLRF	STACK_1
;math_double.ppas,1692 :: 		
$04C1	$01F2			CLRF	STACK_2
;math_double.ppas,1694 :: 		
$04C2	$01F3			CLRF	STACK_3
;math_double.ppas,1695 :: 		
$04C3	$	FLO1632:
;math_double.ppas,1696 :: 		
$04C3	$01FB			CLRF	STACK_11
;math_double.ppas,1698 :: 		
$04C4	$01FC			CLRF	STACK_12
;math_double.ppas,1699 :: 		
$04C5	$3096			MOVLW	150
;math_double.ppas,1700 :: 		
$04C6	$00F3			MOVWF	STACK_3
;math_double.ppas,1701 :: 		
$04C7	$01FA			CLRF	STACK_10
;math_double.ppas,1702 :: 		
$04C8	$1FF0			BTFSS	STACK_0, 7
;math_double.ppas,1704 :: 		
$04C9	$2CD0			GOTO	FLO1632EEE
;math_double.ppas,1705 :: 		
$04CA	$09F8			COMF	STACK_8, F
;math_double.ppas,1707 :: 		
$04CB	$09F0			COMF	STACK_0, F
;math_double.ppas,1708 :: 		
$04CC	$0AF8			INCF	STACK_8, F
;math_double.ppas,1709 :: 		
$04CD	$1903			BTFSC	STATUS, Z
;math_double.ppas,1711 :: 		
$04CE	$0AF0			INCF	STACK_0, F
;math_double.ppas,1712 :: 		
$04CF	$17FA			BSF	STACK_10, 7
;math_double.ppas,1713 :: 		
$04D0	$	FLO1632EEE:
;math_double.ppas,1714 :: 		
$04D0	$0870			MOVF	STACK_0, W
;math_double.ppas,1715 :: 		
$04D1	$00F1			MOVWF	STACK_1
;math_double.ppas,1716 :: 		
$04D2	$0878			MOVF	STACK_8, W
;math_double.ppas,1717 :: 		
$04D3	$00F0			MOVWF	STACK_0
;math_double.ppas,1718 :: 		
$04D4	$01F8			CLRF	STACK_8
;math_double.ppas,1719 :: 		
$04D5	$01F2			CLRF	STACK_2
;math_double.ppas,1721 :: 		
$04D6	$20EF			CALL	_nrm3232
$04D7	$	math_double_L_18:
;math_double.ppas,1722 :: 		
$04D7	$0008			RETURN
$04D8	$	_div_32x32_fp:
$04D8	$1303			BCF	STATUS, RP1
$04D9	$1283			BCF	STATUS, RP0
;math_double.ppas,671 :: 		
;math_double.ppas,685 :: 		
$04DA	$	FPD32:
;math_double.ppas,686 :: 		
$04DA	$0877			MOVF	STACK_7, W
;math_double.ppas,687 :: 		
$04DB	$1903			BTFSC	STATUS, Z
;math_double.ppas,689 :: 		
$04DC	$2D67			GOTO	JPDSETFDZ32
;math_double.ppas,690 :: 		
$04DD	$0873			MOVF	STACK_3, W
;math_double.ppas,691 :: 		
$04DE	$1903			BTFSC	STATUS, Z
;math_double.ppas,692 :: 		
$04DF	$2D6A			GOTO	JPDRES032
;math_double.ppas,693 :: 		
$04E0	$	D32BNE0:
;math_double.ppas,694 :: 		
$04E0	$0872			MOVF	STACK_2, W
;math_double.ppas,695 :: 		
$04E1	$0676			XORWF	STACK_6, W
;math_double.ppas,696 :: 		
$04E2	$3980			ANDLW	128
;math_double.ppas,697 :: 		
$04E3	$00FA			MOVWF	STACK_10
;math_double.ppas,698 :: 		
$04E4	$17F2			BSF	STACK_2, 7
;math_double.ppas,699 :: 		
$04E5	$17F6			BSF	STACK_6, 7
;math_double.ppas,700 :: 		
$04E6	$	TALIGN32:
;math_double.ppas,701 :: 		
$04E6	$01A0			CLRF	MATH_DOUBLE___MATH_TEMPBD
;math_double.ppas,702 :: 		
$04E7	$0872			MOVF	STACK_2, W
;math_double.ppas,703 :: 		
$04E8	$00F8			MOVWF	STACK_8
;math_double.ppas,704 :: 		
$04E9	$0871			MOVF	STACK_1, W
;math_double.ppas,705 :: 		
$04EA	$00FC			MOVWF	STACK_12
;math_double.ppas,706 :: 		
$04EB	$0870			MOVF	STACK_0, W
;math_double.ppas,708 :: 		
$04EC	$00FD			MOVWF	STACK_13
;math_double.ppas,709 :: 		
$04ED	$0874			MOVF	STACK_4, W
;math_double.ppas,710 :: 		
$04EE	$02FD			SUBWF	STACK_13, F
;math_double.ppas,711 :: 		
$04EF	$0875			MOVF	STACK_5, W
;math_double.ppas,712 :: 		
$04F0	$1C03			BTFSS	STATUS, C
;math_double.ppas,713 :: 		
$04F1	$0F75			INCFSZ	STACK_5, W
;math_double.ppas,714 :: 		
$04F2	$	TS1ALIGN32:
;math_double.ppas,715 :: 		
$04F2	$02FC			SUBWF	STACK_12, F
;math_double.ppas,716 :: 		
$04F3	$0876			MOVF	STACK_6, W
;math_double.ppas,717 :: 		
$04F4	$1C03			BTFSS	STATUS, C
;math_double.ppas,718 :: 		
$04F5	$0F76			INCFSZ	STACK_6, W
;math_double.ppas,719 :: 		
$04F6	$	TS2ALIGN32:
;math_double.ppas,720 :: 		
$04F6	$02F8			SUBWF	STACK_8, F
;math_double.ppas,721 :: 		
$04F7	$01F8			CLRF	STACK_8
;math_double.ppas,722 :: 		
$04F8	$01FC			CLRF	STACK_12
;math_double.ppas,723 :: 		
$04F9	$01FD			CLRF	STACK_13
;math_double.ppas,724 :: 		
$04FA	$1C03			BTFSS	STATUS, C
;math_double.ppas,726 :: 		
$04FB	$2D03			GOTO	DALIGN32OK
;math_double.ppas,727 :: 		
$04FC	$1003			BCF	STATUS, C
;math_double.ppas,728 :: 		
$04FD	$0CF2			RRF	STACK_2, F
;math_double.ppas,729 :: 		
$04FE	$0CF1			RRF	STACK_1, F
;math_double.ppas,730 :: 		
$04FF	$0CF0			RRF	STACK_0, F
;math_double.ppas,731 :: 		
$0500	$0CF8			RRF	STACK_8, F
;math_double.ppas,732 :: 		
$0501	$3001			MOVLW	0X01
;math_double.ppas,733 :: 		
$0502	$00A0			MOVWF	MATH_DOUBLE___MATH_TEMPBD
;math_double.ppas,734 :: 		
$0503	$	DALIGN32OK:
;math_double.ppas,735 :: 		
$0503	$0877			MOVF	STACK_7, W
;math_double.ppas,736 :: 		
$0504	$02F3			SUBWF	STACK_3, F
;math_double.ppas,737 :: 		
$0505	$1C03			BTFSS	STATUS, C
;math_double.ppas,738 :: 		
$0506	$2D0D			GOTO	ALTB32
;math_double.ppas,739 :: 		
$0507	$	AGEB32:
;math_double.ppas,740 :: 		
$0507	$307E			MOVLW	126
;math_double.ppas,741 :: 		
$0508	$0720			ADDWF	MATH_DOUBLE___MATH_TEMPBD, W
;math_double.ppas,742 :: 		
$0509	$07F3			ADDWF	STACK_3, F
;math_double.ppas,743 :: 		
$050A	$1803			BTFSC	STATUS, C
;math_double.ppas,744 :: 		
$050B	$2D6D			GOTO	JPDSETFOV32
;math_double.ppas,745 :: 		
$050C	$2D12			GOTO	DARGOK32
;math_double.ppas,746 :: 		
$050D	$	ALTB32:
;math_double.ppas,747 :: 		
$050D	$307E			MOVLW	126
;math_double.ppas,748 :: 		
$050E	$0720			ADDWF	MATH_DOUBLE___MATH_TEMPBD, W
;math_double.ppas,749 :: 		
$050F	$07F3			ADDWF	STACK_3, F
;math_double.ppas,750 :: 		
$0510	$1C03			BTFSS	STATUS, C
;math_double.ppas,751 :: 		
$0511	$2D70			GOTO	JPDSETFUN32
;math_double.ppas,752 :: 		
$0512	$	DARGOK32:
;math_double.ppas,754 :: 		
$0512	$3018			MOVLW	24
;math_double.ppas,755 :: 		
$0513	$07FA			ADDWF	STACK_10, F
;math_double.ppas,756 :: 		
$0514	$	DLOOP32:
;math_double.ppas,757 :: 		
$0514	$0DFD			RLF	STACK_13, F
;math_double.ppas,758 :: 		
$0515	$0DFC			RLF	STACK_12, F
;math_double.ppas,759 :: 		
$0516	$0DF8			RLF	STACK_8, F
;math_double.ppas,760 :: 		
$0517	$0DF0			RLF	STACK_0, F
;math_double.ppas,761 :: 		
$0518	$0DF1			RLF	STACK_1, F
;math_double.ppas,762 :: 		
$0519	$0DF2			RLF	STACK_2, F
;math_double.ppas,764 :: 		
$051A	$0DA0			RLF	MATH_DOUBLE___MATH_TEMPBD, F
;math_double.ppas,765 :: 		
$051B	$0874			MOVF	STACK_4, W
;math_double.ppas,766 :: 		
$051C	$02F0			SUBWF	STACK_0, F
;math_double.ppas,767 :: 		
$051D	$0875			MOVF	STACK_5, W
;math_double.ppas,768 :: 		
$051E	$1C03			BTFSS	STATUS, C
;math_double.ppas,769 :: 		
$051F	$0F75			INCFSZ	STACK_5, W
;math_double.ppas,770 :: 		
$0520	$	DS132:
;math_double.ppas,771 :: 		
$0520	$02F1			SUBWF	STACK_1, F
;math_double.ppas,772 :: 		
$0521	$0876			MOVF	STACK_6, W
;math_double.ppas,773 :: 		
$0522	$1C03			BTFSS	STATUS, C
;math_double.ppas,774 :: 		
$0523	$0F76			INCFSZ	STACK_6, W
;math_double.ppas,775 :: 		
$0524	$	DS232:
;math_double.ppas,776 :: 		
$0524	$02F2			SUBWF	STACK_2, F
;math_double.ppas,777 :: 		
$0525	$0D76			RLF	STACK_6, W
;math_double.ppas,778 :: 		
$0526	$04A0			IORWF	MATH_DOUBLE___MATH_TEMPBD, F
;math_double.ppas,779 :: 		
$0527	$1C20			BTFSS	MATH_DOUBLE___MATH_TEMPBD, 0
;math_double.ppas,780 :: 		
$0528	$2D2B			GOTO	DREST32
;math_double.ppas,781 :: 		
$0529	$147D			BSF	STACK_13, 0
;math_double.ppas,782 :: 		
$052A	$2D36			GOTO	DOK32
;math_double.ppas,783 :: 		
$052B	$	DREST32:
;math_double.ppas,784 :: 		
$052B	$0874			MOVF	STACK_4, W
;math_double.ppas,785 :: 		
$052C	$07F0			ADDWF	STACK_0, F
;math_double.ppas,786 :: 		
$052D	$0875			MOVF	STACK_5, W
;math_double.ppas,787 :: 		
$052E	$1803			BTFSC	STATUS, C
;math_double.ppas,788 :: 		
$052F	$0F75			INCFSZ	STACK_5, W
;math_double.ppas,789 :: 		
$0530	$	DAREST32:
;math_double.ppas,790 :: 		
$0530	$07F1			ADDWF	STACK_1, F
;math_double.ppas,791 :: 		
$0531	$0876			MOVF	STACK_6, W
;math_double.ppas,792 :: 		
$0532	$1803			BTFSC	STATUS, C
;math_double.ppas,793 :: 		
$0533	$0A76			INCF	STACK_6, W
;math_double.ppas,794 :: 		
$0534	$07F2			ADDWF	STACK_2, F
;math_double.ppas,795 :: 		
$0535	$107D			BCF	STACK_13, 0
;math_double.ppas,797 :: 		
$0536	$	DOK32:
;math_double.ppas,798 :: 		
$0536	$03FA			DECF	STACK_10, F
;math_double.ppas,799 :: 		
$0537	$301F			MOVLW	31
;math_double.ppas,800 :: 		
$0538	$057A			ANDWF	STACK_10, W
;math_double.ppas,801 :: 		
$0539	$1D03			BTFSS	STATUS, Z
;math_double.ppas,802 :: 		
$053A	$2D14			GOTO	DLOOP32
;math_double.ppas,803 :: 		
$053B	$	DROUND32:
;math_double.ppas,804 :: 		
$053B	$1B7B			BTFSC	STACK_11, 6
;math_double.ppas,805 :: 		
$053C	$1C7D			BTFSS	STACK_13, 0
;math_double.ppas,806 :: 		
$053D	$2D5D			GOTO	DIV32OK
;math_double.ppas,807 :: 		
$053E	$1003			BCF	STATUS, C
;math_double.ppas,808 :: 		
$053F	$0DF0			RLF	STACK_0, F
;math_double.ppas,809 :: 		
$0540	$0DF1			RLF	STACK_1, F
;math_double.ppas,810 :: 		
$0541	$0DF2			RLF	STACK_2, F
;math_double.ppas,812 :: 		
$0542	$0DA0			RLF	MATH_DOUBLE___MATH_TEMPBD, F
;math_double.ppas,813 :: 		
$0543	$0874			MOVF	STACK_4, W
;math_double.ppas,814 :: 		
$0544	$02F0			SUBWF	STACK_0, F
;math_double.ppas,815 :: 		
$0545	$0875			MOVF	STACK_5, W
;math_double.ppas,816 :: 		
$0546	$1C03			BTFSS	STATUS, C
;math_double.ppas,817 :: 		
$0547	$0F75			INCFSZ	STACK_5, W
;math_double.ppas,818 :: 		
$0548	$02F1			SUBWF	STACK_1, F
;math_double.ppas,819 :: 		
$0549	$0876			MOVF	STACK_6, W
;math_double.ppas,820 :: 		
$054A	$1C03			BTFSS	STATUS, C
;math_double.ppas,821 :: 		
$054B	$0F76			INCFSZ	STACK_6, W
;math_double.ppas,822 :: 		
$054C	$02F2			SUBWF	STACK_2, F
;math_double.ppas,823 :: 		
$054D	$0D76			RLF	STACK_6, W
;math_double.ppas,824 :: 		
$054E	$0420			IORWF	MATH_DOUBLE___MATH_TEMPBD, W
;math_double.ppas,825 :: 		
$054F	$3901			ANDLW	0X01
;math_double.ppas,826 :: 		
$0550	$07FD			ADDWF	STACK_13, F
;math_double.ppas,827 :: 		
$0551	$1803			BTFSC	STATUS, C
;math_double.ppas,828 :: 		
$0552	$0AFC			INCF	STACK_12, F
;math_double.ppas,829 :: 		
$0553	$1903			BTFSC	STATUS, Z
;math_double.ppas,830 :: 		
$0554	$0AF8			INCF	STACK_8, F
;math_double.ppas,831 :: 		
$0555	$1D03			BTFSS	STATUS, Z
;math_double.ppas,832 :: 		
$0556	$2D5D			GOTO	DIV32OK
;math_double.ppas,833 :: 		
$0557	$0CF8			RRF	STACK_8, F
;math_double.ppas,834 :: 		
$0558	$0CFC			RRF	STACK_12, F
;math_double.ppas,835 :: 		
$0559	$0CFD			RRF	STACK_13, F
;math_double.ppas,836 :: 		
$055A	$0AF3			INCF	STACK_3, F
;math_double.ppas,837 :: 		
$055B	$1903			BTFSC	STATUS, Z
;math_double.ppas,838 :: 		
$055C	$2D6D			GOTO	JPDSETFOV32
;math_double.ppas,839 :: 		
$055D	$	DIV32OK:
;math_double.ppas,840 :: 		
$055D	$1FFA			BTFSS	STACK_10, 7
;math_double.ppas,841 :: 		
$055E	$13F8			BCF	STACK_8, 7
;math_double.ppas,842 :: 		
$055F	$0878			MOVF	STACK_8, W
;math_double.ppas,843 :: 		
$0560	$00F2			MOVWF	STACK_2
;math_double.ppas,844 :: 		
$0561	$087C			MOVF	STACK_12, W
;math_double.ppas,845 :: 		
$0562	$00F1			MOVWF	STACK_1
;math_double.ppas,846 :: 		
$0563	$087D			MOVF	STACK_13, W
;math_double.ppas,848 :: 		
$0564	$00F0			MOVWF	STACK_0
;math_double.ppas,850 :: 		
$0565	$3000			MOVLW	0X00
;math_double.ppas,851 :: 		
$0566	$2D72			GOTO	DIV32EEE
;math_double.ppas,852 :: 		
$0567	$	JPDSETFDZ32:
;math_double.ppas,854 :: 		
$0567	$3001			MOVLW	0X01
;math_double.ppas,856 :: 		
$0568	$234D			CALL	_setfdz32
;math_double.ppas,858 :: 		
$0569	$2D72			GOTO	DIV32EEE
;math_double.ppas,859 :: 		
$056A	$	JPDRES032:
;math_double.ppas,861 :: 		
$056A	$3002			MOVLW	0X02
;math_double.ppas,863 :: 		
$056B	$2068			CALL	_res032
;math_double.ppas,865 :: 		
$056C	$2D72			GOTO	DIV32EEE
;math_double.ppas,866 :: 		
$056D	$	JPDSETFOV32:
;math_double.ppas,868 :: 		
$056D	$3004			MOVLW	0X04
;math_double.ppas,870 :: 		
$056E	$2085			CALL	_setfov32
;math_double.ppas,872 :: 		
$056F	$2D72			GOTO	DIV32EEE
;math_double.ppas,873 :: 		
$0570	$	JPDSETFUN32:
;math_double.ppas,875 :: 		
$0570	$3008			MOVLW	0X08
;math_double.ppas,877 :: 		
$0571	$2071			CALL	_setfun32
;math_double.ppas,879 :: 		
$0572	$	DIV32EEE:
;math_double.ppas,880 :: 		
$0572	$0000			NOP
;math_double.ppas,881 :: 		
$0573	$	math_double_L_10:
;math_double.ppas,882 :: 		
$0573	$0008			RETURN
$0574	$	_double2byte:
$0574	$1303			BCF	STATUS, RP1
$0575	$1283			BCF	STATUS, RP0
;math_double.ppas,1545 :: 		
;math_double.ppas,1552 :: 		
$0576	$	INT32U08:
;math_double.ppas,1553 :: 		
$0576	$01FB			CLRF	STACK_11
;math_double.ppas,1554 :: 		
$0577	$01FC			CLRF	STACK_12
;math_double.ppas,1556 :: 		
$0578	$01FA			CLRF	STACK_10
;math_double.ppas,1557 :: 		
$0579	$0873			MOVF	STACK_3, W
;math_double.ppas,1558 :: 		
$057A	$1903			BTFSC	STATUS, Z
;math_double.ppas,1560 :: 		
$057B	$2DA1			GOTO	IRES008
;math_double.ppas,1561 :: 		
$057C	$13FA			BCF	STACK_10, 7
;math_double.ppas,1563 :: 		
$057D	$17F2			BSF	STACK_2, 7
;math_double.ppas,1564 :: 		
$057E	$3086			MOVLW	134
;math_double.ppas,1565 :: 		
$057F	$02F3			SUBWF	STACK_3, F
;math_double.ppas,1566 :: 		
$0580	$1BF3			BTFSC	STACK_3, 7
;math_double.ppas,1567 :: 		
$0581	$2D85			GOTO	SETEXP08
;math_double.ppas,1568 :: 		
$0582	$1903			BTFSC	STATUS, Z
;math_double.ppas,1569 :: 		
$0583	$2D85			GOTO	SETEXP08
;math_double.ppas,1570 :: 		
$0584	$2DA3			GOTO	SETIOV08
;math_double.ppas,1571 :: 		
$0585	$	SETEXP08:
;math_double.ppas,1572 :: 		
$0585	$09F3			COMF	STACK_3, F
;math_double.ppas,1574 :: 		
$0586	$0AF3			INCF	STACK_3, F
;math_double.ppas,1575 :: 		
$0587	$3008			MOVLW	8
;math_double.ppas,1576 :: 		
$0588	$0273			SUBWF	STACK_3, W
;math_double.ppas,1577 :: 		
$0589	$1C03			BTFSS	STATUS, C
;math_double.ppas,1578 :: 		
$058A	$2D92			GOTO	TSHIFT3208
;math_double.ppas,1579 :: 		
$058B	$00F3			MOVWF	STACK_3
;math_double.ppas,1580 :: 		
$058C	$0DF2			RLF	STACK_2, F
;math_double.ppas,1582 :: 		
$058D	$01F2			CLRF	STACK_2
;math_double.ppas,1583 :: 		
$058E	$0873			MOVF	STACK_3, W
;math_double.ppas,1584 :: 		
$058F	$1D03			BTFSS	STATUS, Z
;math_double.ppas,1585 :: 		
$0590	$1003			BCF	STATUS, C
;math_double.ppas,1586 :: 		
$0591	$2D99			GOTO	SHIFT3208OK
;math_double.ppas,1587 :: 		
$0592	$	TSHIFT3208:
;math_double.ppas,1588 :: 		
$0592	$0873			MOVF	STACK_3, W
;math_double.ppas,1589 :: 		
$0593	$1903			BTFSC	STATUS, Z
;math_double.ppas,1590 :: 		
$0594	$2D99			GOTO	SHIFT3208OK
;math_double.ppas,1591 :: 		
$0595	$	SHIFT3208:
;math_double.ppas,1592 :: 		
$0595	$1003			BCF	STATUS, C
;math_double.ppas,1593 :: 		
$0596	$0CF2			RRF	STACK_2, F
;math_double.ppas,1594 :: 		
$0597	$0BF3			DECFSZ	STACK_3, F
;math_double.ppas,1595 :: 		
$0598	$2D95			GOTO	SHIFT3208
;math_double.ppas,1596 :: 		
$0599	$	SHIFT3208OK:
;math_double.ppas,1597 :: 		
$0599	$1B7B			BTFSC	STACK_11, 6
;math_double.ppas,1598 :: 		
$059A	$1C72			BTFSS	STACK_2, 0
;math_double.ppas,1599 :: 		
$059B	$2DA1			GOTO	INT3208OK
;math_double.ppas,1600 :: 		
$059C	$1C03			BTFSS	STATUS, C
;math_double.ppas,1601 :: 		
$059D	$2DA1			GOTO	INT3208OK
;math_double.ppas,1602 :: 		
$059E	$0AF2			INCF	STACK_2, F
;math_double.ppas,1603 :: 		
$059F	$1903			BTFSC	STATUS, Z
;math_double.ppas,1604 :: 		
$05A0	$2DA8			GOTO	JPKSETIOV3224
;math_double.ppas,1605 :: 		
$05A1	$	INT3208OK:
;math_double.ppas,1606 :: 		
$05A1	$	IRES008:
;math_double.ppas,1607 :: 		
$05A1	$01F1			CLRF	STACK_1
;math_double.ppas,1608 :: 		
$05A2	$2DAB			GOTO	INT3208EOK
;math_double.ppas,1609 :: 		
$05A3	$	SETIOV08:
;math_double.ppas,1610 :: 		
$05A3	$147B			BSF	STACK_11, 0
;math_double.ppas,1611 :: 		
$05A4	$1FFB			BTFSS	STACK_11, 7
;math_double.ppas,1613 :: 		
$05A5	$2DAE			GOTO	INT3208EER
;math_double.ppas,1614 :: 		
$05A6	$01F1			CLRF	STACK_1
;math_double.ppas,1615 :: 		
$05A7	$2DAE			GOTO	INT3208EER
;math_double.ppas,1616 :: 		
$05A8	$	JPKSETIOV3224:
;math_double.ppas,1617 :: 		
$05A8	$3001			MOVLW	0X01
;math_double.ppas,1618 :: 		
$05A9	$00FC			MOVWF	STACK_12
;math_double.ppas,1619 :: 		
$05AA	$2DB0			GOTO	INT3208EEE
;math_double.ppas,1620 :: 		
$05AB	$	INT3208EOK:
;math_double.ppas,1621 :: 		
$05AB	$3000			MOVLW	0X00
;math_double.ppas,1622 :: 		
$05AC	$00FC			MOVWF	STACK_12
;math_double.ppas,1623 :: 		
$05AD	$2DB0			GOTO	INT3208EEE
;math_double.ppas,1624 :: 		
$05AE	$	INT3208EER:
;math_double.ppas,1625 :: 		
$05AE	$30FF			MOVLW	0XFF
;math_double.ppas,1626 :: 		
$05AF	$00FC			MOVWF	STACK_12
;math_double.ppas,1629 :: 		
$05B0	$	INT3208EEE:
;math_double.ppas,1631 :: 		
$05B0	$08FC			MOVF	STACK_12, F
;math_double.ppas,1632 :: 		
$05B1	$1903			BTFSC	STATUS, Z
;math_double.ppas,1633 :: 		
$05B2	$2DB4			GOTO	L_DOUBLE2BYTE_0
;math_double.ppas,1635 :: 		
$05B3	$2207			CALL	_setiov3224
;math_double.ppas,1637 :: 		
$05B4	$	L_DOUBLE2BYTE_0:
;math_double.ppas,1638 :: 		
$05B4	$0872			MOVF	STACK_2, W
;math_double.ppas,1639 :: 		
$05B5	$00F0			MOVWF	STACK_0
;math_double.ppas,1640 :: 		
$05B6	$	math_double_L_16:
;math_double.ppas,1641 :: 		
$05B6	$0008			RETURN
$05B7	$	_mul_8x8_u:
$05B7	$1303			BCF	STATUS, RP1
$05B8	$1283			BCF	STATUS, RP0
;math.ppas,13 :: 		
;math.ppas,16 :: 		
$05B9	$0870			MOVF	STACK_0, W
;math.ppas,17 :: 		
$05BA	$00F1			MOVWF	STACK_1
;math.ppas,18 :: 		
$05BB	$01F0			CLRF	STACK_0
;math.ppas,19 :: 		
$05BC	$3008			MOVLW	8
;math.ppas,20 :: 		
$05BD	$00FC			MOVWF	STACK_12
;math.ppas,21 :: 		
$05BE	$0871			MOVF	STACK_1, W
;math.ppas,22 :: 		
$05BF	$0CF4			RRF	STACK_4, F
;math.ppas,23 :: 		
$05C0	$1803			BTFSC	STATUS, C
;math.ppas,24 :: 		
$05C1	$2DC6			GOTO	$+5
;math.ppas,25 :: 		
$05C2	$0BFC			DECFSZ	STACK_12, F
;math.ppas,26 :: 		
$05C3	$2DBF			GOTO	$-4
;math.ppas,27 :: 		
$05C4	$01F1			CLRF	STACK_1, F
;math.ppas,28 :: 		
$05C5	$3400			RETLW	0
;math.ppas,29 :: 		
$05C6	$1003			BCF	STATUS, C
;math.ppas,30 :: 		
$05C7	$2DCB			GOTO	$+4
;math.ppas,31 :: 		
$05C8	$0CF4			RRF	STACK_4, F
;math.ppas,32 :: 		
$05C9	$1803			BTFSC	STATUS, C
;math.ppas,33 :: 		
$05CA	$07F1			ADDWF	STACK_1, F
;math.ppas,34 :: 		
$05CB	$0CF1			RRF	STACK_1, F
;math.ppas,35 :: 		
$05CC	$0CF0			RRF	STACK_0, F
;math.ppas,36 :: 		
$05CD	$0BFC			DECFSZ	STACK_12, F
;math.ppas,37 :: 		
$05CE	$2DC8			GOTO	$-6
;math.ppas,38 :: 		
$05CF	$	math_L_0:
;math.ppas,39 :: 		
$05CF	$0008			RETURN
$0800	$	_main:
;test_ronald3.pbas,55 :: 		main:
$0800	$	_main_main:
;test_ronald3.pbas,58 :: 		OPTION_REG = $87       ' Assign prescaler to TMR0
$0800	$3087			MOVLW	135
$0801	$1303			BCF	STATUS, RP1
$0802	$1683			BSF	STATUS, RP0
$0803	$0081			MOVWF	OPTION_REG
;test_ronald3.pbas,59 :: 		counter = 0            ' Initialize counter
$0804	$01F0			CLRF	STACK_0, 1
$0805	$118A			BCF	PCLATH, 3
$0806	$2120			CALL	_byte2double
$0807	$158A			BSF	PCLATH, 3
$0808	$0870			MOVF	STACK_0, 0
$0809	$00A1			MOVWF	_counter
$080A	$0871			MOVF	STACK_0+1, 0
$080B	$00A2			MOVWF	_counter+1
$080C	$0872			MOVF	STACK_0+2, 0
$080D	$00A3			MOVWF	_counter+2
$080E	$0873			MOVF	STACK_0+3, 0
$080F	$00A4			MOVWF	_counter+3
;test_ronald3.pbas,60 :: 		TMR0 = 10
$0810	$300A			MOVLW	10
$0811	$0081			MOVWF	TMR0
;test_ronald3.pbas,61 :: 		INTCON = $A0           ' Enable TMRO interrupt
$0812	$30A0			MOVLW	160
$0813	$008B			MOVWF	INTCON
;test_ronald3.pbas,66 :: 		aantalhoeken = 100
$0814	$3064			MOVLW	100
$0815	$00A5			MOVWF	_aantalhoeken
$0816	$01A6			CLRF	_aantalhoeken+1
;test_ronald3.pbas,71 :: 		Usart_Init(600)                 ' Initialize USART module
$0817	$30CF			MOVLW	207
$0818	$1683			BSF	STATUS, RP0
$0819	$0099			MOVWF	SPBRG
$081A	$1118			BCF	TXSTA, BRGH
$081B	$118A			BCF	PCLATH, 3
$081C	$24A7			CALL	_usart_init
$081D	$158A			BSF	PCLATH, 3
;test_ronald3.pbas,73 :: 		TRISB=%00000001
$081E	$3001			MOVLW	1
$081F	$1683			BSF	STATUS, RP0
$0820	$0086			MOVWF	TRISB
;test_ronald3.pbas,74 :: 		TRISC=%11000000
$0821	$30C0			MOVLW	192
$0822	$0087			MOVWF	TRISC
;test_ronald3.pbas,75 :: 		TRISD=%00000000
$0823	$0188			CLRF	TRISD, 1
;test_ronald3.pbas,76 :: 		TRISA=%000000
$0824	$0185			CLRF	TRISA, 1
;test_ronald3.pbas,77 :: 		TRISE=%00000000
$0825	$0189			CLRF	TRISE, 1
;test_ronald3.pbas,82 :: 		PORTA = %000000
$0826	$1283			BCF	STATUS, RP0
$0827	$0185			CLRF	PORTA, 1
;test_ronald3.pbas,83 :: 		PORTB = %0000000
$0828	$0186			CLRF	PORTB, 1
;test_ronald3.pbas,84 :: 		PORTC=%00000000
$0829	$0187			CLRF	PORTC, 1
;test_ronald3.pbas,85 :: 		PORTD = %00000000
$082A	$0188			CLRF	PORTD, 1
;test_ronald3.pbas,89 :: 		counter = 0
$082B	$01F0			CLRF	STACK_0, 1
$082C	$118A			BCF	PCLATH, 3
$082D	$2120			CALL	_byte2double
$082E	$158A			BSF	PCLATH, 3
$082F	$0870			MOVF	STACK_0, 0
$0830	$00A1			MOVWF	_counter
$0831	$0871			MOVF	STACK_0+1, 0
$0832	$00A2			MOVWF	_counter+1
$0833	$0872			MOVF	STACK_0+2, 0
$0834	$00A3			MOVWF	_counter+2
$0835	$0873			MOVF	STACK_0+3, 0
$0836	$00A4			MOVWF	_counter+3
;test_ronald3.pbas,90 :: 		tijd_per_hoek = 100
$0837	$3064			MOVLW	100
$0838	$00F0			MOVWF	STACK_0
$0839	$118A			BCF	PCLATH, 3
$083A	$2120			CALL	_byte2double
$083B	$158A			BSF	PCLATH, 3
$083C	$0870			MOVF	STACK_0, 0
$083D	$00A7			MOVWF	_tijd_per_hoek
$083E	$0871			MOVF	STACK_0+1, 0
$083F	$00A8			MOVWF	_tijd_per_hoek+1
$0840	$0872			MOVF	STACK_0+2, 0
$0841	$00A9			MOVWF	_tijd_per_hoek+2
$0842	$0873			MOVF	STACK_0+3, 0
$0843	$00AA			MOVWF	_tijd_per_hoek+3
;test_ronald3.pbas,91 :: 		i=3
$0844	$3003			MOVLW	3
$0845	$00AB			MOVWF	_i
$0846	$01AC			CLRF	_i+1
;test_ronald3.pbas,99 :: 		PORTD=%11111111
$0847	$30FF			MOVLW	255
$0848	$0088			MOVWF	PORTD
;test_ronald3.pbas,101 :: 		Vdelay_ms(3000)
$0849	$30B8			MOVLW	184
$084A	$1683			BSF	STATUS, RP0
$084B	$00AD			MOVWF	FARG_Vdelay_ms
$084C	$300B			MOVLW	11
$084D	$00AE			MOVWF	FARG_Vdelay_ms+1
$084E	$118A			BCF	PCLATH, 3
$084F	$2352			CALL	_vdelay_ms
$0850	$158A			BSF	PCLATH, 3
;test_ronald3.pbas,103 :: 		PORTD=%00000000
$0851	$1283			BCF	STATUS, RP0
$0852	$0188			CLRF	PORTD, 1
;test_ronald3.pbas,105 :: 		while true
$0853	$	test_ronald3_L_3:
;test_ronald3.pbas,112 :: 		if op_sensor = false then
$0853	$082D			MOVF	_op_sensor, 0
$0854	$3A00			XORLW	0
$0855	$1D03			BTFSS	STATUS, Z
$0856	$288E			GOTO	test_ronald3_L_8
$0857	$	test_ronald3_L_7:
;test_ronald3.pbas,113 :: 		if PORTB.0 = 1 then
$0857	$3001			MOVLW	1
$0858	$0506			ANDWF	PORTB, 0
$0859	$00F4			MOVWF	STACK_4
$085A	$0874			MOVF	STACK_4, 0
$085B	$3A01			XORLW	1
$085C	$1D03			BTFSS	STATUS, Z
$085D	$288E			GOTO	test_ronald3_L_11
$085E	$	test_ronald3_L_10:
;test_ronald3.pbas,116 :: 		tijd_per_hoek  = counter / aantalhoeken
$085E	$0825			MOVF	_aantalhoeken, 0
$085F	$00F0			MOVWF	STACK_0
$0860	$0826			MOVF	_aantalhoeken+1, 0
$0861	$00F1			MOVWF	STACK_0+1
$0862	$118A			BCF	PCLATH, 3
$0863	$24BA			CALL	_int2double
$0864	$158A			BSF	PCLATH, 3
$0865	$0870			MOVF	STACK_0, 0
$0866	$00F4			MOVWF	STACK_4
$0867	$0871			MOVF	STACK_0+1, 0
$0868	$00F5			MOVWF	STACK_4+1
$0869	$0872			MOVF	STACK_0+2, 0
$086A	$00F6			MOVWF	STACK_4+2
$086B	$0873			MOVF	STACK_0+3, 0
$086C	$00F7			MOVWF	STACK_4+3
$086D	$0821			MOVF	_counter, 0
$086E	$00F0			MOVWF	STACK_0
$086F	$0822			MOVF	_counter+1, 0
$0870	$00F1			MOVWF	STACK_0+1
$0871	$0823			MOVF	_counter+2, 0
$0872	$00F2			MOVWF	STACK_0+2
$0873	$0824			MOVF	_counter+3, 0
$0874	$00F3			MOVWF	STACK_0+3
$0875	$118A			BCF	PCLATH, 3
$0876	$24D8			CALL	_div_32x32_fp
$0877	$158A			BSF	PCLATH, 3
$0878	$0870			MOVF	STACK_0, 0
$0879	$00A7			MOVWF	_tijd_per_hoek
$087A	$0871			MOVF	STACK_0+1, 0
$087B	$00A8			MOVWF	_tijd_per_hoek+1
$087C	$0872			MOVF	STACK_0+2, 0
$087D	$00A9			MOVWF	_tijd_per_hoek+2
$087E	$0873			MOVF	STACK_0+3, 0
$087F	$00AA			MOVWF	_tijd_per_hoek+3
;test_ronald3.pbas,117 :: 		counter = 0
$0880	$01F0			CLRF	STACK_0, 1
$0881	$118A			BCF	PCLATH, 3
$0882	$2120			CALL	_byte2double
$0883	$158A			BSF	PCLATH, 3
$0884	$0870			MOVF	STACK_0, 0
$0885	$00A1			MOVWF	_counter
$0886	$0871			MOVF	STACK_0+1, 0
$0887	$00A2			MOVWF	_counter+1
$0888	$0872			MOVF	STACK_0+2, 0
$0889	$00A3			MOVWF	_counter+2
$088A	$0873			MOVF	STACK_0+3, 0
$088B	$00A4			MOVWF	_counter+3
;test_ronald3.pbas,118 :: 		op_sensor= true
$088C	$30FF			MOVLW	255
$088D	$00AD			MOVWF	_op_sensor
$088E	$	test_ronald3_L_11:
;test_ronald3.pbas,121 :: 		end if
$088E	$	test_ronald3_L_12:
$088E	$	test_ronald3_L_8:
;test_ronald3.pbas,122 :: 		end if
$088E	$	test_ronald3_L_9:
;test_ronald3.pbas,124 :: 		if PORTB.0 = 0 then
$088E	$3001			MOVLW	1
$088F	$0506			ANDWF	PORTB, 0
$0890	$00F4			MOVWF	STACK_4
$0891	$0874			MOVF	STACK_4, 0
$0892	$3A00			XORLW	0
$0893	$1D03			BTFSS	STATUS, Z
$0894	$2896			GOTO	test_ronald3_L_14
$0895	$	test_ronald3_L_13:
;test_ronald3.pbas,125 :: 		op_sensor = false
$0895	$01AD			CLRF	_op_sensor, 1
$0896	$	test_ronald3_L_14:
;test_ronald3.pbas,126 :: 		end if
$0896	$	test_ronald3_L_15:
;test_ronald3.pbas,133 :: 		if Usart_Data_Ready = 1 then
$0896	$118A			BCF	PCLATH, 3
$0897	$23AC			CALL	_usart_data_ready
$0898	$158A			BSF	PCLATH, 3
$0899	$0870			MOVF	STACK_0, 0
$089A	$3A01			XORLW	1
$089B	$1D03			BTFSS	STATUS, Z
$089C	$28F2			GOTO	test_ronald3_L_17
$089D	$	test_ronald3_L_16:
;test_ronald3.pbas,134 :: 		i=3
$089D	$3003			MOVLW	3
$089E	$1283			BCF	STATUS, RP0
$089F	$00AB			MOVWF	_i
$08A0	$01AC			CLRF	_i+1
;test_ronald3.pbas,135 :: 		while i<303
$08A1	$	test_ronald3_L_20:
$08A1	$3001			MOVLW	1
$08A2	$022C			SUBWF	_i+1, 0
$08A3	$1D03			BTFSS	STATUS, Z
$08A4	$28A7			GOTO	L_main_0
$08A5	$302F			MOVLW	47
$08A6	$022B			SUBWF	_i, 0
$08A7	$	L_main_0:
$08A7	$1803			BTFSC	STATUS, C
$08A8	$28F2			GOTO	test_ronald3_L_21
;test_ronald3.pbas,139 :: 		while    Usart_Data_Ready = 1
$08A9	$	test_ronald3_L_25:
$08A9	$118A			BCF	PCLATH, 3
$08AA	$23AC			CALL	_usart_data_ready
$08AB	$158A			BSF	PCLATH, 3
$08AC	$0870			MOVF	STACK_0, 0
$08AD	$3A01			XORLW	1
$08AE	$1D03			BTFSS	STATUS, Z
$08AF	$28EF			GOTO	test_ronald3_L_26
;test_ronald3.pbas,143 :: 		if i<255       then
$08B0	$3000			MOVLW	0
$08B1	$1283			BCF	STATUS, RP0
$08B2	$022C			SUBWF	_i+1, 0
$08B3	$1D03			BTFSS	STATUS, Z
$08B4	$28B7			GOTO	L_main_1
$08B5	$30FF			MOVLW	255
$08B6	$022B			SUBWF	_i, 0
$08B7	$	L_main_1:
$08B7	$1803			BTFSC	STATUS, C
$08B8	$28C7			GOTO	test_ronald3_L_30
$08B9	$	test_ronald3_L_29:
;test_ronald3.pbas,145 :: 		received_byte = Usart_Read  ' Read received data
$08B9	$118A			BCF	PCLATH, 3
$08BA	$23B8			CALL	_usart_read
$08BB	$158A			BSF	PCLATH, 3
$08BC	$0870			MOVF	STACK_0, 0
$08BD	$1283			BCF	STATUS, RP0
$08BE	$00AE			MOVWF	_received_byte
;test_ronald3.pbas,146 :: 		Eeprom_Write(i,received_byte)
$08BF	$082B			MOVF	_i, 0
$08C0	$1683			BSF	STATUS, RP0
$08C1	$00AD			MOVWF	FARG_EEprom_write
$08C2	$0870			MOVF	STACK_0, 0
$08C3	$00AE			MOVWF	FARG_EEprom_write+1
$08C4	$118A			BCF	PCLATH, 3
$08C5	$23CC			CALL	_eeprom_write
$08C6	$158A			BSF	PCLATH, 3
$08C7	$	test_ronald3_L_30:
$08C7	$1703			BSF	STATUS, RP1
$08C8	$1683			BSF	STATUS, RP0
;test_ronald3.pbas,148 :: 		end if
$08C9	$	test_ronald3_L_31:
;test_ronald3.pbas,150 :: 		if i>254  then
$08C9	$1303			BCF	STATUS, RP1
$08CA	$1283			BCF	STATUS, RP0
$08CB	$082C			MOVF	_i+1, 0
$08CC	$3C00			SUBLW	0
$08CD	$1D03			BTFSS	STATUS, Z
$08CE	$28D1			GOTO	L_main_2
$08CF	$082B			MOVF	_i, 0
$08D0	$3CFE			SUBLW	254
$08D1	$	L_main_2:
$08D1	$1803			BTFSC	STATUS, C
$08D2	$28E8			GOTO	test_ronald3_L_33
$08D3	$	test_ronald3_L_32:
;test_ronald3.pbas,153 :: 		received_byte2[i-255] = Usart_Read  ' Read received data
$08D3	$302F			MOVLW	_received_byte2
$08D4	$00F4			MOVWF	STACK_4
$08D5	$30FF			MOVLW	255
$08D6	$022B			SUBWF	_i, 0
$08D7	$00F0			MOVWF	STACK_0
$08D8	$3000			MOVLW	0
$08D9	$1C03			BTFSS	STATUS, C
$08DA	$3F01			ADDLW	1
$08DB	$022C			SUBWF	_i+1, 0
$08DC	$00F1			MOVWF	STACK_0+1
$08DD	$0870			MOVF	STACK_0, 0
$08DE	$0774			ADDWF	STACK_4, 0
$08DF	$1683			BSF	STATUS, RP0
$08E0	$00A9			MOVWF	FLOC_main+0
$08E1	$118A			BCF	PCLATH, 3
$08E2	$23B8			CALL	_usart_read
$08E3	$158A			BSF	PCLATH, 3
$08E4	$0829			MOVF	FLOC_main+0, 0
$08E5	$0084			MOVWF	FSR
$08E6	$0870			MOVF	STACK_0, 0
$08E7	$0080			MOVWF	INDF
$08E8	$	test_ronald3_L_33:
$08E8	$1303			BCF	STATUS, RP1
$08E9	$1683			BSF	STATUS, RP0
;test_ronald3.pbas,156 :: 		end if
$08EA	$	test_ronald3_L_34:
;test_ronald3.pbas,158 :: 		i=i+1
$08EA	$1283			BCF	STATUS, RP0
$08EB	$0AAB			INCF	_i, 1
$08EC	$1903			BTFSC	STATUS, Z
$08ED	$0AAC			INCF	_i+1, 1
$08EE	$28A9			GOTO	test_ronald3_L_25
$08EF	$	test_ronald3_L_26:
$08EF	$1303			BCF	STATUS, RP1
$08F0	$1283			BCF	STATUS, RP0
;test_ronald3.pbas,160 :: 		wend
$08F1	$28A1			GOTO	test_ronald3_L_20
$08F2	$	test_ronald3_L_21:
;test_ronald3.pbas,162 :: 		wend
$08F2	$	test_ronald3_L_17:
$08F2	$1303			BCF	STATUS, RP1
$08F3	$1283			BCF	STATUS, RP0
;test_ronald3.pbas,164 :: 		end if
$08F4	$	test_ronald3_L_18:
;test_ronald3.pbas,176 :: 		j = ceil(counter/tijd_per_hoek)
$08F4	$0827			MOVF	_tijd_per_hoek, 0
$08F5	$00F4			MOVWF	STACK_4
$08F6	$0828			MOVF	_tijd_per_hoek+1, 0
$08F7	$00F5			MOVWF	STACK_4+1
$08F8	$0829			MOVF	_tijd_per_hoek+2, 0
$08F9	$00F6			MOVWF	STACK_4+2
$08FA	$082A			MOVF	_tijd_per_hoek+3, 0
$08FB	$00F7			MOVWF	STACK_4+3
$08FC	$0821			MOVF	_counter, 0
$08FD	$00F0			MOVWF	STACK_0
$08FE	$0822			MOVF	_counter+1, 0
$08FF	$00F1			MOVWF	STACK_0+1
$0900	$0823			MOVF	_counter+2, 0
$0901	$00F2			MOVWF	STACK_0+2
$0902	$0824			MOVF	_counter+3, 0
$0903	$00F3			MOVWF	STACK_0+3
$0904	$118A			BCF	PCLATH, 3
$0905	$24D8			CALL	_div_32x32_fp
$0906	$158A			BSF	PCLATH, 3
$0907	$0870			MOVF	STACK_0, 0
$0908	$1683			BSF	STATUS, RP0
$0909	$00AD			MOVWF	FARG_ceil
$090A	$0871			MOVF	STACK_0+1, 0
$090B	$00AE			MOVWF	FARG_ceil+1
$090C	$0872			MOVF	STACK_0+2, 0
$090D	$00AF			MOVWF	FARG_ceil+2
$090E	$0873			MOVF	STACK_0+3, 0
$090F	$00B0			MOVWF	FARG_ceil+3
$0910	$118A			BCF	PCLATH, 3
$0911	$23F6			CALL	_ceil
$0912	$158A			BSF	PCLATH, 3
$0913	$0870			MOVF	STACK_0, 0
$0914	$00A9			MOVWF	FLOC_main+0
$0915	$0871			MOVF	STACK_0+1, 0
$0916	$00AA			MOVWF	FLOC_main+1
$0917	$0872			MOVF	STACK_0+2, 0
$0918	$00AB			MOVWF	FLOC_main+2
$0919	$0873			MOVF	STACK_0+3, 0
$091A	$00AC			MOVWF	FLOC_main+3
$091B	$0829			MOVF	FLOC_main+0, 0
$091C	$1283			BCF	STATUS, RP0
$091D	$00E1			MOVWF	_j
$091E	$1683			BSF	STATUS, RP0
$091F	$082A			MOVF	FLOC_main+1, 0
$0920	$1283			BCF	STATUS, RP0
$0921	$00E2			MOVWF	_j+1
$0922	$1683			BSF	STATUS, RP0
$0923	$082B			MOVF	FLOC_main+2, 0
$0924	$1283			BCF	STATUS, RP0
$0925	$00E3			MOVWF	_j+2
$0926	$1683			BSF	STATUS, RP0
$0927	$082C			MOVF	FLOC_main+3, 0
$0928	$1283			BCF	STATUS, RP0
$0929	$00E4			MOVWF	_j+3
;test_ronald3.pbas,180 :: 		if j < 85 then
$092A	$3055			MOVLW	85
$092B	$00F0			MOVWF	STACK_0
$092C	$118A			BCF	PCLATH, 3
$092D	$2120			CALL	_byte2double
$092E	$158A			BSF	PCLATH, 3
$092F	$0870			MOVF	STACK_0, 0
$0930	$00F4			MOVWF	STACK_4
$0931	$0871			MOVF	STACK_0+1, 0
$0932	$00F5			MOVWF	STACK_4+1
$0933	$0872			MOVF	STACK_0+2, 0
$0934	$00F6			MOVWF	STACK_4+2
$0935	$0873			MOVF	STACK_0+3, 0
$0936	$00F7			MOVWF	STACK_4+3
$0937	$1683			BSF	STATUS, RP0
$0938	$0829			MOVF	FLOC_main+0, 0
$0939	$00F0			MOVWF	STACK_0
$093A	$082A			MOVF	FLOC_main+1, 0
$093B	$00F1			MOVWF	STACK_0+1
$093C	$082B			MOVF	FLOC_main+2, 0
$093D	$00F2			MOVWF	STACK_0+2
$093E	$082C			MOVF	FLOC_main+3, 0
$093F	$00F3			MOVWF	STACK_0+3
$0940	$118A			BCF	PCLATH, 3
$0941	$2251			CALL	_compare_double
$0942	$158A			BSF	PCLATH, 3
$0943	$30FF			MOVLW	255
$0944	$1803			BTFSC	STATUS, C
$0945	$3000			MOVLW	0
$0946	$00F0			MOVWF	STACK_0
$0947	$0870			MOVF	STACK_0, 0
$0948	$1903			BTFSC	STATUS, Z
$0949	$2963			GOTO	test_ronald3_L_36
$094A	$	test_ronald3_L_35:
;test_ronald3.pbas,182 :: 		getal=   Eeprom_Read((j*3)+1)
$094A	$0861			MOVF	_j, 0
$094B	$00F0			MOVWF	STACK_0
$094C	$0862			MOVF	_j+1, 0
$094D	$00F1			MOVWF	STACK_0+1
$094E	$0863			MOVF	_j+2, 0
$094F	$00F2			MOVWF	STACK_0+2
$0950	$0864			MOVF	_j+3, 0
$0951	$00F3			MOVWF	STACK_0+3
$0952	$118A			BCF	PCLATH, 3
$0953	$2574			CALL	_double2byte
$0954	$158A			BSF	PCLATH, 3
$0955	$3003			MOVLW	3
$0956	$00F4			MOVWF	STACK_4
$0957	$118A			BCF	PCLATH, 3
$0958	$25B7			CALL	_mul_8x8_u
$0959	$158A			BSF	PCLATH, 3
$095A	$0A70			INCF	STACK_0, 0
$095B	$1683			BSF	STATUS, RP0
$095C	$00AD			MOVWF	FARG_EEprom_read
$095D	$118A			BCF	PCLATH, 3
$095E	$2493			CALL	_eeprom_read
$095F	$158A			BSF	PCLATH, 3
$0960	$0870			MOVF	STACK_0, 0
$0961	$1283			BCF	STATUS, RP0
$0962	$00E5			MOVWF	_getal
$0963	$	test_ronald3_L_36:
;test_ronald3.pbas,184 :: 		end if
$0963	$	test_ronald3_L_37:
;test_ronald3.pbas,189 :: 		if j > 84 then
$0963	$3054			MOVLW	84
$0964	$00F0			MOVWF	STACK_0
$0965	$118A			BCF	PCLATH, 3
$0966	$2120			CALL	_byte2double
$0967	$158A			BSF	PCLATH, 3
$0968	$0861			MOVF	_j, 0
$0969	$00F4			MOVWF	STACK_4
$096A	$0862			MOVF	_j+1, 0
$096B	$00F5			MOVWF	STACK_4+1
$096C	$0863			MOVF	_j+2, 0
$096D	$00F6			MOVWF	STACK_4+2
$096E	$0864			MOVF	_j+3, 0
$096F	$00F7			MOVWF	STACK_4+3
$0970	$118A			BCF	PCLATH, 3
$0971	$2251			CALL	_compare_double
$0972	$158A			BSF	PCLATH, 3
$0973	$30FF			MOVLW	255
$0974	$1803			BTFSC	STATUS, C
$0975	$3000			MOVLW	0
$0976	$00F0			MOVWF	STACK_0
$0977	$0870			MOVF	STACK_0, 0
$0978	$1903			BTFSC	STATUS, Z
$0979	$2999			GOTO	test_ronald3_L_39
$097A	$	test_ronald3_L_38:
;test_ronald3.pbas,191 :: 		getal=   received_byte2[(j*3)+1-255]
$097A	$302F			MOVLW	_received_byte2
$097B	$1683			BSF	STATUS, RP0
$097C	$00A9			MOVWF	FLOC_main+0
$097D	$1283			BCF	STATUS, RP0
$097E	$0861			MOVF	_j, 0
$097F	$00F0			MOVWF	STACK_0
$0980	$0862			MOVF	_j+1, 0
$0981	$00F1			MOVWF	STACK_0+1
$0982	$0863			MOVF	_j+2, 0
$0983	$00F2			MOVWF	STACK_0+2
$0984	$0864			MOVF	_j+3, 0
$0985	$00F3			MOVWF	STACK_0+3
$0986	$118A			BCF	PCLATH, 3
$0987	$2574			CALL	_double2byte
$0988	$158A			BSF	PCLATH, 3
$0989	$3003			MOVLW	3
$098A	$00F4			MOVWF	STACK_4
$098B	$118A			BCF	PCLATH, 3
$098C	$25B7			CALL	_mul_8x8_u
$098D	$158A			BSF	PCLATH, 3
$098E	$0AF0			INCF	STACK_0, 1
$098F	$30FF			MOVLW	255
$0990	$02F0			SUBWF	STACK_0, 1
$0991	$1683			BSF	STATUS, RP0
$0992	$0829			MOVF	FLOC_main+0, 0
$0993	$07F0			ADDWF	STACK_0, 1
$0994	$0870			MOVF	STACK_0, 0
$0995	$0084			MOVWF	FSR
$0996	$0800			MOVF	INDF, 0
$0997	$1283			BCF	STATUS, RP0
$0998	$00E5			MOVWF	_getal
$0999	$	test_ronald3_L_39:
;test_ronald3.pbas,193 :: 		end if
$0999	$	test_ronald3_L_40:
;test_ronald3.pbas,201 :: 		if getal >   127  then
$0999	$0865			MOVF	_getal, 0
$099A	$3C7F			SUBLW	127
$099B	$1803			BTFSC	STATUS, C
$099C	$29A3			GOTO	test_ronald3_L_42
$099D	$	test_ronald3_L_41:
;test_ronald3.pbas,203 :: 		bit8 = 1
$099D	$3001			MOVLW	1
$099E	$00E6			MOVWF	_bit8
$099F	$01E7			CLRF	_bit8+1
;test_ronald3.pbas,204 :: 		getal= getal-128
$09A0	$3080			MOVLW	128
$09A1	$02E5			SUBWF	_getal, 1
$09A2	$29A5			GOTO	test_ronald3_L_43
;test_ronald3.pbas,205 :: 		else   bit8=0
$09A3	$	test_ronald3_L_42:
$09A3	$01E6			CLRF	_bit8
$09A4	$01E7			CLRF	_bit8+1
;test_ronald3.pbas,206 :: 		end  if
$09A5	$	test_ronald3_L_43:
;test_ronald3.pbas,209 :: 		if getal > 63      then
$09A5	$0865			MOVF	_getal, 0
$09A6	$3C3F			SUBLW	63
$09A7	$1803			BTFSC	STATUS, C
$09A8	$29AF			GOTO	test_ronald3_L_45
$09A9	$	test_ronald3_L_44:
;test_ronald3.pbas,210 :: 		bit7=1
$09A9	$3001			MOVLW	1
$09AA	$00E8			MOVWF	_bit7
$09AB	$01E9			CLRF	_bit7+1
;test_ronald3.pbas,211 :: 		getal =  getal - 64
$09AC	$3040			MOVLW	64
$09AD	$02E5			SUBWF	_getal, 1
$09AE	$29B1			GOTO	test_ronald3_L_46
;test_ronald3.pbas,212 :: 		else bit7=0
$09AF	$	test_ronald3_L_45:
$09AF	$01E8			CLRF	_bit7
$09B0	$01E9			CLRF	_bit7+1
;test_ronald3.pbas,213 :: 		end if
$09B1	$	test_ronald3_L_46:
;test_ronald3.pbas,215 :: 		if getal > 31     then
$09B1	$0865			MOVF	_getal, 0
$09B2	$3C1F			SUBLW	31
$09B3	$1803			BTFSC	STATUS, C
$09B4	$29BB			GOTO	test_ronald3_L_48
$09B5	$	test_ronald3_L_47:
;test_ronald3.pbas,216 :: 		bit6=1
$09B5	$3001			MOVLW	1
$09B6	$00EA			MOVWF	_bit6
$09B7	$01EB			CLRF	_bit6+1
;test_ronald3.pbas,217 :: 		getal =  getal - 32
$09B8	$3020			MOVLW	32
$09B9	$02E5			SUBWF	_getal, 1
$09BA	$29BD			GOTO	test_ronald3_L_49
;test_ronald3.pbas,218 :: 		else bit6=0
$09BB	$	test_ronald3_L_48:
$09BB	$01EA			CLRF	_bit6
$09BC	$01EB			CLRF	_bit6+1
;test_ronald3.pbas,219 :: 		end if
$09BD	$	test_ronald3_L_49:
;test_ronald3.pbas,221 :: 		if getal > 15     then
$09BD	$0865			MOVF	_getal, 0
$09BE	$3C0F			SUBLW	15
$09BF	$1803			BTFSC	STATUS, C
$09C0	$29C7			GOTO	test_ronald3_L_51
$09C1	$	test_ronald3_L_50:
;test_ronald3.pbas,222 :: 		bit5=1
$09C1	$3001			MOVLW	1
$09C2	$00EC			MOVWF	_bit5
$09C3	$01ED			CLRF	_bit5+1
;test_ronald3.pbas,223 :: 		getal =  getal - 16
$09C4	$3010			MOVLW	16
$09C5	$02E5			SUBWF	_getal, 1
$09C6	$29C9			GOTO	test_ronald3_L_52
;test_ronald3.pbas,224 :: 		else bit5=0
$09C7	$	test_ronald3_L_51:
$09C7	$01EC			CLRF	_bit5
$09C8	$01ED			CLRF	_bit5+1
;test_ronald3.pbas,225 :: 		end if
$09C9	$	test_ronald3_L_52:
;test_ronald3.pbas,227 :: 		if getal > 7       then
$09C9	$0865			MOVF	_getal, 0
$09CA	$3C07			SUBLW	7
$09CB	$1803			BTFSC	STATUS, C
$09CC	$29D3			GOTO	test_ronald3_L_54
$09CD	$	test_ronald3_L_53:
;test_ronald3.pbas,228 :: 		bit4=1
$09CD	$3001			MOVLW	1
$09CE	$00EE			MOVWF	_bit4
$09CF	$01EF			CLRF	_bit4+1
;test_ronald3.pbas,229 :: 		getal =  getal - 8
$09D0	$3008			MOVLW	8
$09D1	$02E5			SUBWF	_getal, 1
$09D2	$29D5			GOTO	test_ronald3_L_55
;test_ronald3.pbas,230 :: 		else bit4=0
$09D3	$	test_ronald3_L_54:
$09D3	$01EE			CLRF	_bit4
$09D4	$01EF			CLRF	_bit4+1
;test_ronald3.pbas,231 :: 		end if
$09D5	$	test_ronald3_L_55:
;test_ronald3.pbas,233 :: 		if getal > 3        then
$09D5	$0865			MOVF	_getal, 0
$09D6	$3C03			SUBLW	3
$09D7	$1803			BTFSC	STATUS, C
$09D8	$29E1			GOTO	test_ronald3_L_57
$09D9	$	test_ronald3_L_56:
;test_ronald3.pbas,234 :: 		bit3=1
$09D9	$3001			MOVLW	1
$09DA	$1683			BSF	STATUS, RP0
$09DB	$00A0			MOVWF	_bit3
$09DC	$01A1			CLRF	_bit3+1
;test_ronald3.pbas,235 :: 		getal =  getal - 4
$09DD	$3004			MOVLW	4
$09DE	$1283			BCF	STATUS, RP0
$09DF	$02E5			SUBWF	_getal, 1
$09E0	$29E4			GOTO	test_ronald3_L_58
;test_ronald3.pbas,236 :: 		else bit3=0
$09E1	$	test_ronald3_L_57:
$09E1	$1683			BSF	STATUS, RP0
$09E2	$01A0			CLRF	_bit3
$09E3	$01A1			CLRF	_bit3+1
;test_ronald3.pbas,237 :: 		end if
$09E4	$	test_ronald3_L_58:
;test_ronald3.pbas,239 :: 		if getal > 1         then
$09E4	$1283			BCF	STATUS, RP0
$09E5	$0865			MOVF	_getal, 0
$09E6	$3C01			SUBLW	1
$09E7	$1803			BTFSC	STATUS, C
$09E8	$29F1			GOTO	test_ronald3_L_60
$09E9	$	test_ronald3_L_59:
;test_ronald3.pbas,240 :: 		bit2=1
$09E9	$3001			MOVLW	1
$09EA	$1683			BSF	STATUS, RP0
$09EB	$00A2			MOVWF	_bit2
$09EC	$01A3			CLRF	_bit2+1
;test_ronald3.pbas,241 :: 		getal =  getal - 2
$09ED	$3002			MOVLW	2
$09EE	$1283			BCF	STATUS, RP0
$09EF	$02E5			SUBWF	_getal, 1
$09F0	$29F4			GOTO	test_ronald3_L_61
;test_ronald3.pbas,242 :: 		else bit2=0
$09F1	$	test_ronald3_L_60:
$09F1	$1683			BSF	STATUS, RP0
$09F2	$01A2			CLRF	_bit2
$09F3	$01A3			CLRF	_bit2+1
;test_ronald3.pbas,243 :: 		end if
$09F4	$	test_ronald3_L_61:
;test_ronald3.pbas,245 :: 		if getal > 0        then
$09F4	$1283			BCF	STATUS, RP0
$09F5	$0865			MOVF	_getal, 0
$09F6	$3C00			SUBLW	0
$09F7	$1803			BTFSC	STATUS, C
$09F8	$29FE			GOTO	test_ronald3_L_63
$09F9	$	test_ronald3_L_62:
;test_ronald3.pbas,246 :: 		bit1=1
$09F9	$3001			MOVLW	1
$09FA	$1683			BSF	STATUS, RP0
$09FB	$00A4			MOVWF	_bit1
$09FC	$01A5			CLRF	_bit1+1
$09FD	$2A02			GOTO	test_ronald3_L_64
;test_ronald3.pbas,247 :: 		else bit1=0
$09FE	$	test_ronald3_L_63:
$09FE	$1303			BCF	STATUS, RP1
$09FF	$1683			BSF	STATUS, RP0
$0A00	$01A4			CLRF	_bit1
$0A01	$01A5			CLRF	_bit1+1
;test_ronald3.pbas,248 :: 		end if
$0A02	$	test_ronald3_L_64:
;test_ronald3.pbas,251 :: 		PORTA = bit5 + (bit6 * 2) + (bit7 * 4) + (bit8 * 8)
$0A02	$3001			MOVLW	1
$0A03	$00F4			MOVWF	STACK_4
$0A04	$1283			BCF	STATUS, RP0
$0A05	$086A			MOVF	_bit6, 0
$0A06	$00F0			MOVWF	STACK_0
$0A07	$086B			MOVF	_bit6+1, 0
$0A08	$00F1			MOVWF	STACK_0+1
$0A09	$0874			MOVF	STACK_4, 0
$0A0A	$	L_main_3:
$0A0A	$1903			BTFSC	STATUS, Z
$0A0B	$2A11			GOTO	L_main_4
$0A0C	$0DF0			RLF	STACK_0, 1
$0A0D	$0DF1			RLF	STACK_0+1, 1
$0A0E	$1070			BCF	STACK_0, 0
$0A0F	$3FFF			ADDLW	255
$0A10	$2A0A			GOTO	L_main_3
$0A11	$	L_main_4:
$0A11	$0870			MOVF	STACK_0, 0
$0A12	$076C			ADDWF	_bit5, 0
$0A13	$1683			BSF	STATUS, RP0
$0A14	$00A9			MOVWF	FLOC_main+0
$0A15	$1283			BCF	STATUS, RP0
$0A16	$086D			MOVF	_bit5+1, 0
$0A17	$1803			BTFSC	STATUS, C
$0A18	$3F01			ADDLW	1
$0A19	$0771			ADDWF	STACK_0+1, 0
$0A1A	$1683			BSF	STATUS, RP0
$0A1B	$00AA			MOVWF	FLOC_main+1
$0A1C	$3002			MOVLW	2
$0A1D	$00F4			MOVWF	STACK_4
$0A1E	$1283			BCF	STATUS, RP0
$0A1F	$0868			MOVF	_bit7, 0
$0A20	$00F0			MOVWF	STACK_0
$0A21	$0869			MOVF	_bit7+1, 0
$0A22	$00F1			MOVWF	STACK_0+1
$0A23	$0874			MOVF	STACK_4, 0
$0A24	$	L_main_5:
$0A24	$1903			BTFSC	STATUS, Z
$0A25	$2A2B			GOTO	L_main_6
$0A26	$0DF0			RLF	STACK_0, 1
$0A27	$0DF1			RLF	STACK_0+1, 1
$0A28	$1070			BCF	STACK_0, 0
$0A29	$3FFF			ADDLW	255
$0A2A	$2A24			GOTO	L_main_5
$0A2B	$	L_main_6:
$0A2B	$0870			MOVF	STACK_0, 0
$0A2C	$1683			BSF	STATUS, RP0
$0A2D	$07A9			ADDWF	FLOC_main+0, 1
$0A2E	$0871			MOVF	STACK_0+1, 0
$0A2F	$1803			BTFSC	STATUS, C
$0A30	$3F01			ADDLW	1
$0A31	$07AA			ADDWF	FLOC_main+1, 1
$0A32	$3003			MOVLW	3
$0A33	$00F4			MOVWF	STACK_4
$0A34	$1283			BCF	STATUS, RP0
$0A35	$0866			MOVF	_bit8, 0
$0A36	$00F0			MOVWF	STACK_0
$0A37	$0867			MOVF	_bit8+1, 0
$0A38	$00F1			MOVWF	STACK_0+1
$0A39	$0874			MOVF	STACK_4, 0
$0A3A	$	L_main_7:
$0A3A	$1903			BTFSC	STATUS, Z
$0A3B	$2A41			GOTO	L_main_8
$0A3C	$0DF0			RLF	STACK_0, 1
$0A3D	$0DF1			RLF	STACK_0+1, 1
$0A3E	$1070			BCF	STACK_0, 0
$0A3F	$3FFF			ADDLW	255
$0A40	$2A3A			GOTO	L_main_7
$0A41	$	L_main_8:
$0A41	$1683			BSF	STATUS, RP0
$0A42	$0829			MOVF	FLOC_main+0, 0
$0A43	$07F0			ADDWF	STACK_0, 1
$0A44	$082A			MOVF	FLOC_main+1, 0
$0A45	$1803			BTFSC	STATUS, C
$0A46	$3F01			ADDLW	1
$0A47	$07F1			ADDWF	STACK_0+1, 1
$0A48	$0870			MOVF	STACK_0, 0
$0A49	$1283			BCF	STATUS, RP0
$0A4A	$0085			MOVWF	PORTA
;test_ronald3.pbas,252 :: 		PORTB = 0    + (bit2 * 2) + (bit3 * 4) + (bit4 * 8)  + (bit1 * 16)
$0A4B	$3001			MOVLW	1
$0A4C	$00F4			MOVWF	STACK_4
$0A4D	$1683			BSF	STATUS, RP0
$0A4E	$0822			MOVF	_bit2, 0
$0A4F	$00A9			MOVWF	FLOC_main+0
$0A50	$0823			MOVF	_bit2+1, 0
$0A51	$00AA			MOVWF	FLOC_main+1
$0A52	$0874			MOVF	STACK_4, 0
$0A53	$	L_main_9:
$0A53	$1903			BTFSC	STATUS, Z
$0A54	$2A5A			GOTO	L_main_10
$0A55	$0DA9			RLF	FLOC_main+0, 1
$0A56	$0DAA			RLF	FLOC_main+1, 1
$0A57	$1029			BCF	FLOC_main+0, 0
$0A58	$3FFF			ADDLW	255
$0A59	$2A53			GOTO	L_main_9
$0A5A	$	L_main_10:
$0A5A	$3002			MOVLW	2
$0A5B	$00F4			MOVWF	STACK_4
$0A5C	$0820			MOVF	_bit3, 0
$0A5D	$00F0			MOVWF	STACK_0
$0A5E	$0821			MOVF	_bit3+1, 0
$0A5F	$00F1			MOVWF	STACK_0+1
$0A60	$0874			MOVF	STACK_4, 0
$0A61	$	L_main_11:
$0A61	$1903			BTFSC	STATUS, Z
$0A62	$2A68			GOTO	L_main_12
$0A63	$0DF0			RLF	STACK_0, 1
$0A64	$0DF1			RLF	STACK_0+1, 1
$0A65	$1070			BCF	STACK_0, 0
$0A66	$3FFF			ADDLW	255
$0A67	$2A61			GOTO	L_main_11
$0A68	$	L_main_12:
$0A68	$0870			MOVF	STACK_0, 0
$0A69	$07A9			ADDWF	FLOC_main+0, 1
$0A6A	$0871			MOVF	STACK_0+1, 0
$0A6B	$1803			BTFSC	STATUS, C
$0A6C	$3F01			ADDLW	1
$0A6D	$07AA			ADDWF	FLOC_main+1, 1
$0A6E	$3003			MOVLW	3
$0A6F	$00F4			MOVWF	STACK_4
$0A70	$1283			BCF	STATUS, RP0
$0A71	$086E			MOVF	_bit4, 0
$0A72	$00F0			MOVWF	STACK_0
$0A73	$086F			MOVF	_bit4+1, 0
$0A74	$00F1			MOVWF	STACK_0+1
$0A75	$0874			MOVF	STACK_4, 0
$0A76	$	L_main_13:
$0A76	$1903			BTFSC	STATUS, Z
$0A77	$2A7D			GOTO	L_main_14
$0A78	$0DF0			RLF	STACK_0, 1
$0A79	$0DF1			RLF	STACK_0+1, 1
$0A7A	$1070			BCF	STACK_0, 0
$0A7B	$3FFF			ADDLW	255
$0A7C	$2A76			GOTO	L_main_13
$0A7D	$	L_main_14:
$0A7D	$0870			MOVF	STACK_0, 0
$0A7E	$1683			BSF	STATUS, RP0
$0A7F	$07A9			ADDWF	FLOC_main+0, 1
$0A80	$0871			MOVF	STACK_0+1, 0
$0A81	$1803			BTFSC	STATUS, C
$0A82	$3F01			ADDLW	1
$0A83	$07AA			ADDWF	FLOC_main+1, 1
$0A84	$3004			MOVLW	4
$0A85	$00F4			MOVWF	STACK_4
$0A86	$0824			MOVF	_bit1, 0
$0A87	$00F0			MOVWF	STACK_0
$0A88	$0825			MOVF	_bit1+1, 0
$0A89	$00F1			MOVWF	STACK_0+1
$0A8A	$0874			MOVF	STACK_4, 0
$0A8B	$	L_main_15:
$0A8B	$1903			BTFSC	STATUS, Z
$0A8C	$2A92			GOTO	L_main_16
$0A8D	$0DF0			RLF	STACK_0, 1
$0A8E	$0DF1			RLF	STACK_0+1, 1
$0A8F	$1070			BCF	STACK_0, 0
$0A90	$3FFF			ADDLW	255
$0A91	$2A8B			GOTO	L_main_15
$0A92	$	L_main_16:
$0A92	$0829			MOVF	FLOC_main+0, 0
$0A93	$07F0			ADDWF	STACK_0, 1
$0A94	$082A			MOVF	FLOC_main+1, 0
$0A95	$1803			BTFSC	STATUS, C
$0A96	$3F01			ADDLW	1
$0A97	$07F1			ADDWF	STACK_0+1, 1
$0A98	$0870			MOVF	STACK_0, 0
$0A99	$1283			BCF	STATUS, RP0
$0A9A	$0086			MOVWF	PORTB
;test_ronald3.pbas,255 :: 		if op_sensor = false then
$0A9B	$082D			MOVF	_op_sensor, 0
$0A9C	$3A00			XORLW	0
$0A9D	$1D03			BTFSS	STATUS, Z
$0A9E	$2AD6			GOTO	test_ronald3_L_66
$0A9F	$	test_ronald3_L_65:
;test_ronald3.pbas,256 :: 		if PORTB.0 = 1 then
$0A9F	$3001			MOVLW	1
$0AA0	$0506			ANDWF	PORTB, 0
$0AA1	$00F4			MOVWF	STACK_4
$0AA2	$0874			MOVF	STACK_4, 0
$0AA3	$3A01			XORLW	1
$0AA4	$1D03			BTFSS	STATUS, Z
$0AA5	$2AD6			GOTO	test_ronald3_L_69
$0AA6	$	test_ronald3_L_68:
;test_ronald3.pbas,259 :: 		tijd_per_hoek  = counter / aantalhoeken
$0AA6	$0825			MOVF	_aantalhoeken, 0
$0AA7	$00F0			MOVWF	STACK_0
$0AA8	$0826			MOVF	_aantalhoeken+1, 0
$0AA9	$00F1			MOVWF	STACK_0+1
$0AAA	$118A			BCF	PCLATH, 3
$0AAB	$24BA			CALL	_int2double
$0AAC	$158A			BSF	PCLATH, 3
$0AAD	$0870			MOVF	STACK_0, 0
$0AAE	$00F4			MOVWF	STACK_4
$0AAF	$0871			MOVF	STACK_0+1, 0
$0AB0	$00F5			MOVWF	STACK_4+1
$0AB1	$0872			MOVF	STACK_0+2, 0
$0AB2	$00F6			MOVWF	STACK_4+2
$0AB3	$0873			MOVF	STACK_0+3, 0
$0AB4	$00F7			MOVWF	STACK_4+3
$0AB5	$0821			MOVF	_counter, 0
$0AB6	$00F0			MOVWF	STACK_0
$0AB7	$0822			MOVF	_counter+1, 0
$0AB8	$00F1			MOVWF	STACK_0+1
$0AB9	$0823			MOVF	_counter+2, 0
$0ABA	$00F2			MOVWF	STACK_0+2
$0ABB	$0824			MOVF	_counter+3, 0
$0ABC	$00F3			MOVWF	STACK_0+3
$0ABD	$118A			BCF	PCLATH, 3
$0ABE	$24D8			CALL	_div_32x32_fp
$0ABF	$158A			BSF	PCLATH, 3
$0AC0	$0870			MOVF	STACK_0, 0
$0AC1	$00A7			MOVWF	_tijd_per_hoek
$0AC2	$0871			MOVF	STACK_0+1, 0
$0AC3	$00A8			MOVWF	_tijd_per_hoek+1
$0AC4	$0872			MOVF	STACK_0+2, 0
$0AC5	$00A9			MOVWF	_tijd_per_hoek+2
$0AC6	$0873			MOVF	STACK_0+3, 0
$0AC7	$00AA			MOVWF	_tijd_per_hoek+3
;test_ronald3.pbas,260 :: 		counter = 0
$0AC8	$01F0			CLRF	STACK_0, 1
$0AC9	$118A			BCF	PCLATH, 3
$0ACA	$2120			CALL	_byte2double
$0ACB	$158A			BSF	PCLATH, 3
$0ACC	$0870			MOVF	STACK_0, 0
$0ACD	$00A1			MOVWF	_counter
$0ACE	$0871			MOVF	STACK_0+1, 0
$0ACF	$00A2			MOVWF	_counter+1
$0AD0	$0872			MOVF	STACK_0+2, 0
$0AD1	$00A3			MOVWF	_counter+2
$0AD2	$0873			MOVF	STACK_0+3, 0
$0AD3	$00A4			MOVWF	_counter+3
;test_ronald3.pbas,261 :: 		op_sensor= true
$0AD4	$30FF			MOVLW	255
$0AD5	$00AD			MOVWF	_op_sensor
$0AD6	$	test_ronald3_L_69:
;test_ronald3.pbas,264 :: 		end if
$0AD6	$	test_ronald3_L_70:
$0AD6	$	test_ronald3_L_66:
;test_ronald3.pbas,265 :: 		end if
$0AD6	$	test_ronald3_L_67:
;test_ronald3.pbas,267 :: 		if PORTB.0 = 0 then
$0AD6	$3001			MOVLW	1
$0AD7	$0506			ANDWF	PORTB, 0
$0AD8	$00F4			MOVWF	STACK_4
$0AD9	$0874			MOVF	STACK_4, 0
$0ADA	$3A00			XORLW	0
$0ADB	$1D03			BTFSS	STATUS, Z
$0ADC	$2ADE			GOTO	test_ronald3_L_72
$0ADD	$	test_ronald3_L_71:
;test_ronald3.pbas,268 :: 		op_sensor = false
$0ADD	$01AD			CLRF	_op_sensor, 1
$0ADE	$	test_ronald3_L_72:
;test_ronald3.pbas,269 :: 		end if
$0ADE	$	test_ronald3_L_73:
;test_ronald3.pbas,271 :: 		counter = counter+1
$0ADE	$3001			MOVLW	1
$0ADF	$00F0			MOVWF	STACK_0
$0AE0	$118A			BCF	PCLATH, 3
$0AE1	$2120			CALL	_byte2double
$0AE2	$158A			BSF	PCLATH, 3
$0AE3	$0821			MOVF	_counter, 0
$0AE4	$00F4			MOVWF	STACK_4
$0AE5	$0822			MOVF	_counter+1, 0
$0AE6	$00F5			MOVWF	STACK_4+1
$0AE7	$0823			MOVF	_counter+2, 0
$0AE8	$00F6			MOVWF	STACK_4+2
$0AE9	$0824			MOVF	_counter+3, 0
$0AEA	$00F7			MOVWF	STACK_4+3
$0AEB	$118A			BCF	PCLATH, 3
$0AEC	$2130			CALL	_add_32x32_fp
$0AED	$158A			BSF	PCLATH, 3
$0AEE	$0870			MOVF	STACK_0, 0
$0AEF	$00A1			MOVWF	_counter
$0AF0	$0871			MOVF	STACK_0+1, 0
$0AF1	$00A2			MOVWF	_counter+1
$0AF2	$0872			MOVF	STACK_0+2, 0
$0AF3	$00A3			MOVWF	_counter+2
$0AF4	$0873			MOVF	STACK_0+3, 0
$0AF5	$00A4			MOVWF	_counter+3
;test_ronald3.pbas,276 :: 		if j < 85 then
$0AF6	$3055			MOVLW	85
$0AF7	$00F0			MOVWF	STACK_0
$0AF8	$118A			BCF	PCLATH, 3
$0AF9	$2120			CALL	_byte2double
$0AFA	$158A			BSF	PCLATH, 3
$0AFB	$0870			MOVF	STACK_0, 0
$0AFC	$00F4			MOVWF	STACK_4
$0AFD	$0871			MOVF	STACK_0+1, 0
$0AFE	$00F5			MOVWF	STACK_4+1
$0AFF	$0872			MOVF	STACK_0+2, 0
$0B00	$00F6			MOVWF	STACK_4+2
$0B01	$0873			MOVF	STACK_0+3, 0
$0B02	$00F7			MOVWF	STACK_4+3
$0B03	$0861			MOVF	_j, 0
$0B04	$00F0			MOVWF	STACK_0
$0B05	$0862			MOVF	_j+1, 0
$0B06	$00F1			MOVWF	STACK_0+1
$0B07	$0863			MOVF	_j+2, 0
$0B08	$00F2			MOVWF	STACK_0+2
$0B09	$0864			MOVF	_j+3, 0
$0B0A	$00F3			MOVWF	STACK_0+3
$0B0B	$118A			BCF	PCLATH, 3
$0B0C	$2251			CALL	_compare_double
$0B0D	$158A			BSF	PCLATH, 3
$0B0E	$30FF			MOVLW	255
$0B0F	$1803			BTFSC	STATUS, C
$0B10	$3000			MOVLW	0
$0B11	$00F0			MOVWF	STACK_0
$0B12	$0870			MOVF	STACK_0, 0
$0B13	$1903			BTFSC	STATUS, Z
$0B14	$2B2F			GOTO	test_ronald3_L_75
$0B15	$	test_ronald3_L_74:
;test_ronald3.pbas,278 :: 		getal=   Eeprom_Read((j*3)+2)
$0B15	$0861			MOVF	_j, 0
$0B16	$00F0			MOVWF	STACK_0
$0B17	$0862			MOVF	_j+1, 0
$0B18	$00F1			MOVWF	STACK_0+1
$0B19	$0863			MOVF	_j+2, 0
$0B1A	$00F2			MOVWF	STACK_0+2
$0B1B	$0864			MOVF	_j+3, 0
$0B1C	$00F3			MOVWF	STACK_0+3
$0B1D	$118A			BCF	PCLATH, 3
$0B1E	$2574			CALL	_double2byte
$0B1F	$158A			BSF	PCLATH, 3
$0B20	$3003			MOVLW	3
$0B21	$00F4			MOVWF	STACK_4
$0B22	$118A			BCF	PCLATH, 3
$0B23	$25B7			CALL	_mul_8x8_u
$0B24	$158A			BSF	PCLATH, 3
$0B25	$3002			MOVLW	2
$0B26	$0770			ADDWF	STACK_0, 0
$0B27	$1683			BSF	STATUS, RP0
$0B28	$00AD			MOVWF	FARG_EEprom_read
$0B29	$118A			BCF	PCLATH, 3
$0B2A	$2493			CALL	_eeprom_read
$0B2B	$158A			BSF	PCLATH, 3
$0B2C	$0870			MOVF	STACK_0, 0
$0B2D	$1283			BCF	STATUS, RP0
$0B2E	$00E5			MOVWF	_getal
$0B2F	$	test_ronald3_L_75:
;test_ronald3.pbas,280 :: 		end if
$0B2F	$	test_ronald3_L_76:
;test_ronald3.pbas,285 :: 		if j > 84 then
$0B2F	$3054			MOVLW	84
$0B30	$00F0			MOVWF	STACK_0
$0B31	$118A			BCF	PCLATH, 3
$0B32	$2120			CALL	_byte2double
$0B33	$158A			BSF	PCLATH, 3
$0B34	$0861			MOVF	_j, 0
$0B35	$00F4			MOVWF	STACK_4
$0B36	$0862			MOVF	_j+1, 0
$0B37	$00F5			MOVWF	STACK_4+1
$0B38	$0863			MOVF	_j+2, 0
$0B39	$00F6			MOVWF	STACK_4+2
$0B3A	$0864			MOVF	_j+3, 0
$0B3B	$00F7			MOVWF	STACK_4+3
$0B3C	$118A			BCF	PCLATH, 3
$0B3D	$2251			CALL	_compare_double
$0B3E	$158A			BSF	PCLATH, 3
$0B3F	$30FF			MOVLW	255
$0B40	$1803			BTFSC	STATUS, C
$0B41	$3000			MOVLW	0
$0B42	$00F0			MOVWF	STACK_0
$0B43	$0870			MOVF	STACK_0, 0
$0B44	$1903			BTFSC	STATUS, Z
$0B45	$2B66			GOTO	test_ronald3_L_78
$0B46	$	test_ronald3_L_77:
;test_ronald3.pbas,287 :: 		getal=   received_byte2[(j*3)+2-255]
$0B46	$302F			MOVLW	_received_byte2
$0B47	$1683			BSF	STATUS, RP0
$0B48	$00A9			MOVWF	FLOC_main+0
$0B49	$1283			BCF	STATUS, RP0
$0B4A	$0861			MOVF	_j, 0
$0B4B	$00F0			MOVWF	STACK_0
$0B4C	$0862			MOVF	_j+1, 0
$0B4D	$00F1			MOVWF	STACK_0+1
$0B4E	$0863			MOVF	_j+2, 0
$0B4F	$00F2			MOVWF	STACK_0+2
$0B50	$0864			MOVF	_j+3, 0
$0B51	$00F3			MOVWF	STACK_0+3
$0B52	$118A			BCF	PCLATH, 3
$0B53	$2574			CALL	_double2byte
$0B54	$158A			BSF	PCLATH, 3
$0B55	$3003			MOVLW	3
$0B56	$00F4			MOVWF	STACK_4
$0B57	$118A			BCF	PCLATH, 3
$0B58	$25B7			CALL	_mul_8x8_u
$0B59	$158A			BSF	PCLATH, 3
$0B5A	$3002			MOVLW	2
$0B5B	$07F0			ADDWF	STACK_0, 1
$0B5C	$30FF			MOVLW	255
$0B5D	$02F0			SUBWF	STACK_0, 1
$0B5E	$1683			BSF	STATUS, RP0
$0B5F	$0829			MOVF	FLOC_main+0, 0
$0B60	$07F0			ADDWF	STACK_0, 1
$0B61	$0870			MOVF	STACK_0, 0
$0B62	$0084			MOVWF	FSR
$0B63	$0800			MOVF	INDF, 0
$0B64	$1283			BCF	STATUS, RP0
$0B65	$00E5			MOVWF	_getal
$0B66	$	test_ronald3_L_78:
;test_ronald3.pbas,289 :: 		end if
$0B66	$	test_ronald3_L_79:
;test_ronald3.pbas,294 :: 		if getal >   127      then
$0B66	$0865			MOVF	_getal, 0
$0B67	$3C7F			SUBLW	127
$0B68	$1803			BTFSC	STATUS, C
$0B69	$2B70			GOTO	test_ronald3_L_81
$0B6A	$	test_ronald3_L_80:
;test_ronald3.pbas,296 :: 		bit8 = 1
$0B6A	$3001			MOVLW	1
$0B6B	$00E6			MOVWF	_bit8
$0B6C	$01E7			CLRF	_bit8+1
;test_ronald3.pbas,297 :: 		getal= getal-128
$0B6D	$3080			MOVLW	128
$0B6E	$02E5			SUBWF	_getal, 1
$0B6F	$2B72			GOTO	test_ronald3_L_82
;test_ronald3.pbas,298 :: 		else   bit8=0
$0B70	$	test_ronald3_L_81:
$0B70	$01E6			CLRF	_bit8
$0B71	$01E7			CLRF	_bit8+1
;test_ronald3.pbas,299 :: 		end  if
$0B72	$	test_ronald3_L_82:
;test_ronald3.pbas,302 :: 		if getal > 63       then
$0B72	$0865			MOVF	_getal, 0
$0B73	$3C3F			SUBLW	63
$0B74	$1803			BTFSC	STATUS, C
$0B75	$2B7C			GOTO	test_ronald3_L_84
$0B76	$	test_ronald3_L_83:
;test_ronald3.pbas,303 :: 		bit7=1
$0B76	$3001			MOVLW	1
$0B77	$00E8			MOVWF	_bit7
$0B78	$01E9			CLRF	_bit7+1
;test_ronald3.pbas,304 :: 		getal =  getal - 64
$0B79	$3040			MOVLW	64
$0B7A	$02E5			SUBWF	_getal, 1
$0B7B	$2B7E			GOTO	test_ronald3_L_85
;test_ronald3.pbas,305 :: 		else bit7=0
$0B7C	$	test_ronald3_L_84:
$0B7C	$01E8			CLRF	_bit7
$0B7D	$01E9			CLRF	_bit7+1
;test_ronald3.pbas,306 :: 		end if
$0B7E	$	test_ronald3_L_85:
;test_ronald3.pbas,308 :: 		if getal > 31       then
$0B7E	$0865			MOVF	_getal, 0
$0B7F	$3C1F			SUBLW	31
$0B80	$1803			BTFSC	STATUS, C
$0B81	$2B88			GOTO	test_ronald3_L_87
$0B82	$	test_ronald3_L_86:
;test_ronald3.pbas,309 :: 		bit6=1
$0B82	$3001			MOVLW	1
$0B83	$00EA			MOVWF	_bit6
$0B84	$01EB			CLRF	_bit6+1
;test_ronald3.pbas,310 :: 		getal =  getal - 32
$0B85	$3020			MOVLW	32
$0B86	$02E5			SUBWF	_getal, 1
$0B87	$2B8A			GOTO	test_ronald3_L_88
;test_ronald3.pbas,311 :: 		else bit6=0
$0B88	$	test_ronald3_L_87:
$0B88	$01EA			CLRF	_bit6
$0B89	$01EB			CLRF	_bit6+1
;test_ronald3.pbas,312 :: 		end if
$0B8A	$	test_ronald3_L_88:
;test_ronald3.pbas,314 :: 		if getal > 15        then
$0B8A	$0865			MOVF	_getal, 0
$0B8B	$3C0F			SUBLW	15
$0B8C	$1803			BTFSC	STATUS, C
$0B8D	$2B94			GOTO	test_ronald3_L_90
$0B8E	$	test_ronald3_L_89:
;test_ronald3.pbas,315 :: 		bit5=1
$0B8E	$3001			MOVLW	1
$0B8F	$00EC			MOVWF	_bit5
$0B90	$01ED			CLRF	_bit5+1
;test_ronald3.pbas,316 :: 		getal =  getal - 16
$0B91	$3010			MOVLW	16
$0B92	$02E5			SUBWF	_getal, 1
$0B93	$2B96			GOTO	test_ronald3_L_91
;test_ronald3.pbas,317 :: 		else bit5=0
$0B94	$	test_ronald3_L_90:
$0B94	$01EC			CLRF	_bit5
$0B95	$01ED			CLRF	_bit5+1
;test_ronald3.pbas,318 :: 		end if
$0B96	$	test_ronald3_L_91:
;test_ronald3.pbas,320 :: 		if getal > 7         then
$0B96	$0865			MOVF	_getal, 0
$0B97	$3C07			SUBLW	7
$0B98	$1803			BTFSC	STATUS, C
$0B99	$2BA0			GOTO	test_ronald3_L_93
$0B9A	$	test_ronald3_L_92:
;test_ronald3.pbas,321 :: 		bit4=1
$0B9A	$3001			MOVLW	1
$0B9B	$00EE			MOVWF	_bit4
$0B9C	$01EF			CLRF	_bit4+1
;test_ronald3.pbas,322 :: 		getal =  getal - 8
$0B9D	$3008			MOVLW	8
$0B9E	$02E5			SUBWF	_getal, 1
$0B9F	$2BA2			GOTO	test_ronald3_L_94
;test_ronald3.pbas,323 :: 		else bit4=0
$0BA0	$	test_ronald3_L_93:
$0BA0	$01EE			CLRF	_bit4
$0BA1	$01EF			CLRF	_bit4+1
;test_ronald3.pbas,324 :: 		end if
$0BA2	$	test_ronald3_L_94:
;test_ronald3.pbas,326 :: 		if getal > 3         then
$0BA2	$0865			MOVF	_getal, 0
$0BA3	$3C03			SUBLW	3
$0BA4	$1803			BTFSC	STATUS, C
$0BA5	$2BAE			GOTO	test_ronald3_L_96
$0BA6	$	test_ronald3_L_95:
;test_ronald3.pbas,327 :: 		bit3=1
$0BA6	$3001			MOVLW	1
$0BA7	$1683			BSF	STATUS, RP0
$0BA8	$00A0			MOVWF	_bit3
$0BA9	$01A1			CLRF	_bit3+1
;test_ronald3.pbas,328 :: 		getal =  getal - 4
$0BAA	$3004			MOVLW	4
$0BAB	$1283			BCF	STATUS, RP0
$0BAC	$02E5			SUBWF	_getal, 1
$0BAD	$2BB1			GOTO	test_ronald3_L_97
;test_ronald3.pbas,329 :: 		else bit3=0
$0BAE	$	test_ronald3_L_96:
$0BAE	$1683			BSF	STATUS, RP0
$0BAF	$01A0			CLRF	_bit3
$0BB0	$01A1			CLRF	_bit3+1
;test_ronald3.pbas,330 :: 		end if
$0BB1	$	test_ronald3_L_97:
;test_ronald3.pbas,332 :: 		if getal > 1         then
$0BB1	$1283			BCF	STATUS, RP0
$0BB2	$0865			MOVF	_getal, 0
$0BB3	$3C01			SUBLW	1
$0BB4	$1803			BTFSC	STATUS, C
$0BB5	$2BBE			GOTO	test_ronald3_L_99
$0BB6	$	test_ronald3_L_98:
;test_ronald3.pbas,333 :: 		bit2=1
$0BB6	$3001			MOVLW	1
$0BB7	$1683			BSF	STATUS, RP0
$0BB8	$00A2			MOVWF	_bit2
$0BB9	$01A3			CLRF	_bit2+1
;test_ronald3.pbas,334 :: 		getal =  getal - 2
$0BBA	$3002			MOVLW	2
$0BBB	$1283			BCF	STATUS, RP0
$0BBC	$02E5			SUBWF	_getal, 1
$0BBD	$2BC1			GOTO	test_ronald3_L_100
;test_ronald3.pbas,335 :: 		else bit2=0
$0BBE	$	test_ronald3_L_99:
$0BBE	$1683			BSF	STATUS, RP0
$0BBF	$01A2			CLRF	_bit2
$0BC0	$01A3			CLRF	_bit2+1
;test_ronald3.pbas,336 :: 		end if
$0BC1	$	test_ronald3_L_100:
;test_ronald3.pbas,338 :: 		if getal > 0         then
$0BC1	$1283			BCF	STATUS, RP0
$0BC2	$0865			MOVF	_getal, 0
$0BC3	$3C00			SUBLW	0
$0BC4	$1803			BTFSC	STATUS, C
$0BC5	$2BCB			GOTO	test_ronald3_L_102
$0BC6	$	test_ronald3_L_101:
;test_ronald3.pbas,339 :: 		bit1=1
$0BC6	$3001			MOVLW	1
$0BC7	$1683			BSF	STATUS, RP0
$0BC8	$00A4			MOVWF	_bit1
$0BC9	$01A5			CLRF	_bit1+1
$0BCA	$2BCF			GOTO	test_ronald3_L_103
;test_ronald3.pbas,340 :: 		else bit1=0
$0BCB	$	test_ronald3_L_102:
$0BCB	$1303			BCF	STATUS, RP1
$0BCC	$1683			BSF	STATUS, RP0
$0BCD	$01A4			CLRF	_bit1
$0BCE	$01A5			CLRF	_bit1+1
;test_ronald3.pbas,341 :: 		end if
$0BCF	$	test_ronald3_L_103:
;test_ronald3.pbas,346 :: 		PORTE = bit8+ (bit7 * 2)
$0BCF	$3001			MOVLW	1
$0BD0	$00F4			MOVWF	STACK_4
$0BD1	$1283			BCF	STATUS, RP0
$0BD2	$0868			MOVF	_bit7, 0
$0BD3	$00F0			MOVWF	STACK_0
$0BD4	$0869			MOVF	_bit7+1, 0
$0BD5	$00F1			MOVWF	STACK_0+1
$0BD6	$0874			MOVF	STACK_4, 0
$0BD7	$	L_main_17:
$0BD7	$1903			BTFSC	STATUS, Z
$0BD8	$2BDE			GOTO	L_main_18
$0BD9	$0DF0			RLF	STACK_0, 1
$0BDA	$0DF1			RLF	STACK_0+1, 1
$0BDB	$1070			BCF	STACK_0, 0
$0BDC	$3FFF			ADDLW	255
$0BDD	$2BD7			GOTO	L_main_17
$0BDE	$	L_main_18:
$0BDE	$0866			MOVF	_bit8, 0
$0BDF	$07F0			ADDWF	STACK_0, 1
$0BE0	$0867			MOVF	_bit8+1, 0
$0BE1	$1803			BTFSC	STATUS, C
$0BE2	$3F01			ADDLW	1
$0BE3	$07F1			ADDWF	STACK_0+1, 1
$0BE4	$0870			MOVF	STACK_0, 0
$0BE5	$0089			MOVWF	PORTE
;test_ronald3.pbas,347 :: 		PORTC = bit1 + (bit2 * 2) + (bit3 * 4) + (bit4 * 8) + (bit5 * 16) + (bit6 * 32)
$0BE6	$3001			MOVLW	1
$0BE7	$00F4			MOVWF	STACK_4
$0BE8	$1683			BSF	STATUS, RP0
$0BE9	$0822			MOVF	_bit2, 0
$0BEA	$00F0			MOVWF	STACK_0
$0BEB	$0823			MOVF	_bit2+1, 0
$0BEC	$00F1			MOVWF	STACK_0+1
$0BED	$0874			MOVF	STACK_4, 0
$0BEE	$	L_main_19:
$0BEE	$1903			BTFSC	STATUS, Z
$0BEF	$2BF5			GOTO	L_main_20
$0BF0	$0DF0			RLF	STACK_0, 1
$0BF1	$0DF1			RLF	STACK_0+1, 1
$0BF2	$1070			BCF	STACK_0, 0
$0BF3	$3FFF			ADDLW	255
$0BF4	$2BEE			GOTO	L_main_19
$0BF5	$	L_main_20:
$0BF5	$0870			MOVF	STACK_0, 0
$0BF6	$0724			ADDWF	_bit1, 0
$0BF7	$00A9			MOVWF	FLOC_main+0
$0BF8	$0825			MOVF	_bit1+1, 0
$0BF9	$1803			BTFSC	STATUS, C
$0BFA	$3F01			ADDLW	1
$0BFB	$0771			ADDWF	STACK_0+1, 0
$0BFC	$00AA			MOVWF	FLOC_main+1
$0BFD	$3002			MOVLW	2
$0BFE	$00F4			MOVWF	STACK_4
$0BFF	$0820			MOVF	_bit3, 0
$0C00	$00F0			MOVWF	STACK_0
$0C01	$0821			MOVF	_bit3+1, 0
$0C02	$00F1			MOVWF	STACK_0+1
$0C03	$0874			MOVF	STACK_4, 0
$0C04	$	L_main_21:
$0C04	$1903			BTFSC	STATUS, Z
$0C05	$2C0B			GOTO	L_main_22
$0C06	$0DF0			RLF	STACK_0, 1
$0C07	$0DF1			RLF	STACK_0+1, 1
$0C08	$1070			BCF	STACK_0, 0
$0C09	$3FFF			ADDLW	255
$0C0A	$2C04			GOTO	L_main_21
$0C0B	$	L_main_22:
$0C0B	$0870			MOVF	STACK_0, 0
$0C0C	$07A9			ADDWF	FLOC_main+0, 1
$0C0D	$0871			MOVF	STACK_0+1, 0
$0C0E	$1803			BTFSC	STATUS, C
$0C0F	$3F01			ADDLW	1
$0C10	$07AA			ADDWF	FLOC_main+1, 1
$0C11	$3003			MOVLW	3
$0C12	$00F4			MOVWF	STACK_4
$0C13	$1283			BCF	STATUS, RP0
$0C14	$086E			MOVF	_bit4, 0
$0C15	$00F0			MOVWF	STACK_0
$0C16	$086F			MOVF	_bit4+1, 0
$0C17	$00F1			MOVWF	STACK_0+1
$0C18	$0874			MOVF	STACK_4, 0
$0C19	$	L_main_23:
$0C19	$1903			BTFSC	STATUS, Z
$0C1A	$2C20			GOTO	L_main_24
$0C1B	$0DF0			RLF	STACK_0, 1
$0C1C	$0DF1			RLF	STACK_0+1, 1
$0C1D	$1070			BCF	STACK_0, 0
$0C1E	$3FFF			ADDLW	255
$0C1F	$2C19			GOTO	L_main_23
$0C20	$	L_main_24:
$0C20	$0870			MOVF	STACK_0, 0
$0C21	$1683			BSF	STATUS, RP0
$0C22	$07A9			ADDWF	FLOC_main+0, 1
$0C23	$0871			MOVF	STACK_0+1, 0
$0C24	$1803			BTFSC	STATUS, C
$0C25	$3F01			ADDLW	1
$0C26	$07AA			ADDWF	FLOC_main+1, 1
$0C27	$3004			MOVLW	4
$0C28	$00F4			MOVWF	STACK_4
$0C29	$1283			BCF	STATUS, RP0
$0C2A	$086C			MOVF	_bit5, 0
$0C2B	$00F0			MOVWF	STACK_0
$0C2C	$086D			MOVF	_bit5+1, 0
$0C2D	$00F1			MOVWF	STACK_0+1
$0C2E	$0874			MOVF	STACK_4, 0
$0C2F	$	L_main_25:
$0C2F	$1903			BTFSC	STATUS, Z
$0C30	$2C36			GOTO	L_main_26
$0C31	$0DF0			RLF	STACK_0, 1
$0C32	$0DF1			RLF	STACK_0+1, 1
$0C33	$1070			BCF	STACK_0, 0
$0C34	$3FFF			ADDLW	255
$0C35	$2C2F			GOTO	L_main_25
$0C36	$	L_main_26:
$0C36	$0870			MOVF	STACK_0, 0
$0C37	$1683			BSF	STATUS, RP0
$0C38	$07A9			ADDWF	FLOC_main+0, 1
$0C39	$0871			MOVF	STACK_0+1, 0
$0C3A	$1803			BTFSC	STATUS, C
$0C3B	$3F01			ADDLW	1
$0C3C	$07AA			ADDWF	FLOC_main+1, 1
$0C3D	$3005			MOVLW	5
$0C3E	$00F4			MOVWF	STACK_4
$0C3F	$1283			BCF	STATUS, RP0
$0C40	$086A			MOVF	_bit6, 0
$0C41	$00F0			MOVWF	STACK_0
$0C42	$086B			MOVF	_bit6+1, 0
$0C43	$00F1			MOVWF	STACK_0+1
$0C44	$0874			MOVF	STACK_4, 0
$0C45	$	L_main_27:
$0C45	$1903			BTFSC	STATUS, Z
$0C46	$2C4C			GOTO	L_main_28
$0C47	$0DF0			RLF	STACK_0, 1
$0C48	$0DF1			RLF	STACK_0+1, 1
$0C49	$1070			BCF	STACK_0, 0
$0C4A	$3FFF			ADDLW	255
$0C4B	$2C45			GOTO	L_main_27
$0C4C	$	L_main_28:
$0C4C	$1683			BSF	STATUS, RP0
$0C4D	$0829			MOVF	FLOC_main+0, 0
$0C4E	$07F0			ADDWF	STACK_0, 1
$0C4F	$082A			MOVF	FLOC_main+1, 0
$0C50	$1803			BTFSC	STATUS, C
$0C51	$3F01			ADDLW	1
$0C52	$07F1			ADDWF	STACK_0+1, 1
$0C53	$0870			MOVF	STACK_0, 0
$0C54	$1283			BCF	STATUS, RP0
$0C55	$0087			MOVWF	PORTC
;test_ronald3.pbas,351 :: 		if j < 85 then
$0C56	$3055			MOVLW	85
$0C57	$00F0			MOVWF	STACK_0
$0C58	$118A			BCF	PCLATH, 3
$0C59	$2120			CALL	_byte2double
$0C5A	$158A			BSF	PCLATH, 3
$0C5B	$0870			MOVF	STACK_0, 0
$0C5C	$00F4			MOVWF	STACK_4
$0C5D	$0871			MOVF	STACK_0+1, 0
$0C5E	$00F5			MOVWF	STACK_4+1
$0C5F	$0872			MOVF	STACK_0+2, 0
$0C60	$00F6			MOVWF	STACK_4+2
$0C61	$0873			MOVF	STACK_0+3, 0
$0C62	$00F7			MOVWF	STACK_4+3
$0C63	$0861			MOVF	_j, 0
$0C64	$00F0			MOVWF	STACK_0
$0C65	$0862			MOVF	_j+1, 0
$0C66	$00F1			MOVWF	STACK_0+1
$0C67	$0863			MOVF	_j+2, 0
$0C68	$00F2			MOVWF	STACK_0+2
$0C69	$0864			MOVF	_j+3, 0
$0C6A	$00F3			MOVWF	STACK_0+3
$0C6B	$118A			BCF	PCLATH, 3
$0C6C	$2251			CALL	_compare_double
$0C6D	$158A			BSF	PCLATH, 3
$0C6E	$30FF			MOVLW	255
$0C6F	$1803			BTFSC	STATUS, C
$0C70	$3000			MOVLW	0
$0C71	$00F0			MOVWF	STACK_0
$0C72	$0870			MOVF	STACK_0, 0
$0C73	$1903			BTFSC	STATUS, Z
$0C74	$2C8E			GOTO	test_ronald3_L_105
$0C75	$	test_ronald3_L_104:
;test_ronald3.pbas,353 :: 		getal=   Eeprom_Read((j*3))
$0C75	$0861			MOVF	_j, 0
$0C76	$00F0			MOVWF	STACK_0
$0C77	$0862			MOVF	_j+1, 0
$0C78	$00F1			MOVWF	STACK_0+1
$0C79	$0863			MOVF	_j+2, 0
$0C7A	$00F2			MOVWF	STACK_0+2
$0C7B	$0864			MOVF	_j+3, 0
$0C7C	$00F3			MOVWF	STACK_0+3
$0C7D	$118A			BCF	PCLATH, 3
$0C7E	$2574			CALL	_double2byte
$0C7F	$158A			BSF	PCLATH, 3
$0C80	$3003			MOVLW	3
$0C81	$00F4			MOVWF	STACK_4
$0C82	$118A			BCF	PCLATH, 3
$0C83	$25B7			CALL	_mul_8x8_u
$0C84	$158A			BSF	PCLATH, 3
$0C85	$0870			MOVF	STACK_0, 0
$0C86	$1683			BSF	STATUS, RP0
$0C87	$00AD			MOVWF	FARG_EEprom_read
$0C88	$118A			BCF	PCLATH, 3
$0C89	$2493			CALL	_eeprom_read
$0C8A	$158A			BSF	PCLATH, 3
$0C8B	$0870			MOVF	STACK_0, 0
$0C8C	$1283			BCF	STATUS, RP0
$0C8D	$00E5			MOVWF	_getal
$0C8E	$	test_ronald3_L_105:
;test_ronald3.pbas,355 :: 		end if
$0C8E	$	test_ronald3_L_106:
;test_ronald3.pbas,357 :: 		if j > 84 then
$0C8E	$3054			MOVLW	84
$0C8F	$00F0			MOVWF	STACK_0
$0C90	$118A			BCF	PCLATH, 3
$0C91	$2120			CALL	_byte2double
$0C92	$158A			BSF	PCLATH, 3
$0C93	$0861			MOVF	_j, 0
$0C94	$00F4			MOVWF	STACK_4
$0C95	$0862			MOVF	_j+1, 0
$0C96	$00F5			MOVWF	STACK_4+1
$0C97	$0863			MOVF	_j+2, 0
$0C98	$00F6			MOVWF	STACK_4+2
$0C99	$0864			MOVF	_j+3, 0
$0C9A	$00F7			MOVWF	STACK_4+3
$0C9B	$118A			BCF	PCLATH, 3
$0C9C	$2251			CALL	_compare_double
$0C9D	$158A			BSF	PCLATH, 3
$0C9E	$30FF			MOVLW	255
$0C9F	$1803			BTFSC	STATUS, C
$0CA0	$3000			MOVLW	0
$0CA1	$00F0			MOVWF	STACK_0
$0CA2	$0870			MOVF	STACK_0, 0
$0CA3	$1903			BTFSC	STATUS, Z
$0CA4	$2CC3			GOTO	test_ronald3_L_108
$0CA5	$	test_ronald3_L_107:
;test_ronald3.pbas,359 :: 		getal=   received_byte2[(j*3)-255]
$0CA5	$302F			MOVLW	_received_byte2
$0CA6	$1683			BSF	STATUS, RP0
$0CA7	$00A9			MOVWF	FLOC_main+0
$0CA8	$1283			BCF	STATUS, RP0
$0CA9	$0861			MOVF	_j, 0
$0CAA	$00F0			MOVWF	STACK_0
$0CAB	$0862			MOVF	_j+1, 0
$0CAC	$00F1			MOVWF	STACK_0+1
$0CAD	$0863			MOVF	_j+2, 0
$0CAE	$00F2			MOVWF	STACK_0+2
$0CAF	$0864			MOVF	_j+3, 0
$0CB0	$00F3			MOVWF	STACK_0+3
$0CB1	$118A			BCF	PCLATH, 3
$0CB2	$2574			CALL	_double2byte
$0CB3	$158A			BSF	PCLATH, 3
$0CB4	$3003			MOVLW	3
$0CB5	$00F4			MOVWF	STACK_4
$0CB6	$118A			BCF	PCLATH, 3
$0CB7	$25B7			CALL	_mul_8x8_u
$0CB8	$158A			BSF	PCLATH, 3
$0CB9	$30FF			MOVLW	255
$0CBA	$02F0			SUBWF	STACK_0, 1
$0CBB	$1683			BSF	STATUS, RP0
$0CBC	$0829			MOVF	FLOC_main+0, 0
$0CBD	$07F0			ADDWF	STACK_0, 1
$0CBE	$0870			MOVF	STACK_0, 0
$0CBF	$0084			MOVWF	FSR
$0CC0	$0800			MOVF	INDF, 0
$0CC1	$1283			BCF	STATUS, RP0
$0CC2	$00E5			MOVWF	_getal
$0CC3	$	test_ronald3_L_108:
;test_ronald3.pbas,361 :: 		end if
$0CC3	$	test_ronald3_L_109:
;test_ronald3.pbas,364 :: 		PORTD = getal
$0CC3	$0865			MOVF	_getal, 0
$0CC4	$0088			MOVWF	PORTD
$0CC5	$2853			GOTO	test_ronald3_L_3
;test_ronald3.pbas,377 :: 		wend
$0CC6	$2CC6			GOTO	$
