jak udelat _cislo_ MOD 7 ?

[Jiří Reček]

Pro jaky procesor ?
treba 51 ? (mozna bych zvladl Z80, I8080).

bez zaruky:

    mov    r0,#0
    mov    r1,#11100000b    ; 7 x 2^13

    mov    r4,#13            ; pocet opakovani 13x rotace

cykl:
    clr    c
    mov    a,_WORD_    ; odecteni
    subb   a,r0
    mov    r2,a
    mov    a,_WORD_+1
    subb   a,r1
    mov    r3,a

    jc     dalsi
    mov    _WORD_,r2    ; vysledek prepsat, pokud
    mov    _WORD_,r3    ;  odecteni nepreteklo
dalsi:

    clr    c
    mov    a,r1        ; rotace
    rrc    a
    mov    r1,a
    mov    a,r0
    rrc    a
    mov    r0,a

    djnz   r4,cykl

tak, a pustte se do mne.

Jirka