Нужна помошь )

[Unfogiven]

Проблема такая не пашет почемуто
if uo.injournal('The spell fizzles.') then
goto poly
Видать чёто я намудил с
uo.deletejournal()

Code: Select all

sub Prodaga()  
var booka='0x404b13de' 
var cont1='0x404EA22C' 
var mesh='0x0E76' 
var fl=0 
var m
var oldX=UO.GetX() 
var oldY=UO.GetY() 
while fl==0 
poly:
      while uo.mana<50
     uo.useskill('Meditation')
     wait(8000)
       wend
uo.Print('>Trying to polymorph...')
uo.Exec("waitmenu 'What do you' 'Daemon'")
   uo.deletejournal()
uo.Cast('Polymorph')
repeat 
   wait(4000)
    if uo.injournal('The spell fizzles.') then
     goto poly
     else 
   endif

[Destruction]

1. Показали бы весь скрипт, или он очень большой ?
2. Не используйте конструкцию goto внутри циклов.
3. В приниципе код корректный, возможно в буковках опечатка.
4. else endif - гениальная конструкция
5. Всё проще:

Code: Select all

sub Prodaga()
	var poly = false;
	var booka='0x404b13de'
	var cont1='0x404EA22C'
	var mesh='0x0E76'
	var fl=0
	var m
	var oldX=UO.GetX()
	var oldY=UO.GetY()
	while fl==0
		poly = false
		repeat
			while uo.mana<50
				uo.useskill('Meditation')
				wait(8000)
			wend
			uo.Print('>Trying to polymorph...')
			uo.Exec("waitmenu 'What do you' 'Daemon'")
			uo.deletejournal()
			uo.Cast('Polymorph')
			wait(4000)
			if not uo.injournal('The spell fizzles.') then
				poly = true
			endif
		until poly
		repeat

PS: Мне нравится как этот человек ставит вопрос... Все бы так, а то куда не глянешь - скрипт на 5к строк и вопрос - "почему не работает?"...

[Unfogiven]

В таком варианте через каждые 10-15 мин парсе ерор (

Code: Select all

sub Prodaga()
	var poly = false;
	var booka='0x404b13de'
	var cont1='0x404EA22C'
	var mesh='0x0E76'
	var fl=0
	var m
	var oldX=UO.GetX()
	var oldY=UO.GetY()
	while fl==0
		poly = false
		repeat
			while uo.mana<50
				uo.useskill('Meditation')
				wait(8000)
			wend
			uo.Print('>Trying to polymorph...')
			uo.Exec("waitmenu 'What do you' 'Daemon'")
			uo.deletejournal()
			uo.Cast('Polymorph')
			wait(4000)
			if not uo.injournal('The spell fizzles.') then
				poly = true
			endif
		until poly
		repeat
			for m=1 to 5
				uo.useskill('Meditation')
				wait(111)
				uo.useobject(safe)
				wait(900)
				uo.useobject(cont1)
				wait(800)
				CheckLag()
				uo.findtype('0x0eed',-1,safe)
				wait(300)
				uo.moveitem('finditem','100','backpack')
				wait(1500)
				uo.findtype(mesh,-1,cont1)
				if uo.findcount() then
					uo.moveitem('finditem','1','backpack')
					CheckLag()
				else
					fl=1
				endif
				uo.findtype(mesh,-1,cont1)
				if uo.findcount() then
					uo.moveitem('finditem','1','backpack')
					CheckLag()
					wait(1500)
				else
					fl=1
				endif
				uo.findtype(mesh,-1,cont1)
				if uo.findcount() then
					uo.moveitem('finditem','1','backpack')
					CheckLag()
				else
					fl=1
				endif
				cast1:
				uo.deletejournal()
				while uo.mana<20
					uo.useskill('Meditation')
					wait(1000)
				wend
				uo.cast('Recall','Rune')
				wait(5000)
				if uo.injournal('spell fizzles.') then
					goto cast1
				endif
				uo.useskill('Meditation')
				wait(111)
				CheckLag()
				uo.useobject('0x400b4c3f')
				wait(2000)
				CheckLag()
				uo.lclick(406,314)
				wait(3000)
				GotoXY(2950,3345)
				wait(500)
				GotoXY(2952,3345)
				wait(800)
				sell()
				uo.useskill('Meditation')
				wait(111)
				GotoXY(2950,3345)
				wait(800)
				CheckLag()
				uo.useobject('0x403762b5')
				wait(2000)
				CheckLag()
				uo.lclick(77,126)
				wait(6000)
				cast2:
				uo.deletejournal()
				while uo.mana<20
					uo.useskill('Meditation')
					wait(1000)
				wend
				uo.cast('Recall','runehome')
				wait(5000)
				if uo.injournal('spell fizzles.') then
					goto cast2
				endif
				#   GotoXY(1773,623)
				#   wait(800)
				unload()
			next
		wend
	endsub

[Destruction]

У меня в подписи две ссылки.

Скормите скрипт по-первой ссылке, потом, после устранения ошибок - выложите нормальную версию, если проблема конечно не пропадёт.

[Unfogiven]

У меня в подписи две ссылки.

Скормите скрипт по-первой ссылке, потом, после устранения ошибок - выложите нормальную версию, если проблема конечно не пропадёт.

да я заменил свой кусок на ваш )вроде стало норм всё )
Правда было такое что я спецально при преврашение в демона физлил после 3 физла он пошёл дальше )))

А и ешё один вопросик
Вот скриптик довно с ним бегаю )
Одевает лук нажемаеш ешё раз одевает мечь а шит нет , пишет Moving item to fast ( это иза нововедений дрв )
Так вот проблема куда бы всунуть задержку или чтото чтобы норм одевалась всё ?

Code: Select all

sub BowGet()
	uo.findtype ('0x13B1',-1,'backpack')
	if Uo.ContainerOf('finditem')==Uo.GetSerial('backpack') then
		UO.Setarm('BowArm')
		uo.waittargetobject('laststatus')
		uo.usetype('0x13B1')
		uo.concolor('0x09DA')
		uo.print('luk')
	else
		UO.Arm('BowArm')
		wait(100)
		UO.Arm('BowArm')
		uo.concolor('0x09DA')
		uo.print('me4 sit')
	end if
	UO.Attack('laststatus')
end sub

[Kynep]

Чтоб норм все одевалось нужно в клиенте написать

Code: Select all

,setdressspeed 600

[Unfogiven]

Чтоб норм все одевалось нужно в клиенте написать

Code: Select all

,setdressspeed 600

)))) точно а я уже забыл про ето )