Что именно? Делай в скрипте так:
Code:
if MyInJournal("There is no ore") then
uo.exec.......А дальше в файл добавь функции:
Code:
Sub MyInJournal( mes )
VAR nom, st
nom = uo.InJournal( mes )
If mes > 0 Then
; найдена строка в журнале
st = UO.Journal( nom - 1 )
; тут уже проверяем, есть ли в строке двоеточие.
If CheckColon( st ) == 1 Then
return 0
else
return 1
endif
endif
return 0
endsub
Sub CheckColon( st )
; Функция ищет в переданной строке двоеточие и возвращает 1 если найдено, 0 если нет.
.........
endsub
ЗЫ: естественно, не забудь написать последнюю функцию. Поищи, тут на форуме кто-то где-то клал функцию поиска подстроки в строке. Кроме того такую функцию легко слепить на основе GetWord.
_________________
Ни один скрипт не работает? Пора обновить
Инжект...
Все работает, но хочется большего? Пора переходить на
стелс...