Delay time

Xpree · Post by **Xpree** » 2010-01-06 17:27:50

Hi russian ppl, im a brasilian and i´m desenvolving a script to automatic cast spells with a dinamic wait(), its more or less like this

Code: Select all

inicio:
UO.Cast('Flame Strike','laststatus') ;cast poison
			while true
				if uo.injournal("visao|frizzle") then ; if is out of sight
					goto inicio
				else
					while true
						[b]if not uo.injournal("HERE IS MY PROBLEM") then ; i dont know what to put to verify if the FS actualy not was sucessfull, so if not it will do the while again till it damages the oponent
							wait(100)
						else
							if uo.injournal("HERE IS MY PROBLEM") then ;if the damage was sucessfull breaks the loop[/b]
							return false
							endif
						endif
					wend
				endif
				return false ;break the loop
			wend

help me plz

Mirage · Post by **Mirage** » 2010-01-06 18:22:49

Why use a goto?
You can use the gethp('ID') like this.

Code: Select all

if uo.GetHP(OBJ)<>uo.GetMAXHP(OBJ) then

If I understood correctly.

Xpree · Post by **Xpree** » 2010-01-06 18:25:53

OBJ would be my target?

Code: Select all

inicio:
UO.Cast('Flame Strike','laststatus') ;cast poison
         var targetlife = uo.gethp('lasttarget')
         while true
            if uo.injournal("visao|frizzle") then ; if is out of sight
               goto inicio
            else
               while true
                  [b]if not uo.gethp('laststatus') <> targetlife then 
                     wait(100)
                  else
                     if uo.gethp('laststatus') <> targetlife then 
                     return false
                     endif
                  endif
               wend
            endif
            return false ;break the loop
         wend

like this?

but that dont work with magic that dont land damage like paralize i would like something more general to work with all magics if possible. ty

Nmy · Post by **Nmy** » 2010-01-06 18:56:39

Code: Select all

sub fstarget()
	var m
	repeat
		repeat
			checklag()
			m=uo.mana
			if uo.mana < 22 then
				uo.print('no mana')
				return
			endif
			uo.cast('Flame Strike','laststatus')
			wait(600)
		until not uo.injournal('Target is not in line of sight')
		repeat
			wait(100)
		until uo.mana<m
	until not uo.injournal('The spell fizzles')
endsub
sub checklag() 
	repeat
		UO.DeleteJournal() 
		UO.Click('backpack') 
	until backpack()==1
endsub 
sub backpack()
	var n
	for n=0 to 200
		if uo.injournal('a backpack') then
			return 1
		endif
		wait(200)
	next
endsub

Xpree · Post by **Xpree** » 2010-01-06 19:17:14

you got it Nmy, MANA CHECK, PERFECT!!!!

TY.

Xpree · Post by **Xpree** » 2010-01-06 20:15:40

this is my medium to finish script well the quotes is still needing debug, javascript:emoticon(':?')

Code: Select all

Sub Delay()
	var mana = uo.mana
	while true
		if uo.injournal("visao|frizzle") then ; out of sight
			return false
		else
			while true
				if uo.mana == mana then ;if the spell didnt land
					wait(100)
				else
					if uo.mana < mana then ;if the spell land
						return false
					endif
				endif
			wend
		endif
		return false ;brake loop
	wend
endsub



; not my pasted from the Nmys Code
sub checklag()
	repeat
		UO.DeleteJournal()
		UO.Click('backpack')
	until backpack()==1
endsub 


; not my pasted from the Nmys Code
sub backpack()
	var n
	for n=0 to 200
		if uo.injournal('a backpack') then
			return 1
		endif
        	wait(200)
        next
endsub 




sub Poisoned()
	wait(500)
	repeat ; cure till poison efect is off
		checklife()
		uo.warmode(0)
		uo.waittargetself()
		uo.cast('Cure')
		wait(3000)
	until not uo.poisoned('self')
endsub




Sub checklife()
		repeat
			if uo.life <= 50 then ; check  the life is to low, then use total mana pots
   				uo.usetype(0x0E21) ; <- the type of the mana pots is wrong
				wait(500)
  			else
  				uo.waittargetself()
  				uo.usetype(0x0E21) ; <- the type of the bandages is wrong
  				wait(2000)
			endif
		until uo.life >= 80
