Sign in to follow this  
Followers 0
James

Sloganizer.Net in AutoIt

8 posts in this topic

Hey,

I saw i542 had a link to Sloganizer.net so I thought I would AutoIt!

Thanks to Zedna for the Random Answer function (I'm a n00b and I didn't understand how it worked, YES I looked in the HelpFile!)

#include <GUIConstants.au3>

$sGui = GUICreate("Sloganizer.Net :: Secure_ICT AutoIt Version", 554, 400, -1, -1)
GUISetBkColor(0xFFFFFF)
$Pic1 = GUICtrlCreatePic("logo.jpg", 0, 16, 553, 81, BitOR($SS_NOTIFY,$WS_GROUP))
$Text = GUICtrlCreateInput("Sloganizer", 72, 112, 385, 21)
$sloganize = GUICtrlCreateButton("Sloganize!", 152, 144, 217, 25, 0)
$FinalText = GUICtrlCreateLabel("", 72, 192, 400, 200)
GUICtrlSetFont(-1, 20, 800, 0, "Arial", )
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)

Global $Answer[36]
$Answer[0] = "%1 will be for you what you want it to be."
$Answer[1] = "%1, in touch with tomorrow."
$Answer[2] = "Share moments, share %1."
$Answer[3] = "The magic of %1."
$Answer[4] = "Take what you want but leave %1 alone."
$Answer[5] = "Buy %1 now!"
$Answer[6] = "The God's made %1."
$Answer[7] = "%1 - go for the game."
$Answer[8] = "Don't play with fire, play with %1"
$Answer[9] = "%1, just the best!"
$answer[10] = "%1 - what more could you want?"
$Answer[11] = "%1, created by nature."
$Answer[12] = "%1 - what more could you want?"
$Answer[13] = "Connect with %1."
$Answer[14] = "Goto Heaven with %1"
$Answer[15] = "Nobody does it like %1"
$Answer[16] = "There's a bit of %1 in all of us."
$Answer[17] = "Make yourself at home with %1."
$Answer[18] = "The wonder has a name: %1."
$Answer[19] = "%1 brings out the best in us."
$Answer[20] = "%1. The power on your side."
$Answer[21] = "%1, forget the rest."
$Answer[22] = "%1 for me!"
$Answer[23] = "%1? Yes please!"
$Answer[24] = "You can't beat %1"
$Answer[25] = "Think. Feel. %1."
$Answer[26] = "%1 makes your day."
$Answer[27] = "%1 for your kids!"
$Answer[28] = "%1. Making people sucessful in a changing world."
$Answer[29] = "Get me my %1."
$Answer[30] = "%1 wanted."
$Answer[31] = "There's only one true %1!"
$Answer[32] = "%1, your family will love you."
$Answer[33] = "There's only one true %1."
$Answer[34] = "%1 is our middle name."
$Answer[35] = "With a name like %1 it has to be good."

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $sloganize
            SloganizeTxt()
    EndSwitch
WEnd

Func SloganizeTxt()
    $SloganizeNow = GuiCtrlRead($Text)
    $Random = Random(0,UBound($Answer)-1,1)
    $result = $Answer[$Random]
    $result = StringReplace($result,'%1', $SloganizeNow)
    GUICtrlSetData($FinalText, "<< " & $result & " >>")
EndFunc

Logo is attached!

There are more Slogans but I'm not going through and adding them, one by one!

Have fun,

Secure

Share this post


Link to post
Share on other sites



You can initialize array simpler way (look at Dim in HelpFile):

Global $Answer[3]
$Answer[0] = "%1 will be for you what you want it to be."
$Answer[1] = "%1, in touch with tomorrow."
$Answer[2] = "Share moments, share %1."
oÝ÷ Ù«­¢+Ù±½°ÀÌØí¹ÍÝÉlÍtôl|(ÅÕ½ÐìÄÝ¥±°½Èå½ÔÝ¡Ðå½ÔݹХÐѼ¸ÅÕ½Ðì°|(ÅÕ½ÐìÄ°¥¸Ñ½Õ Ý¥Ñ Ñ½µ½ÉɽܸÅÕ½Ðì°|(ÅÕ½ÐíM¡Éµ½µ¹ÑÌ°Í¡ÉĸÅÕ½Ðìt(

Share this post


Link to post
Share on other sites

There are more Slogans but I'm not going through and adding them, one by one!

So make Autoit script for it :)

Use IE UDF for collecting slogans from www.sloganizer.net and saving them to TXT file...

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

Hey,

I saw i542 had a link to Sloganizer.net so I thought I would AutoIt!

(...)

Why just don't upolad a image from sloganizer.net? :)

(I am going to change sig style very soon!)

i542

EDIT: "No need to worry with AutoIt."

Edited by i542

I can do signature me.

Share this post


Link to post
Share on other sites

Cool.. Thanks i542, the idea was so that you could run it free style. But I could make it so it will try and make it so that it will try and download the image, and if it cant download it will run the file which is included.

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

Cool.. Thanks i542, the idea was so that you could run it free style. But I could make it so it will try and make it so that it will try and download the image, and if it cant download it will run the file which is included.

Umm...ok... I guess...you welcome

i542

Edited by i542

I can do signature me.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0