Yoko

All sides of Injection
It is currently 2025-10-22 16:15:07

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
 Post subject: МИНИНГ
PostPosted: 2006-05-01 20:45:50 
Offline

Joined: 2006-04-29 17:29:35
Posts: 1
Помагите со скриптом! вот скрипт на мининг но чар неходит! непойму чево может я чтото пропустил! если можете перепишите чтоб он ходил и киньте сюда! желательно чтоб ходил по тайлам




sub minround()

VAR Kirka = '0x143C' ; Тип Кирки
VAR MaxVes = 550 ; Максимальный вес, подымаемый чаром минус 10-15 стоунов
#VAR TileNum = '1342' ; Тайл пола пещеры (наиболее распространенный тип)
VAR x, y, t, k
VAR MaxTime = 1000 ; измеряется в 1/10 сек.
VAR ms1 = "Рудная жила в этом месте истощилась"
VAR ms2 = "Вы невидите цели"
VAR ms3 = "You put the"
VAR ms4 = "You loosen some rocks"
VAR ms5 = "You are too far away"
VAR ms6 = "Try mining in rock"
VAR ms7 = "You can't see that"
for y=-2 to 2
for x=-2 to 2
#while not UO.Hidden()
UO.Warmode("0")
#uo.print("Прячемся...")
#UO.UseSkill("Hiding")
#wait(4000)
#wend
k = 0
repeat
UO.DeleteJournal()
UO.CancelTarget()
wait(300)
UO.WaitTargetSelf()
#UO.WaitTargetTile( '1342', STR( UO.GetX() + x ), STR( UO.GetY() + y ), 0)
UO.UseType( Kirka )
repeat
wait(300)
until UO.InJournal(ms1) OR UO.InJournal(ms2) OR UO.InJournal(ms3) OR UO.InJournal(ms4) OR UO.InJournal(ms5) OR UO.InJournal(ms6) OR UO.InJournal(ms7) OR ((t + MaxTime) < UO.Timer())
If UO.Weight > MaxVes Then
UO.Print(" Overweight!" )
return
Endif
until ( NOT UO.InJournal(ms4) AND NOT UO.InJournal(ms3) OR (k > 10) )
next
next
endsub


Last edited by Aerials on 2006-05-01 21:02:22, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2006-05-01 20:55:44 
Offline
User avatar

Joined: 2005-05-06 16:07:12
Posts: 23
Location: none
Оформи скрипт нормально:
[code][/code]


Top
   
 Post subject:
PostPosted: 2006-05-02 00:17:34 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
Слеплено на основе моего mininground, фактически добавлен только хайд. А мой скрипт является просто функцией для обкопки вокруг чара. Причем примером такой функции. Никакой хотьбы в ней нет и быть не должно. Надо писать головную процедуру, в которой и будет хождение и вызов этой функции.


Top
   
 Post subject:
PostPosted: 2006-05-02 02:01:55 
Offline
User avatar

Joined: 2006-04-06 17:16:54
Posts: 95
Location: Khab
Найди на этом форуме поиском ходилку, коих тут давольно много развелось, а в сущности по принцыпу это 1-2 разыне ходилки и вставь в скрипт после проверки на то что выкопана ли у тебя руда или нет.
Допустим
Code:
if ruda_vykopona then
Hodilka()
endif

ну как тут принято говорить "это грубый пример"(с) :)
Хотя помоему одним скриптом на хождение тут не обделаешся. Нужно будет моск подключать ;), у меня он пока выключен.
Советую сразу взять скрипт с ходилкой. В котором бы сохранялись координаты и по кторым бы ходилка тебя вела.


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 4 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 7 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited