Переключение между 3 оружиями на 1 кнопку

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
traviq
Posts: 2
Joined: 2008-08-08 13:02:40

Переключение между 3 оружиями на 1 кнопку

Post by traviq »

Как сделать?
bow/kryss + shield/sword + shield
Purgen
Posts: 187
Joined: 2005-04-04 18:23:12

Post by Purgen »

проверками.
Если пусто - одеть лук
Если лук - одеть крис и щит
Если крис - одеть меч.
traviq
Posts: 2
Joined: 2008-08-08 13:02:40

Post by traviq »

Purgen wrote:проверками.
Если пусто - одеть лук
Если лук - одеть крис и щит
Если крис - одеть меч.


Незнаю я этих проверок я ваще нюб :( Помоги плиз
lpushech
Posts: 33
Joined: 2007-09-02 19:16:55

Post by lpushech »

вчера написал :D

Code: Select all

sub Weap3()
uo.findtype("0x13B1", "backpack")
if uo.findcount()>0 then
UO.UseType('0x13B1')
wait(100)
else
UO.Findtype( '0x13B9' )
If UO.GetQuantity( 'finditem' ) > 0 Then
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x13B9")
else
UO.Findtype( '0x1400' )
If UO.GetQuantity( 'finditem' ) > 0 Then
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x1400")
else
UO.Findtype( '0x13FE' )
If UO.GetQuantity( 'finditem' ) > 0 Then
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x13FE")
else
UO.Findtype( '0x0F5E' )
If UO.GetQuantity( 'finditem' ) > 0 Then
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x0F5E")
else
UO.Findtype( '0x13B5' )
If UO.GetQuantity( 'finditem' ) > 0 Then
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x13B5")
else
end if
end if
end if
end if
end if
UO.Attack('laststatus')
uo.waittargettype('laststatus')
end sub


тут сворд, крис, лонгсворд, скимитар, катана
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

lpushech wrote:вчера написал :D
тут сворд, крис, лонгсворд, скимитар, катана


Молодец :) ЫЫЫЫ
Scripts Writer
Posts: 2259
Joined: 2005-04-19 18:00:29
Location: Московская область
Contact:

Post by Scripts Writer »

Kynep wrote:
lpushech wrote:вчера написал :D
тут сворд, крис, лонгсворд, скимитар, катана


Молодец :) ЫЫЫЫ


+1 :!: :D
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Code: Select all

sub Weap3()
   uo.findtype("0x13B1", "backpack")
   if uo.findcount()>0 then
      UO.UseType('0x13B1')
      wait(100)
   else
      UO.Findtype( '0x13B9' )
      If UO.GetQuantity( 'finditem' ) > 0 Then
         UO.Exec("usetype 0x1B76")
         UO.Exec("usetype 0x13B9")
      else
         UO.Findtype( '0x1400' )
         If UO.GetQuantity( 'finditem' ) > 0 Then
            UO.Exec("usetype 0x1B76")
            UO.Exec("usetype 0x1400")
         else
            UO.Findtype( '0x13FE' )
            If UO.GetQuantity( 'finditem' ) > 0 Then
               UO.Exec("usetype 0x1B76")
               UO.Exec("usetype 0x13FE")
            else
               UO.Findtype( '0x0F5E' )
               If UO.GetQuantity( 'finditem' ) > 0 Then
                  UO.Exec("usetype 0x1B76")
                  UO.Exec("usetype 0x0F5E")
               else
                  UO.Findtype( '0x13B5' )
                  If UO.GetQuantity( 'finditem' ) > 0 Then
                     UO.Exec("usetype 0x1B76")
                     UO.Exec("usetype 0x13B5")
                  else
                  end if
               end if
            end if
         end if
      end if
      UO.Attack('laststatus')
      uo.waittargettype('laststatus')
   end sub

А вы говорите молодец... Чего только вторая строка стоит -)
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Telegram: @tatikom
Kynep
Expert!
Posts: 1348
Joined: 2006-02-07 08:51:40
Location: г. Старый Оскол
Contact:

Post by Kynep »

Но работает же. :twisted: :twisted: :lol: :lol: :lol:
Post Reply