Народ помогите с кастом

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Народ помогите с кастом

Post by Phoenix »

Пожалуйста напиши что надо вписать чтоб кастовал Фс а если маны не хватает то пил Манку. Заранее вам благодарен
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Re: Народ помогите с кастом

Post by Askaneli »

Phoenix wrote:Пожалуйста напиши что надо вписать чтоб кастовал Фс а если маны не хватает то пил Манку. Заранее вам благодарен

А потом ты же нас и гасить будешь ? Да ?
Сделал дело - флуди смело !!!
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Ага особенно таких как ты )))
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Спасибо народ сам разобрался. Советую другим "экспериментируйте и у вас все получиться" )
Askaneli
Sphere expert
Posts: 1143
Joined: 2004-10-01 08:27:38
Location: Уфа

Post by Askaneli »

Phoenix wrote:Ага особенно таких как ты )))

Попробуй
Сделал дело - флуди смело !!!
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Все вроде сделал, но когда поменял не пашет изначално взял скрипт саваджа они мне больше всех нравятся и ветерана тоже. Проблема следущая если исползовать этот скипт, то сначала он кастует фс а потом тока пьет ману.

sub FS()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F5F',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=22 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Say("An Ex Por")
else
endif
else
UO.Cast('Flame Strike','laststatus')
if UO.Mana<=45 then
UO.UseType ('0x0F06','0x076A')
endif
end sub

А я хочю чтоб он сначало проверял хватает ли маны если нет то пьет и сразу вс
Last edited by Phoenix on 2004-11-17 10:02:34, edited 1 time in total.
drcrazy
Junior Expert
Posts: 92
Joined: 2004-10-12 00:48:57
Location: Шард МЕ2

Post by drcrazy »

Феникс, тебя тегами code не учили пользовацца??
The pleasure of satisfying a savage instinct, undomesticated by the ego, is incomparably much more intense then the one of satisfying a tamed instinct. S.Freud.
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Еслиб я ещё знал что это ))
drcrazy
Junior Expert
Posts: 92
Joined: 2004-10-12 00:48:57
Location: Шард МЕ2

Post by drcrazy »

гыгы

скрипты вставляй между ББкодами code
The pleasure of satisfying a savage instinct, undomesticated by the ego, is incomparably much more intense then the one of satisfying a tamed instinct. S.Freud.
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Дай пример плз я на словах трудно догоняю на примеах лучше ) я просто не понимаю о чем ты мне говоришь
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Phoenix wrote:Дай пример плз я на словах трудно догоняю на примеах лучше ) я просто не понимаю о чем ты мне говоришь



перед скриптом
[code]
тут текст

а после скрипта [code] ...тока вот так /code.
Все просто.
BETEPAH ™
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Code: Select all

sub FS() 
   UO.Set('lasttarget','laststatus')
   UO.FindType('0x1F5F',-1,'my')
   If UO.GetQuantity('finditem')>0 then
      if UO.Mana>=22 then
         UO.WaitTargetObject('lasttarget')
         UO.UseObject('finditem')
         UO.Say("An Ex Por")
      else
      endif
   else 
   if UO.Mana<=45 then
   UO.UseType ('0x0F06','0x076A')
   else
   UO.Cast('Flame Strike','laststatus')
   endif
end sub


Вроде все ок но этот ублюдок проверяет если не хватает то пьет а когда выпьет, то не кастают. А если хватает то не пьет и кастует. В чем проблема ? ??
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Попробуй вот этот.... мож поможет :) я не мега скриптер но всёже!

Code: Select all

sub FS()
   UO.Set('lasttarget','laststatus')
   UO.FindType('0x1F5F',-1,'my')
If   UO.Mana<=45 Then
If   UO.GetQuantity('finditem')>0 Then
   UO.UseObject('finditem')
   UO.Cast('Flame Strike','laststatus')
EndIf
else
   UO.Cast('Flame Strike','laststatus')
EndIf
end sub
Revenant
Posts: 54
Joined: 2004-08-05 21:12:19

Post by Revenant »

А вот я бы так сделал.

Code: Select all

sub FS() 
   UO.Set('lasttarget','laststatus')
   If UO.GetQuantity('0x1F5F') then
      if UO.Mana<22 then
         manadrink()
      endif
      UO.WaitTargetObject('lasttarget')
      UO.UseObject('0x1F5F')
      UO.Say("Хен де хох, морда фашистская")
   else
      if UO.Mana<=45 then
         manadrink()
      endif
      UO.Cast('Flame Strike','laststatus')
   endif
end sub

sub manadrink()
   if UO.Count('0x0F06','0x076A') then
      UO.UseType ('0x0F06','0x076A')
   else
       UO.Print("А вот фиглюшки, мана кончилась. Теперь хана")
       UO.Exec('terminate FS')
   endif
end sub()
Phoenix
Posts: 10
Joined: 2004-09-05 04:23:32

Post by Phoenix »

Revenant а что это за строчка зачем она ?

Code: Select all

If UO.GetQuantity('0x1F5F') then 

и эта зачем

Code: Select all

UO.Exec('terminate FS') 
Last edited by Phoenix on 2004-11-17 11:39:04, edited 1 time in total.
666Man666
Junior Expert
Posts: 474
Joined: 2004-11-13 00:43:55
Location: Киберзадроцк
Contact:

Post by 666Man666 »

Тока зачем проверять ману 2 раза? 22 и 45? если можно 1 раз.... на ФС надо 45 маны... если меньше или равно то пьёт манку.... а на 22 зачем - я хз :)
Revenant
Posts: 54
Joined: 2004-08-05 21:12:19

Post by Revenant »

Там проверка на наличие свитков, при касте с них затраты маны вдвое меньше.
Revenant
Posts: 54
Joined: 2004-08-05 21:12:19

Post by Revenant »

Phoenix wrote:Revenant а что это за строчка зачем она ?

Code: Select all

If UO.GetQuantity('0x1F5F') then 

повторюсь... эта строчка проверяет отлично ли число свитков в инвентаре от нуля. Вставь тип свитка ФС
Revenant
Posts: 54
Joined: 2004-08-05 21:12:19

Post by Revenant »

Сюда перенесу. Меня Ветеран дублировать научил после того как нашел последний дубль своего autoload.sc после краша винта у меня :)


Code: Select all

sub FS() 
   UO.Set('lasttarget','laststatus')
   If UO.GetQuantity('0x1F5F') then
      if UO.Mana<22 then
         manadrink()
      endif
      UO.WaitTargetObject('lasttarget')
      UO.UseObject('0x1F5F')
      UO.Say("Хен де хох, морда фашистская")
   else
      if UO.Mana<=45 then
         manadrink()
      endif
      UO.Cast('Flame Strike','laststatus')
   endif
end sub

sub manadrink()
   if UO.Count('0x0F06','0x076A') then
      UO.UseType ('0x0F06','0x076A')
   else
       UO.Print("А вот фиглюшки, мана кончилась. Теперь хана")
       UO.Exec('terminate FS')
   endif
end sub
Post Reply