Требуется программист в Зеленограде
- обработка данных с датчиков; ColdFire; 40 тыс. e-mail:jobsmp@pochta.ru |
div32u: clr mod0 ;initialize variables
clr mod1 ; mod = 0;
clr mod2 ; lc = 32;
clr mod3 ;
ldi lc,32 ;/
;---- calcurating loop
lsl var10 ;var1 = var1 << 1;
rol var11 ;
rol var12 ;
rol var13 ;/
rol mod0 ;mod = mod << 1 + carry;
rol mod1 ;
rol mod2 ;
rol mod3 ;/
cp mod0,var20 ;if (mod => var2) {
cpc mod1,var21 ; mod -= var2; var1++;
cpc mod2,var22 ; }
cpc mod3,var23 ;
brcs PC+6 ;
inc var10 ;
sub mod0,var20 ;
sbc mod1,var21 ;
sbc mod2,var22 ;
sbc mod3,var23 ;/
dec lc ;if (--lc > 0)
brne PC-19 ; continue loop;
wdr
ret