M
mohamed saleh
Guest
Chcę wiedzieć, jak przekonwertować binarnego na BCD lub po przecinku w montażu i mają dzięki kod
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
CBLOCK 0x20 BCDvalH BCDvalM BCDvalL mCount NumbHi NumbLo endC;; binarne do konwersji BCD rutynowych, 16-bitowa liczba konwersji jest w NumbHi, NumbLo; wynik jest w BCDval HML; HexBCD movlw d'16 'movwf mCount clrf BCDvalH clrf BCDvalM clrf BCDvalL bcf STATUS, C loop16 RLF NumbLo, F RLF NumbHi, F RLF BCDvalL, F RLF BCDvalM, F RLF BCDvalH, F decf mCount, F btfsc STATUS, Z powrotu adjDEC movlw BCDvalL movwf FSR call adjBCD movlw BCDvalM movwf FSR call adjBCD movlw BCDvalH movwf FSR call adjBCD goto loop16 adjBCD movlw d'3 'addwf IndF, W movwf Temp btfsc Temp, 3 movwf IndF movlw 30h addwf IndF, W movwf Temp btfsc Temp, 7 movwf end return IndF