;------------------------------------------------------------------------------- ;----------------------------- 16 x 16 Multiply ------------------------------ ;------------------------------------------------------------------------------- movf arg1L, w, 0 mulwf arg2L, 0 movff PRODL, result0 movff PRODH, result1 movf arg1H, w, 0 mulwf arg2H, 0 movff PRODH, result3 movff PRODL, result2 movf arg1L, w, 0 mulwf arg2H, 0 movf PRODL, w, 1 addwf result1, f, 0 movf PRODH, w, 1 addwfc result2, f, 0 clrf WREG ; addwfc result3, f, 0 movf arg1H, w, 0 mulwf arg2L, 0 movf PRODL, w, 1 addwf result1, f, 0 movf PRODH, w, 1 addwfc result2, f, 0 clrf WREG, 1 addwfc result3, f, 0 return