Yoko
http://forum.yoko.com.ua/

Повтор хилА, помогите! +(
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12193		 Page 1 of 1
Author:  Acc ^ [ 2007-07-06 16:54:32 ]
Post subject:  Повтор хилА, помогите! +(
Помогите, пожалуйста, сделать так, что бы скрипт повторялся или был цикличным (я не знаю, как это называется).
Чтобы после запуска и хила, скрипт не отключался, а хилил чара, как только хп становится меньше половины.
И если можно, подпишите, пожалуйста, функцию мытья бинтов (с помощью тазика). Мну не умеет :roll: :oops:

Code:
sub heal()
   repeat
      UO.SetArm('CWeapon') 
      UO.Exec("bandageself") 
      wait(500) 
      UO.Arm('CWeapon') 
      wait(4000)
   until uo.life==uo.str
end sub
Author:  Acc ^ [ 2007-07-06 17:20:58 ]
Post subject: 
Господа, умеющие писать скрипты, отзовитесь.
Для вас ведь это, как 2х2 :(
Author:  Rivory [ 2007-07-06 18:15:03 ]
Post subject: 
Code:
sub heal()
var hpp=str(uo.str)/2
uo.set('finddistasce', '3')
uo.Print('Pokagi 4istiy bint')
uo.addobject ('cbint')
while uo.targeting()
  wait(100)
wend
uo.Print('Pokagi gr9zniy bint')
uo.addobject ('gbint')
while uo.targeting()
  wait(100)
wend
uo.Print('Pokagi banku s voduy')
uo.addobject ('banka')
while uo.targeting()
  wait(100)
wend
repeat
  if uo.hp < hpp then
    if uo.count(uo.getgraphic('cbint')) > 2 then
      uo.usetype(uo.getgraphic('cbint'))
      wait (3000) ## задержку поправь
    else
      uo.print('net bintov.. mou gr9znie')
      uo.waittargetground(uo.getgraphic('banka'))
      checklag()  ## надеюсь, знаешь, что это ?
      uo.usetype(getgraphic('gbint'))
    end if
  end if
until uo.dead()
end sub


Я, конечно, реально поизвращался над этим скриптом, но, по идеи, должно работать :roll:
Author:  Acc ^ [ 2007-07-06 18:43:37 ]
Post subject: 
Line 2: Bad operation for this type of variable - HPP :(
Author:  Rivory [ 2007-07-06 19:12:42 ]
Post subject: 
Code:
var hpp=100 ### сюда впиши хп при котором хилить
Author:  Acc ^ [ 2007-07-06 20:58:42 ]
Post subject: 
Line 20: Variable undefined - OU.HP

Code:
if uo.hp < hpp then

:?: :oops: :(


Code:
sub heal()
var hpp=100
uo.set('finddistasce', '3')
uo.Print('Pokagi 4istiy bint')
uo.addobject ('cbint')
while uo.targeting()
  wait(100)
wend
uo.Print('Pokagi gr9zniy bint')
uo.addobject ('gbint')
while uo.targeting()
  wait(100)
wend
uo.Print('Pokagi banku s voduy')
uo.addobject ('banka')
while uo.targeting()
  wait(100)
wend
repeat
  if uo.hp < hpp then
    if uo.count(uo.getgraphic('cbint')) > 2 then
      uo.usetype(uo.getgraphic('cbint'))
      wait (3000) ## задержку поправь
    else
      uo.print('net bintov.. mou gr9znie')
      uo.waittargetground(uo.getgraphic('banka'))
      checklag()  ## надеюсь, знаешь, что это ?
      uo.usetype(getgraphic('gbint'))
    end if
  end if
until uo.dead()
end sub
Author:  ADEPT_ABP [ 2007-07-07 08:57:20 ]
Post subject: 
Acc ^ wrote:
Помогите, пожалуйста, сделать так, что бы скрипт повторялся или был цикличным (я не знаю, как это называется).
Чтобы после запуска и хила, скрипт не отключался, а хилил чара, как только хп становится меньше половины.
И если можно, подпишите, пожалуйста, функцию мытья бинтов (с помощью тазика). Мну не умеет :roll: :oops:

Code:
sub heal()
   repeat
      UO.SetArm('CWeapon') 
      UO.Exec("bandageself") 
      wait(500) 
      UO.Arm('CWeapon') 
      wait(4000)
   until uo.life==uo.str
end sub


Я конечно не скриптёр(так лубитель :mrgreen: ), но у меня вызывает недоумение строка
Code:
UO.SetArm('CWeapon')

Насколько я знаю - это "присвоить набору вооружения(щит&ковырялка)" имя "name". В твоём случае это - CWeapon.
А строка:
Code:
UO.Arm('CWeapon')

Вооружает набором CWeapon.
Вопрос - Для чего?
По поводу - "...хилил чара, как только хп становится меньше половины. " - поставь условие.
Code:
 If uo.life <= uo.str\2 then
   *начинаем бинтовать*
 end if
[/code]

Полоскать бинты. Это просто.
тебе нужно узнать(при помощи набранной в Ультиме команды - ,info и появившимся прицелом на нужную весчь) тип(type) "blood"ливых бинтов и плошки с водой. А потом вписать в скрипт
Code:
uo.weittargettype("тип плошки с водой")
uo.usetype("тип грязных бинтов")


А тот скрипт, что тебе наваяли надо довести до ума. Так как на разных компах скрипт ведёт себя по-разному. Например, для чего поставлена команда
Code:
uo.waittargetground(uo.getgraphic('banka'))

ведь она ищет банку с водой в мире, то есть под ногами, за диваном :D и т.д. и т.п. Разве плошка с водой не в бэкпаке?
Author:  Rivory [ 2007-07-07 13:39:58 ]
Post subject: 
Code:
sub heal()
var hpp=100
uo.set('finddistasce', '3')
uo.Print('Pokagi 4istiy bint')
uo.addobject ('cbint')
while uo.targeting()
  wait(100)
wend
uo.Print('Pokagi gr9zniy bint')
uo.addobject ('gbint')
while uo.targeting()
  wait(100)
wend
uo.Print('Pokagi banku s voduy')
uo.addobject ('banka')
while uo.targeting()
  wait(100)
wend
repeat
  if uo.life < hpp then
    if uo.count(uo.getgraphic('cbint')) > 2 then
      UO.SetArm('CWeapon')
      uo.usetype(uo.getgraphic('cbint'))
      wait (3000) ## задержку поправь
      UO.Arm('CWeapon')
      wait (1000) ## задержку поправь
    else
      uo.print('net bintov.. mou gr9znie')
      uo.waittargettype(uo.getgraphic('banka'))##если банка в паке
      uo.waittargetground(uo.getgraphic('banka'))##если банка на полу.
###########################################лишнее удали
      checklag()  ## надеюсь, знаешь, что это ?
      uo.usetype(getgraphic('gbint'))
    end if
  end if
until uo.dead()
end sub

Поправил, терь будет работать.


Acc ^ wrote:

Я конечно не скриптёр(так лубитель :mrgreen: ), но у меня вызывает недоумение строка
Code:
UO.SetArm('CWeapon')

Насколько я знаю - это "присвоить набору вооружения(щит&ковырялка)" имя "name". В твоём случае это - CWeapon.
А строка:
Code:
UO.Arm('CWeapon')

Вооружает набором CWeapon.
Вопрос - Для чего?
чтобы одеть снятое при хиле оружие.
Acc ^ wrote:
Code:
 If uo.life <= uo.str\2 then
   *начинаем бинтовать*
 end if

на эту строчку он у него ругался, пришлось поправить
Acc ^ wrote:
Например, для чего поставлена команда
Code:
uo.waittargetground(uo.getgraphic('banka'))

ведь она ищет банку с водой в мире, то есть под ногами, за диваном :D и т.д. и т.п. Разве плошка с водой не в бэкпаке?
Кто тебе сказал, что она в паке ? с неба упало ? на очень большом количестве шардов банка стоит на полу.
Author:  ADEPT_ABP [ 2007-07-07 17:13:50 ]
Post subject: 
Code:
Кто тебе сказал, что она в паке ? с неба упало ? на очень большом количестве шардов банка стоит на полу.

На drw.ru, у меня да и у остальных, в бэкпаке. На других не играл... вру. Играл. На ZhuluHotelKiev. Мир его праху. :D
Code:
...чтобы одеть снятое при хиле оружие.

Мдя... Я знал что я болван, но что б настолько...? :shock: Как говорится - "А слона-то мы и не заметили". :mrgreen:
Author:  Acc ^ [ 2007-07-09 17:39:31 ]
Post subject: 
Я не ОН, а ОНА и в скриптах мало что понимаю.
По поводу того, что расписал гос-н ADEPT_ABP: спасибо ему, конечно, но я врятли сумею всего надобавлять, да при всем при этом, сделать так, чтобы работало :)
Author:  Rivory [ 2007-07-09 18:12:06 ]
Post subject: 
мой последний скрипт посмотри, я его поправил, должен работать
Author:  u0rypT [ 2007-07-10 02:19:16 ]
Post subject: 
Code:
sub healing() 
repeat
repeat
uo.usefromground('0x091A')#Улей
Lag()
until UO.Life < 20
repeat
if uo.stam < 50 then
uo.useobject('0x000')#тип стамины вставь сюды
else
UO.Exec("bandageself")
wait(8000)
end_if
until UO.Life > 139


sub Lag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub





За вот етот вот скрипт не ручаюсь


Code:
##################################
## ХИЛИНГ ########################

sub Bandage_All()
var Fizzle, Sheld = '0x1B76' ; Sheld
var Stamina_Drink = 50
var Mana_Min = 40
If UO.Dead() Then
   UO.Print("You are Dead")
   Return
End If
If UO.GetGlobal('BandageCheck')<>'on' Then
   UO.SetGlobal('BandageCheck','on')
      If UO.GetHp() < UO.GetMaxHp() Then
         If UO.Count('bandage') Then
            Fizzle = 0
            REPEAT
               Fizzle = Fizzle+1
                  If Fizzle >= 2 Then
                     UO.CharPrint('0x0021',"*Физл!*")
                  End If
                  If UO.Stamina <= Stamina_Drink and UO.Mana >= Mana_Min and UO.Count('0x0F0B') Then
                     UO.UseType('0x0F0B')
                     UO.CharPrint('0x0021',"*Пью Стамину!*")
                  End If
               UO.BandageSelf()
               UO.DeleteJournal()
                  REPEAT
                     Wait(500)
                  Until UO.InJournal("You put bloody") or UO.InJournal("You apply bandages") or UO.InJournal("Do you wanna") or UO.InJournal("You must wait") or UO.InJournal("You can't reach that") or UO.InJournal("Targeting Cancelled") or UO.InJournal("You cannot use bandages") or UO.Dead()
                  If (UO.GetHP()+5) >= UO.GetMaxHP()  Then
                     UO.CharPrint('0x0063',"*Полный столб*")
                  End If
            Until UO.InJournal("You put bloody") or UO.InJournal("Do you wanna") or UO.InJournal("You can't reach that") or UO.InJournal("You cannot use bandages") or UO.Count('bandage')==0 or UO.Dead()
         Else
            UO.Print("Not Bandage")
            UO.SetGlobal('BandageCheck','off')
         End If
         Wait(100)
            If NOT UO.ObjAtLayer('Lhand') Then
               If UO.Count(Sheld) Then
                  UO.UseType(Sheld)
               End If            
            End If
      Else
            If NOT UO.ObjAtLayer('Lhand') Then
               If UO.Count(Sheld) Then
                  UO.UseType(Sheld)
               End If            
            End If
      End If
   UO.SetGlobal('BandageCheck','off')
Else
   UO.Print("Wait")
End If
end sub
Author:  ADEPT_ABP [ 2007-07-13 17:50:16 ]
Post subject: 
Acc ^ wrote:
Я не ОН, а ОНА и в скриптах мало что понимаю.
По поводу того, что расписал гос-н ADEPT_ABP: спасибо ему, конечно, но я врятли сумею всего надобавлять, да при всем при этом, сделать так, чтобы работало :)

Главное начать. :wink:
А понимание придёт, вместе с опытом, потом. :D
Аблизательно!!! (наверное) :mrgreen:
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/