• Hallo.
    Ich habe mal ein Sudoku gemacht. Mit Lösung und Check und so.
    Grafisch ist es nicht so toll, war mir aber auch egal.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <EditConstants.au3>

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

    $l1GUI = GUICreate("Soduku",345,400)

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

    ; 1sten Kasten Input -------------------------------------------------------------------------------------------
    $11input = GUICtrlCreateInput("2",10,10,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $12input = GUICtrlCreateInput("4",40,10,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $13input = GUICtrlCreateInput("3",70,10,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $14input = GUICtrlCreateInput("8",10,40,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $15input = GUICtrlCreateInput("",40,40,20,20,$ES_CENTER)
    $16input = GUICtrlCreateInput("",70,40,20,20,$ES_CENTER)
    $17input = GUICtrlCreateInput("5",10,70,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $18input = GUICtrlCreateInput("",40,70,20,20,$ES_CENTER)
    $19input = GUICtrlCreateInput("",70,70,20,20,$ES_CENTER)
    ;---------------------------------------------------------------------------------------------------------------

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

    ; 2ter Kasten Input --------------------------------------------------------------------------------------------
    $21input = GUICtrlCreateInput("",10,130,20,20,$ES_CENTER)
    $22input = GUICtrlCreateInput("",40,130,20,20,$ES_CENTER)
    $23input = GUICtrlCreateInput("",70,130,20,20,$ES_CENTER)
    $24input = GUICtrlCreateInput("",10,160,20,20,$ES_CENTER)
    $25input = GUICtrlCreateInput("5",40,160,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $26input = GUICtrlCreateInput("6",70,160,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $27input = GUICtrlCreateInput("",10,190,20,20,$ES_CENTER)
    $28input = GUICtrlCreateInput("9",40,190,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $29input = GUICtrlCreateInput("2",70,190,20,20,BitOR($ES_CENTER,$ES_READONLY))
    ;---------------------------------------------------------------------------------------------------------------

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

    ;3ter Kasten Input ---------------------------------------------------------------------------------------------
    $31input = GUICtrlCreateInput("9",10,250,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $32input = GUICtrlCreateInput("3",40,250,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $33input = GUICtrlCreateInput("4",70,250,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $34input = GUICtrlCreateInput("",10,280,20,20,$ES_CENTER)
    $35input = GUICtrlCreateInput("",40,280,20,20,$ES_CENTER)
    $36input = GUICtrlCreateInput("",70,280,20,20,$ES_CENTER)
    $37input = GUICtrlCreateInput("7",10,310,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $38input = GUICtrlCreateInput("",40,310,20,20,$ES_CENTER)
    $39input = GUICtrlCreateInput("",70,310,20,20,$ES_CENTER)
    ;---------------------------------------------------------------------------------------------------------------

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

    ;4ter Kasten Input ---------------------------------------------------------------------------------------------
    $41input = GUICtrlCreateInput("",130,10,20,20,$ES_CENTER)
    $42input = GUICtrlCreateInput("9",160,10,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $43input = GUICtrlCreateInput("",190,10,20,20,$ES_CENTER)
    $44input = GUICtrlCreateInput("6",130,40,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $45input = GUICtrlCreateInput("1",160,40,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $46input = GUICtrlCreateInput("3",190,40,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $47input = GUICtrlCreateInput("",130,70,20,20,$ES_CENTER)
    $48input = GUICtrlCreateInput("",160,70,20,20,$ES_CENTER)
    $49input = GUICtrlCreateInput("",190,70,20,20,$ES_CENTER)
    ;---------------------------------------------------------------------------------------------------------------

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

    ;5ter Kasten Input ---------------------------------------------------------------------------------------------
    $51input = GUICtrlCreateInput("1",130,130,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $52input = GUICtrlCreateInput("",160,130,20,20,$ES_CENTER)
    $53input = GUICtrlCreateInput("6",190,130,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $54input = GUICtrlCreateInput("",130,160,20,20,$ES_CENTER)
    $55input = GUICtrlCreateInput("",160,160,20,20,$ES_CENTER)
    $56input = GUICtrlCreateInput("",190,160,20,20,$ES_CENTER)
    $57input = GUICtrlCreateInput("4",130,190,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $58input = GUICtrlCreateInput("",160,190,20,20,$ES_CENTER)
    $59input = GUICtrlCreateInput("8",190,190,20,20,BitOR($ES_CENTER,$ES_READONLY))
    ;---------------------------------------------------------------------------------------------------------------

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

    ;6ter Kasten Input ---------------------------------------------------------------------------------------------
    $61input = GUICtrlCreateInput("",130,250,20,20,$ES_CENTER)
    $62input = GUICtrlCreateInput("",160,250,20,20,$ES_CENTER)
    $63input = GUICtrlCreateInput("",190,250,20,20,$ES_CENTER)
    $64input = GUICtrlCreateInput("7",130,280,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $65input = GUICtrlCreateInput("2",160,280,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $66input = GUICtrlCreateInput("5",190,280,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $67input = GUICtrlCreateInput("",130,310,20,20,$ES_CENTER)
    $68input = GUICtrlCreateInput("4",160,310,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $69input = GUICtrlCreateInput("",190,310,20,20,$ES_CENTER)
    ;---------------------------------------------------------------------------------------------------------------

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

    ;7ter Kasten Input ---------------------------------------------------------------------------------------------
    $71input = GUICtrlCreateInput("",250,10,20,20,$ES_CENTER)
    $72input = GUICtrlCreateInput("",280,10,20,20,$ES_CENTER)
    $73input = GUICtrlCreateInput("8",310,10,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $74input = GUICtrlCreateInput("",250,40,20,20,$ES_CENTER)
    $75input = GUICtrlCreateInput("",280,40,20,20,$ES_CENTER)
    $76input = GUICtrlCreateInput("",310,40,20,20,$ES_CENTER)
    $77input = GUICtrlCreateInput("9",250,70,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $78input = GUICtrlCreateInput("7",280,70,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $79input = GUICtrlCreateInput("3",310,70,20,20,BitOR($ES_CENTER,$ES_READONLY))
    ;---------------------------------------------------------------------------------------------------------------

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

    ;8ter Kasten Input ---------------------------------------------------------------------------------------------
    $81input = GUICtrlCreateInput("2",250,130,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $82input = GUICtrlCreateInput("9",280,130,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $83input = GUICtrlCreateInput("",310,130,20,20,$ES_CENTER)
    $84input = GUICtrlCreateInput("8",250,160,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $85input = GUICtrlCreateInput("1",280,160,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $86input = GUICtrlCreateInput("",310,160,20,20,$ES_CENTER)
    $87input = GUICtrlCreateInput("",250,190,20,20,$ES_CENTER)
    $88input = GUICtrlCreateInput("",280,190,20,20,$ES_CENTER)
    $89input = GUICtrlCreateInput("",310,190,20,20,$ES_CENTER)
    ;---------------------------------------------------------------------------------------------------------------

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

    ;9ter Kasten Input ---------------------------------------------------------------------------------------------
    $91input = GUICtrlCreateInput("",250,250,20,20,$ES_CENTER)
    $92input = GUICtrlCreateInput("",280,250,20,20,$ES_CENTER)
    $93input = GUICtrlCreateInput("2",310,250,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $94input = GUICtrlCreateInput("",250,280,20,20,$ES_CENTER)
    $95input = GUICtrlCreateInput("",280,280,20,20,$ES_CENTER)
    $96input = GUICtrlCreateInput("9",310,280,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $97input = GUICtrlCreateInput("6",250,310,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $98input = GUICtrlCreateInput("8",280,310,20,20,BitOR($ES_CENTER,$ES_READONLY))
    $99input = GUICtrlCreateInput("1",310,310,20,20,BitOR($ES_CENTER,$ES_READONLY))
    ;---------------------------------------------------------------------------------------------------------------

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

    ;1ste Spalte Labels --------------------------------------------------------------------------------------------
    GUICtrlCreateLabel("|",110,10)
    GUICtrlCreateLabel("|",110,20)
    GUICtrlCreateLabel("|",110,30)
    GUICtrlCreateLabel("|",110,40)
    GUICtrlCreateLabel("|",110,50)
    GUICtrlCreateLabel("|",110,60)
    GUICtrlCreateLabel("|",110,70)
    GUICtrlCreateLabel("|",110,80)
    GUICtrlCreateLabel("|",110,90)
    GUICtrlCreateLabel("|",110,100)
    GUICtrlCreateLabel("|",110,110)
    GUICtrlCreateLabel("|",110,120)
    GUICtrlCreateLabel("|",110,130)
    GUICtrlCreateLabel("|",110,140)
    GUICtrlCreateLabel("|",110,150)
    GUICtrlCreateLabel("|",110,160)
    GUICtrlCreateLabel("|",110,170)
    GUICtrlCreateLabel("|",110,180)
    GUICtrlCreateLabel("|",110,190)
    GUICtrlCreateLabel("|",110,200)
    GUICtrlCreateLabel("|",110,210)
    GUICtrlCreateLabel("|",110,220)
    GUICtrlCreateLabel("|",110,230)
    GUICtrlCreateLabel("|",110,240)
    GUICtrlCreateLabel("|",110,250)
    GUICtrlCreateLabel("|",110,260)
    GUICtrlCreateLabel("|",110,270)
    GUICtrlCreateLabel("|",110,280)
    GUICtrlCreateLabel("|",110,290)
    GUICtrlCreateLabel("|",110,300)
    GUICtrlCreateLabel("|",110,310)
    GUICtrlCreateLabel("|",110,320)
    ;---------------------------------------------------------------------------------------------------------------

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

    ;2te Spalte Labels --------------------------------------------------------------------------------------------
    GUICtrlCreateLabel("|",230,10)
    GUICtrlCreateLabel("|",230,20)
    GUICtrlCreateLabel("|",230,30)
    GUICtrlCreateLabel("|",230,40)
    GUICtrlCreateLabel("|",230,50)
    GUICtrlCreateLabel("|",230,60)
    GUICtrlCreateLabel("|",230,70)
    GUICtrlCreateLabel("|",230,80)
    GUICtrlCreateLabel("|",230,90)
    GUICtrlCreateLabel("|",230,100)
    GUICtrlCreateLabel("|",230,110)
    GUICtrlCreateLabel("|",230,120)
    GUICtrlCreateLabel("|",230,130)
    GUICtrlCreateLabel("|",230,140)
    GUICtrlCreateLabel("|",230,150)
    GUICtrlCreateLabel("|",230,160)
    GUICtrlCreateLabel("|",230,170)
    GUICtrlCreateLabel("|",230,180)
    GUICtrlCreateLabel("|",230,190)
    GUICtrlCreateLabel("|",230,200)
    GUICtrlCreateLabel("|",230,210)
    GUICtrlCreateLabel("|",230,220)
    GUICtrlCreateLabel("|",230,230)
    GUICtrlCreateLabel("|",230,240)
    GUICtrlCreateLabel("|",230,250)
    GUICtrlCreateLabel("|",230,260)
    GUICtrlCreateLabel("|",230,270)
    GUICtrlCreateLabel("|",230,280)
    GUICtrlCreateLabel("|",230,290)
    GUICtrlCreateLabel("|",230,300)
    GUICtrlCreateLabel("|",230,310)
    GUICtrlCreateLabel("|",230,320)
    ;---------------------------------------------------------------------------------------------------------------

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

    ; 1ste Zeile Labels --------------------------------------------------------------------------------------------
    GUICtrlCreateLabel("_",10,100)
    GUICtrlCreateLabel("_",20,100)
    GUICtrlCreateLabel("_",30,100)
    GUICtrlCreateLabel("_",40,100)
    GUICtrlCreateLabel("_",50,100)
    GUICtrlCreateLabel("_",60,100)
    GUICtrlCreateLabel("_",70,100)
    GUICtrlCreateLabel("_",80,100)
    GUICtrlCreateLabel("_",90,100)
    GUICtrlCreateLabel("_",100,100)
    GUICtrlCreateLabel("_",110,100)
    GUICtrlCreateLabel("_",120,100)
    GUICtrlCreateLabel("_",130,100)
    GUICtrlCreateLabel("_",140,100)
    GUICtrlCreateLabel("_",150,100)
    GUICtrlCreateLabel("_",160,100)
    GUICtrlCreateLabel("_",170,100)
    GUICtrlCreateLabel("_",180,100)
    GUICtrlCreateLabel("_",190,100)
    GUICtrlCreateLabel("_",200,100)
    GUICtrlCreateLabel("_",210,100)
    GUICtrlCreateLabel("_",220,100)
    GUICtrlCreateLabel("_",230,100)
    GUICtrlCreateLabel("_",240,100)
    GUICtrlCreateLabel("_",250,100)
    GUICtrlCreateLabel("_",260,100)
    GUICtrlCreateLabel("_",270,100)
    GUICtrlCreateLabel("_",280,100)
    GUICtrlCreateLabel("_",290,100)
    GUICtrlCreateLabel("_",300,100)
    GUICtrlCreateLabel("_",310,100)
    GUICtrlCreateLabel("_",320,100)
    ;---------------------------------------------------------------------------------------------------------------

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

    ; 1ste Zeile Labels --------------------------------------------------------------------------------------------
    GUICtrlCreateLabel("_",10,220)
    GUICtrlCreateLabel("_",20,220)
    GUICtrlCreateLabel("_",30,220)
    GUICtrlCreateLabel("_",40,220)
    GUICtrlCreateLabel("_",50,220)
    GUICtrlCreateLabel("_",60,220)
    GUICtrlCreateLabel("_",70,220)
    GUICtrlCreateLabel("_",80,220)
    GUICtrlCreateLabel("_",90,220)
    GUICtrlCreateLabel("_",100,220)
    GUICtrlCreateLabel("_",110,220)
    GUICtrlCreateLabel("_",120,220)
    GUICtrlCreateLabel("_",130,220)
    GUICtrlCreateLabel("_",140,220)
    GUICtrlCreateLabel("_",150,220)
    GUICtrlCreateLabel("_",160,220)
    GUICtrlCreateLabel("_",170,220)
    GUICtrlCreateLabel("_",180,220)
    GUICtrlCreateLabel("_",190,220)
    GUICtrlCreateLabel("_",200,220)
    GUICtrlCreateLabel("_",210,220)
    GUICtrlCreateLabel("_",220,220)
    GUICtrlCreateLabel("_",230,220)
    GUICtrlCreateLabel("_",240,220)
    GUICtrlCreateLabel("_",250,220)
    GUICtrlCreateLabel("_",260,220)
    GUICtrlCreateLabel("_",270,220)
    GUICtrlCreateLabel("_",280,220)
    GUICtrlCreateLabel("_",290,220)
    GUICtrlCreateLabel("_",300,220)
    GUICtrlCreateLabel("_",310,220)
    GUICtrlCreateLabel("_",320,220)
    ;---------------------------------------------------------------------------------------------------------------

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

    $fertigbutton = GUICtrlCreateButton("Fertig",270,370,50,25)
    $tippbutton = GUICtrlCreateButton("Lösung",200,370,60,25)
    $backbutton = GUICtrlCreateButton("Zurück zum Menü",10,370,100,25)

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

    GUISetState()

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

    While 1

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

    $msg = GUIGetMsg()

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

    Switch $msg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $backbutton
    GUIDelete($l1GUI)
    GUISetState(@SW_SHOW,$hGUI)
    Case $fertigbutton
    If GUICtrlRead($15input) = "7" And GUICtrlRead($16input) = "9" And GUICtrlRead($18input) = "6" And GUICtrlread($19input) = "1" And GUICtrlRead($21input) = "3" And GUICtrlRead($22input) = "8" And GUICtrlRead($23input) = "7" And GUICtrlRead($24input) And GUICtrlRead($27input) = "1" And GUICtrlRead($34input) = "6" And GUICtrlRead($35input) = "1" And GUICtrlRead($36input) = "8" And GUICtrlRead($38input) = "2" And GUICtrlRead($39input) = "5" And GUICtrlRead($41input) = "5" And GUICtrlRead($43input) = "7" And GUICtrlRead($47input) = "2" And GUICtrlRead($48input) = "8" And GUICtrlRead($49input) = "4" And GUICtrlRead($52input) = "5" And GUICtrlRead($54input) = "9" And GUICtrlRead($55input) = "3" And GUICtrlRead($56input) = "2" And GUICtrlRead($58input) = "7" And GUICtrlRead($61input) = "8" And GUICtrlRead($62input) = "6" And GUICtrlRead($63input) = "1" And GUICtrlRead($67input) = "3" And GUICtrlRead($69input) = "9" And GUICtrlRead($71input) = "1" And GUICtrlRead($72input) = "6" And GUICtrlRead($74input) = "4" And GUICtrlRead($75input) = "2" And GUICtrlRead($76input) = "5" And GUICtrlRead($83input) = "4" And GUICtrlRead($86input) = "7" And GUICtrlRead($87input) = "5" And GUICtrlRead($88input) = "3" And GUICtrlRead($89input) = "6" And GUICtrlRead($91input) = "7" And GUICtrlRead($92input) = "5" And GUICtrlRead($94input) = "3" And GUICtrlRead($95input) = "4" Then
    MsgBox(0,"Richtig","Richtig")
    Else
    MsgBox(0,"Fehler","Da ist noch ein Fehler. Kontrolliere lieber noch einmal!!")
    EndIf
    Case $tippbutton
    GUICtrlSetData($15input,"7")
    GUICtrlSetData($16input,"9")
    GUICtrlSetData($18input,"6")
    GUICtrlSetData($19input,"1")
    GUICtrlSetData($21input,"3")
    GUICtrlSetData($22input,"8")
    GUICtrlSetData($23input,"7")
    GUICtrlSetData($24input,"4")
    GUICtrlSetData($27input,"1")
    GUICtrlSetData($34input,"6")
    GUICtrlSetData($35input,"1")
    GUICtrlSetData($36input,"8")
    GUICtrlSetData($38input,"2")
    GUICtrlSetData($39input,"5")
    GUICtrlSetData($41input,"5")
    GUICtrlSetData($43input,"7")
    GUICtrlSetData($47input,"2")
    GUICtrlSetData($48input,"8")
    GUICtrlSetData($49input,"4")
    GUICtrlSetData($52input,"5")
    GUICtrlSetData($54input,"9")
    GUICtrlSetData($55input,"3")
    GUICtrlSetData($56input,"2")
    GUICtrlSetData($58input,"7")
    GUICtrlSetData($61input,"8")
    GUICtrlSetData($62input,"6")
    GUICtrlSetData($63input,"1")
    GUICtrlSetData($67input,"3")
    GUICtrlSetData($69input,"9")
    GUICtrlSetData($71input,"1")
    GUICtrlSetData($72input,"6")
    GUICtrlSetData($74input,"4")
    GUICtrlSetData($75input,"2")
    GUICtrlSetData($76input,"5")
    GUICtrlSetData($83input,"4")
    GUICtrlSetData($86input,"7")
    GUICtrlSetData($87input,"5")
    GUICtrlSetData($88input,"3")
    GUICtrlSetData($89input,"6")
    GUICtrlSetData($91input,"7")
    GUICtrlSetData($92input,"5")
    GUICtrlSetData($94input,"3")
    GUICtrlSetData($95input,"4")
    EndSwitch

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

    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit]
  • Bakku

    ich bearbeite gerade dein sudoku da ich gerade nichts zu tun habe

    ich baue es noch ein wenig aus

    ich postes hier hin wenns fertig ist
    ;)

  • Ich habe mal ein Sudoku gemacht

    Weil dein Entscheider Script es dir befohlen hat? 8|;)

    schöner wärs wenn es mehrere Sudokus zur auswahl gäbe

    Das stimmt, eins ist dann doch etwas langweilig :S

    Mit Faulheit kommt man(n) nicht weiter im Leben

    Wolln wa mal deine Vergleichsarbeit(lernstandserhebung und wie die dinger alle heißen) heute abwarten :D

    ich postes hier hin wenns fertig ist

    Ich warte mit freude drauf :thumbup: (würds ja selber machen, aber wenig zeit wegen Zentralen Prüfungen (lernen) :thumbdown: )