this is ma first code whta wrong with itthe explanation is in french but i'm sure you don't need it )
eeprom 0,[11101110] ;pour chiffre 1
eeprom 1,[10111011] ;pour chiffre 9
eeprom 2,[11101011] ;pour chiffre 7
eeprom 3,[11101110] ;pour chiffre 1
trisa=%00000000 ; port A en sortie
b0 var byte
b1 var byte
b2 var byte
b3 var byte
b10 var byte
b11 var byte
b12 var byte
b13 var byte
debut:
low porta.1
low porta.2
trisb=%11111111 ;port B en entrée
b0=portb ;lit le port B et met les info dans b0
if b0=%11111111 then debut ; si aucune touche appuyé recommence a lire le port B jusqu'a l'appuis d'une touche
pause 100
b1=portb
pause 100
b2=portb
pause 100
b3=portb

code1:
read 0,b10
if b10=b0 then code2
goto bad
code2:
read 1,b11
if b11=b1 then code3
goto bad
code3:
read 2,b12
if b12=b2 then code4
goto bad
code4:
read 3,b13
if b13=b3 then good
goto bad

bad:
pause 1500
high porta.2
pause 3000
low porta.2
goto debut

good:
high porta.1
pause 5000
low porta.1
goto debut
end