RENESIS, 2ND & 3RD GEN & 60-2 SENSOR EQUIPPED ENGINES SPDC ROUT 05825 ; This is a continuous advance scheme similar to centrifugal advance 05826 ;proceedure is as follows: 05827 ;calc 1 degree count tpL&H / 30 = 1 deg count 05828 ;1 deg @1000 rpm = 171.8 @ 1.031mhz 05829 ;1 deg @ 5000 = 34 (USE A LOWER NUMBER FOR RPM IF WANTING FULL ADVANCE AT LOWER RPM.) 05830 ;171-34=137 one degree delta (BETWEEN 1 DEG AT (result of calc @1000 rpm) 05831 ;137 / 9 = 15 (total amount in deg of cent retard) USE LOWER DIVISER FOR MORE ADVANCE RANGE 05832 ;34-34=0 (result of this calc at 5000 rpm) 05833 ;0 / 9 = 0 degrees to retard at 5000 05834 ;05-24-04 RECURVED PISTON ENGINE ADVANCE CURVES TO GIVE MAX ADVANCE AT 3400 000DCC 05835 SPDC ;SPDC ALL 000DCC C11E F17A 05836 MOVFF TPL,AARGL ;CALCULATE 1 DEGREE COUNT AT CURRENT ENGINE SPEED 000DD0 C11F F17B 05837 MOVFF TPH,AARGH 000DD4 0E1E 05838 MOVLW D'30' ;DIVIDE 30 DEG CNT TO GET 1 DEG 000DD6 6F7C 05839 MOVWF BARGL,1 000DD8 6B7D 05840 CLRF BARGH,1 000DDA EC75 F00D 05841 CALL DIV 000DDE C17A F1A0 05842 MOVFF AARGL,WORKL ;1 DEG CNT AT CURRENT RPM IN AARG, SAVE 1 DEG COUNT IN WORKH&L (WAS SC AH&L) 000DE2 C17B F1A1 05843 MOVFF AARGH,WORKH ;THIS IS FOR VAC ADV & MANUAL ADVANCE ROUT 05844 IF ENG==0xAF 05845 CLRF RES0,1 ;CLEAR ANY RPM ADVANCE 05846 CLRF RES1,1 MPASM 5.20 EC3CL8.ASM 6-17-2020 17:30:47 PAGE 128 ......................................................................................................................................... 05909 IF (ENG==0xA8)||(ENG==0xB0) ;RENESIS RX8 OR 20B W/ RENESIS CAS (dwell loaded at 40 deg BTDC) 000E2A AB26 05910 BTFSS BUSIN 000E2C D007 05911 BRA SDC.BA 000E2E 5148 05912 MOVF T2L,0,1 ; A8 BUSIN GET 3.5 ADD TO AARGH&L (computed delay for rpm) 2-23-13 000E30 254C 05913 ADDWF T8L,0,1 ;WAS (T2 + T4) = 18.5 DEG 45- 18.5 = 26.5 000E32 6F7A 05914 MOVWF AARGL,1 000E34 5149 05915 MOVF T2H,0,1 000E36 214D 05916 ADDWFC T8H,0,1 000E38 6F7B 05917 MOVWF AARGH,1 000E3A D004 05918 BRA SDC.BB 000E3C 05919 SDC.BA 000E3C C148 F17A 05920 MOVFF T2L,AARGL ;15 DEG 40 - 15 = 25 MAX RPM DEG BTDC 000E40 C149 F17B 05921 MOVFF T2H,AARGH 000E44 05922 SDC.BB 05923 ENDIF