Yoko

All sides of Injection
It is currently 2026-01-18 10:53:27

All times are UTC+02:00




Post new topic  Reply to topic  [ 15 posts ] 
Author Message
PostPosted: 2004-11-26 02:30:37 
Offline

Joined: 2004-10-28 02:33:43
Posts: 15
проблема в следующем: сейчас в скрипте используетса уход при виде ника.. но некоторые умудряютсав в хайде проходить пить инвизку и парафилд кастовать :) . так вот как реализовать уход по трахингу чтоб при этом при все аутоменю и ваит меню непожвисало? или лучше делать через масси на плохии слова и сравнивать журнал? :)


Top
   
 Post subject:
PostPosted: 2004-11-26 21:52:24 
Offline

Joined: 2004-10-28 02:33:43
Posts: 15
uo.useskill('Tracking')
checklag()
wait(300)
if uo.injournal("You see no signs") then
uo.print("никого нету....")

else
uo.print("пропалили...")
Save()
endif

теперь проблема в срабатывании при лаге... как ее решить?


Top
   
 Post subject:
PostPosted: 2004-11-28 00:46:56 
Offline

Joined: 2004-06-28 19:06:26
Posts: 63
Что то мне подсказывает, что такое не пройдет, ибо чеклаг подтирает журнал.


Top
   
 Post subject:
PostPosted: 2004-11-28 12:13:33 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
1) Если чек лаг и подтирает, то не успеет.
2) Современная версия чек лаг уже не трет весь журнал.


Top
   
 Post subject:
PostPosted: 2004-11-28 16:12:04 
Offline

Joined: 2004-10-28 02:33:43
Posts: 15
ну что не будет вариантов решения?


Top
   
 Post subject:
PostPosted: 2004-11-28 16:16:38 
Offline

Joined: 2004-10-28 02:33:43
Posts: 15
Code:



h = h + 1   
   if h > 11 then

   h = 1
   uo.useskill('Tracking')   
   wait(50)
   uo.useskill('Tracking')   
   checklag()
   wait(500)
   if uo.injournal("You see no signs") then
   uo.print("никого нету....")
   
   else
        uo.print("êòî åñòüâ ïðåäåëàõ âèäèìîñòè òðàõà...")
      Save()
      
   endif
   endif



sub CheckLag()
UO.Click('backpack')
var c
c = 1
repeat
wait(100)
c = c + 1
until UO.InJournal('backpack') or c > 30
end sub



Top
   
 Post subject:
PostPosted: 2004-11-28 16:18:34 
Offline

Joined: 2004-10-28 02:33:43
Posts: 15
но при лагах всеравно наблюдаютса ложные срабатывания ... хотя и редко в чек лаге удалил делет журнал т.к он есть выше него.


Top
   
 Post subject:
PostPosted: 2004-11-29 08:54:49 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
AGRS wrote:
2) Современная версия чек лаг уже не трет весь журнал.
на форуме его есть?


Top
   
 Post subject:
PostPosted: 2004-11-29 13:25:56 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
Sfagnum wrote:
на форуме его есть?


А х... его знает. Теперь точно есть. )))

Code:
SUB CheckLag() ; 411.21
  DeleteJournal("backpack")
  UO.Click('backpack')
  Repeat
    Wait(LoopTime)
  Until UO.InJournal("backpack")
END SUB

SUB DeleteJournal(MsgText) ; 411.21
  Var MsgNumb
  Repeat
    MsgNumb=UO.InJournal(MsgText)
    If MsgNumb<>0 Then
      UO.SetJournalLine(MsgNumb-1, '')
    EndIf
  Until Not UO.InJournal(MsgText)
END SUB


LoopTime примерно 50 - 150


Top
   
 Post subject:
PostPosted: 2004-11-29 14:32:33 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
прикольно...
спасибо


Top
   
 Post subject:
PostPosted: 2004-11-29 15:51:13 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
Code:
SUB CheckLag() ; 411.21
  DeleteJournal("backpack")
  UO.Click('backpack')
  Repeat
    Wait(LoopTime)
  Until UO.InJournal("backpack")
END SUB

SUB DeleteJournal(MsgText) ; 411.21
Var MsgNumb=UO.InJournal(MsgText)
  while MsgNumb > 0   
    UO.SetJournalLine(MsgNumb-1, '')   
    MsgNumb=UO.InJournal(MsgText)
  wend
END SUB
ИМХО так прикольнее, или напорюсь на какие то камушки?


Top
   
 Post subject:
PostPosted: 2004-11-29 17:48:10 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
Sfagnum wrote:
ИМХО так прикольнее, или напорюсь на какие то камушки?


Напоришься если вдруг будет размер журнала инжекта увеличен.


Top
   
 Post subject:
PostPosted: 2004-11-30 17:07:10 
Offline
Expert!

Joined: 2004-04-03 17:36:29
Posts: 2544
Location: Saint-Petersburg
А все-таки так изящнее:

Code:
Sub DeleteJournal( string1 )
   VAR nom = UO.InJournal( string1 )
   If nom > 0 Then
      UO.SetJournalLine( Nom - 1, '' )
      DeleteJournal( string1 )
   Endif
endsub


;)


Top
   
 Post subject:
PostPosted: 2004-11-30 20:04:32 
Offline
Expert!
User avatar

Joined: 2004-04-04 21:40:09
Posts: 1007
AGRS wrote:
Sfagnum wrote:
ИМХО так прикольнее, или напорюсь на какие то камушки?


Напоришься если вдруг будет размер журнала инжекта увеличен.


Чет я х-ню какую то написал. Ни на что не напоришься, все ок. :)


Top
   
 Post subject:
PostPosted: 2004-11-30 23:20:49 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
AGRS wrote:
Чет я х-ню какую то написал. Ни на что не напоришься, все ок. :)
я так и подумал ;)


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 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