Interruption

[invite28559ad9]

Bonsoir

Voila un schéma et le programme (sur µbasic) q j'ai fait, mais il ya quelque chose qui m'echappe ce montage ne fonctionne pas, si qulq'un a une idée je le plaisir de l'entendre.

program clavier
dim x as byte
dim n as string[4]

intcon=$90                   'registre interreption

trisb=$FF
trisd=$00

main:

lcd_init(portd)
lcd_cmd(lcd_cursor_off)
lcd_out(1,1,"entrer paremetres")

portb=x
x=x >> 1                                 'decalage a droite
x=x and $0F                              'mascage
delay_ms(20)

  bytetostr(x,n)           'conversion Octet en chaine de caractere
  lcd_out(2,5,n)
  end.

-----

[invite0e5af214]

Salut,

ce montage ne fonctionne pas

Ca ne veut pas dire grand chose quand même.

Mais il a quand même des choses étranges dans ton code :

portb=x

... Alors que tu n'a pas initialisé x, portb va donc prendre la valeur n'importe quoi

x=x >> 1
x=x and $0F

.... Bon là quelque soit la valeur de x, maintenant il vaut 0.

ON va dire que normalement ca devrait afficher 0.

Donc : qu'est-ce qui ne marche pas ? Quels sont les symptomes ?

[invite28559ad9]

l'afficheur affiche 0 et quand j'appui sur une touche il reste le 0
je veut savoir quel est le probleme

[invite0e5af214]

Ca semble normal oui.

Il faut que tu configures l'entrée du bouton comme devant générer une interruption (ça ne suffit pas d'activer les interruptions avec le registre INTCON)

Ensuite il faut que tu écrives un code qui va s'executer au moment de l'interruption, et trouver comment on fait en VB pour le placer au bon endroit dans la mémoire.

[A voir en vidéo sur Futura]

[invite28559ad9]

je vais essayer,
j'ai le prog sur µpascale il fonctionne mais quand je le traduit en µbasic ca ne fonctionne pas .