Хостинг, который использует TopHope.RU более 2-х лет

Хостинг, который использует TopHope.RU более 2-х лет

ТВТ на адрике

Тема в разделе "Архив скриптов", создана пользователем FORVARD, фев 9, 2019.

  1. FORVARD

    FORVARD Адекват

    Сообщения:
    7
    Симпатии:
    8
    Баллы:
    3
    у меня на серве вылазит окошко рега на твт
    Код:
     var p1, p2: integer;
    
       begin
    
    
    
      while delay(999) do begin
        if (Engine.Status = lsOnline) then begin
          case Engine.WaitAction([laDlg], p1, p2) of
            laDlg: if (Pos('Эвент TvT', Engine.DlgText) > 0) then // проверка на появившееся окно
            begin
            print('есть твт');// действие бота если есть такое окно (для теста делал )
         Engine.BypassToServer ('bbsevent;regFast:TvT',True);//регаемся на эвент
     end;
      end;
        end;
         end;
              end.
    мб кому надо ;)
     
    Последнее редактирование: фев 10, 2019
    AlisaCodeDragon, HellFire и Mimishka нравится это.
  2. HellFire

    HellFire Команда форума Администратор

    Сообщения:
    991
    Симпатии:
    1,662
    Баллы:
    4,118
    как красиво оформлено.
    уважаю xD
     
    FORVARD и Mimishka нравится это.
  3. FORVARD

    FORVARD Адекват

    Сообщения:
    7
    Симпатии:
    8
    Баллы:
    3
    спасибо ,сорри сложно быть про в таких делах в 16 лет ;)
    еще можно сделать через условие в чате
    if (Pos 'Эвент TvT' , Engine.DlgText) > 0 ) then
    ...
    и делей , а то он у меня постоянно делает рег пока окно активно (пока идет период на рег)
     
    HellFire нравится это.
  1. На этом сайте используются файлы cookie, чтобы персонализировать содержимое, хранить Ваши предпочтения и держать Вас авторизованным в системе, если Вы зарегистрировались.
    Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление