CodeVisionAVR

[master_74]

Народ помогите ПЛЗ разрулить такой гемор на CV.!!!!!!\
Надо с начало перемножить два unsigned long int получится unsigned long long int,
а потом это разделить на unsigned long int получится unsigned long int.
Сижу на CV 1.25.9, а он не понимает long long int. Более позднейшее версии отлечины коряво, со старыми проблемами.
Буду счастлив если кто поделится желательно на С библиотечкой, али нормально отшпили-вилиным СV посвежее/
Можно на мыло petrovav74@mail.ru. Заранее при много благодарен.

[wer_1]

the long long, double, _Complex and _Imaginary data types are not yet supported-зто из хэлпа.
CV- не поддерживает.

[Flopix]

Может сначала разделить а потом умножить или там нужно точное число без дополнительных округлений?

[mobil2005]

Надо с начало перемножить два unsigned long int получится unsigned long long int,
а потом это разделить на unsigned long int получится unsigned long int.

Оцените число нулей которые отбросятся в результате деления на unsigned long int , и произведите округление. Ибо что-то мне подсказывает что МК большую часть времени будет считать то что в конечном итоге в результате не отразится.

[sergx1300]

Project --› Configure --› C Compiler --› (s)printf Features попробуй long или float

[kison]

Переходите на WinAVR - там С99 поддерживается. А именно этот стандарт добавляет long long. Вариант 2 - пишете асмовую вставку и пермножаете/делите в ней.

[MasterMushi]

Вот хорошо написали, Асмовая вставка. А пример есть перемножения с 64 битным результатом в массиве беззнаковых чаров?

В общем сталкнулся с такой же проблемой. Прошу помощи у сообщества

обертка функции выглядит примерно так

unsigned long int x64result[2];

unsigned long int int64multiply(unsigned long int arg1, unsigned long int arg2)
{
unsigned long int x64result[2];

//на входе два двухсловных числа которые надо пеермножить с получением одного четырехсловного

//Шаг 1  - разложить оба числа по байтам


//Шаг 2 - перемножить 

//Шаг 3 - скомбинировать полученый результат условно сместив результат на 2 слова вправо
return x64result[1];
}

Перемножить все столбиком? 

[MasterMushi]

Пример на АСМе есть... но какбы это обустролить оперируя не регистрами а указателями на массивы байтов?

Умножение 32 разрядных чисел

формат:      32р*32р=64р


 ;*************************************************  **********
;*
;* Mul32 == 32x32 Bit Unsigned Multiplication
;*
;* mp32uL::mp32uH  x  mc32uL::mc32uH  =  m32uL::m32uH
;*   multiplier        multiplicand        result
;*  r20r21r22r23   x   r16r17r18r19   =  r20r21r22r23r24r25r26r27
;*
;*************************************************  **********
.macro mul32

.def    mc32u0    =r16    ; multiplicand byte 0 (LSB)
.def    mc32u1    =r17    ; multiplicand byte 1
.def    mc32u2    =r18    ; multiplicand byte 2
.def    mc32u3    =r19    ; multiplicand byte 3 (MSB)
.def    mp32u0    =r20    ; multiplier byte 0 (LSB)
.def    mp32u1    =r21    ; multiplier byte 1
.def    mp32u2    =r22    ; multiplier byte 2
.def    mp32u3    =r23    ; multiplier byte 3 (MSB)
.def    m32u0    =r20    ; result byte 0 (LSB)
.def    m32u1    =r21    ; result byte 1
.def    m32u2    =r22    ; result byte 2
.def    m32u3    =r23    ; result byte 3
.def    m32u4    =r24    ; result byte 4
.def    m32u5    =r25    ; result byte 5
.def    m32u6    =r26    ; result byte 6
.def    m32u7    =r27    ; result byte 7 (MSB)
.def    mcnt32u =r28     ; loop counter
       
Mul32:    clr    m32u7        ;clear 4 highest bytes of result
    clr    m32u6        ;
    clr    m32u5        ;
    sub    m32u4,m32u4      ;and carry
    ldi    mcnt32u,33            ;init loop counter
m32u_loop:   
    ror    m32u3                   ;rotate result and multiplier
    ror    m32u2       
    ror    m32u1       
    ror    m32u0       
    dec    mcnt32u               ;decrement loop counter
    breq    Return32u           ;if counter zero return
    brcc    m32u_skip          ;if bit 0 of multiplier set
    add    m32u4,mc32u0    ;add multiplicand to result
    adc    m32u5,mc32u1   
    adc    m32u6,mc32u2  
    adc    m32u7,mc32u3   
m32u_skip:    ror    m32u7 ;shift right result byte 7
    ror    m32u6                  ;rotate right result
    ror    m32u5       
    ror    m32u4       
rjmp    m32u_loop   
Return32u:   
.endmacro