Что нового

Русское сообщество AutoIt на InternetMap

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Нам нехватает несколько десятков кликов чтобы активировать наш проект на интернетовской карте, т.ч кликаем не стесняемся :whisper:


http://internetmap.info/cgi-bin/go.cgi?site_id=108164
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
Автор
CreatoR

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Kaster [?]
попадаю на главную страницу. это нормально?
Да, там перенаправление. Когда сайт будет активирован, он будет доступен на карте, правда очень далеко, чтобы он был ближе к центру карты, нужно набрать рейтинг (опять же за счёт кликов :smile: ).
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
CreatoR
Если я правильно понял (в чем сомневаюсь :smile:), то надо набрать максимальное кол-во переходов по ссылке в первом сообщении
(сюда кликать)
с нашего сайта? Наверное, переходы должны быть с разных IP.
Если это так, то напишу себе маленький кликер (у меня динамический IP), который будет это делать и запущу его на ночь. ;D

PS
Поправьте меня, если я не прав. ;)
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
я кликнул. мне не жалко. могу делать это на регулярной основе. но я все равно ни черта не понял, что там происходит :smile: какие то нелепые здания, и везде надписи naxel.ru
 

zlo-kazan

Скриптер
Сообщения
374
Репутация
100
madmasles
Если скинешь код, то и у себя запущу тоже... :smile:
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
madmasles [?]
Наверное, переходы должны быть с разных IP.
Верно.

Если это так, то напишу себе маленький кликер (у меня динамический IP), который будет это делать и запущу его на ночь.
Зачем так долго ждать!
Ссылка (Referrer) есть, осталось запастись адресами устойчивых proxy, и дело в шляпе!
Можно за минут десять накликать ;D
 
Автор
CreatoR

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
Дело в том, что клики должны исходить из этого сайта, т.е нужно указывать Referrer при переходе.

P.S
В принципе, если бы каждый участник этого форума кликнул по разу, то у нас бы неплохо поднялся рейтинг.
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
CreatoR
Около часа у меня этот скрипт работал:
Код:
#include <IE.au3>
#include <Constants.au3>
#include <Encoding.au3>

Opt('TrayMenuMode', 1)

HotKeySet('{Esc}', '_Exit')
$iPause = Random(300, 600, 1)
$iStart = TimerInit()
$iCount = 0
While 1
	If TimerDiff($iStart) > $iPause * 1000 Then
		ConsoleWrite('iPause: ' & $iPause & @CR)
		_Connect()
		If Not @error Then
			ConsoleWrite('IP: ' & @IPAddress1 & @CR)
			_Click()
			If Not @error Then
				$iCount += 1
				ToolTip('Кликов сделано: ' & $iCount, 0, 0)
			EndIf
			_Disconnect()
		Else
			ConsoleWrite('Error Connect' & @CR)
		EndIf
		$iStart = TimerInit()
		$iPause = Random(300, 600, 1)
	EndIf
	Sleep(100)
WEnd

Func _Click()
	Local $oIE, $sUrl = 'http://autoit-script.ru/index.php?topic=5083', _
			$sLinkText = 'сюда кликать', $hWin

	$oIE = _IECreate($sUrl)
	If @error Then Return SetError(1)
	_IELinkClickByText($oIE, $sLinkText)
	If @error Then
		_IEQuit($oIE)
		Return SetError(1)
	Else
		_IEQuit($oIE)
		$hWin = WinWait('[TITLE:InternetMap.Info;CLASS:IEFrame]', '', 10)
		If $hWin Then
			Sleep(5000)
			WinClose($hWin)
			Return SetError(0)
		Else
			Return SetError(1)
		EndIf
	EndIf
EndFunc   ;==>_Click

