[zxspectrum] Re: compito in classe

  • From: Enrico Maria Giordano <e.m.giordano@xxxxxxxxxxxxxxx>
  • To: zxspectrum@xxxxxxxxxxxxx
  • Date: Mon, 9 May 2016 19:16:05 +0200



Il 09/05/2016 17:19, Mario (Redacted sender aticatac70 for DMARC) ha scritto:

prima di tutto grazie per la disponibilita' :)

Figurati, è un piacere.

in un singolo  byte che conterra' il valore 12
e mi servirebbe anche l'opposto, cioe' da una variabile contenente 12 il
valore in bcd :)

Intanto dimmi se questa va bene:

    ORG  40000
    LD   A,1*16+2
    CALL BCDTOBIN
    LD   (50000),A
    RET

BCDTOBIN
    LD   D,A
    AND  15
    LD   E,A
    LD   A,D
    SRL  A
    SRL  A
    SRL  A
    SRL  A
    LD   D,A
    ADD  A,A
    ADD  A,A
    ADD  A,D
    ADD  A,A
    ADD  A,E
    RET

EMG

--
EMAG Software Homepage: http://www.emagsoftware.it
The EMG Music page: http://www.emagsoftware.it/emgmusic
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg

Other related posts: