Yoko
http://forum.yoko.com.ua/

Cкрипт на поднятие
http://forum.yoko.com.ua/viewtopic.php?f=20&t=2526
Page 1 of 1

Author:  ilove_skazi [ 2005-01-08 04:57:41 ]
Post subject:  Cкрипт на поднятие

Народ помогите :) Подкиньте толковый скрипт на поднятие подушек,сундуков,хвороста и прочей фигни! у меня просто есть древнейший скрипт,который не устраивает уже
Заранее спасибо

Author:  BETEPAH [ 2005-01-08 21:43:37 ]
Post subject:  Re: Cкрипт на поднятие

ilove_skazi wrote:
Народ помогите :) Подкиньте толковый скрипт на поднятие подушек,сундуков,хвороста и прочей фигни! у меня просто есть древнейший скрипт,который не устраивает уже
Заранее спасибо

Выложи глянемь .....мож переделаем )))

Author:  ilove_skazi [ 2005-01-10 01:19:00 ]
Post subject: 

Первый скрипт- sub woodp()
uo.exec("set finddistance 3")
uo.exec("findtype 0x0E7D -1 ground")
uo.exec("grab 0 finditem")
wait(300)
uo.exec("findtype 0x0E7D -1 ground")
uo.exec("grab 0 finditem")
wait(300)
end sub Второй скрипт- sub v2()
var x
dim a[2]
a[1]=0x0E7D-вид сундука
a[2]=0x09AA-вид флипнутого сундука

for x=1 to 2
repeat
uo.findtype(a[x],"-1","ground")
if UO.FindCount() and Uo.GetDistance("finditem")<3 then
uo.moveitem("finditem")
wait(300)
end if
next
uo.print("!")
end sub Второй скрипт че то глючит.Желательно чтоб скрипт поднимал любого вида сундуки,причем поднимал сразу 2 сундука при исп скрипта

Author:  necron [ 2005-01-10 03:27:59 ]
Post subject: 

ilove_skazi wrote:
Первый скрипт- sub woodp()
uo.exec("set finddistance 3")
uo.exec("findtype 0x0E7D -1 ground")
uo.exec("grab 0 finditem")
wait(300)
uo.exec("findtype 0x0E7D -1 ground")
uo.exec("grab 0 finditem")
wait(300)
end sub Второй скрипт- sub v2()
var x
dim a[2]
a[1]=0x0E7D-вид сундука
a[2]=0x09AA-вид флипнутого сундука

for x=1 to 2
repeat
uo.findtype(a[x],"-1","ground")
if UO.FindCount() and Uo.GetDistance("finditem")<3 then
uo.moveitem("finditem")
wait(300)
end if
next
uo.print("!")
end sub Второй скрипт че то глючит.Желательно чтоб скрипт поднимал любого вида сундуки,причем поднимал сразу 2 сундука при исп скрипта

во втором скрипте после repeat until забыл

Author:  ilove_skazi [ 2005-01-10 03:32:48 ]
Post subject: 

sub v2()
var x
dim a[2]
a[1]=0x0E7D-вид сундука
a[2]=0x09AA-вид флипнутого сундука

for x=1 to 2
repeat
uo.findtype(a[x],"-1","ground")
if UO.FindCount() and Uo.GetDistance("finditem")<3 then
uo.moveitem("finditem")
wait(300)
end if
next
uo.print("!")
end sub [/quote]
во втором скрипте после repeat until забыл[/quote]
подскажи где там until втискивать?

Author:  ilove_skazi [ 2005-01-12 03:55:36 ]
Post subject: 

Ветер ну помоги :)

Author:  666Man666 [ 2005-01-12 05:08:21 ]
Post subject: 

Держи твой модернизированный скрипт
Code:
sub LootItems() 
var n
Dim Item[2]
Item[1] = '0x0E7D' ; вид сундука
Item[2] = '0x09AA' ; вид флипнутого сундука
UO.Set('finddistance','3')
For n = 1 to 2
REPEAT
UO.FindType(Item[n],'-1','1')
If UO.FindCount() Then
UO.MoveItem('finditem','1','2')
Wait(300)
EndIf
Until UO.FindCount()==0 or UO.Dead()
Next
end sub

Author:  BETEPAH [ 2005-01-12 09:59:07 ]
Post subject: 

ilove_skazi wrote:
Ветер ну помоги :)


Я не один .)))

Author:  Askaneli [ 2005-01-12 10:45:50 ]
Post subject: 

BETEPAH wrote:
ilove_skazi wrote:
Ветер ну помоги :)


Я не один .)))
Он с девушкой !!! :wink:

Author:  admir [ 2005-01-13 07:30:10 ]
Post subject: 

а сделать проверку на возможность поднятия , типа если ю кант рич зем то перейти на следущий , как?

Author:  666Man666 [ 2005-01-13 08:55:03 ]
Post subject: 

admir wrote:
а сделать проверку на возможность поднятия , типа если ю кант рич зем то перейти на следущий , как?

uo.ignore() и u uo.ignorereset() должны тибе помочь..., но с ними бывают глюки... клиент крашится...

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/