Sign in to follow this  
Followers 0
Kiti

While loop and OnEvent interference

6 posts in this topic

This is my new script. I've taken out the tray loop.

What I want is to make all the buttons work, even if the cronometer works. Is this possible? The buttons are set to OnEvent, so they should work while a while loop is executed... Another way of doing this was to take the relative coordinates of all buttons, and if the mouse is on a delimited area of a button, and clicks, the ButtonXClick function is executed. But to do this the sleep has to be like 0.1 ms, and still the user has to double click for the prgram to receive the comand... Do you know a better way to solve this problem?

[autoit]#include <GUIConstants.au3>

#include <Date.au3>

#include <Math.au3>

#include <Misc.au3>

Global $bBreak

Opt("GUIOnEventMode", 1)

$Form1 = GUICreate("Form1", 609, 614)

GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")

$Group1 = GUICtrlCreateGroup("Afla cat timp mai este pana cand ai anumite resurse", 15, 15, 286, 250)

$Input1 = GUICtrlCreateInput("", 144, 48, 121, 21)

$Input2 = GUICtrlCreateInput("", 144, 88, 121, 21)

$Input3 = GUICtrlCreateInput("", 144, 128, 121, 21)

$Label1 = GUICtrlCreateLabel("Resurse Necesare:", 32, 56, 95, 17)

$Label2 = GUICtrlCreateLabel("Resurse Curente", 32, 88, 83, 17)

$Label3 = GUICtrlCreateLabel("Productia minei/ora", 32, 128, 96, 17)

$Label4 = GUICtrlCreateLabel("Pana cand aceste resurse vor fi gata mai sunt:", 24, 168, 223, 17)

$Label5 = GUICtrlCreateLabel("-", 32, 192, 16, 17);ORE-----------------------------

GUICtrlSetFont($Label5, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label5, 0x0000FF)

$Label6 = GUICtrlCreateLabel("Ore,", 48, 192, 24, 17)

$Label7 = GUICtrlCreateLabel("-", 80, 192, 16, 17);MINUTE--------------------------

GUICtrlSetFont($Label7, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label7, 0x0000FF)

$Label8 = GUICtrlCreateLabel("Minute si", 96, 192, 46, 17)

$Label9 = GUICtrlCreateLabel("-", 152, 192, 16, 17);SECUNDE------------------------

GUICtrlSetFont($Label9, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label9, 0x0000FF)

$Label10 = GUICtrlCreateLabel("secunde.", 168, 192, 48, 17)

$Button1 = GUICtrlCreateButton("Afla timpul !", 104, 224, 75, 25, 0)

GUICtrlSetOnEvent($Button1, "Button1Click") ;---------------------------BUTTON1CLICK------------

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group2 = GUICtrlCreateGroup("Cronometru", 310, 15, 286, 186)

$Input4 = GUICtrlCreateInput("", 336, 64, 49, 21);ORE

$Input5 = GUICtrlCreateInput("", 336, 96, 49, 21);MINUTE

$Input6 = GUICtrlCreateInput("", 336, 128, 49, 21);SECUNDE

$Label11 = GUICtrlCreateLabel("Avertizeaza-ma peste:", 320, 40, 108, 17)

$Label12 = GUICtrlCreateLabel("Ore", 392, 64, 21, 17)

$Label13 = GUICtrlCreateLabel("Minute", 392, 96, 36, 17)

$Label14 = GUICtrlCreateLabel("Secunde", 392, 128, 47, 17)

$Button2 = GUICtrlCreateButton("Start cronometru !", 328, 160, 107, 25, 0)

Guictrlsetonevent($button2, "Button2Click")

$Group6 = GUICtrlCreateGroup("Statistici", 458, 40, 129, 137)

$Label49 = GUICtrlCreateLabel("Timp ramas:", 465, 59, 61, 17)

$Label51 = GUICtrlCreateLabel("Timp trecut:", 465, 83, 60, 17)

$Label53 = GUICtrlCreateLabel("Ora incepere:", 465, 107, 68, 17)

$Label54 = GUICtrlCreateLabel("Ora terminare:", 465, 131, 70, 17)

$Label55 = GUICtrlCreateLabel("Durata totala:", 465, 155, 68, 17)

$Label56 = GUICtrlCreateLabel("-", 532, 59, 52, 17)

GUICtrlSetFont($Label56, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label56, 0x0000FF)

$Label57 = GUICtrlCreateLabel("-", 532, 83, 52, 17)

GUICtrlSetFont($Label57, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label57, 0x0000FF)

$Label58 = GUICtrlCreateLabel("-", 532, 107, 52, 17)

GUICtrlSetFont($Label58, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label58, 0x0000FF)

$Label59 = GUICtrlCreateLabel("-", 532, 131, 52, 17)

GUICtrlSetFont($Label59, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label59, 0x0000FF)

$Label60 = GUICtrlCreateLabel("-", 532, 155, 52, 17)

GUICtrlSetFont($Label60, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label60, 0x0000FF)

GUICtrlCreateGroup("", -99, -99, 1, 1)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group3 = GUICtrlCreateGroup("Afla rata intre resurse", 311, 216, 286, 146)

$Input7 = GUICtrlCreateInput("", 384, 264, 41, 21);METAL---------------------------------------

$Input8 = GUICtrlCreateInput("", 456, 264, 41, 21);CRISTAL-------------------------------------

$Input9 = GUICtrlCreateInput("", 528, 264, 41, 21);DEUTERIU------------------------------------

$Label15 = GUICtrlCreateLabel("Metal", 392, 240, 30, 17)

$Label16 = GUICtrlCreateLabel("Cristal", 460, 240, 32, 17)

$Label17 = GUICtrlCreateLabel("Deuteriu", 528, 240, 44, 17)

$Label18 = GUICtrlCreateLabel("Rata este de:", 320, 296, 68, 17)

$Label19 = GUICtrlCreateLabel("-", 402, 296, 25, 17);RATA METAL------------------------------

GUICtrlSetFont($Label19, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label19, 0x0000FF)

$Label20 = GUICtrlCreateLabel(":", 439, 296, 7, 17)

$Label21 = GUICtrlCreateLabel("-", 473, 296, 25, 17);RATA CRISTAL----------------------------

GUICtrlSetFont($Label21, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label21, 0x0000FF)

$Label22 = GUICtrlCreateLabel(":", 512, 296, 7, 17)

$Label23 = GUICtrlCreateLabel("-", 544, 296, 25, 17);RATA DEUTERIU---------------------------

GUICtrlSetFont($Label23, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label23, 0x0000FF)

$Button3 = GUICtrlCreateButton("Afla rata!", 424, 320, 75, 25, 0)

GUICtrlSetOnEvent($Button3, "Button3Click") ;---------------------------BUTTON3CLICK------------

$Button6 = GUICtrlCreateButton("Reset", 560, 344, 35, 17, 0);RESET----------------------------

GUICtrlSetOnEvent($Button6, "Button6Click") ;---------------------------BUTTON6CLICK------------

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group4 = GUICtrlCreateGroup("Converteste o resursa in celelalte doua", 310, 376, 286, 154)

$Label43 = GUICtrlCreateLabel("Metal", 394, 396, 30, 17)

$Label44 = GUICtrlCreateLabel("Cristal", 466, 396, 32, 17)

$Label45 = GUICtrlCreateLabel("Deuteriu", 536, 396, 44, 17)

$Label46 = GUICtrlCreateLabel("Conform ratei de:", 314, 452, 84, 17)

$Label48 = GUICtrlCreateLabel(":", 445, 452, 7, 17)

$Label50 = GUICtrlCreateLabel(":", 517, 452, 7, 17)

$Button5 = GUICtrlCreateButton("Converteste !", 418, 484, 75, 25, 0)

GUICtrlSetOnEvent(-1, "Button5Click")

$Input11 = GUICtrlCreateInput("", 392, 416, 41, 21);METAL---------------------------------------

$Input12 = GUICtrlCreateInput("", 464, 416, 41, 21);CRISTAL-------------------------------------

$Input13 = GUICtrlCreateInput("", 536, 416, 41, 21);DEUTERIU------------------------------------

$Label52 = GUICtrlCreateLabel("Converteste:", 320, 416, 64, 17)

$Input14 = GUICtrlCreateInput("", 405, 448, 17, 21);RATA METAL------------------------------

$Input15 = GUICtrlCreateInput("", 476, 448, 17, 21);RATA CRISTAL----------------------------

$Input16 = GUICtrlCreateInput("", 546, 448, 17, 21);RATA DEUTERIU---------------------------

$Button7 = GUICtrlCreateButton("Reset", 560, 512, 35, 17, 0);RESET--------------------------

GUICtrlSetOnEvent($Button7, "Button7Click")

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group5 = GUICtrlCreateGroup("Afla nivel mine dupa resurse", 16, 280, 286, 321)

