16f688 interrupt

[RHS_electronics]

Trisa = 32
Trisc = 0

ioca=%10000000
a Var porta
c var portc

t1 var word
t1=200
start:

on interrupt goto buttonpressed
INTCON = %10000000 
one:
    gosub left:
    

    goto one:

buttonpressed:
    gosub All_on:
 
    
    goto buttonpressed:                      
resume



''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'SUBROUTINES
left:
a=4:c=36
pause t1
a=0: c=0
pause t1
return

all_on:
a=7:c=63
pause t1
return

Here is the code, If i will help at all.