22 replies to this topic

[Stfunoob]

Помогите со скриптом на локпикинг и ремувтрэп... Было бы не плохо если бы он снимал ловушку и открывал пандоры...
Заранее спасибо.

[_FANAT_]

зачем тебе такой скрипт ??? набрал пандор и открывеш , сомневаюс что ктото даже это делал со скриптом

[Turik]

я делал :roll:

[Dida]

Блин я всегда сам открывал! У меня азарт пропадёт если я скрипт такой запущю

[mcbrat]

idjo6 na korablj stave6 acc na fisjing na no4 utrom prixodi6 i ka4ae6 eti skilli
ja tak ix proka4al :roll:

[Stfunoob]

я делал :roll:

Поделишься???

idjo6 na korablj stave6 acc na fisjing na no4 utrom prixodi6 i ka4ae6 eti skilli
ja tak ix proka4al :roll:

Я не располагаю таким колличеством времени как ты, и не могу себе позволить сидеть и тупо тыркать на эти коробки. И никакого азарта я не вижу в том чтобы кликать на коробки. Я думаю такой азарт появляеться от бездельничества.
Я предпочитаю ПВП.

Пжалсто юзайте эдит.
Turik

[Turik]

Извини, но скриптег давно утерян...

[artjom]

Yoko forum.Tam dolzen bitj.

[BWS]

У меня есть.

[message]

а я просто на макрос ставил.. УоПилотом.. и шёл смотреть телик :-D

[teror]

не надоело ? нету скрипта - сиди молчи.

[mcbrat]

Я не располагаю таким колличеством времени как ты, и не могу себе позволить сидеть и тупо тыркать на эти коробки. И никакого азарта я не вижу в том чтобы кликать на коробки. Я думаю такой азарт появляеться от бездельничества.
Я предпочитаю ПВП.

nu esli ti takoj lenivij 4to uze pandori pootkrivatj ne mozes,to nize opustitsja neljzja, nu zajmjot u tebja minut 10 umrjo6 4to ili ruka otvalitsja
a PVP mne dostato4no

[BWS]

А вобсще непонимаю,по мне так этож жесть вручную лукпикать .)

[Stfunoob]

nu esli ti takoj lenivij 4to uze pandori pootkrivatj ne mozes,to nize opustitsja neljzja, nu zajmjot u tebja minut 10 umrjo6 4to ili ruka otvalitsja
a PVP mne dostato4no

Я не ленивый, зачем делать то, что за тебя может сделать робот?? и не хуже чем ты сам.

[mcbrat]

nu esli estj takoj script to eto +
bil bi takoj na easyuo to eto ++

[Nosound]

Easyuo...tam prekrasnij Help vse chto ho4e6 no na anglijskom.Kstate tut na ident kidali scripteg chutok evo podredaktiorvat polu4itsa lockpicking&Remove trap..

[mcbrat]

esli ne zalko kinj sjuda etu ssilku gde script ili skopiruj script i sjuda vstavj

[Retrival`]

под easyuo :

InitEvents

Set %Container ESKELMD; ид бэкпэка

Set %Box CUD ;тип пандор

Set %LockPick NWH;тип ключиков

Set %LockPickCount 100; кол-во ключиков



FindBox-Container:

	Set #LObjectId %Container

	If #ContId <> %Container

		{

			Event Macro 17 0

				Wait 10

		}

	FindItem %Box C_ , %Container

		If #FindKind <> -1

			{

				ExEvent Drag #FindId #FindStack

					Wait 10

				ExEvent DropC #BackPackId

					Wait 10

			}

FindBox-BackPack:

	Set %JIndex #JIndex

	FindItem %Box C_ , #BackPackId

		If #FindKind = -1

			{

				GoTo FindBox-Container

			}

		If #FindKind <> -1

			{

				Set %UnTrapTimer #SCnt2 + 60

				Untrap:

					Set #LObjectId #FindId

					Event Macro 17 0

						Wait 10

					While #True

						{

							If #JIndex > %JIndex

								{

									Set %JIndex %JIndex + 1

									ScanJournal %JIndex

									If You_must_unlock_it_at_first. In #Journal || Trapped_succesfully_removed In #Journal

										{

											Set %UntrappedBox #FindId

											GoSub Unlock %UntrappedBox

											GoTo FindBox-BackPack

										}

									If You_fail_to_untrap_Pandora_Box In #Journal

										{

											GoTo Untrap

										}

								}

							If #SCnt2 => %UnTrapTimer || You_destroy_Pandora_Box! In #Journal

								{

									GoTo FindBox-BackPack

								}

						}

				}



Sub Unlock

	FindLockPick:

		Set #LObjectId %Container

		If #ContId <> %Container

			{

				Event Macro 17 0

					Wait 10

			}

		FindItem %LockPick C_ , #BackPackId

			If #FindKind = -1

				{

					FindItem %LockPick C_ , %Container

						If #FindKind <> -1

							{

								ExEvent Drag #FindId %LockPickCount

									Wait 10

								ExEvent DragC #BackPackId

									Wait 10

								GoTo FindLockPick

							}

						If #FindKind = -1

							{

								Display Ok Закончились отмычки, макрос поставлен на ПАУЗУ!!!

								If #DispRes = Ok

									{

										Pause

										GoTo FindLockPick

									}

							}

				}

		Set %JIndex #JIndex

		Set #LObjectId #FindId

		Set #LTargetId %1

		Set #LTargetKind 1

		Event Macro 17 0

			Target 1s

		If #TargCurs <> 1

			{

				GoTo FindLockPick

			}

		Event Macro 22 0

		While #True

			{

				If #JIndex > %JIndex

					{

						Set %JIndex %JIndex + 1

						ScanJournal %JIndex

						If You_fail_to_unlock_box. In #Journal || You_must_wait_to_unlock_next_item! In #Journal

							{

								Wait 10

								GoTo FindLockPick

							}

						If Box_unlocked. In #Journal || It_is_already_unlocked. In #Journal

							{

								Wait 10

								GoTo Unlocked

							}

					}

			}

	Unlocked:

	Set #LObjectId %1

	Event Macro 17 0

		Wait 10

	If #Weight > #MaxWeight

		{

			Display Ok Разгрузите чара!!! Скрипт на ПАУЗЕ!!!

			If #DispRes = Ok

				{

					Pause

				}

		}

Return

[maxlag]

zakryto ! :-D

[Totoshka]

Я не ленивый, зачем делать то, что за тебя может сделать робот?? и не хуже чем ты сам.

Зачем тогда вообше играть, если за тебя всё и всегда делают проги и скрипты, какой интерес от игры ?