nuzen sovsem prostoi skript na loot

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
CHYVAKs
Posts: 46
Joined: 2005-03-16 10:14:15

nuzen sovsem prostoi skript na loot

Post by CHYVAKs »

nuzen skriptik malenjkij i nesloznij.
chtobi delal `emptycontainer 750` na poslednij trup kotorij ubivajet.
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Ну так просто в инжекте забиндь на клавишу такую команду:

Code: Select all

,emptycontainer 750 lastcorpse
И будет тебе счастье
Last edited by Edred on 2006-03-16 23:11:36, edited 1 time in total.
CHYVAKs
Posts: 46
Joined: 2005-03-16 10:14:15

Post by CHYVAKs »

mne nado chtobi ja mog ostavitj chara okola spavna dlja prokachki.
nado chtobi on ubitogo npc lutal.
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Если хочешь чтоб кто-то помог - пиши внятно, что нужно. Подробно распиши, что скрипт должен делать и тогда есть шанс, что кто-то снизойдет.
CHYVAKs
Posts: 46
Joined: 2005-03-16 10:14:15

Post by CHYVAKs »

ja ostovljaju chara u respavna npc, nado chtobi skript kogda ja ubivaju npc lutal ego trup, potom opjatj kak toka ja ego ubivaju on ego lutal i tak beskonechno...
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Code: Select all

#####################################################################
; BackgroundZonner. v.1.02b (c) Edred
;
; Ожидание сообщения 'Body of' и автоматический лут последнего трупа.
;
sub BackgroundZonner()
	VAR msg1 = 'Body of'
	VAR flag = 1
	If UO.Targeting() Then
		UO.CancelTarget()
	Endif
	DeleteJournal( msg1 )
	While NOT UO.Dead()
		If UO.InJournal( msg1 ) Then
			DeleteJournal( msg1 )
			AutoLoot()
		Else
			wait(300)
		Endif
	Wend
endsub
Функции DeleteJournal и Autoloot возьми из топика "Наследство от Эдреда"
CHYVAKs
Posts: 46
Joined: 2005-03-16 10:14:15

Post by CHYVAKs »

#####################################################################
; BackgroundZonner. v.1.02b (c) Edred
;
; Ожидание сообщения 'Body of' и автоматический лут последнего трупа.
;
sub BackgroundZonner()
VAR msg1 = 'Body of Mummy'
VAR flag = 1
If UO.Targeting() Then
UO.CancelTarget()
Endif
UO.DeleteJournal( msg1 )
While NOT UO.Dead()
If UO.InJournal( msg1 ) Then
UO.DeleteJournal( msg1 )
wait(500)
UO.Exec('emptycontainer 750 lastcorpse')
Else
wait(300)
Endif
Wend
endsub



a tak ne luchwe budet vigljajdetj?
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Вот так будет лучше:

Code: Select all

##################################################################### 
; BackgroundZonner. v.1.02s (c) Edred
;
; Special Edition for CHYVAKs
; 
; Ожидание сообщения 'Body of' и автоматический лут последнего трупа. 
; 
sub BackgroundZonner() 
	VAR msg1 = 'Body of' 
	VAR flag = 1 
	If UO.Targeting() Then 
		UO.CancelTarget() 
	Endif 
	UO.DeleteJournal() 
	While NOT UO.Dead() 
		If UO.InJournal( msg1 ) Then
			UO.UseObject( 'lastcorpse' )
			wait(500)
			UO.EmptyContainer( 750, 'lastcorpse' )
			UO.DeleteJournal() 
		Else 
			wait(300) 
		Endif 
	Wend 
endsub
CHYVAKs
Posts: 46
Joined: 2005-03-16 10:14:15

Post by CHYVAKs »

Kruta :lol: :lol: :lol:
boljwoe spasibo...
Post Reply