Помощь в скрипте. Не умею работать с Журналом.

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
SuMMoN
Posts: 24
Joined: 2009-02-26 14:39:12

Помощь в скрипте. Не умею работать с Журналом.

Post by SuMMoN »

Здравствуйте.
В общем, пытаюсь сделать следующее:
Чаром, на котором запускается скрипт, мы пишем 1,2 или 3. В соответствии от того что мы написали, он начинает делать разные вещи. Как определить, что мы написали цифру 2?

Code: Select all

  UO.Print('Наберите цифру 1, если это Blood Rock')
  Wait(400)
  UO.Print('Наберите цифру 2, если это Verite')
  Wait(400)


Пытался копаться с журналом, скопировал что-то из скрипта на лотерею... Но ничего. До конца додумать не могу самостоятельно( Спасибо, если поможете.

Edred когда-то писал:
Edred wrote:чаром в динамической паузе ловишь строку в журнале, начинающуюся с ника чара с двоеточием (образец динамической паузы на журнал - в любом скрипте на крафт). Потом парсишь эту строку, вычленяя из нее сериал.


Вот примерно это мне надо)
Если первая часть мне примерно ясна:

Code: Select all

repeat
    Wait(100)
until uo.JournalSerial(uo.InJournal("")-1)==1


То со второй я хз что делать)
Спасибо)
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

repeat
Wait(100)
until условие 1 ИЛИ условие 2
ЕСЛИ условие 1 тогда
делаем тото
в противном случае
делаем тото
конец ЕСЛИ

Вообще тебе всего скорее надо вот так

Code: Select all

repeat
   wait(100)
until UO.InJournal("1|2")


Так же можно сделать проверку на фразу Верит или Валорит в журнале, содержание руды в паке. Зачем ПИСАТЬ боту чтолибо?
SuMMoN
Posts: 24
Joined: 2009-02-26 14:39:12

Post by SuMMoN »

Mirage wrote:
repeat
Wait(100)
until условие 1 ИЛИ условие 2
ЕСЛИ условие 1 тогда
делаем тото
в противном случае
делаем тото
конец ЕСЛИ

Вообще тебе всего скорее надо вот так

Code: Select all

repeat
   wait(100)
until UO.InJournal("1|2")


Так же можно сделать проверку на фразу Верит или Валорит в журнале, содержание руды в паке. Зачем ПИСАТЬ боту чтолибо?


Спасибо конечно за ответ... Но с условиями я могу все написать, я хочу научиться работать с журналом. Это раз.
Два: until UO.InJournal("1|2") А если эти цифры напишет кто-то другой?
Писать будет не бот, а я. И затем, в зависимости от того что я написал, он будет что то делать.
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Post by Mirage »

Значит мы друг друга не поняли :)
uo.JournalSerial(uo.InJournal("какойто текст")-1)== ID чара произнесенного фразу

тоесть тебе надо сделать проверку натекст + проверку на то что ты ее произнес - впиши свой ID и все.

Если хочешь стукнись в аську 325 811 945 - пообщамся если не буду сильно занят. Может найдем оптимальное решение )
Last edited by Mirage on 2009-12-14 16:32:30, edited 1 time in total.
SuMMoN
Posts: 24
Joined: 2009-02-26 14:39:12

Post by SuMMoN »

Mirage wrote:Значит мы друг друга не поняли :)
uo.JournalSerial(uo.InJournal("какойто текст")-1)== ID чара произнесенного фразу

тоесть тебе надо сделать проверку натекст + проверку на то что ты ее произнес - впиши свой ID и все.

Ок, спс. Буду пробовать
SuMMoN
Posts: 24
Joined: 2009-02-26 14:39:12

Post by SuMMoN »

Реализовал все просто:

Code: Select all

name=uo.GetName(uo.JournalSerial(uo.InJournal("")-1))

repeat
    Wait(100)
until uo.InJournal(name+":")


If uo.InJournal(name+":1") Then

If uo.InJournal(name+":2") Then

If uo.InJournal(name+":3") Then

Else
uo.Exec('terminate all');
EndIf
EndIf
EndIf
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

Если это бс то посмотри тут как я реализовал ковку фуллов
SuMMoN
Posts: 24
Joined: 2009-02-26 14:39:12

Post by SuMMoN »

Nmy wrote:Если это бс то посмотри тут как я реализовал ковку фуллов


Ок, спс)
Вы не поверите, но мне это для того, чтобы сумки красить ))))
Post Reply