CodyBarrett Posted April 12, 2009 Share Posted April 12, 2009 its not very impressive because i wrote it in 5 mins... about 3 months ago and havent looked at it since.. my link in my sig to it seems to have not worked anymore.. so i started this topic REASON for creation: had some troubles deciding on names.. so i got it down to two, and wrote this.. expandcollapse popup#include <GUIConstantsEx.au3> #include <EditConstants.au3> #include <StaticConstants.au3> #Include <Timers.au3> #include <WindowsConstants.au3> $GUI = GUICreate ('Decisions...',100,100,-1,-1,-1,BitOR(128,$WS_EX_TOPMOST )) $B = GUICtrlCreateButton('Go',5,5,90,80) $lable = GUICtrlCreateLabel('Maybe',25,85,50,20,$SS_CENTER) $Choice = 1 $Ran = 0 GUISetState() While 1 $M = GUIGetMsg() If $M = $B Then $T = _Timer_Init() GUICtrlSetData($B,0) Do GUICtrlSetState($B, $GUI_DISABLE ) $Ran = Random(0,19000,1) GUICtrlSetData($B,$Ran) sleep(100) GUICtrlSetState($B,$GUI_ENABLE) Until _Timer_Diff($T) >= 19000 If GUICtrlRead($B) >= 9500 Then GUICtrlSetData($Lable,'Yes') GUICtrlSetBkColor($B,0xffff00) GUISetBkColor(0x0000ff,$GUI) Else GUICtrlSetData($Lable,'No') GUICtrlSetBkColor($B,0xff0000) GUISetBkColor(0x000000,$GUI) EndIf EndIf if $M = $GUI_EVENT_CLOSE Then Exit endif WEnd it runs for 19 seconds.. and if the number is less than 9500 then it says NO... OVER and it says YES.. haha [size="1"][font="Tahoma"][COMPLETED]-----[FAILED]-----[ONGOING]VolumeControl|Binary Converter|CPU Usage| Mouse Wrap |WinHide|Word Scrammbler|LOCKER|SCREEN FREEZE|Decisions Decisions|Version UDF|Recast Desktop Mask|TCP Multiclient EXAMPLE|BTCP|LANCR|UDP serverless|AIOCR|OECR|Recast Messenger|AU3C|Tik-Tak-Toe|Snakes & Ladders|BattleShips|TRON|SNAKE_____________________[u]I love the Helpfile it is my best friend.[/u][/font][/size] Link to comment Share on other sites More sharing options...
6105 Posted February 7, 2010 Share Posted February 7, 2010 33 If GUICtrlRead($B) >= 9500 Then 45 if $M = $GUI Then Thank you.. verry cool prog [center][font=courier new,courier,monospace]Die die die my darling[/font][/center][center][font=courier new,courier,monospace]Don't utter a single word[/font][/center][center][font=courier new,courier,monospace]Die die die my darling[/font][/center][center][font=courier new,courier,monospace]Just shut your pretty mouth[/font][/center][center][font=courier new,courier,monospace]I'll be seeing you again[/font][/center][center][font=courier new,courier,monospace]I'll be seeing you[/font][/center][center][font=courier new,courier,monospace]In hell[/font][/center] Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now