$Edit1 = GUICtrlCreateEdit("", 24, 312, 233, 41)

GUICtrlSetData($Edit1, "")

$Edit2 = GUICtrlCreateEdit("", 24, 376, 233, 41)

GUICtrlSetData($Edit2, "")

$Label24 = GUICtrlCreateLabel("Copiaza aici primul raport de spioanj:", 24, 296, 175, 16)

$Label25 = GUICtrlCreateLabel("Copiaza aici al doilea raport de spionaj:", 24, 360, 187, 16)

$Label26 = GUICtrlCreateLabel("Mina de metal produce", 24, 424, 112, 17)

$Label27 = GUICtrlCreateLabel("resurse pe ora.", 170, 424, 74, 17)

$Label28 = GUICtrlCreateLabel("Mina de metal este de nivelul", 24, 496, 144, 17)

$Label29 = GUICtrlCreateLabel(" -", 137, 425, 30, 17)

GUICtrlSetFont($Label29, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label29, 0x0000FF)

$Label30 = GUICtrlCreateLabel(" -", 168, 496, 20, 17)

GUICtrlSetFont($Label30, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label30, 0x0000FF)

$Label31 = GUICtrlCreateLabel("Mina de cristal produce", 24, 448, 114, 17)

$Label32 = GUICtrlCreateLabel(" -", 137, 448, 32, 17)

GUICtrlSetFont($Label32, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label32, 0x0000FF)

$Label33 = GUICtrlCreateLabel("resurse pe ora.", 171, 448, 71, 17)

$Label34 = GUICtrlCreateLabel("Mina de cristal este de nivelul", 24, 520, 143, 17)

$Label35 = GUICtrlCreateLabel("-", 176, 520, 16, 17)

GUICtrlSetFont($Label35, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label35, 0x0000FF)

$Label36 = GUICtrlCreateLabel("Sintetizatorul produce", 24, 472, 106, 17)

$Label37 = GUICtrlCreateLabel(" -", 129, 473, 31, 17)

GUICtrlSetFont($Label37, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label37, 0x0000FF)

$Label38 = GUICtrlCreateLabel("resurse pe ora.", 162, 472, 74, 17)

$Label39 = GUICtrlCreateLabel("Sintetizatorul este de nivelul", 24, 544, 135, 17)

$Label40 = GUICtrlCreateLabel("la temp. min. de", 176, 544, 78, 17)

$Input10 = GUICtrlCreateInput("10", 254, 541, 20, 21)

$Label41 = GUICtrlCreateLabel(" -", 158, 544, 16, 17)

GUICtrlSetFont($Label41, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label41, 0x0000FF)

$Button4 = GUICtrlCreateButton("Calculeaza !", 120, 568, 75, 25)

GuiCtrlSetOnEvent($Button4, "Button4Click")

$Button8 = GUICtrlCreateButton("Reset", 266, 583, 35, 17, 0)

GuiCtrlSetOnEvent($Button8, "Button8Click")

