Jump to content

Stupid funny game

stormbreaker

By stormbreaker
in AutoIt Example Scripts

 Share

Recommended Posts

stormbreaker Universalist

stormbreaker

Posted
Posted (edited)

:idiot: Hello everyone!! While solving some maths problems I thought of something and came up with this so-called 'tricky' game. Read instructions and Enjoy playing!!!

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>$Form1 = GUICreate("MKISH's Magic Window", 564, 668, 393, 83)
GuiSetBkColor(0xffffff)
Global $Button[104]
Global Const $ANS = Chr(Random(1,100,1))
$Label3 = GUICtrlCreateLabel("     1-20           21-40          41-60          61-80        81-100", 24, 16, 515, 25)
GUICtrlSetFont(-1, 11, 800, 0, "Comic Sans MS")
$Button[1] = GUICtrlCreateButton("", 24, 48, 51, 49, $WS_GROUP)
$Button[2] = GUICtrlCreateButton("", 74, 48, 51, 49, $WS_GROUP)
$Button[3] = GUICtrlCreateButton("", 24, 96, 51, 49, $WS_GROUP)
$Button[4] = GUICtrlCreateButton("", 74, 96, 51, 49, $WS_GROUP)
$Button[5] = GUICtrlCreateButton("", 24, 144, 51, 49, $WS_GROUP)
$Button[6] = GUICtrlCreateButton("", 74, 144, 51, 49, $WS_GROUP)
$Button[7] = GUICtrlCreateButton("", 24, 192, 51, 49, $WS_GROUP)
$Button[8] = GUICtrlCreateButton("", 74, 192, 51, 49, $WS_GROUP)
$Button[9] = GUICtrlCreateButton("", 24, 240, 51, 49, $WS_GROUP)
$Button[10] = GUICtrlCreateButton("", 74, 240, 51, 49, $WS_GROUP)
$Button[11] = GUICtrlCreateButton("", 24, 288, 51, 49, $WS_GROUP)
$Button[12] = GUICtrlCreateButton("", 74, 288, 51, 49, $WS_GROUP)
$Button[13] = GUICtrlCreateButton("", 24, 336, 51, 49, $WS_GROUP)
$Button[14] = GUICtrlCreateButton("", 74, 336, 51, 49, $WS_GROUP)
$Button[15] = GUICtrlCreateButton("", 24, 384, 51, 49, $WS_GROUP)
$Button[16] = GUICtrlCreateButton("", 74, 384, 51, 49, $WS_GROUP)
$Button[17] = GUICtrlCreateButton("", 24, 432, 51, 49, $WS_GROUP)
$Button[18] = GUICtrlCreateButton("", 74, 432, 51, 49, $WS_GROUP)
$Button[19] = GUICtrlCreateButton("", 24, 480, 51, 49, $WS_GROUP)
$Button[20] = GUICtrlCreateButton("", 74, 480, 51, 49, $WS_GROUP)
$Button[21] = GUICtrlCreateButton("", 128, 48, 51, 49, $WS_GROUP)
$Button[22] = GUICtrlCreateButton("", 178, 48, 51, 49, $WS_GROUP)
$Button[23] = GUICtrlCreateButton("", 128, 96, 51, 49, $WS_GROUP)
$Button[24] = GUICtrlCreateButton("", 178, 96, 51, 49, $WS_GROUP)
$Button[25] = GUICtrlCreateButton("", 128, 144, 51, 49, $WS_GROUP)
$Button[26] = GUICtrlCreateButton("", 178, 144, 51, 49, $WS_GROUP)
$Button[27] = GUICtrlCreateButton("", 128, 192, 51, 49, $WS_GROUP)
$Button[28] = GUICtrlCreateButton("", 178, 192, 51, 49, $WS_GROUP)
$Button[29] = GUICtrlCreateButton("", 128, 240, 51, 49, $WS_GROUP)
$Button[30] = GUICtrlCreateButton("", 178, 240, 51, 49, $WS_GROUP)
$Button[31] = GUICtrlCreateButton("", 128, 288, 51, 49, $WS_GROUP)
$Button[32] = GUICtrlCreateButton("", 178, 288, 51, 49, $WS_GROUP)
$Button[33] = GUICtrlCreateButton("", 128, 336, 51, 49, $WS_GROUP)
$Button[34] = GUICtrlCreateButton("", 178, 336, 51, 49, $WS_GROUP)
$Button[35] = GUICtrlCreateButton("", 128, 384, 51, 49, $WS_GROUP)
$Button[36] = GUICtrlCreateButton("", 178, 384, 51, 49, $WS_GROUP)
$Button[37] = GUICtrlCreateButton("", 128, 432, 51, 49, $WS_GROUP)
$Button[38] = GUICtrlCreateButton("", 178, 432, 51, 49, $WS_GROUP)
$Button[39] = GUICtrlCreateButton("", 128, 480, 51, 49, $WS_GROUP)
$Button[40] = GUICtrlCreateButton("", 178, 480, 51, 49, $WS_GROUP)
$Button[41] = GUICtrlCreateButton("", 232, 48, 51, 49, $WS_GROUP)
$Button[42] = GUICtrlCreateButton("", 282, 48, 51, 49, $WS_GROUP)
$Button[43] = GUICtrlCreateButton("", 232, 96, 51, 49, $WS_GROUP)
$Button[44] = GUICtrlCreateButton("", 282, 96, 51, 49, $WS_GROUP)
$Button[45] = GUICtrlCreateButton("", 232, 144, 51, 49, $WS_GROUP)
$Button[46] = GUICtrlCreateButton("", 282, 144, 51, 49, $WS_GROUP)
$Button[47] = GUICtrlCreateButton("", 232, 192, 51, 49, $WS_GROUP)
$Button[48] = GUICtrlCreateButton("", 282, 192, 51, 49, $WS_GROUP)
$Button[49] = GUICtrlCreateButton("", 232, 240, 51, 49, $WS_GROUP)
$Button[50] = GUICtrlCreateButton("", 282, 240, 51, 49, $WS_GROUP)
$Button[51] = GUICtrlCreateButton("", 232, 288, 51, 49, $WS_GROUP)
$Button[52] = GUICtrlCreateButton("", 282, 288, 51, 49, $WS_GROUP)
$Button[53] = GUICtrlCreateButton("", 232, 336, 51, 49, $WS_GROUP)
$Button[54] = GUICtrlCreateButton("", 282, 336, 51, 49, $WS_GROUP)
$Button[55] = GUICtrlCreateButton("", 232, 384, 51, 49, $WS_GROUP)
$Button[56] = GUICtrlCreateButton("", 282, 384, 51, 49, $WS_GROUP)
$Button[57] = GUICtrlCreateButton("", 232, 432, 51, 49, $WS_GROUP)
$Button[58] = GUICtrlCreateButton("", 282, 432, 51, 49, $WS_GROUP)
$Button[59] = GUICtrlCreateButton("", 232, 480, 51, 49, $WS_GROUP)
$Button[60] = GUICtrlCreateButton("", 282, 480, 51, 49, $WS_GROUP)
$Button[61] = GUICtrlCreateButton("", 336, 48, 51, 49, $WS_GROUP)
$Button[62] = GUICtrlCreateButton("", 386, 48, 51, 49, $WS_GROUP)
$Button[63] = GUICtrlCreateButton("", 336, 96, 51, 49, $WS_GROUP)
$Button[64] = GUICtrlCreateButton("", 386, 96, 51, 49, $WS_GROUP)
$Button[65] = GUICtrlCreateButton("", 336, 144, 51, 49, $WS_GROUP)
$Button[66] = GUICtrlCreateButton("", 386, 144, 51, 49, $WS_GROUP)
$Button[67] = GUICtrlCreateButton("", 336, 192, 51, 49, $WS_GROUP)
$Button[68] = GUICtrlCreateButton("", 386, 192, 51, 49, $WS_GROUP)
$Button[69] = GUICtrlCreateButton("", 336, 240, 51, 49, $WS_GROUP)
$Button[70] = GUICtrlCreateButton("", 386, 240, 51, 49, $WS_GROUP)
$Button[71] = GUICtrlCreateButton("", 336, 288, 51, 49, $WS_GROUP)
$Button[72] = GUICtrlCreateButton("", 386, 288, 51, 49, $WS_GROUP)
$Button[73] = GUICtrlCreateButton("", 336, 336, 51, 49, $WS_GROUP)
$Button[74] = GUICtrlCreateButton("", 386, 336, 51, 49, $WS_GROUP)
$Button[75] = GUICtrlCreateButton("", 336, 384, 51, 49, $WS_GROUP)
$Button[76] = GUICtrlCreateButton("", 386, 384, 51, 49, $WS_GROUP)
$Button[77] = GUICtrlCreateButton("", 336, 432, 51, 49, $WS_GROUP)
$Button[78] = GUICtrlCreateButton("", 386, 432, 51, 49, $WS_GROUP)
$Button[79] = GUICtrlCreateButton("", 336, 480, 51, 49, $WS_GROUP)
$Button[80] = GUICtrlCreateButton("", 386, 480, 51, 49, $WS_GROUP)
$Button[81] = GUICtrlCreateButton("", 440, 48, 51, 49, $WS_GROUP)
$Button[82] = GUICtrlCreateButton("", 490, 48, 51, 49, $WS_GROUP)
$Button[83] = GUICtrlCreateButton("", 440, 96, 51, 49, $WS_GROUP)
$Button[84] = GUICtrlCreateButton("", 490, 96, 51, 49, $WS_GROUP)
$Button[85] = GUICtrlCreateButton("", 440, 144, 51, 49, $WS_GROUP)
$Button[86] = GUICtrlCreateButton("", 490, 144, 51, 49, $WS_GROUP)
$Button[87] = GUICtrlCreateButton("", 440, 192, 51, 49, $WS_GROUP)
$Button[88] = GUICtrlCreateButton("", 490, 192, 51, 49, $WS_GROUP)
$Button[89] = GUICtrlCreateButton("", 440, 240, 51, 49, $WS_GROUP)
$Button[90] = GUICtrlCreateButton("", 490, 240, 51, 49, $WS_GROUP)
$Button[91] = GUICtrlCreateButton("", 440, 288, 51, 49, $WS_GROUP)
$Button[92] = GUICtrlCreateButton("", 490, 288, 51, 49, $WS_GROUP)
$Button[93] = GUICtrlCreateButton("", 440, 336, 51, 49, $WS_GROUP)
$Button[94] = GUICtrlCreateButton("", 490, 336, 51, 49, $WS_GROUP)
$Button[95] = GUICtrlCreateButton("", 440, 384, 51, 49, $WS_GROUP)
$Button[96] = GUICtrlCreateButton("", 490, 384, 51, 49, $WS_GROUP)
$Button[97] = GUICtrlCreateButton("", 440, 432, 51, 49, $WS_GROUP)
$Button[98] = GUICtrlCreateButton("", 490, 432, 51, 49, $WS_GROUP)
$Button[99] = GUICtrlCreateButton("", 440, 480, 51, 49, $WS_GROUP)
$Button[100] = GUICtrlCreateButton("", 490, 480, 51, 49, $WS_GROUP)
$Button[101] = GUICtrlCreateButton("I am Done !!", 80, 576, 123, 57, $WS_GROUP)
$Button[102] = GUICtrlCreateButton("Instructions", 208, 576, 123, 57, $WS_GROUP)
$Button[103] = GUICtrlCreateButton("Go Home!!", 336, 576, 123, 57, $WS_GROUP)

