zadania dla poczatkujacego

[Primaveraa]

a macie jakies inne zadania? boje sie ze nie dam rady ale pomysl ciekawy i mi sie podoba :P

[kaje11]

1. Kółko i krzyżyk, powiedzmy offline na 2.

2. Kalkulator

3. Stoper włączany i wyłączany jednym przyciskiem

4. Lista plików w danym folderze, sortowana alfabetycznie według drugiego znaku w nazwie

5. Ściąganie plików (InetGet) ze schowka (powiedzmy link do obrazka) po naciśnięciu kombinacji przycisków

6. Program robiący zrzut ekranu i zapisujący go pod nazwą 5 znaków od prawej z tytułu aktualnego okna.

 

Edit: poprawiłem treść 5.

[Primaveraa]

pierw zrobie nr3 bo wydaje sie latwe :P kalkulator slabo mi idzie bo nie lubie matematyki

 

mozna jakies podpowiedzi?

[kaje11]

http://www.autoitscript.com/autoit3/docs/functions/TimerInit.htm

http://www.autoitscript.com/autoit3/docs/functions/HotKeySet.htm

Na dole fajne przykłady :>

Spróbuj potem 5, wydaje się trudne, ale to nic bardziej mylnego (inetGet, clipGet, hotKeySet).

 

Jak chcesz to stopniowo mogę ci podać w spojlerach coraz to większe naprowadzenia do 3 zadania.

[Primaveraa]

jestem ciekaw jak zrobic stop :P pewnie cos ze sleepem

[Primaveraa]

co zrobilem zle? e.e

 

HotKeySet("{F10}", "stopek")
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Stoper = GUICreate("Stoper", 499, 281, 192, 124)
$Button1 = GUICtrlCreateButton("F10-STOP", 8, 8, 489, 113)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg

        Case $Button1

        $start = TimerInit()

        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd


Func stopek()
    $pauza= Not $pauza
    While $pauza
        Sleep(100)
        Local $stop = TimerDiff($start)
        MsgBox (0 , "", $stop)
    WEnd
EndFunc

[kaje11]

"Włączany/Wyłączany jednym przyciskiem". Będziesz musiał wtedy użyć zmiennych i je porównywać za każdym wywołaniem funkcji, czyli:

 

 

Global $test = 1
Func test()
    If $test = 1 Then
        ...
        $test = 0
    else
        ...
        $test = 1
    endIf
endFunc

 

A w Twoim kodzie, niepoprawna jest forma $pauza = Not $pauza. Nie rozumiem w ogóle jej użycia.. Cała ta funkcja nie ma ładu i składu.

Func stopek()
    msgBox( 0, "", timerDiff( $stop ) )
endFunc

Tyle wystarczy. Teraz musisz wykombinować, jak timerDiff( $stop ) zamienić na normalną formę "zegara elektronicznego" (01:50). Podpowiem - czas jest podawany w milisekundach. 1000ms = s.

 

Jeżeli chciałbyś notować wszystkie czasy ze stopera, powiedzmy do jakiegoś editboxa, to pisz. Musisz jednak wiedzieć, że celem tego zadania jest zobaczenie jak poradzisz sobie z operacjami na ciągach znaków (stringach) oraz zmiennymi.

 

Operację na zmiennych widziałbym tak:

- Jeden przycisk - Start, który po naciśnięciu zmienia się na Stop.

- Zmianę nazwy przycisku (chyba, że użyjesz hotkeya), robisz tak: guiCtrlSetData( $przycisk, "Stop" )

- Po naciśnięciu na Stop, funkcja pokazuje czas i zmienia nazwę ze stop na start.

(tę operację robisz tak jak opisałem na początku posta)

[Primaveraa]

ta $pauza = Not $pauza bylo tak w helpie wiec nie moja wina ;p (znalazlem jakis kod ktory stopuje program

[Primaveraa]

zrobilem to troche inaczej i dziala mysle ze lepiej ale mam pomysl (chyba o to ci nie chodzilo) by zrobic petle by do 0 dodawac co 1s +1 a potem to wyswietlic gdy sie zastopuje (ile sie dodalo) a na sekundy nie wiem jak przeliczyc ale ciagle szukam ;p

 

HotKeySet("{F10}", "stopek")
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Stoper = GUICreate("Stoper", 499, 281, 192, 124)
$Button1 = GUICtrlCreateButton("start ;d", 8, 8, 489, 113)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg

        Case $Button1
         $start = TimerInit()
            Sleep(3333333333333333333333333333333333333333)
            $trololo = TimerDiff($start)

        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd

Func stopek ()
    MsgBox (0,"Twój czas to:", $trololo)
    EndFunc