cs-waffen-guide

  • hallo leute mein cs waffen teil is fertig^^
    hier könnt ohr es dln^^
    Cs Waffen

    Hier is Der code^^

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=c:\dokumente und einstellungen\administrator\desktop\cs-waffen-guide.kxf
    $Form1 = GUICreate("Cs-Waffen-Guide", 546, 586, 237, 115)
    GUISetBkColor(0x000000)
    $text1 = GUICtrlCreateEdit("", 8, 216, 521, 345)
    GUICtrlSetData(-1, "Für Info´s Über Die Waffen Den Jeweiligen Namen Anklicken")
    $Label1 = GUICtrlCreateLabel(" This Is A Cs 1.6 weapon guide", 72, 0, 383, 28)
    GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xFF0000)
    GUICtrlSetBkColor(-1, 0x000000)
    $Button1 = GUICtrlCreateButton("Clock 18", 16, 48, 51, 33, 0)
    $Button2 = GUICtrlCreateButton("USP", 16, 88, 51, 33, 0)
    $Button3 = GUICtrlCreateButton("Kompakt", 16, 128, 51, 33, 0)
    $Button4 = GUICtrlCreateButton("Dessert ", 96, 48, 51, 33, 0)
    $Button5 = GUICtrlCreateButton("Dual", 96, 88, 51, 33, 0)
    $Button6 = GUICtrlCreateButton("FiveSeven", 96, 128, 51, 33, 0)
    $Button7 = GUICtrlCreateButton("Mp 3", 168, 48, 51, 33, 0)
    $Button8 = GUICtrlCreateButton("Auto Shot", 168, 88, 51, 33, 0)
    $Button9 = GUICtrlCreateButton("TMP", 168, 128, 51, 33, 0)
    $Button10 = GUICtrlCreateButton("Mac 10", 248, 48, 51, 33, 0)
    $Button11 = GUICtrlCreateButton("MP5", 248, 88, 51, 33, 0)
    $Button12 = GUICtrlCreateButton("UMP 45", 248, 128, 51, 33, 0)
    $Button13 = GUICtrlCreateButton("P 90", 328, 48, 51, 33, 0)
    $Button14 = GUICtrlCreateButton("Famas", 328, 88, 51, 33, 0)
    $Button15 = GUICtrlCreateButton("M4 A1", 328, 128, 51, 33, 0)
    $Button16 = GUICtrlCreateButton("Scout", 400, 48, 51, 33, 0)
    $Button17 = GUICtrlCreateButton("Bullpup", 400, 88, 51, 33, 0)
    $Button18 = GUICtrlCreateButton("Krieg 550", 400, 128, 51, 33, 0)
    $Button19 = GUICtrlCreateButton("AWP", 480, 48, 51, 33, 0)
    $Button20 = GUICtrlCreateButton("Galli", 480, 88, 51, 33, 0)
    $Button21 = GUICtrlCreateButton("AK 47", 480, 128, 51, 33, 0)
    $Button22 = GUICtrlCreateButton("D3", 168, 168, 51, 33, 0)
    $Button23 = GUICtrlCreateButton("M249", 328, 168, 51, 33, 0)
    $Label2 = GUICtrlCreateLabel("<c> by WoW-Unit", 424, 568, 118, 17)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    GUICtrlSetColor(-1, 0xFFFFFF)
    GUICtrlSetBkColor(-1, 0x000000)
    $Pic1 = GUICtrlCreatePic(".\Cs.bmp", 224, 160, 100, 52, BitOR($SS_NOTIFY,$WS_GROUP))
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    _1()
    Case $Button2
    _2()
    Case $Button3
    _3()
    Case $Button4
    _4()
    Case $Button5
    _5()
    Case $Button6
    _6()
    Case $Button7
    _7()
    Case $Button8
    _8()
    Case $Button9
    _9()
    Case $Button10
    _10()
    Case $Button11
    _11()
    Case $Button12
    _12()
    Case $Button13
    _13()
    Case $Button14
    _14()
    Case $Button15
    _15()
    Case $Button16
    _16()
    Case $Button17
    _17()
    Case $Button18
    _18()
    Case $Button19
    _19()
    Case $Button20
    _20()
    Case $Button21
    _21()
    Case $Button22
    _22()
    Case $Button23
    _23()
    EndSwitch
    WEnd

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

    Func _1()
    $Edit = GUICtrlCreateEdit(FileRead("Clock18.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _2()
    $Edit = GUICtrlCreateEdit(FileRead("USP.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _3()
    $Edit = GUICtrlCreateEdit(FileRead("Kompakt.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _4()
    $Edit = GUICtrlCreateEdit(FileRead("Dessert.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _5()
    $Edit = GUICtrlCreateEdit(FileRead("Dual.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _6()
    $Edit = GUICtrlCreateEdit(FileRead("FiveSeven.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _7()
    $Edit = GUICtrlCreateEdit(FileRead("M3.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _8()
    $Edit = GUICtrlCreateEdit(FileRead("Auto Shot.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _9()
    $Edit = GUICtrlCreateEdit(FileRead("TMP.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _10()
    $Edit = GUICtrlCreateEdit(FileRead("Mac 10.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _11()
    $Edit = GUICtrlCreateEdit(FileRead("MP5.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _12()
    $Edit = GUICtrlCreateEdit(FileRead("UMP45.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _13()
    $Edit = GUICtrlCreateEdit(FileRead("P90.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _14()
    $Edit = GUICtrlCreateEdit(FileRead("Famas.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _15()
    $Edit = GUICtrlCreateEdit(FileRead("M4 A1.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _16()
    $Edit = GUICtrlCreateEdit(FileRead("Scout.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _17()
    $Edit = GUICtrlCreateEdit(FileRead("Bullpup.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _18()
    $Edit = GUICtrlCreateEdit(FileRead("Krieg 550.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _19()
    $Edit = GUICtrlCreateEdit(FileRead("AWP.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _20()
    $Edit = GUICtrlCreateEdit(FileRead("Galli.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _21()
    $Edit = GUICtrlCreateEdit(FileRead("Ak47.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _22()
    $Edit = GUICtrlCreateEdit(FileRead("D3.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

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

    Func _23()
    $Edit = GUICtrlCreateEdit(FileRead("M249.txt"), 8, 216, 521, 345)
    GUISetState()
    EndFunc

    [/autoit]
  • Sowas gehört in Scripte bzw. Projekte :X Könntest du das ganzte bitte als .rar oder .zip speichern? Ich denke, dass man da keine Installation benötigt.

  • Naja, also ich find das ....... is nix.
    Das ganze wäre als HTML oder als doc WESENTLICH intelligenter.

    Warum das ne exe sein muss...kein Plan!

  • Zitat

    Original von WoW-Unit
    ne exe isses weil das mit den txts so besser is und die damit keiner sieht


    ehm die ttx-datein müssen vorhanden sein damit sie überhuapt eingelsen werden?!!!!! sprich nope die txt-dateien werden trotzdem da sein....


    snoozy

  • Also das ganze ist ziehmlich verbesserungswürdig.


    • Ich würde erstmal auf dieses Design vollkommen verzichten. Ich halte nichts von designten GUIs
    • Mehr Infos für die einzelnen Waffen und lass es dir nicht so einfach Anzeigen. Das ist ne Textdatei, dort kann man unter anderem auch Tabs verwenden.
    • Wenn du weiterhin Textdateien verwendest, verschieb sie in einen Ordner, also z.B. so: "Waffen Guide\waffen" und dann ließt du eben die .txt-Dateien aus "Waffen" aus.
    • Ggf keine Textdateien verwenden, oder sie einfach verschlüsseln (Crypt), damit sie nicht jeder editieren kann
    • Man das Editfeld "inaktiv", damit man nichts nebenbei noch reinschreiben kann, schau halt ma bischen durch die Optionen

    Denke das wars erstma

    p.s. .zip brauch ich nimmer, habs mir so geladen + installiert.

  • ich habs auch mal getestet - naja irgendwie viel zu großes Fenster für die Informationen XD brauchst du überhaupt txts? Das kann man auch ohne machen.

  • Moin Zusammen!

    Hm naja fürs Üben ok aber die Infos lassen einwenig zu wünschen übrig!
    Ich zock zwar keen CS aber datt spielt jetz auch keene rolle!
    Hier mal ein paar Tipps:

    *die ganzen text dateien mal als .ini zusammen fassen man kann ja evtl auch unter ne andern dateiendung spechern *.dat oder was weiß ich. dann wären schonmal die ganzen .txt weg
    *die *.ini selber per fileinstall includen nach @tempdir installieren und von dort auslesen
    *beim beenden per OnAutoItExit() ==> siehe hilfe die datei wieder löschen
    *evtl anstatt der buttons tabs erstellen aber das ist auch wieder geschmackssache
    *Du erstellst immer wieder neue editfelder das ist unötig und schwachsinnig, da man den inhalt per GUICtrlSetData immer neu setzen kann
    * um das schreiben im edit feld zu blockieren einfach als style $ES_Readonly verwenden
    *wenn Du schon die GUI einwenig stylen willst, dann kannst du es ja auch durchgehend machen , per GUICtrlSetColor und GUICtrlSetBKColor lassen sich bei vielen Controls die Farben bestimmen.

    Dies soll jetz keine Kritik sein sondern es sind Verbesserungsvorschläge

    Ich denke mal wenn Du das einwenig verbesserst wird das Prog besser ankommen!
    Bin mal gespannt wies am ende aussieht.
    Im anhang ist n pic wie sowas evtl mal aussehen könnte ==> isn pic von meinem Installer^^

  • ok du musst den Aufbau einer .ini-Datei verstehen, dann ist es ganz einfach

    Code
    [glock]
    schuss=20
    ammo=ka
    nochwas=ka
    [sektion2]
    key1=value1
    key2=value2
    [sektion3]
    key1=value1
    key2=value2

    also das in []-Klammern ist ein Sektionsname und darunter sind die keys mit ihren Werten

    Bsp.:

    [autoit]

    $wert = IniRead(@ScriptDir&"\cs.ini", "glock", "schuss", ""); kannst natürlich auch die ini erstellen und in was anderes umbennen :D

    [/autoit]

    Am Besten sich noch in der Hilfe die Sachen anschauen, man kann auch gleich eine ganze Sektion einlesen.

    Einmal editiert, zuletzt von leviathan (28. Juni 2007 um 13:24)

  • moin

    wie ich das mit dem Eidtfeld gmacht hab ? :D
    Das habe ich ja eig schon oben beantwortet: mit GUICtrlSetBKColor + GUICtrlSetColor
    Das mit der .ini ist auch net all zu schwer einfach in der Hilfe mal nach Iniwrite + IniRead ausschau halten, sollte ja machabr sein^^ Du schreibst vorher den inhalt jeder .txt datei als schlüssel in die .ini und ließt das dann halt aus sollte eig nicht schwer sein^^

    Edit: Da war wohl wieder einer schneller^^

    Einmal editiert, zuletzt von DjBasslord (28. Juni 2007 um 13:26)