Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

@  Artemy Shan : (Yesterday, 04:18) Оживил форум
@  fr33 : (27 October 2025 - 01:54) 5 clientov
@  fr33 : (21 September 2025 - 00:23) 8 clientov
@  MousT : (07 September 2025 - 09:04) Опять сервер лагует.
@  opas : (17 August 2025 - 21:52) Сервер ещё ддосят?
@  Costesti : (05 August 2025 - 20:36) Акк Kosmo тебе делать больше нету Бомжара ходить по шахтам убивать минера ?
@  Artemy Shan : (04 July 2025 - 03:34) Перезапуск проекта: https://forum.oldp.n...howtopic=106329
@  Costesti : (10 June 2025 - 22:26) Артём закрой сервер толку от него ноль так как лаги бешеные ничего не сделать
@  Costesti : (10 June 2025 - 21:03) бля это у меня сервер только логает или у всех?
@  papasha : (10 June 2025 - 15:13) @Costesti da kanesna vvodit, uze dohuja obnov vishlo za 7 let poslednix!!
@  Costesti : (09 June 2025 - 18:34) Артём ты там нововведения водишь?
@  Costesti : (09 June 2025 - 18:31) Сервер работает?
@  Costesti : (31 May 2025 - 23:46) Шан комп меняй уже игру не тянет
@  Costesti : (31 May 2025 - 20:02) мда никому не нужен этот сервер
@  fr33 : (29 May 2025 - 14:07) shenahnan gnom
@  fr33 : (29 May 2025 - 14:07) gm zb!!!1 lagi ept
@  Costesti : (28 May 2025 - 22:43) и это опять и за сейвы
@  Costesti : (28 May 2025 - 22:43) Народ да у кого там номер Шана пускай чинит сервер
@  Costesti : (27 May 2025 - 21:38) Вопрос Крафтить молоко можно?
@  fr33 : (26 May 2025 - 17:33) gm blad chini lag

Photo

Mining v skalax

Started by Dolja, Apr 25 2007 18:14

  • Please log in to reply
36 replies to this topic

#1 Dolja

Dolja

    Master

  • Members
  • 700 posts
  • Location:Latvia

Posted 25 April 2007 - 18:14 

set %ljtool NPF_qpf			 



start:

 GOSUB LJING 1729 1056

 GOSUB LJING 1728 1056

 GOSUB LJING 1727 1056

 GOSUB LJING 1726 1056

 GOSUB LJING 1725 1056

 GOSUB LJING 1724 1056

 GOSUB LJING 1723 1056

 GOSUB LJING 1722 1056

 GOSUB LJING 1721 1056

 GOSUB LJING 1720 1056

 GOSUB LJING 1719 1056

 GOSUB LJING 1718 1057

 GOSUB LJING 1717 1057

 GOSUB LJING 1716 1059

 GOSUB LJING 1715 1060

 GOSUB LJING 1714 1060

 GOSUB LJING 1713 1061

 GOSUB LJING 1713 1062

 GOSUB LJING 1713 1063

 GOSUB LJING 1713 1064

 GOSUB LJING 1713 1065

 GOSUB LJING 1713 1066

 GOSUB LJING 1713 1067

 GOSUB LJING 1713 1068

 GOSUB LJING 1713 1069

 GOSUB LJING 1713 1070

 GOSUB LJING 1713 1071

 GOSUB LJING 1713 1072

 GOSUB LJING 1713 1073

 GOSUB LJING 1713 1074

 GOSUB LJING 1726 1072

 GOSUB LJING 1727 1071

 GOSUB LJING 1728 1071

 GOSUB LJING 1730 1069

 GOSUB LJING 1731 1068

 GOSUB LJING 1731 1067

 GOSUB LJING 1732 1067

 GOSUB LJING 1733 1066

 GOSUB LJING 1734 1066

 GOSUB LJING 1735 1066

 GOSUB LJING 1736 1066

 GOSUB LJING 1737 1066

 GOSUB LJING 1738 1066

 GOSUB LJING 1740 1068

 GOSUB LJING 1741 1068

 GOSUB LJING 1746 1070

 GOSUB LJING 1747 1070

 GOSUB LJING 1748 1070

 GOSUB LJING 1749 1070

 GOSUB LJING 1750 1070

 GOSUB LJING 1734 1059

 GOSUB LJING 1735 1059

 GOSUB LJING 1736 1059

 GOSUB LJING 1737 1059

 GOSUB LJING 1738 1059

 GOSUB LJING 1739 1059

 GOSUB LJING 1740 1059

 GOSUB LJING 1741 1059

 GOSUB LJING 1742 1060

 GOSUB LJING 1743 1060

 GOSUB LJING 1744 1060

 GOSUB LJING 1745 1061

 GOSUB LJING 1746 1062

 GOSUB LJING 1748 1062







