Вопрос каст со скрола и с магии помогите решить..

[tyca7]

Проблема в том что когда чар в парализе он не может юзать скролл и соответственно пишет
you can`t reach that. и не чего не происходит как сделать чтобы в этот момент он кастовал с магии а не со скрола??

Code: Select all

sub ligth3()  
   UO.FindType('0x1F4A',-1,'my') 
   If UO.GetQuantity('finditem')>0 then 
      if UO.Mana>=5 then 
         UO.WaitTargetObject('lasttarget') 
         UO.UseObject('finditem') 
      else 
      endif 
   else 
      if UO.Mana>=12 then 
         UO.Cast('Lightning','lasttarget') 
      else 
      endif 
   endif 
end sub

[tylllkah]

Проблема в том что когда чар в парализе он не может юзать скролл и соответственно пишет
you can`t reach that. и не чего не происходит как сделать чтобы в этот момент он кастовал с магии а не со скрола??

Code: Select all

sub ligth3()  
   UO.FindType('0x1F4A',-1,'my') 
   If UO.GetQuantity('finditem')>0 then 
      if UO.Mana>=5 then 
         UO.WaitTargetObject('lasttarget') 
         UO.UseObject('finditem') 
      else 
      endif 
   else 
      if UO.Mana>=12 then 
         UO.Cast('Lightning','lasttarget') 
      else 
      endif 
   endif 
end sub

Пробуй

Code: Select all

   UO.FindType('0x1F4A',-1,'my') 
   If UO.GetQuantity('finditem')>0 then 
      if UO.Mana>=5 then 
         UO.WaitTargetObject('lasttarget') 
         UO.UseObject('finditem') 
      else
      endif 
      If ou.injournal('you can`t reach that') then
         UO.Cast('Lightning','lasttarget') 
      else
      endif
   else 
      if UO.Mana>=12 then 
         UO.Cast('Lightning','lasttarget') 
      else 
      endif 
   endif 

[tyca7]

спасибо огромное заработало но не сразу надо было ещё сообщение подрезать не много вот так)))

Code: Select all

sub ligth3()  
  UO.FindType('0x1F4A',-1,'my') 
   If UO.GetQuantity('finditem')>0 then 
      if UO.Mana>=5 then 
         UO.WaitTargetObject('lasttarget') 
         UO.UseObject('finditem') 
      else
      endif 
      If UO.injournal('reach that') then
         UO.Cast('Lightning','lasttarget') 
      else
      endif
   else 
      if UO.Mana>=12 then 
         UO.Cast('Lightning','lasttarget') 
      else 
      endif 
   endif 
end sub

[Rufus0]

Привет Тушка.
Если можешь сделай мне из моего скрипта на касты с спелбуки и со свитка. Такой же как этому парню. Ну в плане что-бы мой скрипт тоже на пф каставал!
Или тот кто может переделайте плиз) Я пытался из этих не получилось!

Code: Select all

sub fslast() 
	var f=0 
	if 	UO.Count("0x1f5f") > 0 then 
		UO.waittargetlast() 
		UO.Exec("usetype 0x1f5f") 
		VAR fsscrlcnt=UO.Count("0x1f5f") - 1 
		UO.Print(""+STR(fsscrlcnt)+" Flame Strike Scrolls left") 
	else 
		UO.waittargetlast() 
		UO.Exec("cast 'Flame Strike'") 
		f=1 
		UO.Print("Warning!!! No Flame Strike Scrolls, Using Regs!") 
	end if 
end sub