Yoko
http://forum.yoko.com.ua/

Скрол
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7016		 Page 1 of 1
Author:  лолz [ 2006-03-17 16:43:17 ]
Post subject:  Скрол
Плизз переделайте скрипт чтоб он коставал со скрола а если нету то с буки
Code:
sub Krest()
var LastTimer
var mn
if uo.getx("laststatus")>uo.getx("self") then
  uo.waittargettile("400",str(uo.getx("laststatus")-2),str(uo.gety("laststatus")),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
else
  uo.waittargettile("400",str(uo.getx("laststatus")+2),str(uo.gety("laststatus")),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
endif
           LastTimer=UO.Timer()
           repeat
             wait(100)
           until UO.Mana < mn¸¸ OR UO.Timer()>LastTimer+30
if uo.gety("laststatus")>uo.gety("self") then
  uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")-2),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
else
  uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")+2),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
endif
         
end sub
Author:  Loken [ 2006-03-17 17:05:20 ]
Post subject: 
Подчёркнутое исправишь сам
Quote:
sub WoSl()
VAR ManaNeed=14
VAR ManaNeedScroll=7
UO.FindType('',-1,'my')
If UO.FindCount()>0 Then
If UO.Mana>=ManaNeedScroll Then
UO.WaitTargetSelf()
UO.UseObject('finditem')
Else
UO.Print("Low mana!")
Endif
Else
If UO.Mana>=ManaNeed Then
UO.Cast('','')
Else
UO.Print("Low mana!")
Endif
Endif
end sub
Author:  лолz [ 2006-03-17 18:02:19 ]
Post subject: 
Блин че то не получаеться))) не от туда руки ростут)) можешь по подробнее объяснить куда пихать)
Author:  SnOo13 [ 2006-03-17 18:23:45 ]
Post subject: 
Если руки не оттуда, то тебе он не поможет :)
Author:  лолz [ 2006-03-17 18:27:32 ]
Post subject: 
Умный чтоль такой, или приколист... если приколист то иди в Аншлаг таким как ты там место!!!
Author:  лолz [ 2006-03-17 18:31:33 ]
Post subject: 
и вообще задолбал флудить в моих топиках:)
если не знаешь молчи в .....
Author:  лолz [ 2006-03-17 21:00:44 ]
Post subject: 
Блин че ни кто не знает?
Author:  лолz [ 2006-03-17 22:20:27 ]
Post subject: 
Блин ну помогите плизз
Author:  SnOo13 [ 2006-03-17 22:23:17 ]
Post subject: 
Научись сначала разговаривать, у..д.
Author:  лолz [ 2006-03-17 22:42:24 ]
Post subject: 
Пошел Вон от сюда.. зае... уге меня че пофлудить больше не где?
Author:  Kynep [ 2006-03-18 00:08:05 ]
Post subject:  Re: Скрол
лолz wrote:
Плизз переделайте скрипт чтоб он коставал со скрола а если нету то с буки
Code:
sub Krest()
var LastTimer
var mn
if uo.getx("laststatus")>uo.getx("self") then
  uo.waittargettile("400",str(uo.getx("laststatus")-2),str(uo.gety("laststatus")),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
else
  uo.waittargettile("400",str(uo.getx("laststatus")+2),str(uo.gety("laststatus")),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
endif
           LastTimer=UO.Timer()
           repeat
             wait(100)
           until UO.Mana < mn¸¸ OR UO.Timer()>LastTimer+30
if uo.gety("laststatus")>uo.gety("self") then
  uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")-2),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
else
  uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")+2),str(uo.getz("laststatus")))
  uo.cast("Wall of Stone")
endif
         
end sub


Чтоб ни кому не было обидно :D

Code:
sub Krest() 
var LastTimer 
var mn 
if uo.getx("laststatus")>uo.getx("self") then 
  uo.waittargettile("400",str(uo.getx("laststatus")-2),str(uo.gety("laststatus")),str(uo.getz("laststatus"))) 
  WoSl()
else 
  uo.waittargettile("400",str(uo.getx("laststatus")+2),str(uo.gety("laststatus")),str(uo.getz("laststatus"))) 
  WoSl()
endif 
           LastTimer=UO.Timer() 
           repeat 
             wait(100) 
           until UO.Mana < mn¸¸ OR UO.Timer()>LastTimer+30 
if uo.gety("laststatus")>uo.gety("self") then 
  uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")-2),str(uo.getz("laststatus"))) 
  WoSl()
else 
  uo.waittargettile("400",str(uo.getx("laststatus")),str(uo.gety("laststatus")+2),str(uo.getz("laststatus"))) 
  WoSl()
endif         
end sub 

Sub WoSl() 
VAR ManaNeed=14 
VAR ManaNeedScroll=7 
UO.FindType('',-1,'my') 
If UO.FindCount()>0 Then 
If UO.Mana>=ManaNeedScroll Then 
UO.WaitTargetSelf() 
UO.UseObject('finditem') 
Else 
UO.Print("Low mana!") 
Endif 
Else 
If UO.Mana>=ManaNeed Then 
UO.Cast(''Wall of Stone'') 
Else 
UO.Print("Low mana!") 
Endif 
Endif 
end sub


ЫЫЫ :twisted:
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/