Posted By

theescapeing on 11/23/11

Tagged

Versions (?)

Last Edited at 11/23/11 08:03pm

Statistics

Viewed 248 times

Favorited by 0 user(s)

Related snippets

Automated converticondotcom

/ Published in: AutoIt

I made a tutorial on doing a simple automation useing the Controlclick using
control click coords, for someone on a forum. and did it for fun. just want to share
i also used ifs if you want to clean it up can use select case etc

Highlighted TextExpand

#include <IE.au3>

if not WinExists("[CLASS:IEFrame]") Then
$oIE =  _IECreate("http://converticon.com/")
WinSetState("[CLASS:IEFrame]", "", @SW_MAXIMIZE)

EndIf

WinWait("[CLASS:IEFrame]")

sleep(6000)
ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 854, 310)

if WinExists("Select file to upload by converticon.com") Then
Do
	sleep(100)
until not WinExists("Select file to upload by converticon.com")
EndIf

$cards = InputBox("Change","Do you want to change your picture or icon? yes or no:")
if $cards = "yes" Then
	sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 789, 516)
ElseIf $cards = "no" Then
	sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 867, 516)
EndIf

$ca =InputBox("Diminsions"," 16 x 16, 24 x 24 ")
if $ca = "16 x 16" or "16x16" then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 481, 155)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
elseif $ca = "24 x 24" or "24x24" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 483, 186)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
ElseIf $ca = "32 x 32" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 481, 214)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
ElseIf $ca = "48 x 48" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 481, 244)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
elseif $ca = "64 x 64" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 480, 271)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
ElseIf $ca = "96 x 96" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 706, 156)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
elseif $ca = "128 x 128" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 705, 185)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
elseif $ca = "192 x 192" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 480, 185)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
elseif $ca = "256 x 256" then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 706, 242)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
ElseIf $ca = "512 x 512" Then
	Sleep(1500)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 707, 272)
	ControlClick ( "[CLASS:IEFrame]", "", "", "left", 1, 866, 516)
EndIf

Report this snippet Tweet

Comments

Subscribe to comments

Comment:

You need to login to post a comment.