|
You last visited: Today at 10:00
Advertisement
Erstes Programm
Discussion on Erstes Programm within the AutoIt forum part of the Coders Den category.
06/15/2011, 00:18
|
#1
|
elite*gold: 27
Join Date: May 2009
Posts: 1,282
Received Thanks: 210
|
Erstes Programm
Ich habe nun auch mal AutoIt angefangen zu lernen und hier ist nun mein erster "Erfolg". Als erstes hab ich ein K/D Rechner für Shooter gecodet(3-Zeilencode  ) und dann ein Programm-Killer, mit dem man offene Programme schließen kann, indem man einen Teil des Fensternamen eingibt. Und nun habe ich sie in ein Tool geschrieben:
DL: 
Code:
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Multi-Tool", 351, 182, 192, 124)
$menu = GUICtrlCreateMenu("Help")
$item = GUICtrlCreateMenuItem("About", $menu)
$Group1 = GUICtrlCreateGroup("Programm Killer", 8, 8, 137, 105)
$Input1 = GUICtrlCreateInput("", 16, 40, 121, 21)
$Button1 = GUICtrlCreateButton("Kill", 40, 72, 73, 25, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("K/D Rechner", 168, 8, 169, 145)
$Label1 = GUICtrlCreateLabel("Kills:", 184, 32, 25, 17)
$Label2 = GUICtrlCreateLabel("Deaths:", 176, 64, 41, 17)
$Input2 = GUICtrlCreateInput("", 216, 32, 113, 21)
$Input3 =GUICtrlCreateInput("", 216, 64, 113, 21)
$Button2 = GUICtrlCreateButton("GO!", 208, 96, 73, 25, $WS_GROUP)
$Label3 = GUICtrlCreateLabel("", 184, 128, 132, 20)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $item
MsgBox(0,"About", "scripted by simfy" & @LF & "for E*PvP")
Case $Button1
$read = GUICtrlRead($Input1)
WinKill( $read )
Case $Button2
$read1 = GUICtrlRead($Input2)
$read2 = GUICtrlRead($Input3)
GUICtrlSetData($Label3, "Deine K/D ist: " & $read1/$read2)
EndSwitch
WEnd
|
|
|
06/15/2011, 00:23
|
#2
|
elite*gold: 52
Join Date: Oct 2010
Posts: 1,998
Received Thanks: 389
|
Wieso fangen jetzt alle an hier ihre 2 Minuten Programme zu releasen. Wenn man das schon machen muss gibt es auch eine Release-Section, in der man soetwas wunderbar machen kann.
|
|
|
06/15/2011, 12:21
|
#3
|
elite*gold: 30
Join Date: Sep 2009
Posts: 120
Received Thanks: 37
|
Black Hybrid ich mache auch 2 Minuten programme (bin ja anfänger)
und man kann ja nicht gleich als Anfänger ein Programm wofür man 2 monate braucht machen oda?
Simfy ich mag des programm
|
|
|
06/15/2011, 12:59
|
#4
|
elite*gold: 0
Join Date: Jan 2011
Posts: 341
Received Thanks: 67
|
Quote:
Originally Posted by matrix1997
Black Hybrid ich mache auch 2 Minuten programme (bin ja anfänger)
und man kann ja nicht gleich als Anfänger ein Programm wofür man 2 monate braucht machen oda?
Simfy ich mag des programm 
|
Ne aber man kann es in den richtigen Fred stellen ^^
(du bist grad 30m an tor vorbeigerannt)
BlackHybrid tätigte die Feststellung der falschen Sektion nicht der erbrachten leistung!
EDIT: der Post unter meinem ist bitte zu ignorieren, ihm scheint zwar kein Licht aufgegangen, dafür ein Pickel explodiert zu sein.
(stellt sich mir die frage seit wann selbstüberschätzung und die explosionskraft von pickeln den selben nenner haben? der lautet matrix1997 ^^)
|
|
|
06/15/2011, 13:32
|
#5
|
elite*gold: 30
Join Date: Sep 2009
Posts: 120
Received Thanks: 37
|
Hier mal Multitool_V1.1
Will dir nur helfen
#include <ButtonConstants.au3>
#NoTrayIcon
#RequireAdmin
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Multi-Tool", 311, 250, 192, 124)
$menu = GUICtrlCreateMenu("Help")
$item = GUICtrlCreateMenuItem("Credits", $menu)
$Group1 = GUICtrlCreateGroup("WinKiller", 16, 144, 145, 73)
$Input3 = GUICtrlCreateInput("", 32, 160, 113, 21)
$Button2 = GUICtrlCreateButton("Kill", 56, 192, 65, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("KD-Rechner", 16, 16, 145, 113)
$input1 = GUICtrlCreateInput("", 32, 40, 113, 21)
$Input2 = GUICtrlCreateInput("", 32, 64, 113, 21)
$Button1 = GUICtrlCreateButton("Rechne", 48, 96, 73, 25, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Spambot", 168, 16, 129, 201)
$Input4 = GUICtrlCreateInput("Text eingeben", 184, 40, 97, 21)
$Input5 = GUICtrlCreateInput("Wie oft?", 184, 73, 97, 21)
$Input6 = GUICtrlCreateInput("Wie lange warten?", 184, 107, 97, 21)
$Button3 = GUICtrlCreateButton("Spam", 184, 144, 97, 49, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $item
msgbox (0, "Credits", "Von Matrix1997/Idee von Simfy")
Case $button1
$zahl1 = guictrlread ($input1)
$Zahl2 = guictrlread ($input2)
$zahl3 = $zahl1 / $Zahl2
msgbox ( 0 , "KD-Rechner", $zahl3)
Case $Button3
msgbox (0, "Info", "Du hast 5 Sekunden Zeit um auf dein Chat/Editor zu klicken")
sleep(5000)
$text = guictrlread ($Input4)
$anzahl = guictrlread ($input5)
$wartezeit =guictrlread ($input6)
for $i = 1 to $anzahl
sleep ($wartezeit)
send ($text)
send ("{Enter}")
Next
msgbox (0 , "Credits","Von Zoker2010")
exit
Case $Button2
$read = guictrlread ($input3)
winkill ($read)
EndSwitch
WEnd
|
|
|
06/15/2011, 14:33
|
#6
|
elite*gold: 280
Join Date: May 2007
Posts: 2,818
Received Thanks: 3,483
|
Quote:
Originally Posted by matrix1997
Hier mal Multitool_V1.1
Will dir nur helfen
#include <ButtonConstants.au3>
#NoTrayIcon
#RequireAdmin
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Multi-Tool", 311, 250, 192, 124)
$menu = GUICtrlCreateMenu("Help")
$item = GUICtrlCreateMenuItem("Credits", $menu)
$Group1 = GUICtrlCreateGroup("WinKiller", 16, 144, 145, 73)
$Input3 = GUICtrlCreateInput("", 32, 160, 113, 21)
$Button2 = GUICtrlCreateButton("Kill", 56, 192, 65, 17, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("KD-Rechner", 16, 16, 145, 113)
$input1 = GUICtrlCreateInput("", 32, 40, 113, 21)
$Input2 = GUICtrlCreateInput("", 32, 64, 113, 21)
$Button1 = GUICtrlCreateButton("Rechne", 48, 96, 73, 25, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup("Spambot", 168, 16, 129, 201)
$Input4 = GUICtrlCreateInput("Text eingeben", 184, 40, 97, 21)
$Input5 = GUICtrlCreateInput("Wie oft?", 184, 73, 97, 21)
$Input6 = GUICtrlCreateInput("Wie lange warten?", 184, 107, 97, 21)
$Button3 = GUICtrlCreateButton("Spam", 184, 144, 97, 49, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $item
msgbox (0, "Credits", "Von Matrix1997/Idee von Simfy")
Case $button1
$zahl1 = guictrlread ($input1)
$Zahl2 = guictrlread ($input2)
$zahl3 = $zahl1 / $Zahl2
msgbox ( 0 , "KD-Rechner", $zahl3)
Case $Button3
sleep(5000)
msgbox (0, "Info", "Du hast 5 Sekunden Zeit um auf dein Chat/Editor zu klicken")
$text = guictrlread ($Input4)
$anzahl = guictrlread ($input5)
$wartezeit =guictrlread ($input6)
for $i = 0 to $anzahl
sleep ($wartezeit)
send ($text)
send ("{Enter}")
Next
msgbox (0 , "Credits","Von Zoker2010")
exit
Case $Button2
$read = guictrlread ($input3)
winkill ($read)
EndSwitch
WEnd
|
so langsam wird das ganze hier echt peihnlich <.<
wie bereits mehrfach gesagt wurde ist das hier keine release sektion... desweiteren sind diese programme nichteinmal zu lernzwecken brauchbar...
Code:
sleep(5000)
msgbox (0, "Info", "Du hast 5 Sekunden Zeit um auf dein Chat/Editor zu klicken")
wenn ich 5 sekunde warte, und dann dem user sage das er 5sekunden zeit hat, hat er genau 0 sekunden zeit...
Code:
for $i = 0 to $anzahl
will ich x mal etwas tun, so muss ich natürlich bei 1 anfangen zu zählen, da ich sonst (wenn ich mit 0 anfange) x+1 operationen habe...
beispiel: ich will 2 mal etwas tun
dein script fängt an bei 0 die operation auszuführen, incrementiert auf 1 führt nochmals aus, incrementiert auf 2 führt nochmals aus...
--> 3 operationen wurden ausgeführt, obwohl 2 gewünscht waren
wer in einer buttonfunktion, welche eigentlich nur aus diesem winzigen codefitzel besteht, bereits absolut alles falsch macht, was man nur falsch machen kann, sollte seinen post nicht wirklich als hilfe bezeichnen...
|
|
|
06/15/2011, 14:57
|
#7
|
elite*gold: 30
Join Date: Sep 2009
Posts: 120
Received Thanks: 37
|
lolkop alles falsch 2 fehler mit dem 0 to $anzahl
und sonst klappt ja alles oda?
|
|
|
 |
Similar Threads
|
Mein erstes Programm^^
10/19/2010 - Off Topic - 16 Replies
Hi Leute
wusste nicht in welche sektion das gehört also habs hierhin geschrieben
Nun seit heute habe ich mich fürs programmieren interessiert und hab mir ein einsteiger tut auf youtube angeguckt
Dort konnt ich sehen was ich alles mit einem .TXT bzw .bat datei so machen kann
Und dann hab ich einfach mal ein "Programm" erstellt was 5 Befehle ausführen kann
Ich wollte eure meinung hören und Tipps was ich verbessern kann oder was für befehle ich einbauen könnte
also dann ma los wie...
|
Erstes Deutsches All-in-One Multiboxing Programm (Offizieles Legales Programm)
07/10/2010 - World of Warcraft Trading - 2 Replies
Noch nie war Multiboxing leichter, MMObox unterstützt Sie mehrere Charaktere gleichzeit zu spielen,
dabei wird nur ein PC benötigt. MMObox steuert im Hintergrund Ihre Charaktere mit Makros.
Bis zu 5 Cahraktere gleichzeitig steuern
Es wird nur ein PC benötigt
Makrofunktionen für alle Charaktere z.b Alle folgen, essen, trinken, aufsitzen....
|
Mein erstes Programm
03/07/2010 - AutoIt - 4 Replies
Also erstmal Hi an alle ich bin Miro (Miroslav)
Ich habe mir vorgenommen AutoIt zu lernen.
Und wollte mein erstes Programm schreiben hab mich schon bisschen Informiert und hättet ihr vielleicht eine Idee was für ein Programm ich als erstes schreiben könnte?
Und jetz kommt net mit ner einfachen MsgBox und diesem HelloWorld ;)
Freue mich über viele Antworten ;)
|
[C++]Erstes Programm!
09/03/2009 - C/C++ - 4 Replies
#pragma once
namespace xD {
using namespace System;
using namespace System::ComponentModel;
using namespace System::Collections;
using namespace System::Windows::Forms;
using namespace System::Data;
|
All times are GMT +1. The time now is 10:00.
|
|