about read some item info and ignore

Only working scripts
Post Reply
mixers
Neophyte
Neophyte
Posts: 49
Joined: 03.10.2013 14:11

about read some item info and ignore

Post by mixers »

in euo like this

findbook:
finditem %runebook c_ , #backpackid
event property #findid
if home notin #property 2
ignoreitem #findid
goto findbook
set %homebook #findid
ignoreitem reset
finditem %runebook C_ , #backpackid
if #findkind <> -1
{
event property #findid
if ore notin #property 2
ignoreitem #findid
goto findbook
if ore in #property
{
set %No %No + 1
set %WOODBOOK . %No #findid
ignoreitem #findid
goto findbook
}
}

in stealth how to write?
User avatar
Vizit0r
Developer
Developer
Posts: 3955
Joined: 24.03.2005 17:05
Contact:

Re: about read some item info and ignore

Post by Vizit0r »

write on english, what you want read from RB. For me EUO code like chinese...
"Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете". (с) Макконнелл, "Совершенный код".
mixers
Neophyte
Neophyte
Posts: 49
Joined: 03.10.2013 14:11

Re: about read some item info and ignore

Post by mixers »

yes i am chinese
what means RB ?
User avatar
Vizit0r
Developer
Developer
Posts: 3955
Joined: 24.03.2005 17:05
Contact:

Re: about read some item info and ignore

Post by Vizit0r »

runebook.

just write what info you want to read.
"Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете". (с) Макконнелл, "Совершенный код".
mixers
Neophyte
Neophyte
Posts: 49
Joined: 03.10.2013 14:11

Re: about read some item info and ignore

Post by mixers »

if home in book's info, set the book to use, if not in book's info, ingore it.
Gauhar
Novice
Novice
Posts: 87
Joined: 08.07.2008 17:40

Re: about read some item info and ignore

Post by Gauhar »

maybe that:

Code: Select all

Var
   homebookID: Cardinal;
   woodbookID: array of Cardinal;
   
...   

Procedure FindRunebook;
Var
   runebookType: Word;
   i: Integer;
Begin
   runebookType := $22C5;
   i := 0;
   while FindType(runebookType, backpack) > 0 do
   begin
      if pos('home', GetTooltip(finditem)) > 0 then
         homebookID := finditem
      else
      if pos('ore', GetTooltip(finditem)) > 0 then
      begin
         i := i + 1;
         SetLength(woodbookID, i);
         woodbookID[i-1] := finditem;
      end;
      Ignore(finditem);
   end;
   IgnoreReset;
End;
mixers
Neophyte
Neophyte
Posts: 49
Joined: 03.10.2013 14:11

Re: about read some item info and ignore

Post by mixers »

thanks Guahar.
Could you tell me where I can find POS grammar?

i want read some info from armor,cut and save the info.
Gauhar
Novice
Novice
Posts: 87
Joined: 08.07.2008 17:40

Re: about read some item info and ignore

Post by Gauhar »

search in google: pascal copy pos delete
Post Reply