Каст спиритов

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Aleppo
Posts: 27
Joined: 2009-05-01 22:58:00
Location: DRW
Contact:

Каст спиритов

Post by Aleppo »

Всем доброго дня. Не работают эти два скрипта. Кому не сложно, взгляните на них и исправьте ошибки пожалуйста! Спасибо!
-В скрипте "кастующему" меняешь координаты под чара на которого будут кастовать, а спирит всеравно появляется где-то в углу.
-В скрипте "бъющему" на 13 строке выдает ошибку.

"Кастующему"

Code: Select all

sub bladespirit2() 
while not uo.Dead() 
repeat 
if uo.mana > 20 then 
                placecast() 
               else 
               repeat 
                 uo.warmode(false) 
                    uo.useskill("Meditation") 
                    wait(3000) 
               until uo.mana >=28 
              endif 
wait(50000) 
until uo.InJournal('World is') 
wait(130000) 
wend 
end sub 

Sub placecast() 
uo.waittargettile(1294, 2284, 1137, 4) #ïîìåíÿòü êîîðäèíàòû(,infotile) 
wait(500) 
UO.Exec("cast 'Blade Spirits'") 
wait(6000) 
end sub 
"Бъющему"

Code: Select all

var spirit = '0x023E', spiritid 
while true 
   uo.findtype(spirit,-1,'ground') 
   if uo.findcount() > 0 then 
      spiritid = uo.getserial('finditem') 
      uo.warmode(true) 
      uo.attack(spiritid) 
      wait(5000) 
   else 
      if uo.gethp() < uo.str then 
         uo.bandageself() 
         wait(3000) 
        sword() 
      endif 
   endif 
wend 
endsub 

sub sword()   ; Îäåâàíèå ùèòà è îðóæèÿ 
Var Svord='0x13E3' ;Òèï îðóæèÿ, èñïîëüçóåìûé âàìè 
Var Shield='0x1B76' ;Òèï îðóæèÿ, èñïîëüçóåìûé âàìè 
UO.Equipt('Lhand',Shield) 
wait(1000) 
UO.Equipt('Rhand',Svord) 
wait(100) 
end sub
Mirage
Posts: 2802
Joined: 2009-05-28 09:58:28
Location: Иваново
Contact:

Re: Каст спиритов

Post by Mirage »

Code: Select all

sub bladespirit2()
	while not uo.Dead()
		repeat
			if uo.mana > 20 then
				placecast()
			else
				repeat
					uo.warmode(false)
					uo.useskill("Meditation")
					wait(3000)
				until uo.mana >=28
			endif
			wait(50000)
		until uo.InJournal('World is')
		wait(130000)
	wend
end sub
Sub placecast()
	VAR T = '1294' ; Tile
	VAR X = '2284'
	VAR Y = '1137'
	VAR Z = '4'
	uo.waittargettile(T, X, Y, Z)
	UO.cast('5') ; Blade Spirits
	wait(6000)
end sub 
В первом не было кавычек.
а во втором начала скрипта. и лучше между
endif
wend
endsub
поставить хотя бы небольшую паузу wait(100). А так визуально вроде в порядке все.
Aleppo
Posts: 27
Joined: 2009-05-01 22:58:00
Location: DRW
Contact:

Re: Каст спиритов

Post by Aleppo »

Большое спасибо! Сейчас буду проверять!

Ничего не пашет, второй на касти еше хуже "unknown spell" . У первого скрипта для бъющего все такаяже ошибка на 13-ой линии где "sword()" думал в кавычки id оружия своего прописаь, не помогает.

Поправьте пожалуйсто для бъющего, кастующему настроил!
Post Reply