$Label42 = GUICtrlCreateLabel("

Share this post


Link to post
Share on other sites



Hi!

Script that is in a loop that has been triggered by an event is trapped there until it returns by itself, another event cannot be executed.

To solve this problem you have to do something like this:

Global $flag=False
Opt("GUIOnEventMode",1)
GUICreate("Sample")
GUICtrlCreateButton("Click me",10,10)
GUICtrlSetOnEvent(-1,"_Buttonclicked")
GUISetOnEvent(-3,"close")
GUISetSTate()

Do
    Sleep(25)
    While $flag
        ToolTip("Help I'm trapped!")
        sleep(25)
    WEnd
    
    
Until False

Func close()
    Exit
EndFunc

Func _Buttonclicked()
    $flag=Not $flag
    ToolTip("")
EndFunc

Hope you got the point muttley


Broken link? PM me and I'll send you the file!

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

Hi,

Sorry if I've misunderstood what you want, but it sounds like you want to have a loop in the gui to handle some sort of timer, AND then to have other buttons to be functional whilst that 'timer loop' is also functional.

If that is correct then I'm afraid it's not possible in AutoIT (as far as I'm aware). AutoIT is linear and event driven, meaning it can only do ONE thing at a time.

There are work-arounds though. Try making two separate programs: one to deal with the buttons etc, and another to deal with the timer only. Perhaps you can pass timer details back to the main program as well, so that the main program updates a label with current details or whatever.

Sorry, I can't be more helpful with this.....try searching the forum for ways to pass data between two scripts.

It might also be possible to use an 'adlib' to update a timer in a single script, by setting the iteration to a few ms? How this would affect the rest of the script I don't know.

[edit - monoceres replied at the same time as me !!! - and understood you better!! heh]

Edited by andybiochem

- Table UDF - create simple data tables - Line Graph UDF GDI+ - quickly create simple line graphs with x and y axes (uses GDI+ with double buffer) - Line Graph UDF - quickly create simple line graphs with x and y axes (uses AI native graphic control) - Barcode Generator Code 128 B C - Create the 1/0 code for barcodes. - WebCam as BarCode Reader - use your webcam to read barcodes - Stereograms!!! - make your own stereograms in AutoIT - Ziggurat Gaussian Distribution RNG - generate random numbers based on normal/gaussian distribution - Box-Muller Gaussian Distribution RNG - generate random numbers based on normal/gaussian distribution - Elastic Radio Buttons - faux-gravity effects in AutoIT (from javascript)- Morse Code Generator - Generate morse code by tapping your spacebar!

Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

That's tremendous, briliant, flawlessly, great and marvelous!! It works better than great! All the buttons are working while the timer counts (although I still don't understand why) Thank you a lot! :huggles: Now I can finally post my program without any bugs. Here it is:

[autoit]#include <GUIConstants.au3>

#include <Date.au3>

#include <Math.au3>

#include <Misc.au3>

Global $bBreak

Global $flag = False

Opt("GUIOnEventMode", 1)

$Form1 = GUICreate("Form1", 609, 614)

GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")

$Group1 = GUICtrlCreateGroup("Afla cat timp mai este pana cand ai anumite resurse", 15, 15, 286, 250)

$Input1 = GUICtrlCreateInput("", 144, 48, 121, 21)

$Input2 = GUICtrlCreateInput("", 144, 88, 121, 21)

$Input3 = GUICtrlCreateInput("", 144, 128, 121, 21)

$Label1 = GUICtrlCreateLabel("Resurse Necesare:", 32, 56, 95, 17)

$Label2 = GUICtrlCreateLabel("Resurse Curente", 32, 88, 83, 17)

$Label3 = GUICtrlCreateLabel("Productia minei/ora", 32, 128, 96, 17)

$Label4 = GUICtrlCreateLabel("Pana cand aceste resurse vor fi gata mai sunt:", 24, 168, 223, 17)

$Label5 = GUICtrlCreateLabel("-", 32, 192, 16, 17);ORE-----------------------------

GUICtrlSetFont($Label5, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label5, 0x0000FF)

$Label6 = GUICtrlCreateLabel("Ore,", 48, 192, 24, 17)

$Label7 = GUICtrlCreateLabel("-", 80, 192, 16, 17);MINUTE--------------------------

GUICtrlSetFont($Label7, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label7, 0x0000FF)

$Label8 = GUICtrlCreateLabel("Minute si", 96, 192, 46, 17)

$Label9 = GUICtrlCreateLabel("-", 152, 192, 16, 17);SECUNDE------------------------

GUICtrlSetFont($Label9, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label9, 0x0000FF)

$Label10 = GUICtrlCreateLabel("secunde.", 168, 192, 48, 17)

$Button1 = GUICtrlCreateButton("Afla timpul !", 104, 224, 75, 25, 0)

GUICtrlSetOnEvent($Button1, "Button1Click") ;---------------------------BUTTON1CLICK------------

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group2 = GUICtrlCreateGroup("Cronometru", 310, 15, 286, 186)

$Input4 = GUICtrlCreateInput("", 336, 64, 49, 21);ORE

$Input5 = GUICtrlCreateInput("", 336, 96, 49, 21);MINUTE

$Input6 = GUICtrlCreateInput("", 336, 128, 49, 21);SECUNDE

$Label11 = GUICtrlCreateLabel("Avertizeaza-ma peste:", 320, 40, 108, 17)

$Label12 = GUICtrlCreateLabel("Ore", 392, 64, 21, 17)

$Label13 = GUICtrlCreateLabel("Minute", 392, 96, 36, 17)

$Label14 = GUICtrlCreateLabel("Secunde", 392, 128, 47, 17)

$Button2 = GUICtrlCreateButton("Start cronometru !", 328, 160, 107, 25, 0)

GUICtrlSetOnEvent($Button2, "Button2Click")

$Group6 = GUICtrlCreateGroup("Statistici", 458, 40, 129, 137)

$Label49 = GUICtrlCreateLabel("Timp ramas:", 465, 59, 61, 17)

$Label51 = GUICtrlCreateLabel("Timp trecut:", 465, 83, 60, 17)

$Label53 = GUICtrlCreateLabel("Ora incepere:", 465, 107, 68, 17)

$Label54 = GUICtrlCreateLabel("Ora terminare:", 465, 131, 70, 17)

$Label55 = GUICtrlCreateLabel("Durata totala:", 465, 155, 68, 17)

$Label56 = GUICtrlCreateLabel("-", 532, 59, 52, 17)

GUICtrlSetFont($Label56, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label56, 0x0000FF)

$Label57 = GUICtrlCreateLabel("-", 532, 83, 52, 17)

GUICtrlSetFont($Label57, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label57, 0x0000FF)

$Label58 = GUICtrlCreateLabel("-", 532, 107, 52, 17)

GUICtrlSetFont($Label58, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label58, 0x0000FF)

$Label59 = GUICtrlCreateLabel("-", 532, 131, 52, 17)

GUICtrlSetFont($Label59, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label59, 0x0000FF)

$Label60 = GUICtrlCreateLabel("-", 532, 155, 52, 17)

GUICtrlSetFont($Label60, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label60, 0x0000FF)

GUICtrlCreateGroup("", -99, -99, 1, 1)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group3 = GUICtrlCreateGroup("Afla rata intre resurse", 311, 216, 286, 146)

$Input7 = GUICtrlCreateInput("", 384, 264, 41, 21);METAL---------------------------------------

$Input8 = GUICtrlCreateInput("", 456, 264, 41, 21);CRISTAL-------------------------------------

$Input9 = GUICtrlCreateInput("", 528, 264, 41, 21);DEUTERIU------------------------------------

$Label15 = GUICtrlCreateLabel("Metal", 392, 240, 30, 17)

$Label16 = GUICtrlCreateLabel("Cristal", 460, 240, 32, 17)

$Label17 = GUICtrlCreateLabel("Deuteriu", 528, 240, 44, 17)

$Label18 = GUICtrlCreateLabel("Rata este de:", 320, 296, 68, 17)

$Label19 = GUICtrlCreateLabel("-", 402, 296, 25, 17);RATA METAL------------------------------

GUICtrlSetFont($Label19, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label19, 0x0000FF)

$Label20 = GUICtrlCreateLabel(":", 439, 296, 7, 17)

$Label21 = GUICtrlCreateLabel("-", 473, 296, 25, 17);RATA CRISTAL----------------------------

GUICtrlSetFont($Label21, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label21, 0x0000FF)

$Label22 = GUICtrlCreateLabel(":", 512, 296, 7, 17)

$Label23 = GUICtrlCreateLabel("-", 544, 296, 25, 17);RATA DEUTERIU---------------------------

GUICtrlSetFont($Label23, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label23, 0x0000FF)

$Button3 = GUICtrlCreateButton("Afla rata!", 424, 320, 75, 25, 0)

GUICtrlSetOnEvent($Button3, "Button3Click") ;---------------------------BUTTON3CLICK------------

$Button6 = GUICtrlCreateButton("Reset", 560, 344, 35, 17, 0);RESET----------------------------

GUICtrlSetOnEvent($Button6, "Button6Click") ;---------------------------BUTTON6CLICK------------

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group4 = GUICtrlCreateGroup("Converteste o resursa in celelalte doua", 310, 376, 286, 154)

$Label43 = GUICtrlCreateLabel("Metal", 394, 396, 30, 17)

$Label44 = GUICtrlCreateLabel("Cristal", 466, 396, 32, 17)

$Label45 = GUICtrlCreateLabel("Deuteriu", 536, 396, 44, 17)

$Label46 = GUICtrlCreateLabel("Conform ratei de:", 314, 452, 84, 17)

$Label48 = GUICtrlCreateLabel(":", 445, 452, 7, 17)

$Label50 = GUICtrlCreateLabel(":", 517, 452, 7, 17)

$Button5 = GUICtrlCreateButton("Converteste !", 418, 484, 75, 25, 0)

GUICtrlSetOnEvent(-1, "Button5Click")

$Input11 = GUICtrlCreateInput("", 392, 416, 41, 21);METAL---------------------------------------

$Input12 = GUICtrlCreateInput("", 464, 416, 41, 21);CRISTAL-------------------------------------

$Input13 = GUICtrlCreateInput("", 536, 416, 41, 21);DEUTERIU------------------------------------

$Label52 = GUICtrlCreateLabel("Converteste:", 320, 416, 64, 17)

$Input14 = GUICtrlCreateInput("", 405, 448, 17, 21);RATA METAL------------------------------

$Input15 = GUICtrlCreateInput("", 476, 448, 17, 21);RATA CRISTAL----------------------------

$Input16 = GUICtrlCreateInput("", 546, 448, 17, 21);RATA DEUTERIU---------------------------

$Button7 = GUICtrlCreateButton("Reset", 560, 512, 35, 17, 0);RESET--------------------------

GUICtrlSetOnEvent($Button7, "Button7Click")

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group5 = GUICtrlCreateGroup("Afla nivel mine dupa resurse", 16, 280, 286, 321)

$Edit1 = GUICtrlCreateEdit("", 24, 312, 233, 41)

GUICtrlSetData($Edit1, "")

$Edit2 = GUICtrlCreateEdit("", 24, 376, 233, 41)

GUICtrlSetData($Edit2, "")

$Label24 = GUICtrlCreateLabel("Copiaza aici primul raport de spioanj:", 24, 296, 175, 16)

$Label25 = GUICtrlCreateLabel("Copiaza aici al doilea raport de spionaj:", 24, 360, 187, 16)

$Label26 = GUICtrlCreateLabel("Mina de metal produce", 24, 424, 112, 17)

$Label27 = GUICtrlCreateLabel("resurse pe ora.", 170, 424, 74, 17)

$Label28 = GUICtrlCreateLabel("Mina de metal este de nivelul", 24, 496, 144, 17)

$Label29 = GUICtrlCreateLabel(" -", 137, 425, 30, 17)

GUICtrlSetFont($Label29, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label29, 0x0000FF)

$Label30 = GUICtrlCreateLabel(" -", 168, 496, 20, 17)

GUICtrlSetFont($Label30, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label30, 0x0000FF)

$Label31 = GUICtrlCreateLabel("Mina de cristal produce", 24, 448, 114, 17)

$Label32 = GUICtrlCreateLabel(" -", 137, 448, 32, 17)

GUICtrlSetFont($Label32, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label32, 0x0000FF)

$Label33 = GUICtrlCreateLabel("resurse pe ora.", 171, 448, 71, 17)

$Label34 = GUICtrlCreateLabel("Mina de cristal este de nivelul", 24, 520, 143, 17)

$Label35 = GUICtrlCreateLabel("-", 176, 520, 16, 17)

GUICtrlSetFont($Label35, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label35, 0x0000FF)

$Label36 = GUICtrlCreateLabel("Sintetizatorul produce", 24, 472, 106, 17)

$Label37 = GUICtrlCreateLabel(" -", 129, 473, 31, 17)

GUICtrlSetFont($Label37, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label37, 0x0000FF)

$Label38 = GUICtrlCreateLabel("resurse pe ora.", 162, 472, 74, 17)

$Label39 = GUICtrlCreateLabel("Sintetizatorul este de nivelul", 24, 544, 135, 17)

$Label40 = GUICtrlCreateLabel("la temp. min. de", 176, 544, 78, 17)

$Input10 = GUICtrlCreateInput("10", 254, 541, 20, 21)

$Label41 = GUICtrlCreateLabel(" -", 158, 544, 16, 17)

GUICtrlSetFont($Label41, 8, 800, 0, "MS Sans Serif")

GUICtrlSetColor($Label41, 0x0000FF)

$Button4 = GUICtrlCreateButton("Calculeaza !", 120, 568, 75, 25)

GUICtrlSetOnEvent($Button4, "Button4Click")

$Button8 = GUICtrlCreateButton("Reset", 266, 583, 35, 17, 0)

GUICtrlSetOnEvent($Button8, "Button8Click")

$Label42 = GUICtrlCreateLabel("

Edited by Kiti

Share this post


Link to post
Share on other sites

Btw, when I click Start Cronometer, the button changes to Pause cronometer. When I click this too, how can I put it back to "Start cronometer again" ? I mean, something like If $flag = ? then guictrlsetdata($button,"Pause") Else guictrlsetdata($button,"Start again") ?

Share this post


Link to post
Share on other sites

Also, I love your avatar.. that is very cute..

@Kiti: Yeah, that picture is pretty amazing. Is that your muchkin? Looks a lot like my grandson (who just turned three).

;)


Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law

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