contador 0-1000 con pbp

[judex]

buenos dias, estoy haciendo un contador con pbp que he encontrado en un foro (todopic), pero no me da resultados.
el codigo es el siguiente:
cont var word
i var byte
unid var byte
dece var byte
cent var byte
mile var byte

TRISB = 0
TRISA.0 = 1
cont=0

inicio:
for i=0 to 49 'bucle para esperar un tiempo y luego incrementar
unid = cont dig 0 'el conteo
PORTB = unid + 16
PAUSE 5
dece = cont dig 1
PORTB = dece + 32
PAUSE 5
cent = cont dig 2
PORTB = cent + 64
PAUSE 5
mile = cont dig 3
PORTB = mile + 128
PAUSE 5
next i
cont = cont + 1
if cont > 9999 then cont=0
GOTO INICIo
end
la foto del montaje en proteus es esta:
gracias por la ayuda

 

[MrCarlos]

Hola judex

Vuelve a visitar TodoPic, creo que no copiaste bien el archivo de Código y el Esquema.
Si en el circuito cambias el 7447 por el 7448 funcionaría pero el Código creo que no es el correcto.

saludos
a sus ordenes