Page 2 of 2

Posted: 2006-04-20 20:01:39
by SESTRA
Все успакойтесь)
Я не говарю что кто то прав кто нет все )

Posted: 2006-04-20 20:02:03
by SESTRA
Отныне буду вставлять

Code: Select all

 так

Posted: 2006-04-20 20:03:04
by SESTRA
А для чего в твоем скрипте ето

Code: Select all

 uo.say(" ,,,") 

Posted: 2006-04-20 20:57:19
by DerMeister =)
SESTRA wrote:А для чего в твоем скрипте ето

Code: Select all

 uo.say(" ,,,") 

Для прикола :)
Чтоб было видно когда лут закончится... замени на uo.print(), просто скрипту уже 100 лет, я тогда не умел по нормальному писать =(

Posted: 2006-04-20 21:09:05
by Destruction
Der wrote:
SESTRA wrote:А для чего в твоем скрипте ето

Code: Select all

 uo.say(" ,,,") 

Для прикола :)
Чтоб было видно когда лут закончится... замени на uo.print(), просто скрипту уже 100 лет, я тогда не умел по нормальному писать =(

Не, уопринт делает типа системное сообщение - отвлекает, лучше charprint(), ИМХО.

Posted: 2006-04-20 21:11:06
by SESTRA
А понял)

Posted: 2006-04-20 21:58:24
by SESTRA
Я хачу сказать чтоб у меня таргет не появлялся а лутил по ласт таргету например я чела килл и на кнопку нажал как в моем скрипте тоесть я его с форума взял и все мне падает в бек пак

Posted: 2006-04-20 21:59:01
by SESTRA
Я щяс сижу сморю как в других скриптах сделано мож сам сделаю ну серавно помагите плиз

Posted: 2006-04-20 22:05:10
by DerMeister =)
SESTRA wrote:Я хачу сказать чтоб у меня таргет не появлялся а лутил по ласт таргету например я чела килл и на кнопку нажал как в моем скрипте тоесть я его с форума взял и все мне падает в бек пак


Да мля, откуда у тебя таргет может появится? Никогда такого не видел... У тебя в настройках "permit vars loopback" включён?

Posted: 2006-04-20 22:07:10
by SESTRA
неа

Posted: 2006-04-20 22:07:32
by SESTRA
У меня таргет появляется и типа пишет кого бум лутать

Posted: 2006-04-21 00:48:48
by SESTRA

Code: Select all

 ; Àâòîìàòè÷åñêè ëóòèì ñ çåìëè îêîëî ÷àðà. Îäåæäó ñðàçó ðåæåì íà áèíòû. 
;
sub AutoLootGround()
   VAR Cleaver = '0x0EC2'   ; êëèâåð (òèï)
   VAR Scissor = '0x0F9E'   ; Íîæíèöû
   VAR fastloot = 'FastLoot detected.'
   DIM Nado[27]
   Nado[0]  = '0x0EED'   ; gp
   Nado[1]  = '0x1718'   ;
   Nado[2]  = '0x1516'   ; a skirt
   Nado[3]  = '0x1F03'   ; a robe
   Nado[4]  = '0x1F01'   ; a plain dress
   Nado[5]  = '0x1EFD'   ; a fancy shirt
   Nado[6]  = '0x1541'   ; a body sash
   Nado[7]  = '0x170B'   ; boots
   Nado[8]  = '0x170D'   ; sandals
   Nado[9]  = '0x1717'   ; a straw hat
   Nado[10] = '0x1539'   ; long pants   
   Nado[11] = '0x152E'   ; short pants
   Nado[12] = '0x1515'   ; a cloak
   Nado[13] = '0x1FA1'   ; tunic
   Nado[14] = '0x0EED'   ; gold coin
   Nado[15] = '0x0F3F'   ; arrows
   Nado[16] = '0x0F7A'   ; pearls, black pearls
   Nado[17] = '0x0F7B'   ; bood moss
   Nado[18] = '0x0F7D'   ; vials of blood
   Nado[19] = '0x0F84'   ; garlic
   Nado[20] = '0x0F85'   ; ginseng
   Nado[21] = '0x0F86'   ; mandrake root
   Nado[22] = '0x0F88'   ; night shade
   Nado[23] = '0x0F8C'   ; sulphorous ash
   Nado[24] = '0x0F8D'   ; spiders silk
   Nado[25] = '0x14ED'   ; a treasure map
   Nado[26] = '0x0E76'   ; backpack
   VAR i
   UO.Exec( 'set finddistance 3' )
   For i = 0 To 25
      UO.FindType( Nado[i], '-1', '1' )
      While UO.FindCount() > 0
         DeleteJournal( fastloot )
         If i < 14 Then
            UO.WaitTargetObject( 'finditem' )
            UO.UseType( Scissor )
            GetPause(500)
            CheckLag()
         Else
            If i == 23 Then
               If UO.GetQuantity( 'finditem' ) == 1 Then
                  UO.Ignore( 'finditem' )
               Else
                  UO.MoveItem( 'finditem' )
                  GetPause(350)
                  CheckLag()
               Endif
            Else
               UO.MoveItem( 'finditem' )
               GetPause(350)
               CheckLag()
            Endif
         Endif
         UO.FindType( Nado[i], '-1', '1' )
      Wend
   Next
   UO.Print( 'The loot was finished' )
