Time() процедуру покажи.
sub Time()
var Date,nTime,uTime,i
uTime=str(uo.Time())
nTime=''
for i=0 to Len(uTime)
nTime=uTime[Len(uTime)-i]+nTime
if (i==2) or (i==4) then
nTime=':'+nTime
end if
next
uTime=str(uo.Date())
Date=''
for i=0 to Len(uTime)
Date=uTime[ ...
Search found 22 matches
- 2014-12-21 19:51:42
- Forum: Help
- Topic: Unhandled exception in parser (!)
- Replies: 141
- Views: 97827
- 2014-12-21 04:50:36
- Forum: Help
- Topic: Unhandled exception in parser (!)
- Replies: 141
- Views: 97827
Re: Unhandled exception in parser (!)
помогите скрипт с форума все вроде работает кроме этой части,она по сути то работает но вылетает каждые 10-15мин Unhandled exception in parser, помогите люди добрые.
sub ControlOfDanger()
var Time,danger,Space
Time=Time()
Space=' '
while 1
uo.DeleteJournal()
while not uo.InJournal ...
sub ControlOfDanger()
var Time,danger,Space
Time=Time()
Space=' '
while 1
uo.DeleteJournal()
while not uo.InJournal ...
- 2014-04-28 16:29:41
- Forum: Scripting Ore
- Topic: До роботать ламбер ветерана
- Replies: 4
- Views: 2076
Re: До роботать ламбер ветерана
Incorrect User wrote:Добавь глобальные переменные, и при реколе, если реколишся при опасности сохраняй координаты, а если просто от перевеса то пиши 0. И потом когда прилетаешь, если переменная > 0 то берешь координаты из нее, если 0 то идешь в начало как обычно.
помоги как это выглядеть будет , кодом
- 2014-04-28 06:49:12
- Forum: Scripting Ore
- Topic: До роботать ламбер ветерана
- Replies: 4
- Views: 2076
До роботать ламбер ветерана
v8.7 Full..Подскажите пожалуйста где что добавить ,что бы когда чар стоял в (DangerWait) по окончанию он не реколился и рубил первое дерево а реколился и шел к тому дереву у которого он увидел опасность? тобиш система как он логи выкладывает реколится в лес и идет к тому дереву у которого закончил ...
- 2014-04-28 06:37:07
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 1830
Re: Нужна не большая помощь в скрипте
if uo.InJournal('attacking you|In Por Ylem|An Mani|Vas Flam|In Nox|Des Sanct|In Flam Grav|Ort Grav|In Jux Hur Ylem|Por Corp Wis|An Ex Por|Corp Por|Vas Ort Flam|In Ex Grav|Vas Flam|Kal Vas Xen|Ort Rel|Ort Sanct|Flam Kal Des Ylem|In Vas Por') then
uo.GetStatus('uo.JournalSerial(0)')
uo ...
uo.GetStatus('uo.JournalSerial(0)')
uo ...
- 2014-04-28 04:51:05
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 1830
Re: Нужна не большая помощь в скрипте
sub ControlOfDanger()
var Time,danger,Space
Time=Time()
Space=' '
while 1
uo.DeleteJournal()
while not uo.InJournal(':')
wait(100)
wend
danger=uo.GetNotoriety(uo.JournalSerial(0))
if PhysicalDanger==1 then
if uo.InJournal('spirit') then
uo.TextOpen()
uo ...
- 2014-04-28 03:12:36
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 1830
Re: Нужна не большая помощь в скрипте
Incorrect User wrote:Code: Select all
repeat
uo.WaitTargetObject('0x418D0000')
uo.Exec('warmode 0')
uo.usetype('0x1F4C')
wait(1800)
until not uo.InJournal('spell fizzles')
Если есть сообщение физла то будет крутить по кругу без конца, так как очистки журнала в цикле нет.
спасибо
- 2014-04-28 02:27:32
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 1830
Нужна не большая помощь в скрипте
Помогите люди добрые в чем проблема реколится без остановки после физла
sub RecallRune()
Terminate()
uo.PlayWav(DisturbingSound)
uo.UseType('0x0F0E','0x0631')
wait(100)
repeat
uo.WaitTargetObject('0x418D0000')
uo.Exec('warmode 0')
uo.usetype('0x1F4C')
wait(1800 ...
sub RecallRune()
Terminate()
uo.PlayWav(DisturbingSound)
uo.UseType('0x0F0E','0x0631')
wait(100)
repeat
uo.WaitTargetObject('0x418D0000')
uo.Exec('warmode 0')
uo.usetype('0x1F4C')
wait(1800 ...
- 2013-11-22 22:09:20
- Forum: General
- Topic: [Обновление! / Update!] Injection 2013
- Replies: 368
- Views: 135780
Re: [Обновление! / Update!] Injection 2013
давно пора ребята а то написан сервак в списке а он не разу не работал) надежду дали а на деле то не пашет сказали исправили по этому так не терпеться ёоу)
это ты про какой?
про который писал вам в сообщениях,которое вы увидели и проигнорировали,я написал другому человеку из вашей комманды он ...
это ты про какой?
про который писал вам в сообщениях,которое вы увидели и проигнорировали,я написал другому человеку из вашей комманды он ...
- 2013-11-20 23:25:29
- Forum: General
- Topic: [Обновление! / Update!] Injection 2013
- Replies: 368
- Views: 135780
Re: [Обновление! / Update!] Injection 2013
давно пора ребята а то написан сервак в списке а он не разу не работал) надежду дали а на деле то не пашет сказали исправили по этому так не терпеться ёоу)
- 2013-11-02 12:06:01
- Forum: General
- Topic: [Обновление! / Update!] Injection 2013
- Replies: 368
- Views: 135780
Re: [Обновление! / Update!] Injection 2013
а реально сделать в хоткейс кнопку рекорд как в асисте...записи действий что бы в ручную вот это не прописывать все usetype 0x12; waittargetobject 0x0000001; итд
было бы приятно а то пока инфой все посмотришь потом все это пропишешь ухх
будет ваше бомба 



