Yoko

All sides of Injection
It is currently 2025-12-27 01:43:22

All times are UTC+02:00




Post new topic  Reply to topic  [ 5 posts ] 
Author Message
PostPosted: 2008-03-16 12:49:24 
Offline

Joined: 2008-03-16 12:36:48
Posts: 70
Значится цель скрипта в следующем.
Стоят рядом 2 чара при смерти первого второй должон слутить у него браслет манны и кинуть на пол.
Вот что я набросал

sub spasibrasmanki()
DIM bras[0]
bras[0] = '0x1086' ; нужный итем

VAR i
UO.UseObject( 'lastcorpse' )
wait(1000)
For i = 0 To 0
UO.FindType( Nado[i], '-1', 'lastcorpse' )
While UO.FindCount() > 0
UO.MoveItem( 'finditem' )
wait( 1000 )
UO.MoveItem( '0x12345678', '1', 'ground', '1', '0', '0' )
endsub
Но есть 2 вопроса
1. Как проверить что рядом стоящий чар помер?
2. Почему то браслет берет но не бросает на пол


Top
   
PostPosted: 2008-03-16 13:10:40 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Alex82 wrote:
Значится цель скрипта в следующем.
Стоят рядом 2 чара при смерти первого второй должон слутить у него браслет манны и кинуть на пол.
Вот что я набросал

Но есть 2 вопроса
1. Как проверить что рядом стоящий чар помер?
2. Почему то браслет берет но не бросает на пол


Точно набросал ))), пробуй так
Code:
sub spasibrasmanki() 
  var bras  = '0x1086'   ; нужный итем
  while 1
    UO.DeleteJournal()
    repeat
      wait(100)
    until UO.InJournal('Body ')
    UO.DeleteJournal()
    wait(500)
    UO.UseObject('lastcorpse')
    wait(1000)
    UO.FindType(bras, '-1', 'lastcorpse')
    While UO.FindCount() > 0
      UO.MoveItem('finditem', '-1', 'backpack')
      wait(1000)
      UO.MoveItem('finditem', '-1', 'ground')
      wait(1000)
      UO.FindType(bras, '-1', 'lastcorpse')
    wend
  wend
end sub


Top
   
 Post subject:
PostPosted: 2008-03-16 14:11:41 
Offline

Joined: 2008-03-16 12:36:48
Posts: 70
Ну не ругайте эт моя первая попвтка скриптописания.
Огромное спасибо за помощь.


Top
   
 Post subject:
PostPosted: 2008-03-16 14:19:44 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Alex82 wrote:
Ну не ругайте эт моя первая попвтка скриптописания.
Огромное спасибо за помощь.


Да нез) Неужели работает ) :shock:


Top
   
 Post subject:
PostPosted: 2008-03-16 21:24:52 
Offline

Joined: 2008-03-16 12:36:48
Posts: 70
Только что проверил,отлично работает.Огромное спасибо еще раз.


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 5 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 5 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited