1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. L3viathan

Beiträge von L3viathan

  • Mausverfolger oder Wie kann ich etwas "direkt" auf den Bildschirm malen

    • L3viathan
    • 12. Februar 2009 um 11:24

    Und wie geht das dann mit den 1D-Arrays?
    Funktionen Push oder Pop nicht gefunden ?(
    :rock::rock::rock: Post Nr. 400 :rock::rock::rock:

  • GUI Problem

    • L3viathan
    • 12. Februar 2009 um 11:21

    Schneller gehts mit Select, gucks dir einfach in der Hilfe an.

  • GUI Problem

    • L3viathan
    • 12. Februar 2009 um 10:00

    Bitte [ autoit ]-Tags verwenden.

    Spoiler anzeigen
    [autoit]

    loop()
    func loop()
    while 1
    switch GUIGetMsg($gui1)
    case $esc
    exitloop
    case $GUI_EVENT_CLOSE
    exitloop
    case $ok
    $auf = guictrlread($auf)
    $mas = guictrlread($mas)
    $ter = guictrlread($ter)
    $kun = guictrlread($kun)
    $nr = guictrlread($nr)
    $bez = GUICtrlRead($bez)
    $kon = GUICtrlRead($kon)
    if $auf = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Auftragsnummer aus!")
    ContinueLoop
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    if $mas = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Maschine aus!")
    ContinueLoop
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    if $ter = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Termin aus!")
    ContinueLoop
    EndIf

    if $kun = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Kunde aus!")
    ContinueLoop
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    if $nr = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Maschinen Nummer aus!")
    ContinueLoop
    EndIf

    if $bez = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Maschinen Bezeichnung aus!")
    ContinueLoop
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    if $kon = "" then
    msgbox (16, "Pflichtfelder", "Bitte füllen Sie das Feld Konstrukteur aus!")
    ContinueLoop
    EndIf

    main()
    EndSwitch
    WEnd
    endfunc

    [/autoit]
  • Mausverfolger oder Wie kann ich etwas "direkt" auf den Bildschirm malen

    • L3viathan
    • 12. Februar 2009 um 08:52

    Wo wir grade beim Thema sind: kann man mit AutoIt eigentlich ein FIFO machen?
    Wäre nämlich statt den Zeilen 20-23 gut...
    Wie man sieht gehts ja auch ohne, aber gibts das?

  • Wie kann man das machen das wenn man checkbox1 anklickt und dann checkbox2 und 3 nicht mehr ankilcken kann ?

    • L3viathan
    • 11. Februar 2009 um 19:25

    Dann mach doch stattdessen jeweils

    [autoit]

    Send($var,1)

    [/autoit]
  • C++ (?) to Autoit

    • L3viathan
    • 11. Februar 2009 um 18:57
    Zitat von Hellwave

    Wollte nur wissen obs solche Funktionen auch in Autoit gibt. (wenn ja, wie heißen sie ? )

    Guck dir die Hilfe an:
    ControlSend
    Send

  • Wie kann man das machen das wenn man checkbox1 anklickt und dann checkbox2 und 3 nicht mehr ankilcken kann ?

    • L3viathan
    • 11. Februar 2009 um 18:54

    Ich spiele S.O nicht und habe es auch nicht vor, deshalb weiß ich nicht, wie man das erkennen kann.
    Ändert sich eine zuvor feststehende Farbe in einem Bereich? Dann probier mal PixelGetColor oder PixelChecksum.
    Das Enter dann in einer Schleife mit Sleep, etwa:

    [autoit]


    Do
    Send("{ENTER}")
    sleep(100)
    Until PixelGetColor($x,$y) = $wert

    [/autoit]


    edit: @Hellwave: Schlechte Idee, Endlosschleife.

  • C++ (?) to Autoit

    • L3viathan
    • 11. Februar 2009 um 18:46

    Also C++ ist es nicht C# vermutlich auch nicht, ich kann nur einen Teil übersetzen:

    Code
    SendInput t/tazer{Enter}


    wird zu

    [autoit]

    Send("t/tazer{ENTER}")

    [/autoit]
  • Wie kann man das machen das wenn man checkbox1 anklickt und dann checkbox2 und 3 nicht mehr ankilcken kann ?

    • L3viathan
    • 11. Februar 2009 um 18:42

    wahrscheinlich

    [autoit]

    Send("{TAB}")

    [/autoit]
  • Email senden ohne irgentein Fenster?

    • L3viathan
    • 11. Februar 2009 um 18:25

    den Beitrag, er hatte wohl was geschrieben und wieder gelöscht

  • Tab Hintergrundfarbe ermitteln

    • L3viathan
    • 11. Februar 2009 um 18:15
    Zitat von senthor

    Und was ist das überhaupt für ein komischer RGB-Wert, der da raus kommt:
    11250603
    Was soll das bedeuten?
    Ist RGB nicht z.B. 255 255 255?
    112 50 603 kanns ja nicht sein^^
    11 250 603 auch nicht
    112 506 03 auch nicht???????

    Alles anzeigen

    Hex($color)

  • Tab Hintergrundfarbe ermitteln

    • L3viathan
    • 11. Februar 2009 um 18:05

    Ich würde sagen du brauchst $COLOR_APPWORKSPACE

  • Button + Bild

    • L3viathan
    • 11. Februar 2009 um 17:56

    Ich würd das ja so machen, was bringt denn das If da? (leider bin ich falsch informiert...)

  • 2x GUI öffnen

    • L3viathan
    • 10. Februar 2009 um 22:09

    Was soll denn bitte If(1)?
    Kannst du das nicht weglassen?

  • Projekt-Idee: AutoIt for the win!

    • L3viathan
    • 10. Februar 2009 um 21:40
    Zitat von Padmak


    wo siehst du da nen witz?
    des mit galenda?

    Padmak


    Das Galenda tausendmal komplexer ist vielleicht?

  • Villigers

    • L3viathan
    • 10. Februar 2009 um 19:41

    Wieso ehrlich?
    Ich hab auch ein ähnliches Script geschrieben, ganz allein:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $intro = GUICreate("Villigers", 625, 445, 193, 125)
    GUISetBkColor(0xC0C0C0)
    $load = GUICtrlCreateProgress(224, 208, 193, 25)
    GUICtrlCreateLabel("Now Loading ...", 224, 176, 79, 17)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    $s = 0
    do
    $s = $s + 1
    sleep(30)
    guictrlsetdata($load, $s)
    until $s = 100
    sleep(1500)
    guisetstate(0)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    #Region #### Initialisieren ####
    $Form2 = GUICreate("Villigers", 625, 445, 193, 125)
    $Button1 = GUICtrlCreateButton("Frei", 192, 112, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button2 = GUICtrlCreateButton("Frei", 240, 112, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button3 = GUICtrlCreateButton("Frei", 288, 112, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button4 = GUICtrlCreateButton("Frei", 192, 160, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button5 = GUICtrlCreateButton("Frei", 192, 208, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button6 = GUICtrlCreateButton("Frei", 240, 208, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button7 = GUICtrlCreateButton("Frei", 288, 208, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button8 = GUICtrlCreateButton("Frei", 288, 160, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0x00FF00)
    $Button9 = GUICtrlCreateButton("Lager", 240, 160, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xFF0000)
    $Group1 = GUICtrlCreateGroup("Recourcen", 0, 296, 137, 145)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Label1 = GUICtrlCreateLabel("Holz", 8, 336, 25, 17)
    $Label2 = GUICtrlCreateLabel("Stein", 8, 368, 28, 17)
    $Label3 = GUICtrlCreateLabel("Gold", 8, 400, 26, 17)
    $holzw = GUICtrlCreateLabel("0", 56, 336, 15, 17)
    $steinw = GUICtrlCreateLabel("0", 56, 368, 15, 17)
    $goldw = GUICtrlCreateLabel("0", 56, 400, 20, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    $Button10 = GUICtrlCreateButton("Kaufen", 192, 256, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button11 = GUICtrlCreateButton("Kaufen", 240, 256, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button12 = GUICtrlCreateButton("Kaufen", 288, 256, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button13 = GUICtrlCreateButton("Kaufen", 336, 256, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button14 = GUICtrlCreateButton("Kaufen", 336, 208, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button15 = GUICtrlCreateButton("Kaufen", 336, 160, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button16 = GUICtrlCreateButton("Kaufen", 336, 112, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button17 = GUICtrlCreateButton("Kaufen", 384, 256, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button18 = GUICtrlCreateButton("Kaufen", 432, 256, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button19 = GUICtrlCreateButton("Kaufen", 432, 208, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button20 = GUICtrlCreateButton("Kaufen", 384, 160, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button21 = GUICtrlCreateButton("Kaufen", 432, 160, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button22 = GUICtrlCreateButton("Kaufen", 384, 112, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button23 = GUICtrlCreateButton("Kaufen", 432, 112, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Button24 = GUICtrlCreateButton("Kaufen", 384, 208, 49, 49, 0)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $rbee = GUICtrlCreateButton("Runde beenden", 480, 328, 129, 25, 0)
    GUICtrlSetBkColor(-1, 0xFF0000)
    $fst = GUICtrlCreateButton("Forschungstrupp schicken", 240, 408, 145, 25, 0)
    $attk = GUICtrlCreateButton("Feind angreifen", 408, 408, 89, 25, 0)
    $Group2 = GUICtrlCreateGroup("Truppen", 8, 8, 137, 153)
    GUICtrlSetBkColor(-1, 0xA0A0A4)
    $Label4 = GUICtrlCreateLabel("Bogenschützen", 24, 32, 78, 17)
    $Label5 = GUICtrlCreateLabel("Schwertkämpfer", 24, 56, 81, 17)
    $Label6 = GUICtrlCreateLabel("Lanzenträger", 24, 80, 66, 17)
    $Label7 = GUICtrlCreateLabel("Ritter", 24, 104, 29, 17)
    $bgsw = GUICtrlCreateLabel("0", 112, 32, 15, 17)
    $swkw = GUICtrlCreateLabel("0", 112, 56, 15, 17)
    $lztw = GUICtrlCreateLabel("0", 112, 80, 15, 17)
    $rtrw = GUICtrlCreateLabel("0", 112, 104, 15, 17)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUISetState(@SW_SHOW, $form2)
    #EndRegion #### Initialisieren

    [/autoit] [autoit][/autoit] [autoit]

    #Region #### BAUEN ####
    $bauen = GUICreate("Bauen", 232, 382, 190, 123)
    $kaserne = GUICtrlCreateButton("Kaserne", 8, 8, 65, 65, 0)
    GUICtrlSetBkColor(-1, 0xA6CAF0)
    $kaserne1 = GUICtrlCreateLabel("In der Kaserne kannst du ", 80, 8, 126, 17)
    $kaserne2 = GUICtrlCreateLabel("Krieger ausbilden.", 80, 24, 88, 17)
    $kaserne3 = GUICtrlCreateLabel("Kosten: 20 Stein 10 Holz", 80, 48, 136, 17)
    $gehoef = GUICtrlCreateButton("Gehöf", 8, 80, 65, 65, 0)
    GUICtrlSetBkColor(-1, 0xA6CAF0)
    $gehoef1 = GUICtrlCreateLabel("Das Gehöf bringt dir 6 neue ", 80, 88, 137, 17)
    $gehoef2 = GUICtrlCreateLabel("Bauern die du zu Kriegern ", 80, 104, 129, 17)
    $gehoef3 = GUICtrlCreateLabel("ausbilden kannst", 80, 120, 84, 17)
    $gehoef4 = GUICtrlCreateLabel("Kosten: 5 Stein 10 Holz", 80, 136, 139, 17)
    $kaserne4 = GUICtrlCreateLabel("50 Gold", 152, 64, 44, 17)
    $for = GUICtrlCreateButton("Forschungshaus", 8, 160, 89, 65, 0)
    GUICtrlSetBkColor(-1, 0xA6CAF0)
    $for1 = GUICtrlCreateLabel("Du kannst Forschungs- ", 104, 168, 117, 17)
    $for2 = GUICtrlCreateLabel("Trupps losschicken, die ", 104, 184, 119, 17)
    $for3 = GUICtrlCreateLabel("nach Recourcen suchen.", 104, 200, 125, 17)
    $for4 = GUICtrlCreateLabel("Kosten: 15 Stein 10 Holz", 104, 216, 124, 17)
    $hlz = GUICtrlCreateButton("Holzfäller", 8, 240, 65, 65, 0)
    GUICtrlSetBkColor(-1, 0xA6CAF0)
    $hlz1 = GUICtrlCreateLabel("Du bekommst am Rundenende", 80, 240, 151, 17)
    $hlz2 = GUICtrlCreateLabel("mehr Holz.", 80, 256, 54, 17)
    $hlz3 = GUICtrlCreateLabel("Kosten: 10 Holz 10 Gold", 80, 280, 150, 25)
    $stn = GUICtrlCreateButton("Steinmetzt", 8, 312, 65, 65, 0)
    GUICtrlSetBkColor(-1, 0xA6CAF0)
    $stn1 = GUICtrlCreateLabel("Du bekommst am Rundenende", 80, 312, 151, 17)
    $stn2 = GUICtrlCreateLabel("mehr Stein", 80, 328, 54, 17)
    $stn3 = GUICtrlCreateLabel("Kosten: 10 Stein 10 Gold", 80, 344, 134, 25)

    [/autoit] [autoit][/autoit] [autoit]

    #EndRegion #### BAUEN ####

    [/autoit] [autoit][/autoit] [autoit]

    $bauern = 0
    $holz = 30
    $stein = 35
    $gold = 99
    $bgs = 0
    $swk = 0
    $rtr = 0
    $steind = 1
    $holzd = 1
    $goldd = 1
    $k10 = 0
    $k11 = 0
    $k12 = 0
    $k13 = 0
    $k14 = 0
    $k15 = 0
    $k16 = 0
    $k17 = 0
    $k18 = 0
    $k19 = 0
    $k20 = 0
    $k21 = 0
    $k22 = 0
    $k23 = 0
    $k24 = 0
    $dobuy = 0

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    $dobuy = 0

    $msg = guigetmsg()

    guictrlsetdata($holzw, $holz)
    GUICtrlSetData($steinw, $stein)
    guictrlsetdata($goldw, $gold)
    guictrlsetdata($bgsw, $bgs)
    GUICtrlSetData($swkw, $swk)
    GUICtrlSetData($rtrw, $rtr)
    Select
    case $msg = $fst

    case $msg = $attk

    case $msg = $Button1
    $btng = $Button1
    $nr = 1
    main()
    case $msg = $Button2
    $nr = 2
    $btng = $Button2
    main()
    case $msg = $Button3

    $nr = 3
    $btng = $Button3
    main()
    case $msg = $Button4
    $nr = 4
    $btng = $Button4
    main()
    case $msg = $Button5
    $nr = 5
    $btng = $Button5
    main()
    case $msg = $Button6
    $nr = 6
    $btng = $Button6
    main()
    case $msg = $Button7
    $nr = 7
    $btng = $Button7
    main()
    case $msg = $Button8
    $nr = 8
    $btng = $Button8
    main()
    case $msg = $Button9
    msgbox(0, '', 'Du kannst hier nichts bauen')

    case $msg = $Button10
    $nr = 10
    $btng = $Button10
    main()
    case $msg = $Button11
    $nr = 11
    $btng = $Button11
    main()
    case $msg = $Button12
    $nr = 12
    $btng = $Button12
    main()
    case $msg = $Button13
    $nr = 13
    $btng = $Button13
    main()
    case $msg = $Button14
    $nr = 14
    $btng = $Button14
    main()
    case $msg = $Button15
    $nr = 15
    $btng = $Button15
    main()
    case $msg = $Button16
    $nr = 16
    $btng = $Button16
    main()
    case $msg = $Button17
    $nr = 17
    $btng = $Button17
    main()
    case $msg = $Button18
    $nr = 18
    $btng = $Button18
    main()
    case $msg = $Button19
    $nr = 19
    $btng = $Button19
    main()
    case $msg = $Button20
    $nr = 20
    $btng = $Button20
    main()
    case $msg = $Button21
    $nr = 21
    $btng = $Button21
    main()
    case $msg = $Button22
    $nr = 22
    $btng = $Button22
    main()
    case $msg = $Button23
    $nr = 23
    $btng = $Button23
    main()
    case $msg = $Button24
    $nr = 24
    $btng = $Button24
    main()
    case $msg = $rbee
    beep(500, 100)
    $holz = $holz+$holzd
    $stein = $stein+$steind
    $gold = $gold+$goldd
    case $msg = $GUI_EVENT_CLOSE
    guisetstate(0, $bauen)
    EndSelect
    WEnd

    func main()
    if $nr < 10 then $allow = 1

    if $nr = 10 Then

    if $k10 = 0 then
    $allow = 0
    EndIf
    if $k10 = 1 then $allow = 1
    EndIf


    if $nr = 11 Then
    if $k11 = 0 then
    $allow = 0
    EndIf
    if $k11 = 1 then $allow = 1
    EndIf


    if $nr = 12 Then
    if $k12 = 0 then
    $allow = 0
    EndIf
    if $k12 = 1 then $allow = 1
    EndIf


    if $nr = 13 Then
    if $k13 = 0 then
    $allow = 0
    EndIf
    if $k13 = 1 then $allow = 1
    EndIf


    if $nr = 14 Then
    if $k14 = 0 then
    $allow = 0
    EndIf
    if $k14 = 1 then $allow = 1
    EndIf


    if $nr = 15 Then
    if $k15 = 0 then
    $allow = 0
    EndIf
    if $k15 = 1 then $allow = 1
    EndIf


    if $nr = 16 Then
    if $k16 = 0 then
    $allow = 0
    EndIf
    if $k16 = 1 then $allow = 1
    EndIf


    if $nr = 17 Then
    if $k17 = 0 then
    $allow = 0
    EndIf
    if $k17 = 1 then $allow = 1
    EndIf


    if $nr = 18 Then
    if $k18 = 0 then
    $allow = 0
    EndIf
    if $k18 = 1 then $allow = 1
    EndIf


    if $nr = 19 Then
    if $k19 = 0 then
    $allow = 0
    EndIf
    if $k19 = 1 then $allow = 1
    EndIf


    if $nr = 20 Then
    if $k20 = 0 then
    $allow = 0
    EndIf
    if $k20 = 1 then $allow = 1
    EndIf


    if $nr = 21 Then
    if $k21 = 0 then
    $allow = 0
    EndIf
    if $k21 = 1 then $allow = 1
    EndIf


    if $nr = 22 Then
    if $k22 = 0 then
    $allow = 0
    EndIf
    if $k22 = 1 then $allow = 1
    EndIf


    if $nr = 23 Then
    if $k23 = 0 then
    $allow = 0
    EndIf
    if $k23 = 1 then $allow = 1
    EndIf


    if $nr = 24 Then
    if $k24 = 0 then
    $allow = 0
    EndIf
    if $k24 = 1 then $allow = 1
    EndIf


    if $allow = 1 then
    GUISetState(@SW_SHOW, $bauen)

    Do
    $msg = GUIGetMsg($bauen)
    Select
    case $msg = $kaserne
    if $stein < 20 then msgbox(0, '', 'Du hast nich genügend Stein')
    if $holz < 10 then msgbox(0, '', 'Du hast zu wenig Holz')
    if $gold < 50 then msgbox(0, '', 'Du hast zu wenig Gold')
    if $gold > 49 Then
    if $stein > 19 Then
    if $holz > 9 Then
    $stein = $stein - 20
    $holz = $holz - 10
    $gold = $gold - 50
    $goldd = $goldd + 5
    guictrlsetdata($btng, 'Kaserne')
    guisetstate(0, $bauen)
    $dobuy = 1
    EndIf
    endif
    EndIf
    Case $msg = $gehoef
    if $stein < 5 then msgbox(0, '', 'Du hast zu wenig Stein')
    if $holz < 10 then msgbox(0, '', 'Du hast zu wenig Holz')
    if $stein > 4 Then
    if $holz > 9 Then
    $stein = $stein - 5
    $holz = $holz - 10
    $bauern = $bauern + 6
    guictrlsetdata($btng, 'Gehöft')
    guisetstate(0, $bauen)
    $dobuy = 1
    EndIf
    EndIf

    Case $msg = $for
    if $stein < 15 then msgbox(0, '', 'Du hast zu wenig Stein')
    if $holz < 10 then msgbox(0, '', 'Du hast zu wenig Holz')
    if $stein > 14 Then
    if $holz > 9 Then
    $stein = $stein - 15
    $holz = $holz - 10
    $forschungen = 1
    guictrlsetdata($btng, 'Forschung')
    guisetstate(0, $bauen)
    $dobuy = 1
    EndIf
    EndIf

    Case $msg = $hlz
    if $holz < 10 then msgbox(0, '', 'Du hast zu wenig Holz')
    if $gold < 10 then msgbox(0, '', 'Du hast zu wenig Gold')
    if $gold > 9 Then
    if $holz > 9 Then
    $holz = $holz - 10
    $gold = $gold - 10
    $holzd = $holzd + 5
    GUICtrlSetData($btng, 'Holzfäller')
    guisetstate(0, $bauen)
    $dobuy = 1
    EndIf
    EndIf

    Case $msg = $stn
    if $stein < 10 then msgbox(0, '', 'Du hast zu wenig Stein')
    if $gold < 10 Then msgbox(0, '', 'Du hast zu wenig Gold')
    if $stein > 9 then
    if $gold > 9 Then
    $gold = $gold - 10
    $stein = $stein - 10
    $steind = $steind + 5
    guictrlsetdata($btng, 'Steinmetzt')
    guisetstate(0, $bauen)
    $dobuy = 1
    EndIf
    EndIf

    Case $msg = $GUI_EVENT_CLOSE
    $dobuy = 1
    EndSelect

    [/autoit] [autoit][/autoit] [autoit]

    until $dobuy = 1
    EndIf
    if $allow = 0 then buy()
    EndFunc
    func buy()
    $kaufen = msgbox(4, 'Kaufen', 'Möchtest du das Feld für 100 Gold kaufen?')
    if $kaufen = 6 then
    if $gold < 100 then msgbox(0, '', 'Du hast zu wenig Gold!')
    if $gold > 99 then
    $gold = $gold - 100
    guictrlsetdata($btng, 'Frei')
    GUICtrlSetBkColor($btng, 0x00FF00)
    if $nr = 10 then $k10 = 1
    if $nr = 11 then $k11 = 1
    if $nr = 12 then $k12 = 1
    if $nr = 13 then $k13 = 1
    if $nr = 14 then $k14 = 1
    if $nr = 15 then $k15 = 1
    if $nr = 16 then $k16 = 1
    if $nr = 17 then $k17 = 1
    if $nr = 18 then $k18 = 1
    if $nr = 19 then $k19 = 1
    if $nr = 20 then $k20 = 1
    if $nr = 21 then $k21 = 1
    if $nr = 22 then $k22 = 1
    if $nr = 23 then $k23 = 1
    if $nr = 24 then $k24 = 1

    EndIf
    EndIf
    EndFunc

    [/autoit]


    :D Tipp: mach an den Anfang einen Kommentar rein

  • IE problem

    • L3viathan
    • 10. Februar 2009 um 19:26

    :(

  • 2D Spiel Hilfe

    • L3viathan
    • 10. Februar 2009 um 19:04

    Select müsste schneller sein als if, aber hu nows

  • 2D Spiel Hilfe

    • L3viathan
    • 10. Februar 2009 um 18:09
    Zitat von Oger-Lord

    Also ist es egal welche variable ich nehme und ich kann imer 1 hinschreiben?

    [autoit]


    switch 1
    case $x>$Objekte[0][3]-$Objekte[$number][3]
    $x=$Objekte[0][3]-$Objekte[$number][3]
    $return=1
    endswitch

    [/autoit]


    Ja, theoretisch. Aber dann ist Switch auch nicht mehr schneller als Select....

  • 2D Spiel Hilfe

    • L3viathan
    • 10. Februar 2009 um 18:06

    Select ist eigentlich nur Switch True.
    Manchmal kann man halt Switch nicht verwenden, nur bei sowas:

    [autoit]


    Switch $antwort
    Case 2
    ;sdadasdf
    Case 4
    ;asdfasf
    Case Else
    ;afasf
    EndSwitch

    [/autoit]


    and-verknüpfungen gehen in Switch und Select auch.

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™