endsub


А че тут посмарите я када встаю радам с указаными вешями то он мне выдает ошибку делит журнал ну что то вот тут

Code: Select all

 DeleteJournal( fastloot ) 
ошибка

Posted: 2006-04-21 00:50:57
by DerMeister =)
SESTRA wrote:

Code: Select all

 ; Àâòîìàòè÷åñêè ëóòèì ñ çåìëè îêîëî ÷àðà. Îäåæäó ñðàçó ðåæåì íà áèíòû. 
;
sub AutoLootGround()
   VAR Cleaver = '0x0EC2'   ; êëèâåð (òèï)
   VAR Scissor = '0x0F9E'   ; Íîæíèöû
   VAR fastloot = 'FastLoot detected.'
   DIM Nado[27]
   Nado[0]  = '0x0EED'   ; gp
   Nado[1]  = '0x1718'   ;
   Nado[2]  = '0x1516'   ; a skirt
   Nado[3]  = '0x1F03'   ; a robe
   Nado[4]  = '0x1F01'   ; a plain dress
   Nado[5]  = '0x1EFD'   ; a fancy shirt
   Nado[6]  = '0x1541'   ; a body sash
   Nado[7]  = '0x170B'   ; boots
   Nado[8]  = '0x170D'   ; sandals
   Nado[9]  = '0x1717'   ; a straw hat
   Nado[10] = '0x1539'   ; long pants   
   Nado[11] = '0x152E'   ; short pants
   Nado[12] = '0x1515'   ; a cloak
   Nado[13] = '0x1FA1'   ; tunic
   Nado[14] = '0x0EED'   ; gold coin
   Nado[15] = '0x0F3F'   ; arrows
   Nado[16] = '0x0F7A'   ; pearls, black pearls
   Nado[17] = '0x0F7B'   ; bood moss
   Nado[18] = '0x0F7D'   ; vials of blood
   Nado[19] = '0x0F84'   ; garlic
   Nado[20] = '0x0F85'   ; ginseng
   Nado[21] = '0x0F86'   ; mandrake root
   Nado[22] = '0x0F88'   ; night shade
   Nado[23] = '0x0F8C'   ; sulphorous ash
   Nado[24] = '0x0F8D'   ; spiders silk
   Nado[25] = '0x14ED'   ; a treasure map
   Nado[26] = '0x0E76'   ; backpack
   VAR i
   UO.Exec( 'set finddistance 3' )
   For i = 0 To 25
      UO.FindType( Nado[i], '-1', '1' )
      While UO.FindCount() > 0
         DeleteJournal( fastloot )
         If i < 14 Then
            UO.WaitTargetObject( 'finditem' )
            UO.UseType( Scissor )
            GetPause(500)
            CheckLag()
         Else
            If i == 23 Then
               If UO.GetQuantity( 'finditem' ) == 1 Then
                  UO.Ignore( 'finditem' )
               Else
                  UO.MoveItem( 'finditem' )
                  GetPause(350)
                  CheckLag()
               Endif
            Else
               UO.MoveItem( 'finditem' )
               GetPause(350)
               CheckLag()
            Endif
         Endif
         UO.FindType( Nado[i], '-1', '1' )
      Wend
   Next
   UO.Print( 'The loot was finished' )
endsub


А че тут посмарите я када встаю радам с указаными вешями то он мне выдает ошибку делит журнал ну что то вот тут

Code: Select all

 DeleteJournal( fastloot ) 
ошибка


Ну естесьтвенно, у тебя скрипт не весь...

Posted: 2006-04-21 00:55:55
by SESTRA
А нету не у кого с земли лутать мне дайте плиз сам скрипт а таипы я сам проставлю если не жалко

Posted: 2006-04-21 00:56:44
by Destruction
Учимся читать прикреплённые топики, начиная с правил, заканчивая вот этим топиком: viewtopic.php?t=7379

Еще раз - все отправитесь на каторгу, на трое суток - модераторами назначу, будите спам тереть :evil:


PS: Я за вами наблюдаю.. Харэ флад разводить :cry: