Neues Update, ist zwar noch Buggy, aber etwas weniger 
Download
Beiträge von PrideRage
-
-
Also ich würde es so machen, das du einfach diese Datei ausführst:
C:\Programme\Avira\AntiVir Desktop\update.exe
Das ist nämlich das update programm, und man muss nicht unnötig mit dem Systray rumfummeln -
Hi leute, ich habe mal mein eigenes kleines Game erstellt.
Es ist sehr buggy, aber macht schon ein bisschen spass
Das prinzip ist einfach, mit den richtungstasten steuert ihr den Brick, mit WASD den Ball.
Ein Ziel gibt es zwar nicht, aber für 2 Spieler sehr funny
Wer Bugs beheben will, der kann das Script verändern, und mit seine Datei geben, wenn sie mir gefällt, wird sie hier rein gestellt.
Da ich keine ahnung habe, warum das Game so buggy ist, werde ich auch nicht weiter daran arbeiten.
Es ist eig. auch nur ein Test Game also keine dummen Kommentare.
Im Ordner ist auch noch ein Bild, das ich gemacht habe, als ich das Script Kompiliert habe, denn
da kam eine Virus warnung es ist aber nicht gefährlich, der Source-Code ist ja dabei.
Download: Hier
Viel Spass -
Naja ich würde für das Game kein Geld ausgeben, denn sie sagt ja, es ist kostenlos, und aufeinmal muss man dann doch was kaufen...
-
Dann mach es doch so, das geklickt wird, wenn die Seite mit www.........aspx?guid= anfängt.
-
So gehts auch, aber mit While Schleife.
Spoiler anzeigen
[autoit]
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>$Form1 = GUICreate("Form1", 640, 480)
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW)While 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
$close = MsgBox(4, "Schliessen", "Möchtest du wirklich schliessen?")
If $close <> 7 Then
Exit
Else
MsgBox(0, "Nicht Geschlossen", "Das Programm wurde nicht geschlossen, und läuft weiter.")
EndIf
EndSwitch
WEnd -
Naja, wenn du AutoIt noch nicht so beherrschst, solltest du etwas einfacheres machen.
-
Und wieder mal ist ein AutoItler mehr glücklich
-
Ein einfacher blick in die Hilfedateien hätte geholfen
hier ist mal ein Script aus einer dieser Hilfedateien.Spoiler anzeigen
[autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <ScreenCapture.au3>
#include <WinAPI.au3>
#include <GuiConstantsEx.au3>Opt("MustDeclareVars", 1)
[/autoit] [autoit][/autoit] [autoit]; ===============================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Description ...: Shows how to slice up an image and then put it back together
; Author ........: Paul Campbell (PaulIA)
; Notes .........:
; ===============================================================================================================================; ===============================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Global variables
; ===============================================================================================================================
Global $iI, $hBitmap, $hGraphic, $hGUI, $hImage, $aSlice[4]; ===============================================================================================================================
[/autoit] [autoit][/autoit] [autoit]
; Main
; ===============================================================================================================================; Capture screen region
[/autoit] [autoit][/autoit] [autoit]
$hBitmap = _ScreenCapture_Capture("", 0, 0, 400, 400); Create GUI
[/autoit] [autoit][/autoit] [autoit]
$hGUI = GUICreate("Slicer", 400, 400)
GUISetState(); Initialize GDI+ library
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_Startup(); Slice up screen capture into 4 equal parts
[/autoit] [autoit][/autoit] [autoit]
$hImage = _GDIPlus_BitmapCreateFromHBITMAP($hBitmap)
$aSlice[0] = _GDIPlus_BitmapCloneArea($hImage, 0, 0, 200, 200)
$aSlice[1] = _GDIPlus_BitmapCloneArea($hImage, 200, 0, 200, 200)
$aSlice[2] = _GDIPlus_BitmapCloneArea($hImage, 0, 200, 200, 200)
$aSlice[3] = _GDIPlus_BitmapCloneArea($hImage, 200, 200, 200, 200); Show each slice
[/autoit] [autoit][/autoit] [autoit]
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
for $iI = 0 to 3
_GDIPlus_GraphicsDrawImage($hGraphic, $aSlice[$iI], 100, 100)
Sleep(2000)
next; Stitch slices back together again and display
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_GraphicsDrawImage($hGraphic, $aSlice[0], 0, 0)
_GDIPlus_GraphicsDrawImage($hGraphic, $aSlice[1], 200, 0)
_GDIPlus_GraphicsDrawImage($hGraphic, $aSlice[2], 0, 200)
_GDIPlus_GraphicsDrawImage($hGraphic, $aSlice[3], 200, 200); Loop until user exits
[/autoit] [autoit][/autoit] [autoit]
do
until GUIGetMsg() = $GUI_EVENT_CLOSE; Clean up resources
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_GraphicsDispose($hGraphic )
_GDIPlus_ImageDispose ($aSlice[0])
_GDIPlus_ImageDispose ($aSlice[1])
_GDIPlus_ImageDispose ($aSlice[2])
_GDIPlus_ImageDispose ($aSlice[3])
_GDIPlus_GraphicsDispose($hImage )
_WinAPI_DeleteObject ($hBitmap ); Shut down GDI+ library
[/autoit]
_GDIPlus_ShutDown()
Die Funktion die dir weiterhilft ist _GDIPlus_BitmapCloneArea
Hoffe das hat erstmal geholfen. -
-
Ich finde das Script ist lustig, aber nicht wirklich nützlich, eher anhänglich
-
Naja besser wäre es so:
[autoit]
[/autoit]
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $pic1
GUICtrlSetImage($Pic1, "C:\Dokumente und Einstellungen\Philipp\Eigene Dateien\Programme\Programme\On.bmp")
EndSwitch
WEnd -
Ich vermute mal, das du ein GUI hast, also füge diesen Code schnippsel in deine Switch schleife ein.
[autoit]Case $pic2
[/autoit]
GUICtrlSetImage($Pic1, "C:\Dokumente und Einstellungen\Philipp\Eigene Dateien\Programme\Programme\On.bmp") -
Mal eine frage, wozu brauchst du das ?
-
Ich glaube das geht nicht, denn man müsste ja die IP in $a schreiben, aber wenn man z.B. 25.241.122.24 eingibt, wird es nicht als nummer erkannt, da es mehr als 1 Punkt hat, deswegen muss man die Zahl in "" setzen, aber dann kann man nur IsString abfragen.
-
Trojan
Danke, es funktioniert jetzt. Muss nur den pfad einstellen -
Hallo leute.
[autoit]
Ich komme direkt zu mein em problem, wenn ich auf meiner Tastatur die Taste mit dem Musik zeichen drücke, öffnet sich der Media Player nicht, sonder ein Nero Ordner.
Jetzt wollte ich ein Script machen, der diese Funktion umleitet., hier der Source Code
[/autoit][autoit][/autoit][autoit]
#include <Misc.au3>While 1
[/autoit]
If _IsPressed("{LAUNCH_MEDIA}") Then
Run("wmplayer.exe")
EndIf
WEndDoch das geht nicht, das Script reagiert nicht auf das LAUNCH_MEDIA, kennt jemand eine lösung ?
-
Ist dir gut gelungen, aber auch n bissel viel Text für eine funktion
-
Also ich find den Player gut, die Icons haben so was toon style mäßiges, aber ich brauche keinen Player, habe schon den guten alten Windows Media Player, der reicht total
-
Versuchs so:
[autoit]
[/autoit]
While 1
WinActivate($title)
$coord = PixelSearch(349, 64, 349, 64, 0x554233)
If @error Then
ControlSend($title, "", "", "{TAB}")
ExitLoop
EndIf
Sleep(1)
WEnd
Mit ExitLoop wir die schleife verlassen.