goto start



sub ljing 

move %1 %2 1 

finditem %ljtool 

set #lobjectid #findid 

event macro 17 0 

target 14s 

set #ltargetx %1 

set #ltargety %2 

set #ltargetkind 3 

set #ltargettile %3 

event macro 22 0 

wait 7 

set %overtime #scnt + 25 

gosub bp10 

return 



gosub bp10									   

sub bp10 

if #weight > 740

gosub home $



sub scan										

scan:											

scanjournal %cnt 

if #hits < 175

msg .arm$

if #hits < 175

msg .camp $

if #hits < 175

return

if THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg 

return 

if You_stop_Mining in #sysmsg 

return 

if YOu_CAN'T_REACH_THIS in #sysmsg 

return

if You_fail_to_do_that in #sysmsg

return

if You_can`t_use_the_

return

if #scnt >= %overtime 

return 

goto scan 







sub home

move 1733 1063

move 1749 1067

move 1754 1064

gosub moveItems



sub moveItems

{

  set !dragTimeout 4;1/10 s

  set !dragTimer #scnt2

  set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

  if %0 < 2

	set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

  set !from UEGYKMD

  set !to XIQTLMD

  finditem !items C_ , !from

  for #findindex 1 #findcnt

  {

	if #findkind = 0

	{

	  set !amt 1

	  if #findstack > 1

		set !amt #findstack

	  while #scnt2 < !dragTimer

		wait 0

	  exevent drag #findid !amt

	  exevent dropc !to

	  set !dragTimer #scnt2 + !dragTimeout

	}

  }

  namespace clear



}

gosub vadadsa

sub vadadsa

move 1729 1056

move 1729 1056

return

#2 Dolja

Dolja

    Master

  • Members
  • 700 posts
  • Location:Latvia

Posted 25 April 2007 - 18:17

:roll:

#3 Arsenikum

Arsenikum

    Ex Server Staff

  • Members
  • 1138 posts
  • Gender:Male
  • Location:Riga

Posted 25 April 2007 - 18:38

Не понимаю что не правильно. Как бы копают, но когда вес большой и он идти положить руды, он они не кладут. Что сделать?

set !dragTimeout 4 ;1/10 s
set !dragTimer #scnt2
set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF
if %0 < 2
set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF
set !from UEGYKMD
set !to XIQTLMD prover Id kuda kidaew rudu ili Id tvoij sumki
Ветеран Oldparadise XL

Posted Image

#4 Dolja

Dolja

    Master

  • Members
  • 700 posts
  • Location:Latvia

Posted 25 April 2007 - 19:29

A nada lasttarget id ili lobject id?

#5 Keshka

Keshka

    Master

  • Members
  • 954 posts
  • Gender:Male
  • Location:Riga

Posted 25 April 2007 - 19:45

object id
Я дико модный!

#6 Dolja

Dolja

    Master

  • Members
  • 700 posts
  • Location:Latvia

Posted 25 April 2007 - 21:30

Edit: Vse ok

#7 Miesnieks

Miesnieks
  • Members
  • 3 posts

Posted 25 July 2007 - 09:28

shto delait funkcija sub vadadsa? :huh:

#8 Allower

Allower

    Currently Banned

  • Members
  • 2253 posts
  • Gender:Male
  • Location:yBw

Posted 25 July 2007 - 11:15

После того как он скинул руду идет к копалке , если вдруг надо обойти препядствия :)
Если что-то хотите узнать - пишите ПМ. Причина бана - навсегда. ;) Так что не пишите глупых вопросов ;) Account banned.

#9 Miesnieks

Miesnieks
  • Members
  • 3 posts

Posted 25 July 2007 - 14:14

После того как он скинул руду идет к копалке , если вдруг надо обойти препядствия :)

sps, vso ok :) :-D

#10 Allower

Allower

    Currently Banned

  • Members
  • 2253 posts
  • Gender:Male
  • Location:yBw

Posted 26 July 2007 - 17:45

Спасибо в карман не положишь? ;)
Если что-то хотите узнать - пишите ПМ. Причина бана - навсегда. ;) Так что не пишите глупых вопросов ;) Account banned.

#11 Darien

Darien

    Journeyman

  • Members
  • 51 posts
  • Gender:Male
  • Location:Jelgava

Posted 11 September 2007 - 16:13

neponimaju! mne skript neidot! mne on tolka hodit vnutri skal ili proch ot nih, no nechivo nekopaet! HELP ME! :(
Gestapo

#12 Allower

Allower

    Currently Banned

  • Members
  • 2253 posts
  • Gender:Male
  • Location:yBw

Posted 11 September 2007 - 18:37

Можеть быть криво прописаны координаты, а чар пытается подойти к недопустимой точке.
Если что-то хотите узнать - пишите ПМ. Причина бана - навсегда. ;) Так что не пишите глупых вопросов ;) Account banned.

#13 Dani

Dani

    Novice

  • Members
  • 45 posts
  • Gender:Male
  • Location:Москва - Выхино, Тушино, Китай Город ;)

Posted 12 September 2007 - 18:26 

gosub moveItems



sub moveItems

{

  set !dragTimeout 4;1/10 s

  set !dragTimer #scnt2

  set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

  if %0 < 2

	set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

это просто улыбнуло :-D

а ваще скрипт написан неудобно, в плане бля нешарящих юзеров, прописывать ади бэкпака где-нить в конце скрипта не оч пазитивна, я думаю можно было заменить это тупо #BackPackId как-нить

#14 Turik

Turik

    Counselor Lindsay

  • Members
  • 1015 posts
  • Gender:Male
  • Location:Каугури

Posted 12 September 2007 - 18:35

Я всегда использую разгрузку такого типа... очень простая :)

[codebox]drag:
finditem %item c_ , #backpackid
if #findkind = -1
return
exevent drag #findid #findstack
exevent dropc %container
goto drag[/codebox]
Posted Image
Цитаты Доктора Хауза:
* Все лгут
* Если бы в её ДНК отклонение было бы на один процент, она была бы дельфином
* Я плохой, и не пытайтесь убедить себя и меня, что это не так
* Ты разговариваешь с Богом - ты верующий, Бог разговаривает с тобой - ты психически больной
* Между любовью и ненавистью нет тонкой грани! Есть Великая Китайская Стена с вооруженными часовыми через каждые двадцать шагов.

#15 Dani

Dani

    Novice

  • Members
  • 45 posts
  • Gender:Male
  • Location:Москва - Выхино, Тушино, Китай Город ;)

Posted 12 September 2007 - 18:37

Я всегда использую разгрузку такого типа... очень простая :)

drag:finditem %item c_ , #backpackidif #findkind = -1 returnexevent drag #findid #findstackexevent dropc %containergoto drag

дык это самая стандартная и ровная тема, только вот задержки меж пакетными командами нада ставить, ибо(не знаю как у кого) у меня вылетает даже с вэйтом 5 :( , просто тухнет клиент...

#16 Turik

Turik

    Counselor Lindsay

  • Members
  • 1015 posts
  • Gender:Male
  • Location:Каугури

Posted 12 September 2007 - 18:41

лично у меня некогда не вылетает...
у знакомых бывает вылетает.
Posted Image
Цитаты Доктора Хауза:
* Все лгут
* Если бы в её ДНК отклонение было бы на один процент, она была бы дельфином
* Я плохой, и не пытайтесь убедить себя и меня, что это не так
* Ты разговариваешь с Богом - ты верующий, Бог разговаривает с тобой - ты психически больной
* Между любовью и ненавистью нет тонкой грани! Есть Великая Китайская Стена с вооруженными часовыми через каждые двадцать шагов.

#17 Dani

Dani

    Novice

  • Members
  • 45 posts
  • Gender:Male
  • Location:Москва - Выхино, Тушино, Китай Город ;)

Posted 12 September 2007 - 18:42

лично у меня некогда не вылетает...
у знакомых бывает вылетает.

издержки производства значит, на вэйт 10 не вылетает ниразу... впринципе это не столь важно на самом деле... и ваще чтото мы от темы отъехали :-D

#18 Turik

Turik

    Counselor Lindsay

  • Members
  • 1015 posts
  • Gender:Male
  • Location:Каугури

Posted 12 September 2007 - 18:46

neponimaju! mne skript neidot! mne on tolka hodit vnutri skal ili proch ot nih, no nechivo nekopaet! HELP ME!

если ты попросту скопировал скрипт и запустил его то нечего удевительного.
расписалбы подробнее :)
Posted Image
Цитаты Доктора Хауза:
* Все лгут
* Если бы в её ДНК отклонение было бы на один процент, она была бы дельфином
* Я плохой, и не пытайтесь убедить себя и меня, что это не так
* Ты разговариваешь с Богом - ты верующий, Бог разговаривает с тобой - ты психически больной
* Между любовью и ненавистью нет тонкой грани! Есть Великая Китайская Стена с вооруженными часовыми через каждые двадцать шагов.

#19 Allower

Allower

    Currently Banned

  • Members
  • 2253 posts
  • Gender:Male
  • Location:yBw

Posted 14 September 2007 - 06:00 

gosub moveItems



sub moveItems

{

  set !dragTimeout 4;1/10 s

  set !dragTimer #scnt2

  set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

  if %0 < 2

	set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

это просто улыбнуло :-D

а ваще скрипт написан неудобно, в плане бля нешарящих юзеров, прописывать ади бэкпака где-нить в конце скрипта не оч пазитивна, я думаю можно было заменить это тупо #BackPackId как-нить

Не нравиться не используй, лично мне этот срипт очень подходит. А хаять чужие сприты каждый умеет - выложи свой.
Если что-то хотите узнать - пишите ПМ. Причина бана - навсегда. ;) Так что не пишите глупых вопросов ;) Account banned.

#20 artjom

artjom

    Master

  • Members
  • 722 posts

Posted 14 September 2007 - 11:14

Mogu vilozitj "svoj universalnij na dobi4u libo logov libo rudi" rabotaet bez otkazno + vse fiwki.
-( 15:17:31 )- <EdKo_> шакал лучший маг который 1 любых
-( 15:17:33 )- <EdKo_> троих порвёт
-( 15:18:18 )- <EdKo_> шакал просто бог

( 13:47:15 )- <EdKo_> toko realnie pro vijesnjajut kto kru4e na arene
( 13:47:18 )- <EdKo_> takie kak ja

Шутки,приколы и многое другое в привате у Едко.
Edko = Happines
Back to Скрипты


0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

  1. Old Paradise Forums
  2. → Игровые сервера
  3. → Ultima Online
  4. → Скрипты
  5. Privacy Policy