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[Len(uTime)-i]+Date
if (i ...
Search found 22 matches
- 2014-12-21 19:51:42
- Forum: Help
- Topic: Unhandled exception in parser (!)
- Replies: 141
- Views: 172657
- 2014-12-21 04:50:36
- Forum: Help
- Topic: Unhandled exception in parser (!)
- Replies: 141
- Views: 172657
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: 2805
Re: До роботать ламбер ветерана
помоги как это выглядеть будет , кодомIncorrect User wrote:Добавь глобальные переменные, и при реколе, если реколишся при опасности сохраняй координаты, а если просто от перевеса то пиши 0. И потом когда прилетаешь, если переменная > 0 то берешь координаты из нее, если 0 то идешь в начало как обычно.
- 2014-04-28 06:49:12
- Forum: Scripting Ore
- Topic: До роботать ламбер ветерана
- Replies: 4
- Views: 2805
До роботать ламбер ветерана
v8.7 Full..Подскажите пожалуйста где что добавить :oops: ,что бы когда чар стоял в (DangerWait) по окончанию он не реколился и рубил первое дерево а реколился и шел к тому дереву у которого он увидел опасность? тобиш система как он логи выкладывает реколится в лес и идет к тому дереву у которого ...
- 2014-04-28 06:37:07
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 2442
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.SetGlobal ...
uo.GetStatus('uo.JournalSerial(0)')
uo.SetGlobal ...
- 2014-04-28 04:51:05
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 2442
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.TextPrint('Был вырублен Ент ...
- 2014-04-28 03:12:36
- Forum: Help
- Topic: Нужна не большая помощь в скрипте
- Replies: 5
- Views: 2442
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: 2442
Нужна не большая помощь в скрипте
Помогите люди добрые в чем проблема реколится без остановки после физла
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)
until not uo.InJournal ...
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)
until not uo.InJournal ...
- 2013-11-22 22:09:20
- Forum: General
- Topic: [Обновление! / Update!] Injection 2013
- Replies: 368
- Views: 300724
Re: [Обновление! / Update!] Injection 2013
давно пора ребята а то написан сервак в списке а он не разу не работал) надежду дали а на деле то не пашет сказали исправили по этому так не терпеться ёоу)
это ты про какой?
про который писал вам в сообщениях,которое вы увидели и проигнорировали,я написал другому человеку из вашей комманды он ...
это ты про какой?
про который писал вам в сообщениях,которое вы увидели и проигнорировали,я написал другому человеку из вашей комманды он ...
- 2013-11-20 23:25:29
- Forum: General
- Topic: [Обновление! / Update!] Injection 2013
- Replies: 368
- Views: 300724
Re: [Обновление! / Update!] Injection 2013
давно пора ребята а то написан сервак в списке а он не разу не работал) надежду дали а на деле то не пашет сказали исправили по этому так не терпеться ёоу)
- 2013-11-02 12:06:01
- Forum: General
- Topic: [Обновление! / Update!] Injection 2013
- Replies: 368
- Views: 300724
Re: [Обновление! / Update!] Injection 2013
а реально сделать в хоткейс кнопку рекорд как в асисте...записи действий что бы в ручную вот это не прописывать все usetype 0x12; waittargetobject 0x0000001; итд
было бы приятно а то пока инфой все посмотришь потом все это пропишешь ухх
будет ваше бомба 
- 2013-01-04 22:17:24
- Forum: Help
- Topic: Injection on The Abyss
- Replies: 20
- Views: 15447
Re: Injection on The Abyss
люди добрые подскажите пожалуйста а как зайти со своей inject dll`кой? а не с той которая в архиве
- 2013-01-04 22:03:45
- Forum: Shards talks
- Topic: Идем на восток... (для любителей абиса)
- Replies: 241
- Views: 189244
Re: Идем на восток... (для любителей абиса)
люди добрые подскажите пожалуйста а как зайти со своей inject dll`кой? а не с той которая в архиве
- 2012-04-08 14:09:53
- Forum: I need script!
- Topic: Обход анти-макрос системы.
- Replies: 5
- Views: 3818
Re: Обход анти-макрос системы.
как зайти с инжой на этот сервер подскажите пожалуйста
- 2012-04-08 14:09:05
- Forum: Shards talks
- Topic: The ASMUT PVP Копия Абисса ИНЖА
- Replies: 0
- Views: 7141
The ASMUT PVP Копия Абисса ИНЖА
Люди добрые помогите настроить инжект под этот сервер http://uo.theasmut.ru/
- 2011-02-14 00:47:01
- Forum: Help
- Topic: Рекол от чаров
- Replies: 1
- Views: 1285
Рекол от чаров
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: 4349
Re: Антимакрос
как сервер называеться?
- 2011-01-19 01:33:54
- Forum: Help
- Topic: Добавить функцию в люмбере
- Replies: 6
- Views: 2610
Re: Добавить функцию в люмбере
спасибо работаетSirocco wrote:endif
вот сюда
wend
- 2011-01-18 14:57:45
- Forum: Help
- Topic: Добавить функцию в люмбере
- Replies: 6
- Views: 2610
Re: Добавить функцию в люмбере
ты шо типо понтануться решил??? но ты лоханулся сам понел руский учи))))))))))))
я знаю что после 500 он домой реколиться вопрос был в другом,как сделать чотб после последнего деревa он пешом не шел к первому дереву а реколился в лес HELP HELP :roll:
Ну во первый что а не шо , во вторых руССкий ...
- 2011-01-18 14:15:38
- Forum: Help
- Topic: Добавить функцию в люмбере
- Replies: 6
- Views: 2610
Re: Добавить функцию в люмбере
скрипт и должен реколиться домой в таком варианте как ты написал.
НО условия перелета - 500 логов
var TryRecall=1 ## 1 - После того как соберет LogsQty логов, будет пытаться реколиться домой,
### складывать логи в сундук и реколиться обратно , 0 - не будет.
var LogsQty=500 ## - Количество логов ...
НО условия перелета - 500 логов
var TryRecall=1 ## 1 - После того как соберет LogsQty логов, будет пытаться реколиться домой,
### складывать логи в сундук и реколиться обратно , 0 - не будет.
var LogsQty=500 ## - Количество логов ...