Регистрация Главная Сообщество
Сообщения за день Справка Регистрация

Ответ
 
Опции темы
Старый 22.12.2010, 20:47   #1
 Сержант
Аватар для dimon04
 
dimon04 скоро будет известенdimon04 скоро будет известенdimon04 скоро будет известен
Регистрация: 18.06.2010
Сообщений: 122
Популярность: 204
Сказал(а) спасибо: 127
Поблагодарили 109 раз(а) в 61 сообщениях
 
По умолчанию udobot исходник

это исходник удобота?

Код:
MsgBox(4096,"AvToB0T","Povered by ToSTeP",2)
$war = InputBox("Колличество аккаунтов", "Введите число аккаунтов для автозапуска", "", "")
$var = 0
$x = 0
If $war = 0 Then Exit
FileChangeDir('C:\Users\Lexa\Documents\UDOBot\UDOBot\')
Run('UDOBot.exe')
WinWait("UDOBot v3.0.2","")
Sleep(1000)
WinSetState( "UDOBot v3.0.2", "", @SW_HIDE )
WinMenuSelectItem("UDOBot v3.0.2","","Файл","Старт")
WinWait("Открыть","Эл. управления дерева простран")
ControlClick("Открыть","Эл. управления дерева простран","DirectUIHWND2")
WinWait("UDOBot v3.0.2","")
Send('{TAB 8}')
Send('{END}')
Send('{ENTER}')
Sleep(1000)
Do
$x += 1
$var += 1
FileChangeDir('C:\Users\Lexa\Documents\UDOBot\UDOBot\')
Run('UDOBot.exe')
WinWait("UDOBot v3.0.2","")
Sleep(1000)
WinSetState( "UDOBot v3.0.2", "", @SW_HIDE )
WinMenuSelectItem("UDOBot v3.0.2","","Файл","Старт")
WinWait("Открыть","Эл. управления дерева простран")
ControlClick("Открыть","Эл. управления дерева простран","DirectUIHWND2")
WinWait("UDOBot v3.0.2","")
Send('{TAB 8}')
Send('{END}')
Send('{UP ' & $x & ' }')
Send('{ENTER}')
Sleep(2000)
Until $var = $war - 1

А окна настроек 
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$AvToB0T_Settings = GUICreate("AvToB0T_Settings", 270, 334, 658, 357)
GUISetIcon("C:\Users\Lexa\Documents\2222.exe")
GUISetFont(8, 800, 0, "System")
$Button1 = GUICtrlCreateButton("Сохранить", 7, 272, 89, 36, 0)
GUICtrlSetBkColor(-1, 0xF4F7FC)
GUICtrlSetCursor (-1, 2)
$Button2 = GUICtrlCreateButton("Отмена", 120, 272, 89, 36, 0)
GUICtrlSetBkColor(-1, 0xF4F7FC)
$AvToB0T_Settings = GUICtrlCreateLabel("AvToB0T Settings", 48, 0, 185, 22)
GUICtrlSetFont(-1, 12, 800, 0, "FreeSetBlackCTT")
$Input1 = GUICtrlCreateInput("", 7, 224, 201, 24)
$T = GUICtrlCreateLabel("Выводить собщения о:", 7, 48, 228, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("Введите кол-во аккаунтов", 7, 184, 192, 20)
$Checkbox1 = GUICtrlCreateCheckbox(" Количестве незапущенных аккаунтов", 7, 72, 249, 33)
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
$Checkbox2 = GUICtrlCreateCheckbox(" Количестве аккаунтов с неправильным SID", 7, 104, 265, 33)
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
$Checkbox3 = GUICtrlCreateCheckbox(" Количестве разрушенных кораблей", 7, 137, 281, 33)
GUICtrlSetFont(-1, 8, 800, 0, "Palatino Linotype")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

EndSwitch
WEnd
  Ответить с цитированием
Старый 22.12.2010, 20:54   #2
Заблокирован
 Разведчик
Аватар для муефд_фл47
 
муефд_фл47 скоро будет известенмуефд_фл47 скоро будет известенмуефд_фл47 скоро будет известенмуефд_фл47 скоро будет известен
Регистрация: 28.03.2009
Сообщений: 37
Популярность: 335
Золото Zhyk.Ru: 300
Сказал(а) спасибо: 72
Поблагодарили 194 раз(а) в 47 сообщениях
Отправить сообщение для муефд_фл47 с помощью Skype™
 
По умолчанию Re: udobot исходник

Чувак, это божественный исходник)))) Вставь его в текстовой документ, и получи сюпер-юдобот! xDDD
Не ну это смешно, "Открыть Эл. управления дерева простран"
Если ты прогнал это через переводчик, я еще понимаю х))))
По идее это тупо окно с несколькими кнопочками и строками ввода xDDD
А ну да, еще меню сохранить и загрузить х)))

И вообще это не юдобот а маленькая программка, запускающая его, и возможно, стартует аккаунты О_о И походу на уже "неработающую" версию юдика)

Последний раз редактировалось муефд_фл47; 22.12.2010 в 20:57.
  Ответить с цитированием
Старый 22.12.2010, 20:59   #3
 Сержант
Аватар для dimon04
 
dimon04 скоро будет известенdimon04 скоро будет известенdimon04 скоро будет известен
Регистрация: 18.06.2010
Сообщений: 122
Популярность: 204
Сказал(а) спасибо: 127
Поблагодарили 109 раз(а) в 61 сообщениях
 
По умолчанию Re: udobot исходник

спс, просто наткнулся в нете решил спросить у знающих.
  Ответить с цитированием
Ответ


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Программа] Исходник моего чита на С++ DED_MA3AY Баги, читы и статьи по Point Blank 5 11.05.2011 22:43
Исходник програм на C++ BlacKAndWh1te С/С++ 0 13.08.2010 13:20
Исходник для IReger ! TakeThat Garena 4 18.02.2010 18:34

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 15:51.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net