Page 1 of 1

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

Posted: 2004-11-17 09:26:17
by Phoenix
Пожалуйста напиши что надо вписать чтоб кастовал Фс а если маны не хватает то пил Манку. Заранее вам благодарен

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

Posted: 2004-11-17 09:29:07
by Askaneli
Phoenix wrote:Пожалуйста напиши что надо вписать чтоб кастовал Фс а если маны не хватает то пил Манку. Заранее вам благодарен

А потом ты же нас и гасить будешь ? Да ?

Posted: 2004-11-17 09:39:21
by Phoenix
Ага особенно таких как ты )))

Posted: 2004-11-17 09:46:19
by Phoenix
Спасибо народ сам разобрался. Советую другим "экспериментируйте и у вас все получиться" )

Posted: 2004-11-17 09:49:56
by Askaneli
Phoenix wrote:Ага особенно таких как ты )))

Попробуй

Posted: 2004-11-17 09:53:46
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

А я хочю чтоб он сначало проверял хватает ли маны если нет то пьет и сразу вс

Posted: 2004-11-17 09:58:29
by drcrazy
Феникс, тебя тегами code не учили пользовацца??

Posted: 2004-11-17 10:03:24
by Phoenix
Еслиб я ещё знал что это ))

Posted: 2004-11-17 10:27:04
by drcrazy
гыгы

скрипты вставляй между ББкодами code

Posted: 2004-11-17 10:35:53
by Phoenix
Дай пример плз я на словах трудно догоняю на примеах лучше ) я просто не понимаю о чем ты мне говоришь

Posted: 2004-11-17 10:39:21
by BETEPAH
Phoenix wrote:Дай пример плз я на словах трудно догоняю на примеах лучше ) я просто не понимаю о чем ты мне говоришь



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

а после скрипта [code] ...тока вот так /code.

Posted: 2004-11-17 10:48:22
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


Вроде все ок но этот ублюдок проверяет если не хватает то пьет а когда выпьет, то не кастают. А если хватает то не пьет и кастует. В чем проблема ? ??

Posted: 2004-11-17 10:53:27
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

Posted: 2004-11-17 11:02:59
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()

Posted: 2004-11-17 11:11:54
by Phoenix
Revenant а что это за строчка зачем она ?

Code: Select all

If UO.GetQuantity('0x1F5F') then 

и эта зачем

Code: Select all

UO.Exec('terminate FS') 

Posted: 2004-11-17 11:15:03
by 666Man666
Тока зачем проверять ману 2 раза? 22 и 45? если можно 1 раз.... на ФС надо 45 маны... если меньше или равно то пьёт манку.... а на 22 зачем - я хз :)

Posted: 2004-11-17 11:26:05
by Revenant
Там проверка на наличие свитков, при касте с них затраты маны вдвое меньше.

Posted: 2004-11-17 11:29:33
by Revenant
Phoenix wrote:Revenant а что это за строчка зачем она ?

Code: Select all

If UO.GetQuantity('0x1F5F') then 

повторюсь... эта строчка проверяет отлично ли число свитков в инвентаре от нуля. Вставь тип свитка ФС

Posted: 2004-11-17 11:33:16
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