For $i = 1 to 100
GUICtrlSetFont($Button[$i], 16, 400, 4, "Wingdings")
GuiCtrlSetData($Button[$i], Chr(Random(101, $i+150, 1)))
GUICtrlSetTip($Button[$i], "" & $i)
Next
For $i = 0 to 100 step 9
GuiCtrlSetData($Button[$i], $ANS)
Next

$Label1 = GUICtrlCreateLabel("", 8, 544, 548, 4, $SS_SUNKEN)

GUISetState(@SW_SHOW)

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE, $Button[103]
Exit
Case $Button[101]
GuiSetstate(@SW_DISABLE, $Form1)
$Form2 = GUICreate("Answer", 316, 184, -1, -1, BitOR($WS_SYSMENU,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS))
GuiSetBkColor(0xffffff)
$GroupBox1 = GUICtrlCreateGroup("", 8, 1, 297, 129)
$Labelx1 = GUICtrlCreateLabel("The symbol is:", 80, 24, 153, 34)
GUICtrlSetFont(-1, 16, 800, 0, "Comic Sans MS")
$Labelx22 = GUICtrlCreateLabel("", 96, 90, 139, 30)
GUICtrlSetFont(-1, 18, 800, 0, "Wingdings")
GuiCtrlSetData(-1, $ANS)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

