ICSP not recognizing..

[skimask]

I've also tried the code you wrote Skimask... the oscil. shows ~50kHz... The load you typed is too large...

Well then change it!

Or perhaps you wish for me to change the LOAD value myself and re-post the exact same code with that one change so you can cut and paste it over and try it again?

I never said my code would be perfect, but your code had a few faults that needed to be corrected.

[mister_e]

How accurate you want it?

Skimask changed the reload value... hence why you have higher value.

try...

@       __CONFIG _HS_OSC & _WDT_OFF & _LVP_OFF & _PWRTE_ON & _BODEN_ON

define OSC 20 

INT       VAR     PIR1.0  ' OVERFLOW flag
START   VAR     T1CON.0 ' START TMR1
LOAD     VAR     word

'------- Configurações iniciais -------------------- 
TRISA  = %00000000 ' PORTA
TRISB  = %00000000 ' PORTB 
TRISC  = %00000000 ' PORTC
TRISD  = %00000000 ' PORTD 
TRISE  = %00000000 ' PORTE 



OPTION_REG = %00000000
ADCON1 = %10001111  ' all digital
T1CON = %00000000   ' TMR1 1:1 prescaler
PIE1 = %00000001    ' Henable  TMR1 INT
START = 0
INT = 0
LOAD = 65404 '  INT. 36KHz
@TIMER1=TMR1L
TIMER1  var word EXT

'--------------------------------------------------- 
ON INTERRUPT GOTO SINUS

TIMER1=LOAD
INTCON = %11000000  ' enable global interrupt
START = 1 
PORTB.0 = 1
MAIN:      
        GOTO MAIN    

 
DISABLE
SINUS:  
           @ MOVE?CT 0, T1CON, TMR1ON
           TIMER1=TIMER1+LOAD
           @ MOVE?CT 1, T1CON, TMR1ON                       
           toggle PORTB.0
           INT = 0
RESUME
ENABLE

end

you should have something like 18KHz signal.. so yeah, your interrupt is still 36Khz... i just toggle the pin..

I tend to stay away of ON INTERRUPT when i need accuracy. ASM is the best while DT INST with PBP is still good enough for many purpose.

[skimask]

That is a bit wierd, because what I posted should've had a freq of about 36khz (73.5khz int rate, 20mhz/4=5Mhz instruction rate / 68 = 73.5khz toggling the pin).

If anything, the freq should've dropped BELOW 36khz due to not reloading the timer with 'fixed' values and not compensating for the extra cycles in the interrupt loop.
I get the feeling that the 'scope isn't being read right (i.e. only measuring half of the square wave, not the whole thing)

And yes, I agree completely about DT_INT's vs. ON_Interrupt.

[mister_e]

completely untested, should work anyway...

        define OSC 20 
        
        include ".\include_routines\DT_INTS-14.bas"
        
ASM
INT_LIST  macro    ;  IntSource,   Label,  Type, ResetFlag?
        INT_Handler    TMR1_INT,  _SINUS,   ASM,  yes
    endm
    INT_CREATE

endasm  

        
        '------- Configurações iniciais -------------------- 
        TRISA  = %00000000 ' PORTA
        TRISB  = %00000000 ' PORTB 
        TRISC  = %00000000 ' PORTC
        TRISD  = %00000000 ' PORTD 
        TRISE  = %00000000 ' PORTE 
        
        OPTION_REG = %00000000
        ADCON1 = %10001111  ' all digital
        T1CON = %00000000   ' TMR1 1:1 prescaler
        PIE1 = %00000001    ' Henable  TMR1 INT

@TIMER1=TMR1L
        TIMER1      var word EXT

        INT         VAR     PIR1.0  ' OVERFLOW flag
        START       VAR     T1CON.0 ' START TMR1
        
        LOAD        CON     65404 '  INT. 36KHz
        
        TIMER1=LOAD
        START = 1 
@       INT_ENABLE   TMR1_INT     
        PORTB.0 = 1
MAIN:      
        GOTO MAIN    

SINUS:  
        ASM
                MOVE?CT  0, T1CON, TMR1ON ; Stop Timer1
                MOVLW    LOW(_LOAD)       ; Reload timer1
                ADDWF    TMR1L,F          ;   but add current Timer
                BTFSC    STATUS,C         ;       value
                INCF     TMR1H,F          ;
                MOVLW    HIGH(_LOAD)      ;
                ADDWF    TMR1H,F          ;
                MOVE?CT  1, T1CON, TMR1ON ; Start Timer1                      
        ENDASM
        toggle PORTB.0
@       INT_RETURN