- 2013-01-04 22:17:24
- Forum: Help
- Topic: Injection on The Abyss
- Replies: 20
- Views: 12081
Re: Injection on The Abyss
люди добрые подскажите пожалуйста а как зайти со своей inject dll`кой? а не с той которая в архиве
- 2013-01-04 22:03:45
- Forum: Shards talks
- Topic: Идем на восток... (для любителей абиса)
- Replies: 241
- Views: 109284
Re: Идем на восток... (для любителей абиса)
люди добрые подскажите пожалуйста а как зайти со своей inject dll`кой? а не с той которая в архиве
- 2012-04-08 14:09:53
- Forum: I need script!
- Topic: Обход анти-макрос системы.
- Replies: 5
- Views: 3069
Re: Обход анти-макрос системы.
как зайти с инжой на этот сервер подскажите пожалуйста
- 2012-04-08 14:09:05
- Forum: Shards talks
- Topic: The ASMUT PVP Копия Абисса ИНЖА
- Replies: 0
- Views: 4610
The ASMUT PVP Копия Абисса ИНЖА
Люди добрые помогите настроить инжект под этот сервер http://uo.theasmut.ru/
- 2011-02-14 00:47:01
- Forum: Help
- Topic: Рекол от чаров
- Replies: 1
- Views: 1057
Рекол от чаров
if RecallFromAll==1 then
if Danger==1 and UO.JournalSerial(0) <> UO.GetSerial() then
uo.GetStatus('uo.JournalSerial(0)')
uo.SetGlobal('name',uo.GetName(uo.JournalSerial(0)))
uo.TextOpen()
uo.TextPrint('Рядом оказался чар - '+uo.GetName(uo.JournalSerial(0)) +Space +Time)
uo.Exec('exec ...
if Danger==1 and UO.JournalSerial(0) <> UO.GetSerial() then
uo.GetStatus('uo.JournalSerial(0)')
uo.SetGlobal('name',uo.GetName(uo.JournalSerial(0)))
uo.TextOpen()
uo.TextPrint('Рядом оказался чар - '+uo.GetName(uo.JournalSerial(0)) +Space +Time)
uo.Exec('exec ...
- 2011-01-20 21:48:53
- Forum: I need script!
- Topic: Антимакрос
- Replies: 8
- Views: 3308
Re: Антимакрос
как сервер называеться?
- 2011-01-19 01:33:54
- Forum: Help
- Topic: Добавить функцию в люмбере
- Replies: 6
- Views: 2018
Re: Добавить функцию в люмбере
Sirocco wrote:endif
вот сюда
wend
спасибо работает

- 2011-01-18 14:57:45
- Forum: Help
- Topic: Добавить функцию в люмбере
- Replies: 6
- Views: 2018
Re: Добавить функцию в люмбере
ты шо типо понтануться решил??? но ты лоханулся сам понел руский учи))))))))))))
я знаю что после 500 он домой реколиться вопрос был в другом,как сделать чотб после последнего деревa он пешом не шел к первому дереву а реколился в лес HELP HELP
Ну во первый что а не шо , во вторых руССкий язык, а ...
- 2011-01-18 14:15:38
- Forum: Help
- Topic: Добавить функцию в люмбере
- Replies: 6
- Views: 2018
Re: Добавить функцию в люмбере
скрипт и должен реколиться домой в таком варианте как ты написал.
НО условия перелета - 500 логов
var TryRecall=1 ## 1 - После того как соберет LogsQty логов, будет пытаться реколиться домой,
### складывать логи в сундук и реколиться обратно , 0 - не будет.
var LogsQty=500 ## - Количество ...
НО условия перелета - 500 логов
var TryRecall=1 ## 1 - После того как соберет LogsQty логов, будет пытаться реколиться домой,
### складывать логи в сундук и реколиться обратно , 0 - не будет.
var LogsQty=500 ## - Количество ...