Grin wrote:на абисе
поставь галки TUS bug fix
и ,filterweather что бы отключить погоду.
В скрипте добавить просто uo.filterweather()?
И как выключить фильтр?
Moderators: Murderator+, Murderator
Code: Select all
sub main()
uo.exec("disarm")
var xs,ys,y,x,tile
while not uo.dead()
if UO.Count("0x0DBF")== 0 then
uo.say("Oai?ee iaoo! Iaoaeyao ia ?aaioa?")
uo.say(",closeuo")
end if
xs=Uo.GetX()
ys=Uo.GetY()
for x=xs-5 to xs+5
for y=ys-5 to ys+5
uo.deletejournal()
Tile= GetTileWater(x, y)
if Tile then
while not uo.injournal("any fish|fish there|complete")
uo.deletejournal()
wait(100)
uo.WaitTargetTile(Tile, x, y, 0)
uo.usetype('0x0DBF')
nolomka()
dropp()
while not uo.injournal("That is too far away|The skies|fish there|biting|You catch|any fish|location|walrus comes by to|You find|complete")
wend
end if
next
wend
UO.Print()
end sub
sub GetTileWater(x, y)
for var i=6039 to 6045
if uo.privategettile(x, y, -1, i, i) then
return i
end if
next
Return 0
end sub
sub dropp()
DIM mycop[4]
mycop[0] = 0x099F
mycop[1] = 0x14ED
mycop[2] = 0x170E
mycop[3] = 0x1710
VAR i
For i = 0 To 3
UO.FindType( mycop[i], '-1', 'backpack')
if uo.GetQuantity('finditem')>0 then
UO.Drop(-1, STR(UO.GetX('self')), STR(UO.GetY('self')), STR(UO.GetZ('self')-3), "finditem")
End if
next
end sub
sub nolomka()
wait(2000)
if uo.injournal("have to equip that to go") then
main()
end if
end sub
Code: Select all
Sub FishTile(t, x, y, z)
var timer
repeat
uo.WaitTargetTile(Str(t), Str(x), Str(y), Str(z))
uo.UseType(0x0DBF) #Удочка
uo.DeleteJournal()
timer = 0
repeat
wait(1000)
timer = timer + 1
until uo.InJournal("Points") or uo.InJournal("here") or uo.InJournal("line") or uo.InJournal("broken") or timer > 120
until uo.InJournal("here") or uo.InJournal("line")
end sub
sub Fishing()
var i, j, tile
uo.Disarm()
while not uo.dead()
for i = -6 to 6
for j = -6 to 6
tile = 168
while (not uo.PrivateGetTile(uo.GetX() + i, uo.GetY() + j, 251, tile, tile)) and (tile < 6045)
if tile == 171 then
tile = 310
else
if tile == 311 then
tile = 6039
else
tile = tile + 1
endif
endif
wend
if tile < 6039 then
tile = 0
endif
if tile < 6045 then
uo.concolor(0x53)
uo.Print("Fishing: " + Str((i + 6) * 13 + j + 7) + "/169...")
uo.concolor(0)
FishTile(tile, uo.GetX() + i, uo.GetY() + j, 251)
endif
next
next
uo.Print("Завершил круг. Продолжаю.")
wend
end sub
Code: Select all
sub main()
uo.exec("disarm")
var xs,ys,y,x,tile
while not uo.dead()
if UO.Count("0x0DBF")== 0 then
uo.say("Oai?ee iaoo! Iaoaeyao ia ?aaioa?")
uo.say(",closeuo")
end if
xs=Uo.GetX()
ys=Uo.GetY()
for x=xs-5 to xs+5
for y=ys-5 to ys+5
uo.deletejournal()
Tile= GetTileWater(x, y)
if Tile then
while not uo.injournal("any fish|fish there|complete")
uo.deletejournal()
wait(100)
uo.WaitTargetTile(Tile, x, y, 0)
uo.usetype('0x0DBF')
nolomka()
dropp()
while not uo.injournal("That is too far away|The skies|fish there|biting|You catch|any fish|location|walrus comes by to|You find|complete")
wend
end if
next
wend
UO.Print()
end sub
sub GetTileWater(x, y)
for var i=6039 to 6045
if uo.privategettile(x, y, -1, i, i) then
return i
end if
next
Return 0
end sub
sub dropp()
DIM mycop[4]
mycop[0] = 0x099F
mycop[1] = 0x14ED
mycop[2] = 0x170E
mycop[3] = 0x1710
VAR i
For i = 0 To 3
UO.FindType( mycop[i], '-1', 'backpack')
if uo.GetQuantity('finditem')>0 then
UO.Drop(-1, STR(UO.GetX('self')), STR(UO.GetY('self')), STR(UO.GetZ('self')-3), "finditem")
End if
next
end sub
sub nolomka()
wait(2000)
if uo.injournal("have to equip that to go") then
main()
end if
end sub
Code: Select all
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
::[0]=[0]=What do you want to use this on?
- 001951563+0125 --- server Server Talk
0000: 1c 00 4c 00 00 00 00 00 00 00 03 b2 00 03 53 79 : ..L...........Sy
0010: 73 74 65 6d 00 00 00 00 00 00 00 00 00 00 00 00 : stem............
0020: 00 00 00 00 00 00 00 00 00 00 00 00 54 68 65 72 : ............Ther
0030: 65 20 61 72 65 20 6e 6f 20 6c 6f 67 73 20 68 65 : e are no logs he
0040: 72 65 20 74 6f 20 63 68 6f 70 2e 00 -- -- -- -- : re to chop..
[warning: no object of speech]::add(There are no logs here to chop.) head=0 tail=1 len=1
Item: There are no logs here to chop.
::[0]=[1]=There are no logs here to chop.
::[0]=[1]=There are no logs here to chop.
::[0]=[1]=There are no logs here to chop.
::[0]=[1]=There are no logs here to chop.
::[0]=[1]=There are no logs here to chop.
[Идем к дереву 59: x=2084 y=2103]
- 001951563+0000 --- inj->client Server Talk
0000: 1c 00 4c ff ff ff ff 00 00 00 04 40 00 03 49 6e : ..L........@..In
0010: 6a 65 63 74 69 6f 6e 00 00 00 00 00 00 00 00 00 : jection.........
0020: 00 00 00 00 00 00 00 00 00 00 00 00 c8 e4 e5 ec : ................
0030: 20 ea 20 e4 e5 f0 e5 e2 f3 20 35 39 3a 20 78 3d : . ...... 59: x=
0040: 32 30 38 34 20 79 3d 32 31 30 33 00 -- -- -- -- : 2084 y=2103.
- 001952610+1047 --- server Pause Control
0000: 33 01 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : 3.
- 001952610+0000 --- server Update Character
0000: 77 00 33 48 d7 00 d6 08 23 08 2f 00 04 09 01 00 : w.3H....#./.....
0010: 03 -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- : .
- 001952610+0000 --- server Pause Control
0000: 33 00 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : 3.
- 001953469+0859 --- server Pause Control
0000: 33 01 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : 3.
- 001953469+0000 --- server Update Character
0000: 77 00 33 48 d7 00 d6 08 23 08 30 00 04 09 01 00 : w.3H....#.0.....
0010: 03 -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- : .
- 001953469+0000 --- server Pause Control
0000: 33 00 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : 3.
- 001954328+0859 --- client Ping
0000: 73 00 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : s.
- 001954782+0454 --- server Pause Control
0000: 33 01 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : 3.
- 001954782+0000 --- server Update Character
0000: 77 00 38 e7 b9 00 34 08 1b 08 29 00 00 07 db 00 : w.8...4...).....
0010: 03 -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- : .
- 001954782+0000 --- server Pause Control
0000: 33 00 -- -- -- -- -- -- -- -- -- -- -- -- -- -- : 3.
- 001961141+6359 --- server Pause Control
Не юзает и юзать не будет, так как всем влом переписывать все свои скрипты, ради того, чтобы они, может быть, стали бы стабильнее... Вот мне интересно, что такая проблема была поправить модуль не меняя синтаксиса?Destruction wrote:Дык решение давно существует, просто его никто не юзает...
Называется pinject
Эта ошибка - ошибка скриптового модуля, скриптовый модуль кривой - нужно просто его заменить нормальным -)
Code: Select all
***Error: Unhandled exception202: 0xC0000005 at 21083134
***Error: injection.dll base: 21000000
***Error: script.dll base: 1E320000
***Error: EAX=00000000, EBX=1E2255B8, ECX=00000000, EDX=00000000
***Error: ESI=210BA044, EDI=0012F7D4, ESP=0012F79C, EBP=72206E69
***Error: EIP=21083134, EFLAGS=00010246
***Error: Bytes at EIP:
0000: 8b 45 24 a3 a0 44 0f 21 8b 4d 2c 89 0d a4 44 0f : .E$..D.!.M,...D.
***Error: Bytes at ESP:
0000: 20 06 28 1e 69 6e 20 72 88 bd 24 1e 00 00 00 00 : .(.in r..$.....
0010: fc 3f 00 00 00 00 00 00 00 00 00 00 00 00 00 80 : .?..............
0020: ff 3f 00 00 00 00 00 00 b6 8c ea dc c6 92 dc c8 : .?..............
0030: 3d 40 00 00 55 4f 20 00 d4 b9 8d d1 a5 bd b9 81 : =@..UO .........