Yoko

All sides of Injection
It is currently 2026-01-17 14:32:32

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 11 posts ] 
  Print view Previous topic | Next topic 
Author Message
Morutsu
PostPosted: 2009-01-12 19:24:44 
Offline

Joined: 2008-01-30 20:22:03
Posts: 11
Накорябал тут скриптик, но где-то видать накосячил.
Должен бить куклу, есть, одевать курсу если НР => 75
Бьет, ест, но когда запускает процедуру CheckStr - пишет:
Code:
Items found: 18 
No items found



Code:
sub Str() 
 VAR i 
  repeat
   For i = 0 to 199 
    CheckStr()
    UO.UseFromGround('0x1070') #Type of dummy 
    Wait(4800) 
   Next 
   UO.UseType('0x160A') #Type of food 
   Wait(2000) 
  until UO.Death()
End sub 

Sub CheckStr() 
 VAR h,e 
 DIM Cursa[10] 
Cursa[0] = '0x1515'  #Cloak
Cursa[1] = '0x1F03'  #Robe
Cursa[2] = '0x1539'  #Pants
Cursa[3] = '0x1517'  #Shirt
Cursa[4] = '0x13CC'  #Leather tunic
Cursa[5] = '0x1C08'  #Leather skirt
Cursa[6] = '0x153F'  #Bandana
Cursa[7] = '0x13C6'  #Leather gloves
Cursa[8] = '0x13C7'  #Leather gorget
Cursa[9] = '0x13C5'  #Leather sleeves
 h = UO.GetMaxHp() 
 If h == 75 or h > 75 Then 
  For e = 0 to 9
   UO.FindType('Cursa[e]') 
    If UO.FindCount() > 0 Then
     UO.UseType('finditem') 
     Wait(3000) 
     e = 9
    Endif
  next
 Endif 
End Sub


Может подскажете чего?)
Top
   
Reply with quote  
Kynep
PostPosted: 2009-01-12 19:49:02 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Morutsu wrote:
Накорябал тут скриптик, но где-то видать накосячил.
Должен бить куклу, есть, одевать курсу если НР => 75
Бьет, ест, но когда запускает процедуру CheckStr - пишет:

Не морочайся с массивом, кинь курсу в мешок, впиши его ИД в скрип и вперед!
Code:
Sub CheckStr() 
 VAR pack = ' ' #ID Мешка с курсой.
 VAR h,e 
 h = UO.GetMaxHp() 
 If h == 75 or h > 75 Then 
   UO.FindType('-1', '-1', pack) 
    If UO.FindCount() > 0 Then
     UO.UseType('finditem') 
     Wait(3000) 
    Endif
 Endif 
End Sub
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2009-01-12 19:51:47 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
Я так понял качаешь силу на куклах? Так почему проверку ведёшь на максимальное количество жизни, а не силы?
Code:
h = UO.GetMaxHp()
 If h == 75 or h > 75 Then

Попробуй заменить на
Code:
If uo.str > 75 Then


P.S. Опять опередили. :)

_________________
Играю на drw.ru
Использую инжект 505.18 VeNd0r
Начинающий скриптер.
Top
   
Reply with quote  
Grin
 Post subject:
PostPosted: 2009-01-12 20:07:15 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
я вас всех опередю...

UO.FindType(Cursa[e])
Top
   
Reply with quote  
Morutsu
 Post subject:
PostPosted: 2009-01-12 21:16:39 
Offline

Joined: 2008-01-30 20:22:03
Posts: 11
Kynep wrote:
Не морочайся с массивом, кинь курсу в мешок, впиши его ИД в скрип и вперед!

Да, пожалуй. Опыт не пропьешь:)
Но опять же -
Items found: 10
No items found

ADEPT_ABP wrote:
Так почему проверку ведёшь на максимальное количество жизни, а не силы?

Плохо искал)

Grin wrote:
я вас всех опередю...

UO.FindType(Cursa[e])

Понял, сделал.

Теперь пишет:

Items found: 1
No items found
Top
   
Reply with quote  
Grin
 Post subject:
PostPosted: 2009-01-12 21:31:14 
Offline
Expert!
User avatar

