.global _c_int00
          .data
wdct      .set 0x7029
gpactr    .set 0x7c00
gpamux    .set 0x7c06
gpadir    .set 0x7c0a
gpagmux   .set 0x7c20
gpadat    .set 0x7f00
gpatog    .set 0x7f06


          .text
_c_int00
          EALLOW
          CLRC   XF
          SETC   SXM
          SETC   OBJMODE
          MOVL   XAR1, #wdct
          MOV   *XAR1, #0x0068 ;desactiva WatchDog
          MOVL   XAR1, #gpadir
          MOV   *XAR1, #0x3000 ;Habilita Gpio12 y 13 como salidas
          EDIS

          MOVL   XAR1, #gpatog
          ZAPA
CIC_A
          MOVL   XAR2, #0x0001
CIC_B
          MOVL   XAR0, #0xffff
CIC_C
          NOP
          NOP
          BANZ CIC_C, AR0--
          MOV   *XAR1, #0x1000 ;Cambia el estado del Gpio12
          BANZ CIC_B, AR2--
          MOV   *XAR1, #0x2000 ;Cambia el estado del Gpio13
          LB CIC_A