endsub




Sub checkmana()
	var mana = uo.maxmana-40
	repeat
		if uo.mana < 20 then
			uo.usetype(0x0E21) ; <- total mana pots is wrong
		endif
	until uo.mana >= mana
			


sub pvp()
	While not uo.dead() ; litte automation
		checklag()    
		checkmana()
		if uo.poisoned('self') then ; if im poisoned
			poisoned()
		endif
		if uo.life < 60 then ; if life is low
			checklife()
		endif 
		if uo.life >= 60 then ; main if for the magics
  			if Uo.InJournal('envenena') && UO.count(0x1F5F)>=2 then ;fs scroll
				uo.useobject(0x1F5F,'laststatus')
				delay()
	   		endif
			if Uo.InJournal('envenena') && UO.count(0x1F5F)<2 then 	;fs book
  				UO.Cast('Flame Strike','laststatus')
				delay()
   			else
				UO.Cast('Poison','laststatus') ;if others is false poison
				delay()
   			endif
		endif 
	wend
endsub

Scripts Writer · Post by **Scripts Writer** » 2010-01-08 11:58:23

I check it so:

Code: Select all

  var mana = uo.mana
  var BM = uo.BM
  var SA = uo.SA
  var GS = uo.GS
  var SS = uo.SS
  var MR = uo.MR
  var BP = uo.BP
  var NS = uo.NS
  var GA = uo.GA
  
  uo.DeleteJournal()
  repeat
    wait(10)
  until uo.mana < mana || uo.InJournal('fizzles') || uo.InJournal('lack') || uo.InJournal('in line') || uo.BM < BM || uo.MR < MR || uo.SA < SA || uo.BP < BP || uo.NS < NS || uo.SS < uo.SS || uo.GA < GA || uo.GS < GS

Don't u think what'll happen if u drink total mana until the cast finish?

Mana: 30
*Casting*
*Drink total mana*
Mana: 100
*Cast finished*
Mana: 70

Script still waiting until mana will be less 30.

Nmy · Post by **Nmy** » 2010-01-08 13:45:52

the script won't use mana and he won't do in either, and the shard doesn't have reagents

Code: Select all

uo.usetype('type')

or

Code: Select all

uo.usetype("type")

all functions use quotation marks except if it's an object variable

Code: Select all

var chest="0x12345678"
uo.useobject(chest)

or

Code: Select all

uo.addobject('chest')
uo.useobject('chest')

this is the object, not variable
the same applies to 'backpack', 'lastcontainer', etc

Scripts Writer · Post by **Scripts Writer** » 2010-01-08 18:38:58

Nmy wrote:the script won't use mana

Телепат?

Nmy wrote:the script won't use mana

Кто сказал что мана будет питься в рамках этого скрипта? Отдельный хоткей для восполнения маны во время каста никто не отменял, или первое что в голову пришло написал даже не вдумываясь в то что я отписал выше?

Nmy wrote:and the shard doesn't have reagents

Он ещё и шард указал? Может я что-то пропустил, как название?

То что у него есть наработка на восполнение маны, не знаю каким уже там у них в бразилии образом, тотал маной или бубном, ты конечно тоже пропустил?

П.С. На досуге проверь что быстрее работает- проверка на изменение маны, или реагентов, если конечно гордыня не затуманит глаза.

П.С.С. Не надо меня передёргивать когда я к тебе не обращаюсь, не дорос ещё.

Nmy · Post by **Nmy** » 2010-01-09 11:16:05

Он ещё и шард указал? Может я что-то пропустил, как название?

https://yoko.uokit.com/viewtopic.php?p=84467#84467

Кто сказал что мана будет питься в рамках этого скрипта?

https://yoko.uokit.com/viewtopic.php?p=84478#84478

Еще вопросы есть?

П.С.Быдло: Читай молча форум и не указывай мне что я могу или не могу делать.

Nmy · Post by **Nmy** » 2010-01-09 11:23:35

if it helps i fixed your code a bit

Code: Select all

Sub Delay() 
	var mana = uo.mana 
	while true 
		if uo.injournal("visao|frizzle") then ; out of sight 
			return false 
		else 
			while true 
				if uo.mana == mana then ;if the spell didnt land 
					wait(100) 
				else 
					if uo.mana < mana then ;if the spell land 
						return false 
					endif 
				endif 
			wend 
		endif 
		return false ;brake loop 
	wend 
endsub 
sub checklag() 
	repeat 
		UO.DeleteJournal() 
		UO.Click('backpack') 
	until backpack()==1 
endsub 
sub backpack() 
	var n 
	for n=0 to 200 
		if uo.injournal('a backpack') then 
			return 1 
		endif 
		wait(200) 
	next 
endsub 
sub Poisoned() 
	wait(500) 
	repeat ; cure till poison efect is off 
		checklife() 
		uo.warmode(0) 
		uo.waittargetself() 
		uo.cast('Cure') 
		wait(3000) 
	until not uo.poisoned('self') 
endsub 
Sub checklife() 
	repeat 
		if uo.life <= 50 then ; check  the life is to low, then use total mana pots 
			uo.usetype("0x0E21") 
			wait(500) 
		else 
			uo.waittargetself() 
			uo.usetype("0x0E21") 
			wait(2000) 
		endif 
	until uo.life >= 80 
endsub 
Sub checkmana() 
	var mana = uo.int-40 
	repeat 
		if uo.mana < 20 then 
			uo.usetype("0x0E21") 
		endif 
	until uo.mana >= mana 
endsub     
sub pvp() 
	While not uo.dead() ; litte automation 
		checklag()    
		checkmana() 
		if uo.poisoned('self') then ; if im poisoned 
			poisoned() 
		endif 
		if uo.life < 60 then ; if life is low 
			checklife() 
		endif 
		if uo.life >= 60 then ; main if for the magics 
			if Uo.InJournal('envenena') && UO.count("0x1F5F")>=2 then ;fs scroll 
				uo.waittargetobject('laststatus')
				uo.usetype("0x1F5F") 
				delay() 
			endif 
			if Uo.InJournal('envenena') && UO.count("0x1F5F")<2 then    ;fs book 
				UO.Cast('Flame Strike','laststatus') 
				delay() 
			else 
				UO.Cast('Poison','laststatus') ;if others is false poison 
				delay() 
			endif 
		endif 
	wend 
endsub

this one is dynamic mana check - it ends loop in 20 seconds if nothing happens or quits immediately if mana drops

Code: Select all

sub WaitForMana()
	VAR w,m=uo.mana
	for w=0 to 100
		if uo.mana<m then
			return
		endif
		wait(200)
	next
endsub

Xpree · Post by **Xpree** » 2010-01-12 16:22:23

i will try it

sry for the late reponse, cuz im working like hell, but i will try it.

this its what i need:

1- a dinamic delay checker for any magic

2- well in my shard(that dont use reags), i found a full insntance that the npc, well they dont walk or walk like a tile off 3 secs, so when i am working i want to stay killing them, and they are very very strong, kill vortexes 1 hit, but they are fully vunerable to fire and poison, so i poison them and then fs their ass of, but sometimes they poison me, that why the cure there, and also they teleport close, thats why i need the dinamic delay, if i get poisoned or my magic failure before it complete the delay they have, i have to move fast so they dont kill me on a 1 hit basis, and the check life if some one trys to kill me i will heal and go invis(with a item that i won on a champ that cant be revealed)

i think its about it.

Xpree · Post by **Xpree** » 2010-01-15 19:49:48

well, my shard removed the Spell Fizzles message, how i would get the error by sound or by the animation smoke?

ty

Noite · Post by **Noite** » 2010-01-15 21:38:52

When you cast and flizzes you lost mana in your shard ? May be a solution.
However, you could try:

Code: Select all

 ,set animecho 1
 ,set soundecho 1
 ,showjournal

Xpree · Post by **Xpree** » 2010-01-17 14:10:42

gadly they returned the error message, so i will do it with it =)

Noite · Post by **Noite** » 2010-01-18 06:10:10

Very nice script!
I try change this and made my own script, but the problem is try use this sub in pvp.
With me ever crashs in unspected sometime.