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

Помогите Доделать Скрипт!
http://forum.yoko.com.ua/viewtopic.php?f=20&t=14507		 Page 1 of 1
Author:  kostjan [ 2009-03-06 21:53:56 ]
Post subject:  Помогите Доделать Скрипт!
Начел играть на пвп серваке, а там команда .sac и вот написал скрипт чтобы он разрезал труп с командой .sac но вот некак немогу сделать чтобы он ешё с него сначала денги забирал, а потом резал кто может помочь заранее спасибо! Совместил два скрипта но всёравно денги не лутит! Вот скриптуля!

Quote:
sub sacLoot()
var i,n
Dim Loot[1]
Loot[1]=0x0EED; gold
i = 500
FOR n=1 TO 1
uo.findtype(Loot[n],"-1","lastcontainer")
if uo.findcount() > 0 then
UO.grab(0, "finditem")
uo.print("Found "+str(uo.findcount()))
Wait(i)
END if
next
var corps=0x2006
UO.print(".sac script by spy")
wait(100)
while (i < 10000)
if UO.CountGround("0x2006") > 0 then
wait(100)
wait(100)
uo.say(".sac")
uo.waittargetground("0x2006")
i = i+1
endif
wend
end sub
end sub
Author:  Successful [ 2009-03-06 22:21:22 ]
Post subject: 
sub sacLoot()
var i
i = 500
uo.findtype('0x0EED',-1,'lastcorpse')
if uo.findcount() then
UO.grab(0, "finditem")
uo.print("Found "+str(uo.findcount()))
Wait(i)
END if
var corps=0x2006
UO.print(".sac script by spy")
wait(100)
while (i < 10000)
if UO.CountGround(corps) > 0 then
wait(100)
uo.say(".sac")
uo.waittargetground(corps)
i = i+1
endif
wend
end sub
Author:  kostjan [ 2009-03-07 01:44:23 ]
Post subject: 
Неработает также режыт труп и денги не берёт, только ешё таргет появился (((
Author:  Successful [ 2009-03-07 11:32:11 ]
Post subject: 
поправил %)
Author:  kostjan [ 2009-03-07 15:26:42 ]
Post subject: 
Незнаю бред какойто всёравно не собирает...
Выдаёт вон что! Image

Successful wrote:
поправил %)
Author:  Successful [ 2009-03-08 00:14:27 ]
Post subject: 
а где на картинке труп?:)
Author:  kostjan [ 2009-03-08 14:10:55 ]
Post subject: 
Да всё я уже сделал скрипт... (=

Successful wrote:
а где на картинке труп?:)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/