/ EDU-PRG-8-004-FR.PA | |||
/ SUITE DE FIBONACCI | |||
/ | |||
/ CE PETIT PROGRAMME GENERE LES 19 PREMIERS TERMES DE LA SUITE DE FIBONACCI. | |||
/ LE RESULTAT EST VISUALISÉ EN AFFICHANT AC SUR LES LAMPES DE LA CONSOLE. | |||
/ | |||
/ (C)2021 TOUS DROITS RÉSERVÉS | |||
*0200 | |||
CLA CLL / CLAIRE L'ACCUMULATEUR ET LE LIEN | |||
TAD VI / CHARGE VI DANS L'ACCUMULATEUR | |||
JMS DELAIS / DELAIS POUR VISUALISER LE PREMIER TERME (I) | |||
JMS DELAIS | |||
CLA / CLAIRE L'ACCUMULATEUR | |||
TAD P / CHARGE P DANS L'ACCUMULATEUR | |||
JMS DELAIS / DELAIS POUR VISUALISER LE SECOND TERME (P) | |||
JMS DELAIS | |||
ENCORE, DCA VI / VI<-P | |||
TAD VI / CHARGE VI DANS L'ACCUMULATEUR | |||
TAD J / CHARGE ET ADDITIONNE 'J' A L'ACCUMULATEUR | |||
DCA P / P<-I+J | |||
TAD VI / CHARGE VI DANS L'ACCUMULATEUR | |||
DCA J / J<-VI | |||
TAD P / CHARGE P DANS AC | |||
HLT / PAUSE POUR VISUALISER LE TERME | |||
ISZ N / COMPTEUR, BOUCLE POUR 7760 JUSQUA 7777 | |||
JMP ENCORE / BOUCLER SUR ENCORE | |||
CLA IAC / ON NE PEUT PAS ALLER PLUS LOINS ALORS ON | |||
DCA VI / REINITIALISE LES VALEURS | |||
IAC | |||
DCA J | |||
IAC | |||
DCA P | |||
TAD CN / CHARGE VALEUR INIT COMPTEUR DE BOUCLE | |||
DCA N | |||
JMP 200 | |||
/ | |||
/ SOUSROUTINE DE DELAIS | |||
/ AC & L SONT PRESERVES | |||
/ | |||
DELAIS, .-. / ADRESSE DE RETOUR | |||
NOP / POUR RALENTIR LE PROCESSEUR | |||
NOP / NOUS EXECUTONS 3 INSTRUCTIONS | |||
NOP / NOP (NO OPERATION) A CHAQUE BOUCLE | |||
ISZ CDELAIS / INC COMPTEUR DE DELAIS, SAUT SI ZERO | |||
JMP .-4 / SI NON BOUCLER | |||
JMP I DELAIS / RETOUR | |||
/ | |||
/ VARIABLES | |||
/ | |||
CDELAIS, 0 / COMPTEUR DE DELAIS | |||
VI, 1 | |||
J, 1 | |||
P, 1 | |||
N, 7760 / 7777-NOMBRE DE TERMES VOULU, EN OCTAL | |||
CN, 7760 / CONSTANTE DE RÉINITIALISATION DE N | |||
$ | |||