Yoko

All sides of Injection
It is currently 2025-10-14 22:40:20

All times are UTC+02:00




Post new topic  Reply to topic  [ 21 posts ]  Go to page 1 2 Next
Author Message
PostPosted: 2004-04-13 23:09:46 
Offline

Joined: 2004-04-13 22:59:41
Posts: 2
Нужен скрипт на картографию:)
С обьяснением что и где надо поменять(это моя первая встреча с Injection)
Заранние благодарен!


Top
   
 Post subject:
PostPosted: 2004-04-14 13:06:57 
Offline

Joined: 2004-04-04 21:04:43
Posts: 76
Скажи шард. И расскажи, как на твоем шарде качается картография.


Top
   
 Post subject:
PostPosted: 2004-04-14 14:41:46 
Offline

Joined: 2004-04-13 22:59:41
Posts: 2
DRW!а качаеться она как мне кажеться визде одинаково


Top
   
 Post subject:
PostPosted: 2004-04-15 08:49:42 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
Code:
var CurTime
var OutTime = 5000
UO.CancelMenu()
UO.AutoMenu("картопИсанье", "название карты")
Repeat
  CheckLag()
  UO.FindType("тип карты", "0", "-1")
  Repeat
     CheckLag()
     UO.UseObject("finditem")
     CurTime=0
     Repeat
        Wait(200)
        CurTime=CurTime+200
     Until InJournal("фффсе зашибись") or InJournal("обломчикссс") or CurTime>OutTime
     Wait(300)
  Until InJournal("фффсе зашибись")
  UO.Ignore("finditem")
Until UO.FindCount()<2
UO.CancelMenu()

Вот таким макаром. Я это только что написал, поэтому разумно будет вставить реальные фразы и типы. Оттестить на малых количествах карт. Ну и не возбраняется пришить авто закупки и продажу... :roll:


Top
   
 Post subject:
PostPosted: 2004-04-16 13:56:27 
Offline

Joined: 2004-04-06 19:53:41
Posts: 82
AGRS wrote:
Code:
var CurTime
var OutTime = 5000
UO.CancelMenu()
UO.AutoMenu("картопИсанье", "название карты")
Repeat
  CheckLag()
  UO.FindType("тип карты", "0", "-1")
  Repeat
     CheckLag()
     UO.UseObject("finditem")
     CurTime=0
     Repeat
        Wait(200)
        CurTime=CurTime+200
     Until InJournal("фффсе зашибись") or InJournal("обломчикссс") or CurTime>OutTime
     Wait(300)
  Until InJournal("фффсе зашибись")
  UO.Ignore("finditem")
Until UO.FindCount()<2
UO.CancelMenu()

Вот таким макаром. Я это только что написал, поэтому разумно будет вставить реальные фразы и типы. Оттестить на малых количествах карт. Ну и не возбраняется пришить авто закупки и продажу... :roll:

а зачем их искать? не проще ли использовать скил картографи в уо по умолчанию? он автоматом карты находит?


Top
   
 Post subject:
PostPosted: 2004-04-16 19:29:42 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
mike wrote:
а зачем их искать? не проще ли использовать скил картографи в уо по умолчанию? он автоматом карты находит?


Не везде работает, но на дрв конечно можно скиллом.


Top
   
 Post subject:
PostPosted: 2004-04-16 22:32:08 
Offline

Joined: 2004-04-09 19:07:00
Posts: 16
Млин объясните что тут надо сделать?
И что надо нормальное написать место "фффффссссеее заепись" и так далее?


Top
   
 Post subject:
PostPosted: 2004-04-16 22:35:56 
Offline

Joined: 2004-04-09 19:07:00
Posts: 16
И еще! Он пишет про какую то ошибку в 6 строчке! Что то про чек лаг!


Top
   
 Post subject:
PostPosted: 2004-04-18 12:06:55 
Offline

Joined: 2004-04-09 19:07:00
Posts: 16
Up


Top
   
 Post subject:
PostPosted: 2004-04-21 23:17:39 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
WhiteDemon wrote:
Млин объясните что тут надо сделать?
И что надо нормальное написать место "фффффссссеее заепись" и так далее?


Вместо "фффффссссеее заепись" должно быть сообщение (или его уникальная часть) об успешном написании карты.


Top
   
 Post subject:
PostPosted: 2004-04-21 23:18:35 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
WhiteDemon wrote:
И еще! Он пишет про какую то ошибку в 6 строчке! Что то про чек лаг!


Видимо ты забыл включть в скрипт стандартную процедурку CheckLag() ;)


Top
   
 Post subject:
PostPosted: 2004-04-21 23:18:53 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
WhiteDemon wrote:
Up

Down


Top
   
 Post subject:
PostPosted: 2004-04-22 10:27:08 
Offline

Joined: 2004-04-19 18:43:26
Posts: 14
AGRS wrote:
WhiteDemon wrote:
И еще! Он пишет про какую то ошибку в 6 строчке! Что то про чек лаг!


Видимо ты забыл включть в скрипт стандартную процедурку CheckLag() ;)

чеклаг помойму отдельный скрипт -) и он не стандартный =)
его помойму савагев начал использовать, а потом все за ним -)

_________________
lol


Top
   
 Post subject:
PostPosted: 2004-04-22 16:26:10 
Offline
User avatar

Joined: 2004-04-08 16:06:21
Posts: 29
кстати, некрон прав -) А суть функции в том, что чар щелкает два раза по бакпаку.. Так же есть интересная команда resend %)


Top
   
 Post subject:
PostPosted: 2004-04-22 16:58:03 
Offline
User avatar

Joined: 2004-04-06 12:27:32
Posts: 118
не, он кликает 1 раз по бекпаку, проверяет наличие надписи 'backpack' в журнале, а когда находит её там ,сам саб заканчиваеться.


Top
   
 Post subject:
PostPosted: 2004-04-22 21:23:07 
Offline
User avatar

Joined: 2004-04-08 16:06:21
Posts: 29
фишка как раз в этом, не щамечал, если кликнуть даблкликом на бакпак, то его содержание обновляется. Ну так вот, он кликает, а потом ждет, когда появится сообщение, что ему удалось кликнуть -) и идет дальше, я просто сам код не помню %) Но суть в этом .. Мой друг просто этим заморачивался, он когда алхимию качал, то у него содержание пака не обновлялось, так он кликал. Вообщем тут у всех свои методы -)


Top
   
 Post subject:
PostPosted: 2004-04-22 23:52:04 
Offline
User avatar

Joined: 2004-04-06 12:27:32
Posts: 118
Это да, но у саваджа скрипт вот такой

Code:
#==============================================================
#  CheckLag() - click on backpack and awaiting "backpack"
#               message in journal.
#
#  Journal has been deleted!!!
#--------------------------------------------------------------
sub CheckLag()
   UO.DeleteJournal()
   UO.Click('backpack')

   repeat
      wait(500)
   until UO.InJournal('0x9A12') ; backpack
   UO.Print('Checking done.')
end sub


как мы видим, идёт UO.Click('backpack'). Но у каждого и правда свои методы, но в данном примере просто одиночный клик.


Top
   
 Post subject:
PostPosted: 2004-04-23 07:39:00 
Offline
User avatar

Joined: 2004-04-08 16:06:21
Posts: 29
надо будет попробовать потестить, посмотреть


Top
   
 Post subject:
PostPosted: 2004-04-26 22:04:37 
Offline

Joined: 2004-04-09 19:07:00
Posts: 16
Посмотрите правильно ли я переделал скрипт?
а то чу меня выдает ошибку: Function not found - INJOURNAL



var CurTime
var OutTime = 5000
UO.CancelMenu()
UO.AutoMenu("Cartography", "a Blank Map")
Repeat
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')

repeat
wait(500)
until UO.InJournal('0x9A12') ; backpack
UO.Print('Checking done.')
end sub
UO.FindType("Regional Map", "0", "-1")
Repeat
UO.UseObject("finditem")
CurTime=0
Repeat
Wait(200)
Until InJournal("You put") or InJournal("Thy trembling") or CurTime>OutTime
Wait(300)
Until InJournal("You put")
UO.Ignore("finditem")
Until UO.FindCount()<2
UO.CancelMenu()


Top
   
 Post subject:
PostPosted: 2004-04-26 22:23:59 
Offline

Joined: 2004-04-09 19:07:00
Posts: 16
ТАк с тем что я спрашивал я разобрался!


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 21 posts ]  Go to page 1 2 Next

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] and 4 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:  
Powered by phpBB® Forum Software © phpBB Limited