Func _Connect()
	Local $s_Read, $i_PID, $s_ConnectName = 'Avangard DSL Connection', $s_LogPass = 'ptn'

	$i_PID = Run('rasdial "' & $s_ConnectName & '" ' & $s_LogPass & ' ' & $s_LogPass, '', _
			@SW_HIDE, $STDOUT_CHILD)
	If Not $i_PID Then Return SetError(1)
	While 1
		$s_Read &= StdoutRead($i_PID)
		If @error Then ExitLoop
		Sleep(20)
	WEnd
	$s_Read = _Encoding_866To1251($s_Read)
	ConsoleWrite('_Connect: ' & $s_Read & @CR)
	If StringInStr($s_Read, 'Установлена связь') Then
		Return SetError(0)
	Else
		Return SetError(1)
	EndIf
EndFunc   ;==>_Connect

Func _Disconnect()
	Local $s_Read, $i_PID, $s_ConnectName = 'Avangard DSL Connection'

	$i_PID = Run('rasdial "' & $s_ConnectName & '" /disconnect', '', @SW_HIDE, $STDOUT_CHILD)
	If Not $i_PID Then Return SetError(1)
	While 1
		$s_Read &= StdoutRead($i_PID)
		If @error Then ExitLoop
		Sleep(20)
	WEnd
	$s_Read = _Encoding_866To1251($s_Read)
	ConsoleWrite('_Disconnect: ' & $s_Read & @CR)
	If StringInStr($s_Read, 'успешно') Then
		Return SetError(0)
	Else
		Return SetError(1)
	EndIf
EndFunc   ;==>_Disconnect

Func _Exit()
	If ProcessExists('IEXPLORE.EXE') Then
		ProcessClose('IEXPLORE.EXE')
	EndIf
	MsgBox(64, 'Info', 'Кликов сделано: ' & $iCount)
	Exit
EndFunc   ;==>_Exit

Интересно, есть какой-нибудь толк от него? :smile:
 

winstan

Эксплотатор)
Сообщения
406
Репутация
79
Пишите чтоли что скок там уже накликали и скок осталось ,а то не видя результата както немного желания.
 
Автор
CreatoR

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
madmasles [?]
есть какой-нибудь толк от него?
Вроде есть:

Рейтинг:
карта Мира: 0
карта страны: 0
Нажатий сегодня: 93
Всего нажатий: 234
Сайт не активирован
Нужно 150 кликов для активации

Почему ещё не активировался, это для меня пока загадка.

winstan [?]
не видя результата както немного желания
Результат будет как только активируется сайт, тут будет на карте.
 
Автор
CreatoR

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,671
Репутация
2,481
madmasles [?]
Значит на ночь запускаю, пусть кликает.
Неееееет, не нужно, это накрутка счётчика, каждые 60 сек. будет подозрительно. Нужно хотябы каждые 20 минут, и то в случайном (через Random) наборе (скажем от 20-ти до 30-ти минут).

И давайте до завтра подождём, посмотрим активируется ли сайт, иначе нет смысла.

P.S
И оказывается реферрер не обязательно, так что можно обойтись обычным GET-запросом.
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
CreatoR [?]
И оказывается реферрер не обязательно

Garrett [?]
Ссылка (Referrer) есть, осталось запастись адресами устойчивых proxy, и дело в шляпе!

И я о том же ;D
Ссылка, httр://internetmap.info/cgi-bin/go.cgi?site_id=108164 в ней указан ID сайта, за который идёт голосование. Посему не важно как вы перешли по ссылке, скрипт на InternetMap зачтёт. Повтор голосования может быть ограничен (скорее всего) по IP и Cookie. Так что можно просто вооружиться адресами разных proxy и меняя их переходить по ссылке. :smile:

Ну и, конечно же, random по времени как предложил ув. CreatoR тоже не помешает ;)
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Garrett
Проверил сейчас с помощью HttpAnalyzerStdV5. Cookie не передает. IP-адрес у меня динамический и при реконнекте меняется, так что можно всю ночь кликать. Запускаю и иду спать. :smile:

Нащелкал за ночь ~ 50 раз. :smile:

CreatoR,
Активировали наш сайт? Вы нас в курсе держите, пожалуйста.
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Garrett
Мы должны быстро рейтинг поднять, а если еще и ботоводы подтянутся, то вообще... ;D
 
Верх