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: Select all

тут текст
 
а после скрипта [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