¿Dónde está el fallo?

[tergismundo]

Hola a todos.

Estoy intentando ver cómo funciona el ejemplo que viene con PBP para hacer parpadear un led, pero no lo consigo.

Adjunto el código basic y el esquema de proteus.

Por favor, ¿Puede decirme alguien donde está el fallo?
led1     var     PORTB.7


        OPTION_REG = $7f        " Enable PORTB pullups
         TRISB = %00000000

loop:   high led1                " Turn LED on

        pause 500
        low led1

        pause 500
       
        Goto loop               " Do it forever

         end

El esquema no me ha sido posible adjuntarlo por problemas de espacio en el foro.
Pero decir que simplemente he conectado la patilla MCLR a VCC y la patilla 7 del puerto B a un led en serie con una resistencia de 1k2 a tierra.

No tiene más historias.

He probado a cambiarle la velocidad de ejecución de 4MHz a 1Khz y tampoco funciona. Siempre está la salida a nivel alto.

Gracias de antemano.

[Lager.]

Cita:Hola a todos.
El esquema no me ha sido posible adjuntarlo por problemas de espacio en el foro.
Pero decir que simplemente he conectado la patilla MCLR a VCC y la patilla 7 del puerto B a un led en serie con una resistencia de 1k2 a tierra.

No tiene más historias.

He probado a cambiarle la velocidad de ejecución de 4MHz a 1Khz y tampoco funciona. Siempre está la salida a nivel alto.

Gracias de antemano.

Codigo:
El codigo DEBERIA de trabajar, ya que no tiene ningun error grave 
, el unico problema es la resitencia que pusiste, NO ES NECESARIA, 
ya que usas las pullups, esa resitencia en serie que pusiste es una 
resitencia de carga, para jalar corriente, que lo unico que va a 
hacer en tu caso es quitartela, quitala o pon una de 330 ohms 
como maximo,(preferentemente las resitencias de carga son pequeñas
de unos 100 ohms o 150 ohms)

[tergismundo]

Creo que no es ese el problema, lo he probado y sigue sin funcionar.

De todas formas si alguien pudiera enviarme un diseño hecho en Proteus junto con el programa en PBP que funcionara realmente le estaría muy agradecido.

He intentado adjuntar el diseño pero todavía no me deja el servidor por cuestiones de espacio.

Gracias.