Поиск подстроки в строке

[monrus]

ДАйте пример поиска подстроки в строке. Типа функции из дельф  pos

[Finch]

Вот на С++ пример

Код:

int string::IndexOf(const uchar  *x) const
{
   int res=-1;
   if ((x != NULL) && (x[0]  != 0))
   {
      res=0;
      int beg=0;
      int st=0;
      int ret=0;
      while ((x[beg] !=0) && (buffer[res] !=0))
      {
	 switch (st)
	 {
	    case 0:
	       if (buffer[res] != x[beg]) res++;
	       else 
	       {
		  st=1;
		  ret=res+1;
		  beg=1;
	       }
	       break;
	    case 1:
	       if (buffer[ret]==x[beg])
	       {
		  beg++;
		  ret++;
	       }
	       else
	       {
		  res++;
		  st=0;
		  beg=0;
	       }
	       break;
	 }
      }
      if ((buffer[res]==0) && (x[beg] != 0) ) res=-1;
   }
   return res;
}

[Sla]

monrus, да ты вроде с мозгами, а такие вопросы от тебя ставят в тупик

[monrus]

просто я с дельфой знаком - а с амсом так себе
ВОт еще вопрос как это на асме выглядит:
(IsWindowVisible(Wnd) = False) or
      (IsWindowVisible(Wnd) = True) and
      (GetWindow(Wnd, gw_Owner) = 0)
т.е. меня интересует как выглядит "or" и "and" на асме. Первый вопрос открыт - есть ли пример на асме?

[Finch]

Никак, ты просто описываеш логику поведения. насколько я помню асм

Код:

  cmp ax, 13
  jz me1
  cmp ax, 14
  jz me2

[monrus]

что-то типа
.IF IsWindowVisible(Wnd) = False &&  GetWindow(Wnd, gw_Owner) = 0
......
.ELSE
...
.END
должно быть

[Finch]

monrus, не путай язык высокого уровня с ассемблером. В ассемблере совсем другой подход. Чтобы начать на нем программировать, нужно менять логику мышления. Полазий лучше www.wasm.ru. Посмотри код, который там выложен в статьях.

[Finch]

Вот например ׁHello Word на ассемблере http://www.wasm.ru/article.php?article=1022006

[monrus]

вот подумал - вроде работает
or - ||
and - &&
Finch, ты мне всегда помогаешь, но я думаю, что не ошибаюсь (забыл сказать что я имею ввиду hutchевский MASM32)

[Finch]

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

Код:

push ax
push ....
..........
call SomeFunction

Вот небольшая илюстрация
Тут http://www.wasm.ru/article.php?article=1022006

Код:

;задержка, чтобы полюбоваться ;(5)
  push 2000d
  call Sleep

  ;выход                       ;(6)
  push 0
  call ExitProcess

Тоже самое http://www.wasm.ru/article.php?article=1022007

Код:

 ;задержка, чтобы полюбоваться
   invoke Sleep, 2000d

   ;выход
   invoke ExitProcess,0

Кстати

or - ||
and - &&

Это не одно и тоже. Например для двойного И в С. Это значит, что если первое условие будет false то не будут производится следуюшие проверки. Сразу произойдет выход из проверок. Если будет в условии стоять одинарное & то, будут произведены все проверки, вне зависимости от ранее уже полученного результата.

[monrus]

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