Page 1 of 1

Отцы скриптеры помогите

Posted: 2005-03-20 09:34:31
by Adec[DrW]
Нужен скрипт чтоб разрезал ластаргет.Понятия не имею как это зделать.

Posted: 2005-03-20 10:39:58
by Edred
Забиндь:

Code: Select all

waittargetobject lasttarget;usetype 0x0EC2
0x0EC2 - это тип кливера. У нас на шарде они используются для резки. Если у тебя другой тип - подставь свой.

Я бы рекомендовал тебе конечно работать не по ласттаргету, а по последнему трупу. Тогда это так:

Code: Select all

waittargetobject lastcorpse;usetype 0x0EC2

ДЕРЖИ переделай под себя ))

Posted: 2005-03-20 23:40:38
by Vija [ XAOC ]
sub LT()
UO.FindType(0x2006,-1,'ground')
wait(55)
UO.WaitTargetObject("lastcorpse")
UO.UseObject(UO.ObjAtLayer('Lhand'))
wait(2000)
UO.FindType(0x1078,-1,'lastcorpse')
UO.grab(1, "finditem")
wait(1000)
if UO.count('0x1078')>0 then
UO.Usetype('0x0F9E')
UO.waittargettype(0x1078)
else
UO.Usetype('0x0F9E')
UO.waittargettype(0x1078)
end if

end sub

----Режит труп(последнего убитого ) сразу заберает кожу - потом режет ее и кладет в бекпак
-----------------------------------В бекпаке должни бить ножнеци а в руках оружее 0 чтоби резать когонить )))

Posted: 2005-03-21 10:33:50
by MazaFaka
----Режит труп(последнего убитого ) сразу заберает кожу - потом режет ее и кладет в бекпак
-----------------------------------В бекпаке должни бить ножнеци а в руках оружее 0 чтоби резать когонить )))
какая кожа какие ножницы?
человека интеесует как быстрее всех порезать труп плеера и облутать его! :twisted:

Posted: 2005-03-22 13:56:37
by Adec[DrW]
MazaFaka wrote:
----Режит труп(последнего убитого ) сразу заберает кожу - потом режет ее и кладет в бекпак
-----------------------------------В бекпаке должни бить ножнеци а в руках оружее 0 чтоби резать когонить )))
какая кожа какие ножницы?
человека интеесует как быстрее всех порезать труп плеера и облутать его! :twisted:
Вобщето меня интересует.Чтоб разрезал труп и перышки собирал или кости.

Posted: 2005-03-22 14:05:29
by Sfagnum
Adec[DrW] wrote:Вобщето меня интересует.Чтоб разрезал труп и перышки собирал или кости.

Code: Select all

UO.waittargetobject('lastcorpse')
UO.usetype('тип_ножниц_тут')
UO.UseObject('lastcorpse')
потом лутаешь.

Posted: 2005-03-22 14:23:50
by Adec[DrW]
Sfagnum wrote:
Adec[DrW] wrote:Вобщето меня интересует.Чтоб разрезал труп и перышки собирал или кости.

Code: Select all

UO.waittargetobject('lastcorpse')
UO.usetype('тип_ножниц_тут')
UO.UseObject('lastcorpse')
потом лутаешь.
А как добвить чтоб сам лутал например перья?

Posted: 2005-03-22 14:37:00
by Sfagnum
Adec[DrW] wrote:А как добвить чтоб сам лутал например перья?
берёшь любой скрипт на лут вбиваешь туда нужный тип и лутаешь...

Posted: 2005-03-22 18:22:57
by Stranger[BV]

Code: Select all

sub MonstersLoot()	
#скрипт режет труп монстра после чего ищет в нем нужные #ингридиенты выставленные в #Item[]
#после чего он собирает их и прячет труп функцией hide
#и берет в руки обратно оружие
	Dim Item[9]
	Item[0]='0x0F78' ;BatWings
	Item[1]='0x0EED' ;Gold
	Item[2]='0x0F7B' ;bm
	Item[3]='0x0F7A' ; BP
	Item[4]='0x0F90' ;deadwood
	Item[5]='0x0F7E' ;bones
	Item[6]='0x0F87' ;Eyes of newt
	Item[7]='0x1BDD' ;Logs
	Item[8]='0x1BD1' ;ïåðüÿ 
	Item[9]='0x0F8E' ; çìåèíûå ÷åøóéêè

	uo.SetArm('Temp')
	uo.UseObject('lastcorpse')
	uo.WaitTargetObject('lastcorpse')
	uo.UseType('0x0F52') ;Dagger
	CheckLag()
	wait(1000)
	
	Var i
	for i=0 to 9
		if Item[i]<>'' then
			uo.FindType(Item[i],-1,'lastcorpse')
			if uo.GetQuantity('finditem') then
				uo.MoveItem('finditem')
				CheckLag()
				wait(700)
			endif
		endif
	next
	
	uo.Hide('lastcorpse')
	uo.Arm('Temp')
                uo.print('Crafted by Stranger[BV])
end sub 

Re: Отцы скриптеры помогите

Posted: 2010-03-09 13:43:25
by xatifnaft
А как тогда сделать, чтобы после резки, он лутил голову и автоматом открывал порезанный труп?

Re: Отцы скриптеры помогите

Posted: 2010-03-10 10:50:40
by Scripts Writer
Вот это что называется поиск- откопать тему пятилетней давности и написать сюда, дабы не плодить новую :)

Code: Select all

sub CanibalLoot()
  var tHead = ''
  uo.FindType(tHead,'-1','ground')
  if uo.FindCount() then
    uo.MoveItem('finditem')
    wait(500)
    uo.Print('Head was picked up.')
  else
    uo.Print('No head on the ground')
  endif
  uo.UseObject('lastcorpse')
end sub

Re: Отцы скриптеры помогите

Posted: 2010-03-21 09:24:20
by Kynep
Тут все отцы отписались :)