nuzen sovsem prostoi skript na loot

CHYVAKs · Post by **CHYVAKs** » 2006-03-16 22:59:43

nuzen skriptik malenjkij i nesloznij.
chtobi delal `emptycontainer 750` na poslednij trup kotorij ubivajet.

Edred · Post by **Edred** » 2006-03-16 23:04:11

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

,emptycontainer 750 lastcorpse

И будет тебе счастье

CHYVAKs · Post by **CHYVAKs** » 2006-03-16 23:10:08

mne nado chtobi ja mog ostavitj chara okola spavna dlja prokachki.
nado chtobi on ubitogo npc lutal.

Edred · Post by **Edred** » 2006-03-16 23:12:58

Если хочешь чтоб кто-то помог - пиши внятно, что нужно. Подробно распиши, что скрипт должен делать и тогда есть шанс, что кто-то снизойдет.

CHYVAKs · Post by **CHYVAKs** » 2006-03-16 23:20:11

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 · Post by **Edred** » 2006-03-16 23:24:19

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 · Post by **CHYVAKs** » 2006-03-17 00:48:21

#####################################################################
; 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 · Post by **Edred** » 2006-03-17 01:24:07

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

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 · Post by **CHYVAKs** » 2006-03-17 14:23:39

Kruta

boljwoe spasibo...