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

Search found 4 matches

by Fiel
17.10.2008 13:34
Forum: Помощь по скриптам
Topic: нужна помощь (Fishing)
Replies: 12
Views: 16084

Пока не помер идет проверка журнала. Если в нем есть строка "my fish" в интервале времени от момента myTime до текущего времени (Now), то пытаемся найти в паке нарезанную рыбу. Если находим, то сбрасываем ее на пол, если нет - пишем что рыбы нет. Далее обновляем метку времени myTime, что б...
by Fiel
16.10.2008 21:24
Forum: Помощь по скриптам
Topic: нужна помощь (Fishing)
Replies: 12
Views: 16084

Он же не зациклен Да, не зациклен. %) program dropfish; const fish1 = $097A; // ID=0x40E87EE4 Type=0x097A var myTime : TDateTime; Begin myTime := Now; while not Dead do begin if (InJournalBetweenTimes('my fish',myTime,Now)>=0) then begin if findtype(fish1,backpack)>0 then DropHere(finditem) else ad...
by Fiel
16.10.2008 13:25
Forum: Помощь по скриптам
Topic: нужна помощь (Fishing)
Replies: 12
Views: 16084

program dropfish; const fish1 = $097A; // ID=0x40E87EE4 Type=0x097A Begin if (InJournal('my fish')>0) then begin if findtype(fish1,backpack)>0 then DropHere(finditem) else addtosystemjournal('Нарезанной рыбы в паке нет %)'); wait(1000); ClearJournal; end else addtosystemjournal('Команда на сброс ры...
by Fiel
15.10.2008 21:33
Forum: Помощь по скриптам
Topic: нужна помощь (Fishing)
Replies: 12
Views: 16084

М.б. так?

Code: Select all

if (InJournal('my fish')>=0) then
begin