итак, нарубив хворост мне надо расскладывать по одному хворосту и зажегать, и так далее.. Как это мне сделать?
И ещё: У меня очень часто вылетает инжект, обычно когда бегу мими дома в катором я не прописан, почему это так? Если кто знает, помогите.
помогите с кемпингом
Moderators: Murderator+, Murderator
-
The Cheater
- Posts: 86
- Joined: 2005-02-08 15:39:19
- Location: D.R.W.
- Contact:
Re: помогите с кемпингом
|tdw| wrote:итак, нарубив хворост мне надо расскладывать по одному хворосту и зажегать, и так далее.. Как это мне сделать?
И ещё: У меня очень часто вылетает инжект, обычно когда бегу мими дома в катором я не прописан, почему это так? Если кто знает, помогите.
на
Code: Select all
#camp,camping,хворост.
VAR Xvorost = '****'
sub main()
while uo.count(Xvorost)>0
UO.FindType('Xvorost','0x0000','backpack')
UO.Drop('1',STR(UO.GetX('self')),STR(UO.GetY('self')),STR(UO.GetZ('self')),'finditem')
wait(500)
CheckLag()
UO.usefromground('finditem')
wait(500)
CheckLag()
#gotoxy(uo.getx()+1,uo.gety()+1)
wend
end sub
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub
Last edited by The Cheater on 2005-02-21 14:24:42, edited 1 time in total.
у меня есть 400 мешочков в каждом по 255 никлейсов,один никлейс-32гп всё влом пойти загнать..
-
The Cheater
- Posts: 86
- Joined: 2005-02-08 15:39:19
- Location: D.R.W.
- Contact:
а чо сдесь такого то ?Askaneli wrote:Я чё та где то краем уха слышал что за такое творчество с раскладыванием хвороста вокруг себя на ДРВ ГМ просто так мимо не пройдёт. Могет и ошибаюсь.
уже хворост нельзя пораскладывать штоли ?
у меня есть 400 мешочков в каждом по 255 никлейсов,один никлейс-32гп всё влом пойти загнать..
-
The Cheater
- Posts: 86
- Joined: 2005-02-08 15:39:19
- Location: D.R.W.
- Contact:
-
The Cheater
- Posts: 86
- Joined: 2005-02-08 15:39:19
- Location: D.R.W.
- Contact:
-
The Cheater
- Posts: 86
- Joined: 2005-02-08 15:39:19
- Location: D.R.W.
- Contact:
-
The Cheater
- Posts: 86
- Joined: 2005-02-08 15:39:19
- Location: D.R.W.
- Contact:
The Cheater wrote:а чо сдесь такого то ?Askaneli wrote:Я чё та где то краем уха слышал что за такое творчество с раскладыванием хвороста вокруг себя на ДРВ ГМ просто так мимо не пройдёт. Могет и ошибаюсь.
уже хворост нельзя пораскладывать штоли ?
Раскладывать можно, но как я понял вредно, лагает там или ещё что то. В общем ГМам не нравится.
Сделал дело - флуди смело !!!
Sfagnum wrote:потерпят если дохера айтемов на один тайл напихают....
Ну а как тогда ещё качать?
Нет ничего невозможного...
Кто ИЩЕТ, тот всегда найдёт...
© I'm
Кто ИЩЕТ, тот всегда найдёт...
Code: Select all
sub UO()
UO.Chto-To("S Chem-To")
end sub© I'm
SAMURAI wrote:Sfagnum wrote:потерпят если дохера айтемов на один тайл напихают....
Ну а как тогда ещё качать?
нвте ради интереса будет ли на ДРВ у вас пахать
Code: Select all
#############################Camping############################
; Camping. v.1.00a (c) Goggy
; Чар портится к мешочку с щепками, берёт указанное кол-во
; и портится на место сжигания(хоть в лесу ;) ), предлогается
; указать две руны 1-я, на место сжигания, 2-я - домой.
; Чар разбрасывает вокруг себя по щепке в радусе 3 клеток,
; потом сжигает их и переходит ниже на 10 шагов.
; Как тока щпки кончаются, перс реколится заново.
; Enjoy :)
sub lootKindling()
uo.Print(Выбери руну в мусорожигатель :)...')
uo.Exec('addobject RuneToFire')
while uo.Targeting()
wait(100)
wend
uo.DeleteJournal()
uo.Print(Выбери руну к мешку...')
uo.Exec('addobject RuneToHome')
while uo.Targeting()
wait(100)
wend
uo.DeleteJournal()
var ore = '0x0de1' ;тайп щепок
var Sunduk = '' ;мешок с щепками(сериал)
var Kolvo = 1000 ;скока щепок брать
#RecallHome('RuneToHome',Kolvo)
#RecallFire('RuneToFire')
uo.Print('Ну чё ПОЕХАЛИ!!!!!! =)...')
var g, i, j, mx, my, mz
wait(500)
Dubl:
uo.FindType(ore,-1)
while UO.Count( ore )>0
while NOT UO.Hidden()
UO.Useskill("Hiding")
wait(3000)
wend
wait(1000)
UO.Print(' Ostalos ' + Str( UO.Count( ore ) ) + ' Kindling' )
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
for i = mx-3 to mx+3
for j = my-3 to my+3
uo.FindType(ore,-1)
uo.MoveItem('finditem','1','ground',str(i),str(j),str(mz))
wait(400)
next
next
gav:
uo.findtype('0x0de1',-1,'ground')
if UO.FindCount() > 0 then
UO.usefromground ("0x0de1")
wait(500)
UO.usefromground ("0x0de1")
wait(500)
UO.usefromground ("0x0de1")
wait(500)
UO.usefromground ("0x0de1")
wait(500)
UO.usefromground ("0x0de1")
wait(500)
UO.usefromground ("0x0de1")
wait(500)
goto gav
end if
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
uo.press(40)
wait(500)
wend
RecallHome('RuneToHome',Sunduk,Kolvo)
RecallFire('RuneToFire')
goto Dubl
end sub
Sub RecallHome(Runa,Meshok,Sum)
repeat
Mana()
UO.deletejournal()
UO.Print("Прыгаем домой... К заветному мешочку :)")
uo.cast('Recall','Runa')
wait(10000)
until uo.InJournal("fizzles")
UO.deletejournal()
UO.useobject(Meshok)
wait(500)
UO.findtype('0x0de1',-1,Meshok)
wait(500)
if UO.FindCount() == 0 then
UO.Print("Облом... Ща перс покачает магери на реколах :)")
return
end if
UO.Grab(Sum,'finditem')
wait(3000)
UO.deletejournal()
end sub
Sub RecallFire(Runa)
repeat
Mana()
UO.deletejournal()
UO.Print("!!Прыгаем в поле... Или в лес... Ну короче кто куда !! :)")
uo.cast('Recall','Runa')
wait(10000)
until uo.InJournal("fizzles")
UO.deletejournal()
end sub
Sub Mana()
While UO.Int > UO.Mana
UO.Useskill("Meditation")
wait(100)
wend
end sub