J'ai trouvé un schéma électronique pour faire des additions binaires. J'imagine que l'UAL d'un 6502 travaille de la sorte. Je vous mets une reproduction. Je ne suis pas fortiche avec ces schémas.
J'imagine que ça fonctionne et qu'il faut mettre ces dispositifs en série par nombre de bit qu'on veut additionner. Forcément, j'ai voulu vérifier
Code : Tout sélectionner
10 scnclr:print "addition binaire"
20 input q$,w$:c=0:m$=""
30 a=val(right$(q$,1)):b=val(right$(w$,1)):q$=left$(q$,len(q$)-1):w$=left$(w$,len(w$)-1)
40 o=(a and not b) or (not a and b):s=(o and not c) or (not o and c)
50 p=a and b:l=o and c:c=p or l
60 m$=str$(s)+m$
70 if len(q$)>0 then 30
80 m$=str$(c)+m$:print m$
90 end
Il n'y a pas beaucoup d'ordinateurs/calculatrices qui ont la fonction XOR, on peut la remplacer par
Code : Tout sélectionner
A xor B = (A and not B) or (not A and B)