Shuricksoft,
не знаю как в паскале, а операторы << и >> в си - это операторы логического сдвига, на асме это команды SHL/SHR соответственно: сдвигают битовое значение регистра влево/вправо, заполняя освободившиеся биты нулями... Плюс, есть SAR для чисел со знаком (арифметический сдвиг) - в этом случае биты, освобождающиеся после сдвига, заполняются не нулями, а старшим (знаковым) битом.

Еще в асме есть хорошие команды циклического сдвига (ROR/ROL/RCR/RCL), которых, к сожалению, на си нет.

NightGoblin, что самое весёлое, в Паскале slr/shr команды так и пишутся =) Эх, ещё раз убеждаюсь, что Паскаль явно удобней С. Но это уже отдельная история =)
А вот sar/ror/rol/rcr/rcl в Паскале тоже нет.

Цитата

Но просьба в силе: приведи, плз, паскалевский эквивалент value&(1<<i). Остальное понял, а вот что значит два знака << и почему это в скобках - неясно =)

В Паскале в этом смысле все то же самое - ну, об этом уже написали. В этом конкретном примере же:

Цитата

if (value and (1 shl i)) <> 0 then или даже такой вариант: if ((value shr i) and 1) = 1

Цитата

Вот этот код, с виду, работает. Инвертирует значение флага равенства и флага "больше-меньше". Можно, конечно, проверять, надо ли нам инвертировать флаг равенстсва, но к изменению результата это не приведёт, а код увеличит, уменьшив быстродействие =) CODE  lahf xor ah,01000001b sahf

Я думаю, с этим пока достаточно ;) Главное было разобраться в общем, а в деталях в конкретной задаче ты разберешься сам !

Следующее занятие (урок), если я соберусь со временем, я планирую посвятить BOOT...

Пока же, если есть желание, попробуй написать алгоритм построения линии в виде отдельно оформленной функции на языке Паскаль. Т.е. примерно это должно выглядеть так:

Цитата

Procedure DrawLine256(X1,Y1,X2,Y2: word; Color: Byte);   begin   asm   mov  ax,0A000h   mov  es,ax   mov  ax,X1   { ... }   end;   end;

Помни, что к переданным параметрам (здесь - по значению) в асм-вставке так и обращаются: mov bx,Y2 или mov al,Color. Также следует знать, что нельзя разрушать входные значения регистров SS,DS,BP,SP (если необходимо, можно сохранить и восстановть их на стеке или (для SS:SP) в ячейке памяти). Однако в данном случае можно определять локальные переменные и спокойно их использовать:

Цитата

Procedure DrawLine256(X1,Y1,X2,Y2: word; Color: Byte);   var     TempX: word;   begin   asm   mov  ax,X2   mov  TempX,ax   { ... }   end;   end;

и т.п.

Это довольно сложная задача, но с простым условием: построить линию, начинающуюся в точке с координатами (X1,Y1) и заканчивающуюся в точке (X2,Y2).

Кажется, я знаю, как выполнить эту задачу... Только мне надо знать, как производить деление. Нашёл в электронном справочнике, что это делается командой div. Решил проверить на простом коде:

Код

... var b : byte; ... asm mov b,2 mov al,10 div b ...

ну, дальше - вывод на экран =) Так вот, после выполнения команды деления выскакивает ошибка деления на ноль! А вроде как делитель не равен нулю и разрядность частного не превышает разрядность регистра... В чём ошибка и как правильно производить деление?

Всё, понял сам =) Всего заменить al на ax =)

деление это не по модному ( я про div оператор)
чтоб на 2 поделить нада вправо на 1 сдвинуть
mov eax,10
shr eax,1

все в еах результат будет

А с чего ты взял, что я буду на 2 делить? Тем более, мы здесь пока под ДОС асм-ом балуемся, а ты с расширенными регистрами

Это сообщение отредактировал(а) Shuricksoft - 14.10.2003, 14:22

mov ax,10
shr ax,1

под дос вариант
а на 2 как у тебя в примере

Я понимаю, как это под ДОС выглядит =)
А, ну, значит, пример такой попался неудачный =) Там любое число может быть =)

Цитата

mov ax,10 shr ax,1 под дос вариант

Вот и нет. Спокойно пишем:

Цитата

begin   asm   db 066h,0B8h,00Ah,000h,000h,000h {mov eax,10}   db 066h,0D1h,0E8h {shr eax,1}   end; end.

Цитата

Кажется, я знаю, как выполнить эту задачу... Только мне надо знать, как производить деление.

Про деление уже писали, а вот есть и команды умножения: mul и imul (знаковая). Кстати, есть знаковое деление: idiv

Цитата

mov ax,10 shr ax,1 под дос вариант

Вот и нет. Спокойно пишем:

Цитата

begin   asm   db 066h,0B8h,00Ah,000h,000h,000h {mov eax,10}   db 066h,0D1h,0E8h {shr eax,1}   end; end.

Цитата

Кажется, я знаю, как выполнить эту задачу... Только мне надо знать, как производить деление.

Про деление уже писали, а вот есть и команды умножения: mul и imul (знаковая). Кстати, есть знаковое деление: idiv

Chingachguk

Chingachguk,
ну это уже машинный код пошел, а не асм =)))

Байты я забил ибо Пас не "вкуривает" команды выше 286. Даже в obj.

На самом деле для "доса" я даже "такое" писал (это кусок патча):

Цитата

.586p HookedVector   equ 1 VectorEMM      equ 67h VectorSelf     equ 63h MaxPackets     equ 10000    ; Packets in ring buffer DebugPort      equ 177h ; Table 2914 Table2914 struc   _CR3      dd ?   _GDTRaddr dd ?   _IDTRaddr dd ?   _LDTR     dw ?   _TR       dw ?   _CS_EIP   dq ? Table2914 ends ... ; @@InsertingCode: ;;  jmp  @@SkipSubroutins ; Set Stack - like sf   ;;mov  ss,dx   ;;mov  esp,ebx ; Set Trap(s)   mov  eax,cr4   or   eax,01000b   mov  cr4,eax   mov  eax,(0110011001100110b shl 16)+(07FFh) ; 020703h ; 010000001100000010b   push ebx   xor  ebx,ebx @@MoveBXPort:   mov  bx,DebugPort ; ds:Port   mov  dr7,eax   mov  dr0,ebx   add  ebx,2 ...

... Жаль, не застал я времени дос-экстендеров ;(((

Это сообщение отредактировал(а) Chingachguk - 15.10.2003, 22:05

Я вернулся!!!
Раньше я был Melancholy, но забыл пароль и теперь я Serzh!!!
че тута происходит?
;)