Joined: 2005-05-04 14:05:19
Posts: 2580
Location: Москва
и? а что ты хотел то?:) такой скрипт... ты как какуюто шмотку находишь присваеваешь переменой цикла 9 то бишь останавливаешь его... что написал то и получил:) я и справил ошибку "не одевает":)
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2009-01-12 21:33:58 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Code:
sub Str() 
   VAR i,e=0
   DIM Cursa[10] 
   Cursa[0] = '0x1515'  #Cloak 
   Cursa[1] = '0x1F03'  #Robe 
   Cursa[2] = '0x1539'  #Pants 
   Cursa[3] = '0x1517'  #Shirt 
   Cursa[4] = '0x13CC'  #Leather tunic 
   Cursa[5] = '0x1C08'  #Leather skirt 
   Cursa[6] = '0x153F'  #Bandana 
   Cursa[7] = '0x13C6'  #Leather gloves 
   Cursa[8] = '0x13C7'  #Leather gorget 
   Cursa[9] = '0x13C5'  #Leather sleeves 


   repeat 
      For i = 0 to 199 

         If UO.Str >= 75 Then 
            UO.FindType(Cursa[e]) 
            UO.UseType('finditem') 
            e=e+1
            Wait(3000) 
         Endif 

         UO.UseFromGround('0x1070') #Type of dummy 
         Wait(4800) 
      Next 
      UO.UseType('0x160A') #Type of food 
      Wait(2000) 
   until UO.Death() 
End sub


Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2009-01-12 21:37:29 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Morutsu wrote:
Да, пожалуй. Опыт не пропьешь
Но опять же -
Items found: 10
No items found


Блин!!! Ну конечно!!Не UseType а UseObject! Вот дурья башка! Пробуй.
Code:
Sub CheckStr() 
 VAR pack = ' ' #ID Мешка с курсой.
 VAR h,e 
 h = UO.GetMaxHp() 
 If h == 75 or h > 75 Then 
   UO.FindType('-1', '-1', pack) 
    If UO.FindCount() > 0 Then
     UO.UseObject('finditem') 
     Wait(3000) 
    Endif
 Endif 
End Sub
Top
   
Reply with quote  
Morutsu
 Post subject:
PostPosted: 2009-01-12 21:56:07 
Offline

Joined: 2008-01-30 20:22:03
Posts: 11
Kynep wrote:
Блин!!! Ну конечно!!Не UseType а UseObject! Вот дурья башка! Пробуй.


Ахххаха! Шойтан!! Таки да:) Спасибо.

Savage wrote:
Code:
sub Str() 
   VAR i,e=0 
   DIM Cursa[10] 
   Cursa[0] = '0x1515'  #Cloak 
   Cursa[1] = '0x1F03'  #Robe 
   Cursa[2] = '0x1539'  #Pants 
   Cursa[3] = '0x1517'  #Shirt 
   Cursa[4] = '0x13CC'  #Leather tunic 
   Cursa[5] = '0x1C08'  #Leather skirt 
   Cursa[6] = '0x153F'  #Bandana 
   Cursa[7] = '0x13C6'  #Leather gloves 
   Cursa[8] = '0x13C7'  #Leather gorget 
   Cursa[9] = '0x13C5'  #Leather sleeves 


   repeat 
      For i = 0 to 199 

         If UO.Str >= 75 Then 
            UO.FindType(Cursa[e]) 
            UO.UseType('finditem') 
            e=e+1 
            Wait(3000) 
         Endif 

         UO.UseFromGround('0x1070') #Type of dummy 
         Wait(4800) 
      Next 
      UO.UseType('0x160A') #Type of food 
      Wait(2000) 
   until UO.Death() 
End sub


Так лучше конечно

З.ы. Оставил таки с мешком:) В паке меньше захламленность наблюдается
Top
   
Reply with quote  
Savage
 Post subject:
PostPosted: 2009-01-12 22:08:44 
Offline
Expert!
User avatar

Joined: 2004-04-04 11:13:54
Posts: 1205
Location: Балаково, Саратовская обл.
Ну да, когда сам пишеш такие ошибки просто невозможны. Когда правишь чужой скрипт, уже существующие ошибки просто просачиваются в новый вариант. :D Финдитем это объект а не тип, ну и юзать его надо как объект.
Top
   
Reply with quote  
ADEPT_ABP
 Post subject:
PostPosted: 2009-01-13 09:05:56 
Offline
User avatar

Joined: 2006-05-12 08:03:45
Posts: 223
Гы... Вот где собака порылась. :D Столько народу проглядело и каждый своё нашёл, а нужное не увидел(до поры, до времени). :D

_________________
Играю на drw.ru

Использую инжект 505.18 VeNd0r

Начинающий скриптер.
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 11 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:  
cron
Powered by phpBB® Forum Software © phpBB Limited