Yoko

All sides of Injection
It is currently 2025-11-12 11:57:35

All times are UTC+02:00




Post new topic  Reply to topic  [ 12 posts ] 
Author Message
 Post subject: Реконнектор
PostPosted: 2005-09-16 07:09:33 
Offline
User avatar

Joined: 2005-09-16 07:00:30
Posts: 6
Location: Одесса, Украина
Когда стою на прокачке у меня, допустим, запушено 2 скрипта (1-й на определенный скилл, а 2-й - реконнектор)... но после того как выкидывает с УО и реконнектор заново конестится запускается только сам реконектор без скрипта на определенный скилл... Подскажите пожалуста как можно сделать так что бы после реконнекта ( с помошью реконнектора) запускались все скрипты которые были до дисконнеста...


Top
   
 Post subject:
PostPosted: 2005-09-16 15:54:51 
Offline
User avatar

Joined: 2005-09-16 07:00:30
Posts: 6
Location: Одесса, Украина
Что никто неможет подсказать?


Top
   
 Post subject:
PostPosted: 2005-09-16 18:23:12 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
типа код твоего реконектора мы должны по звёздам прочитать, м? :roll:


Top
   
 Post subject:
PostPosted: 2005-09-16 21:50:16 
Offline
User avatar

Joined: 2005-09-16 07:00:30
Posts: 6
Location: Одесса, Украина
Sfagnum wrote:
типа код твоего реконектора мы должны по звёздам прочитать, м? :roll:


А где этот код пишется?

P.S. я просто в этом не шарю...


Top
   
 Post subject:
PostPosted: 2005-09-16 22:04:49 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
Fire wrote:
А где этот код пишется?

P.S. я просто в этом не шарю...


Копируешь свой скрипт, выставляешь его тут , не забывая при этом использовать теги [cоde] и [/cоde].


Top
   
 Post subject:
PostPosted: 2005-09-17 06:29:36 
Offline
User avatar

Joined: 2005-09-16 07:00:30
Posts: 6
Location: Одесса, Украина
Code:
sub main()
UO.Exec('terminate Reconnector')
  UO.Exec('exec Reconnector')
  wait(5000)

sub Reconnector()
  var ReconnectTime, RFlag
  ReconnectTime = '0'
  RFlag = 1
  Repeat
        While (UO.ObjAtLayer('Bpack') == '')
              if RFlag Then
                  ReconnectTime = MakeTime()
                  RFlag = 0
              endif
              Wait(20000) # WorldSave Protection
              UO.Say('')
              Wait(3000)
              UO.Say('')
              Wait(3000)
              UO.Say('')
              Wait(3000)
              UO.LDblClick(357,164)
              UO.LClick(616,459)
              Wait(3000)       
        WEnd
        Wait(3000)
        if (RFlag == 0) and (ReconnectTime <> '0') Then
            UO.Exec('terminate main')
            UO.Exec('exec main')
            UO.TextOpen()
            UO.TextPrint('Disconnected & Reconnected @ '+ReconnectTime)
            RFlag = 1
            ReconnectTime = '0'
        endif
  Until false
end sub

sub MakeTime()
  VAR D, T, Ret, i
  Ret = STR(UO.Time())
  T = ""
  For i = 0 To Len(Ret)
      T = Ret[Len(Ret)-i] + T
      If (I == 2) OR (I == 4) Then
        T = ":" + T
      EndIf
  Next
  Ret = STR(UO.Date())
  D = ""
  For i = 0 To Len(Ret)
      D = Ret[Len(Ret)-i] + D
      If (I == 2) OR (I == 4) Then
        D = "." + D
      EndIf
  Next
  Ret = T + " @ " + D
  RETURN Ret
end sub



Вот...


Top
   
 Post subject:
PostPosted: 2005-09-17 18:59:10 
Offline
Expert!
User avatar

Joined: 2004-07-04 00:14:58
Posts: 1284
Fire wrote:
Code:
sub main()
UO.Exec('terminate Reconnector')
  UO.Exec('exec Reconnector')
  wait(5000)



Вот...
навскидку всё правильно...
если кнчн ты просто обрезал скрипт а не такой и юзаешь ;)


Top
   
 Post subject:
PostPosted: 2005-09-20 17:36:28 
Offline
User avatar

Joined: 2005-09-16 07:00:30
Posts: 6
Location: Одесса, Украина
Так мне и не ответили на поставленый вопрос... Как сделать так, что бы после реконекта запускался не только реконектор, а и те скрипты которые были запушены до реконекта?


Top
   
 Post subject:
PostPosted: 2005-09-20 17:43:03 
Offline
Expert!
User avatar

Joined: 2005-01-15 19:15:05
Posts: 791
Location: Dragon World
viewtopic.php?t=670


Top
   
 Post subject:
PostPosted: 2005-09-21 14:09:50 
Offline
User avatar

Joined: 2005-09-16 07:00:30
Posts: 6
Location: Одесса, Украина
Всем спасибо... Я уже разобрался...


Top
   
 Post subject:
PostPosted: 2007-03-13 20:27:11 
Offline

Joined: 2007-02-25 13:30:39
Posts: 10
Fire wrote:
Всем спасибо... Я уже разобрался...
скажи плз как сделал то :(


Top
   
 Post subject:
PostPosted: 2007-03-13 21:53:22 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
командой
Code:
exec('exec script')

или поставь галку у autostart
и зделай себе скрипт
Code:
sub autostart()
...
end sub

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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