Yoko

Posted: **2007-01-10 10:29:04**

Помогите с масивами немогу два масива паставить -(((

скрипт на лут из костей а вот как паставить несколько тайпов кастей я непонимаю хелпаните плза )

Code: Select all

sub LootFromBones() 
var Bones=' type ' 
var dagger=' type ' 
var i , bonescontainer 
 DIM loot[2] 

  loot[0]='' 
  loot[1]='' 

  uo.WaitTargetObject('lastcorpse') 
  uo.UseType(dagger) 
  uo.FindType(Bones,'-1','ground') 
  if uo.FindCount() then 
    bonescontainer = uo.GetSerial('finditem') 
    uo.UseObject('bonescontainer') 
    for i = 0 to 1 
      uo.FindType(loot[i],'-1','bonescontainer') 
      if uo.FindCount() then 
        uo.moveitem('finditem','all') 
        wait(750) 
      end if 
    next 
    uo.Print(' There is nothing good in the corpse ') 
  else 
    uo.Print('You cant find any corpse around yourself') 
  end if 
end sub

а я хачу паставить вот ети тайпы кастей

Code: Select all

'0x0ECA'
'0x0ECB'
'0x0ECC'
'0x0ECD'
'0x0ECE'
'0x0ECF'
'0x0ED0'
'0x0ED1'
'0x0ED2'

но невыходит чтота =(((

Posted: **2007-01-10 12:00:19**

Code: Select all

sub LootFromBones() 
var dagger=' type ' 
var i, j, bonescontainer, Exit
 DIM loot[2] 
 DIM Bones[8]

  Bones[0]='0x0ECA'
  Bones[1]='0x0ECB' 
  Bones[2]='0x0ECC' 
  Bones[3]='0x0ECE' 
  Bones[4]='0x0ECF' 
  Bones[5]='0x0ED0' 
  Bones[6]='0x0ED1' 
  Bones[7]='0x0ED2'

  loot[0]=
  loot[1]=


  uo.WaitTargetObject('lastcorpse') 
  uo.UseType(dagger) 

  Exit=0
  j=0
  While j<=7 OR Exit==1
    uo.FindType(Bones[j],'-1','ground') 
    wait(300)
    if uo.FindCount() then 
      bonescontainer = uo.GetSerial('finditem')
      Exit=1
      uo.UseObject('bonescontainer') 
    for i = 0 to 1 
      uo.FindType(loot[i],'-1','bonescontainer') 
      if uo.FindCount() then 
        uo.moveitem('finditem','all') 
        wait(750) 
      end if 
    next 
    uo.Print(' There is nothing good in the corpse ') 
    endif
    j=j+1
  Wend
end sub

Posted: **2007-01-10 12:13:31**

Savage wrote:

Code: Select all

sub LootFromBones() 
var dagger=' type ' 
var i, j, bonescontainer, Exit
 DIM loot[2] 
 DIM Bones[8]

  Bones[0]='0x0ECA'
  Bones[1]='0x0ECB' 
  Bones[2]='0x0ECC' 
  Bones[3]='0x0ECE' 
  Bones[4]='0x0ECF' 
  Bones[5]='0x0ED0' 
  Bones[6]='0x0ED1' 
  Bones[7]='0x0ED2'

  loot[0]=
  loot[1]=


  uo.WaitTargetObject('lastcorpse') 
  uo.UseType(dagger) 

  Exit=0
  j=0
  While j<=7 OR Exit==1
    uo.FindType(Bones[j],'-1','ground') 
    wait(300)
    if uo.FindCount() then 
      bonescontainer = uo.GetSerial('finditem')
      Exit=1
      uo.UseObject('bonescontainer') 
    for i = 0 to 1 
      uo.FindType(loot[i],'-1','bonescontainer') 
      if uo.FindCount() then 
        uo.moveitem('finditem','all') 
        wait(750) 
      end if 
    next 
    uo.Print(' There is nothing good in the corpse ') 
    endif
    j=j+1
  Wend
end sub

не хочет он работать резать режет а лутить не хочет! а еще можете в это скрипт вставить что бы он лутил даже если вы в варе?

Posted: **2007-01-10 12:36:20**

Code: Select all

 uo.FindType(loot[i],'-1','bonescontainer')

Помойму тут ошибка

Posted: **2007-01-10 12:37:40**

Code: Select all

  loot[0]= 
  loot[1]=

Posted: **2007-01-10 17:44:33**

Человек спросил как ему лутить разные трупы, я ответил. Скрипт и не должен работать так как недоделан.

Posted: **2007-01-10 22:22:00**

Savage wrote:Человек спросил как ему лутить разные трупы, я ответил. Скрипт и не должен работать так как недоделан.

блин а помочь можеш доделать?

Posted: **2007-01-11 08:08:17**

Нет.