Case $Button[102]
msgbox(64, "Instructions", "> Think of a number b/w 10 and 100" & @crlf & "> Subtract from it the sum of its digits" & @crlf & "> Look for the symbol corresponding to answer on the list" & @CRLF & "> Click 'I am Done !!' button and Bingo", Default, $Form1)
EndSwitch
WEnd

muttley Easy, isn't it?

EDIT: Now looks fine..

Edited by MKISH

----------------------------------------

:bye: Hey there, was I helpful?

----------------------------------------

My Current OS: Win8 PRO (64-bit); Current AutoIt Version: v3.3.8.1

BrewManNH Universalist

BrewManNH

Posted
Posted

Nice script, it's not rocket science, but it's fun if you don't know what it's doing. :)

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

stormbreaker Universalist

stormbreaker

Posted
  • Author
Posted (edited)

Well yes, i saw a similar app called 'magic paper' that does the same thing as my script, on nokia ovi store.

Edited by MKISH

----------------------------------------

:bye: Hey there, was I helpful?

----------------------------------------

My Current OS: Win8 PRO (64-bit); Current AutoIt Version: v3.3.8.1

stormbreaker Universalist

stormbreaker

Posted
  • Author
Posted

:lmao: Thnx for the appreciation logmein.

@James, feel free to modify this example as you wish. (I am currently working on a chess game, I'll definitely follow your advice)

----------------------------------------

:bye: Hey there, was I helpful?

----------------------------------------

My Current OS: Win8 PRO (64-bit); Current AutoIt Version: v3.3.8.1

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
 Share
Go to topic listing
×
×
  • Create New...