покупка вещей.

[maximka4]

вобщем есть такая мысля, значит стою я рядом с нпц и все время покупаю один и тот же товар( через некоторое время) как только вес становиться максимальный я реколюсь домой и выкладываю все в сундук и опять реколюсь к нпц и начинаю скупку. сколько будет стоить такой скрипт?

[I'm]

Нисколько если напишеш его сам
А вообще у меня кажется такой был если найду то обязательно выложу

[maximka4]

Нисколько если напишеш его сам
А вообще у меня кажется такой был если найду то обязательно выложу

ну вобщем-то сам я написать не смогу, а вот уже править вроде умею . не сочти за трудность, найди пожалуйста.

[POPKA]

Нисколько если напишеш его сам
А вообще у меня кажется такой был если найду то обязательно выложу

найди мне тоже надо посматреть и ответь пожалуйста они покупка и продажа похожи?

и заглини сюда плиз http://yoko.netroof.net/forum/viewtopic ... sc&start=0

[maximka4]

вобщем есть такая мысля, значит стою я рядом с нпц и все время покупаю один и тот же товар( через некоторое время) как только вес становиться максимальный я реколюсь домой и выкладываю все в сундук и опять реколюсь к нпц и начинаю скупку. сколько будет стоить такой скрипт?

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

[I'm]

Халява если найду свой старый

[maximka4]

Халява если найду свой старый

найди, очень прошу

[Savage]

Скажи что собираешься покупать и где, в каком регионе, в каком магазине. Какой вес можешь держать. Поподробнее вообщем.

[maximka4]

я хочу покупать клубки ткати, в гз (в тринсике) , рядом стоит нпц, вроде все. (на дрв).

[Savage]

Что за клубки? Folded Cloth?

[Leo]

Лучше сделать чтобы он просто покупал лист продажи.

[Savage]

Ну примерно так будет:

Code: Select all

sub max()
	UO.Set('buydelay','2000')
	While 1==1
		UO.Buy('tt2')
		Repeat
			UO.DeleteJournal()
			UO.Exec('warmode 0')
			UO.Exec('warmode 0')
;			UO.UseSkill('Stealth')
			UO.UseSkill('Hiding')
			wait(4000)
		Until UO.Hidden()
		wait(60000) ; 1 min
	Wend
end sub

вес так и не сказал...

[Savage]

Защиту от подрыва что то мне делать неохото. Счас еще разгрузку приклеем ....

[Savage]

Ходить к вендору тоже неохото. Надеюсь ты имел в виду магазин с вендором Enye. Там достаточно стоять в центре комнаты на ковре, она не любит особо гулять

[Savage]

Вот так это выглядит пока без разгрузки....

Кстати можно наверное прикалывать скупщиков на скрипте - в месте появления перед ихним приходом бросать сундук или забор

Code: Select all

sub max()
	VAR VesPrirost=120
	VAR RespDelay=1140000 ;19 min resp 20

	UO.Set('buydelay','1000') ; 1000 - zaderjka na pokupku
	UO.Set('injectecho','1') 

	While 1==1
		UO.DeleteJournal()
		UO.Buy('tt2') ; tt2 - buylist s tkaniyu
		Repeat
			UO.Exec('warmode 0')
			UO.Exec('warmode 0')
;			UO.UseSkill('Stealth')
			UO.UseSkill('Hiding')
			wait(4000)
		Until UO.Hidden()
		IF UO.InJournal("No item") Then
			UO.Print("OOpS!")
			wait(20000) ; 20 sec
		Else
			wait(RespDelay)
		EndIf
	Wend
end sub

[maximka4]

Что за клубки? Folded Cloth?

balls of yarn

[Savage]

Хм, на ДРВ из него ткань геморно делать, но если хочешь можно и его покупать и делать на месте если станок работает

[maximka4]

Вот так это выглядит пока без разгрузки....

Кстати можно наверное прикалывать скупщиков на скрипте - в месте появления перед ихним приходом бросать сундук или забор

Code: Select all

sub max()
	VAR VesPrirost=120
	VAR RespDelay=1140000 ;19 min resp 20

	UO.Set('buydelay','1000') ; 1000 - zaderjka na pokupku
	UO.Set('injectecho','1') 

	While 1==1
		UO.DeleteJournal()
		UO.Buy('tt2') ; tt2 - buylist s tkaniyu
		Repeat
			UO.Exec('warmode 0')
			UO.Exec('warmode 0')
;			UO.UseSkill('Stealth')
			UO.UseSkill('Hiding')
			wait(4000)
		Until UO.Hidden()
		IF UO.InJournal("No item") Then
			UO.Print("OOpS!")
			wait(20000) ; 20 sec
		Else
			wait(RespDelay)
		EndIf
	Wend
end sub

круто, спасибо, приспасибо, приогромное спасибо

[Savage]

Неее, это уже в трэшь
Вот так надо:

Code: Select all

sub max()
	VAR VesPrirost=120
	VAR i

	UO.Set('buydelay','1000') ; 1000 - zaderjka na pokupku
	UO.Set('injectecho','1') 

	While 1==1
		UO.DeleteJournal()
		UO.Buy('tt2') ; tt2 - buylist s tkaniyu
		HideMax()
		IF UO.InJournal("No item") Then
			UO.Print("OOpS!")
			wait(20000) ; 20 sec
		Else
			wait(900000) ;15 min
		EndIf
	Wend
end sub


sub HideMax()
		While NOT UO.Hidden()
			UO.Exec('warmode 0')
			UO.Exec('warmode 0')
;			UO.UseSkill('Stealth')
			UO.UseSkill('Hiding')
			wait(4000)
		Wend
end Sub

[Savage]

Но это тоже еще сыровато...