Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7

водскажите плиззз а то я совсем нулевой в этом....

тут можно задать вопрос по скриптингу
Post Reply
Marcus Wright
Neophyte
Neophyte
Posts: 11
Joined: 05.07.2009 19:21

водскажите плиззз а то я совсем нулевой в этом....

Post by Marcus Wright »

доброго времени суток, подскажите пожалуйста как сделать так что он ел из бэкпака, а то что у меня никак не получается совсем
WladL
Apprentice
Apprentice
Posts: 240
Joined: 27.07.2009 17:21
Location: DRW
Contact:

Post by WladL »

hungry.inc
в частности

Code: Select all

UseObject(FindType($тип_еды,backpack));
"Как хочешь ты трудись;
Но приобресть не льстись
Ни благодарности, ни славы,
Коль нет в твоих трудах ни пользы, ни забавы. (с) С.Крылов."
Marcus Wright
Neophyte
Neophyte
Posts: 11
Joined: 05.07.2009 19:21

Post by Marcus Wright »

Я немного ни так выразился...
как мне определить тип еды, чтобы её вставить в этот скрипт)))
К примеру у меня в паке куски человечены, они в стак не складываются, тайп у них один... нужно чтобы он жрал к примеру 1 кусок раз в 1 минуту
WladL
Apprentice
Apprentice
Posts: 240
Joined: 27.07.2009 17:21
Location: DRW
Contact:

Post by WladL »

Marcus Wright wrote:как мне определить тип еды, чтобы её вставить в этот скрипт)))
Marcus Wright wrote:тайп у них один...
То есть тип ты все-таки знаешь?

А вообще все как всегда , самое простое ,info в инже
"Как хочешь ты трудись;
Но приобресть не льстись
Ни благодарности, ни славы,
Коль нет в твоих трудах ни пользы, ни забавы. (с) С.Крылов."
Marcus Wright
Neophyte
Neophyte
Posts: 11
Joined: 05.07.2009 19:21

Post by Marcus Wright »

а можно как то целиком всё, нифига у меня не получаеться
:cry: $1CED это тип еды
WladL
Apprentice
Apprentice
Posts: 240
Joined: 27.07.2009 17:21
Location: DRW
Contact:

Post by WladL »

Code: Select all

program Hav4ik;
{$include 'all.inc'}
var
i:Integer;
begin
while not dead do begin
if Count($1CED)=0 then begin 
    //если хавчика нет в паке, выходим из цикла 
    AddToSystemJournal('*****Женема шпа сис жур.******');//сначала напишем в журнал вот это 
    break;//а потом выходим 
end;
UseObject(FindType($1CED,backpack));   //кушаем
   for i:=0 to 59 do begin              //ждем ~1 мин
        wait(1000);               
        CheckSave;                      //притормозить скрипт если начался ворлдсейв
   end;
end;
end.
Last edited by WladL on 10.11.2009 23:15, edited 3 times in total.
"Как хочешь ты трудись;
Но приобресть не льстись
Ни благодарности, ни славы,
Коль нет в твоих трудах ни пользы, ни забавы. (с) С.Крылов."
Marcus Wright
Neophyte
Neophyte
Posts: 11
Joined: 05.07.2009 19:21

Post by Marcus Wright »

Compiling
Compiler: [Error] (): Type mismatch
Compiling failed
вот что выдает, но тайп правильный, на инже смотрел, или что я не правильно делаю??
WladL
Apprentice
Apprentice
Posts: 240
Joined: 27.07.2009 17:21
Location: DRW
Contact:

Post by WladL »

скопируй еще раз,исправил.
если на CheckSave будет жаловаться удали его(хз что у тя там с инклюдами).
"Как хочешь ты трудись;
Но приобресть не льстись
Ни благодарности, ни славы,
Коль нет в твоих трудах ни пользы, ни забавы. (с) С.Крылов."
Marcus Wright
Neophyte
Neophyte
Posts: 11
Joined: 05.07.2009 19:21

Post by Marcus Wright »

Запускаю скрипт и получаю сразу такую надпись:
22:02:27 [***]: Compiling
22:02:27 [***]: Compiled succesfully
22:02:27 [***]: Succesfully executed
22:02:27 [***]: Script 1234.sc stopped successfuly

и всё)
WladL
Apprentice
Apprentice
Posts: 240
Joined: 27.07.2009 17:21
Location: DRW
Contact:

Post by WladL »

как думаешь почему?

Code: Select all

if Count($1CED)=0 then break;            //если хавчика нет в паке, выходим из цикла
замени то что выше, на вот это, и сам все увидишь.

Code: Select all

if Count($1CED)=0 then begin 
    //если хавчика нет в паке, выходим из цикла 
    AddToSystemJournal('*****Женема шпа сис жур.******');//сначала напишем в журнал вот это
    break;//а потом выходим 
end;
Загляни сюда
http://stealth.od.ua/forum/viewtopic.php?t=1020
и сюда
http://stealth.od.ua/forum/viewtopic.php?t=1123
"Как хочешь ты трудись;
Но приобресть не льстись
Ни благодарности, ни славы,
Коль нет в твоих трудах ни пользы, ни забавы. (с) С.Крылов."
Marcus Wright
Neophyte
Neophyte
Posts: 11
Joined: 05.07.2009 19:21

Post by Marcus Wright »

Ты так всё это легко говоришь))))
Я со стелс клиентом дело имеею ну дней 10 может быть))))
Для меня этот звучит как абра кадабра какая то

зы а самое главное что у друга всё равботает нормально)))))))))
User avatar
Vizit0r
Developer
Developer
Posts: 3958
Joined: 24.03.2005 17:05
Contact:

Post by Vizit0r »

Что-то это популярной фразой в последнее время время
стало - я ничего в этом не понимаю, но у меня не работает, а у друга все нормально
"Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете". (с) Макконнелл, "Совершенный код".
Post Reply