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

Improvment
http://forum.yoko.com.ua/viewtopic.php?f=3&t=12925		 Page 1 of 1
Author:  Mazer [ 2007-12-18 15:27:18 ]
Post subject:  Improvment
how to make script end then i dont have pickaxe in backpack ? tryed few ways dosent work..
Code:
sub minround()
VAR Kirka = '0x0E85'  ; pickaxe
VAR MaxVes = 430  ; weight +- 15
VAR TileNum = '-1'  ; DONT KNOW
VAR x, y, t, k
VAR MaxTime = 100   
VAR ms1 = "There is no ore"
VAR ms2 = "You can't use"
VAR ms3 = "You put "
VAR ms4 = "You loosen some rocks"
VAR ms5 = "location"
VAR ms6 = "Try mining"
VAR ms7 = "You can't see that"
VAR ms8 = "No item"
for y=-2 to 2
for x=-2 to 2
while not UO.Hidden()
UO.Warmode("0")
uo.print("Hiding")
UO.UseSkill("Hiding")
wait(4000)
wend
 k = 0
     repeat
        UO.DeleteJournal()
        t = UO.Timer()
        k = k + 1
        wait(300)
        UO.WaitTargetTile( TileNum, STR( UO.GetX() + x ), STR( UO.GetY() + y ), 0)
        UO.UseType( Kirka )
        repeat
           wait(100)
        until UO.InJournal(ms1) OR UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR ((t +MaxTime) < UO.Timer())
        If UO.Weight > MaxVes Then
           UO.Print(" owerweight" )
           return
        Endif
     until ( NOT UO.InJournal(ms4) AND NOT UO.InJournal(ms3) OR (k > 10) )
  next
next
 uo.Print('End')
endsub
Author:  Destruction [ 2007-12-19 01:36:13 ]
Post subject: 
Code:
if not uo.count( Kirka ) then
   uo.print( "No pickaxe in backpack." )
   return false
endif
Author:  Mazer [ 2007-12-19 06:57:35 ]
Post subject: 
and there i should put that ? after uo.usetype( Kirka ) ? or .. ?
Author:  CuHTpoH [ 2007-12-19 12:34:38 ]
Post subject: 
The code Destruction provided you means that if it finds no pickaxe in the backpack it would return false and STOP immediately.

So let us see where can we add this code in your macro and avoid it from cycling forever. The best way i see is to add here:
Code:
repeat 
        UO.DeleteJournal() 
        t = UO.Timer() 
        k = k + 1 
        wait(300) 
        UO.WaitTargetTile( TileNum, STR( UO.GetX() + x ), STR( UO.GetY() + y ), 0) 
        UO.UseType( Kirka )

We replace phrase uo.usetype(kirka) with this:
Code:
if uo.count( Kirka ) then
   UO.UseType( Kirka ) 
else
   uo.print( "No pickaxe in backpack." ) 
   return false 
endif
Author:  Mazer [ 2007-12-19 13:17:29 ]
Post subject: 
thank you very much :) cant test now im working :) so il doo that later ;) and say you news but i think everything will be alright :)
Author:  CuHTpoH [ 2007-12-19 13:22:05 ]
Post subject: 
"and say you news but i think everything will be alright"

What do you mean "you news"?
Author:  Mazer [ 2007-12-19 13:50:37 ]
Post subject: 
I mean:) now im busy and dont have UO :)
so i test that script then im back home :)
and i write is it ok
Author:  Mazer [ 2007-12-19 17:06:30 ]
Post subject: 
so if pickaxe is equiped then skript cant find it..
Author:  Destruction [ 2007-12-19 17:13:52 ]
Post subject: 
uo.objAtLayer( "Lhand" )
uo.objAtLayer( "Rhand" )
Author:  Mazer [ 2007-12-19 22:18:25 ]
Post subject: 
how can i use that ? :/
Author:  Mazer [ 2007-12-19 22:21:45 ]
Post subject: 
thats ok but there is no such command as Count.. ?
Author:  CuHTpoH [ 2007-12-20 03:00:28 ]
Post subject: 
i'm sorry, another time i made a small mistake )))
fix phrase with
uo.count( Kirka )
Author:  Destruction [ 2007-12-20 03:32:22 ]
Post subject: 
CuHTpoH wrote:
i'm sorry, another time i made a small mistake )))
fix phrase with
uo.count( Kirka )

thx
Author:  Mazer [ 2007-12-20 07:59:51 ]
Post subject: 
nevermind :) thank you for all this help.. everything working now i have another problem :) i discribed in other post :) if you might help me thanks.. :)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/