wie heißt das Spiel?
Beiträge von Schnuffel
-
-
-
Hallo Laith,
siehe Hilfe:
RegRead & RegWrite -
wenn Du ohne Motor Auto fahren kannst,
dann geht das bestimmt auch mit .au3-Dateien... -
ich muß Raupi da Recht geben.
Zitatdas lauscht ob ein bestimmtes Programm...
klingt nicht, als ob das Programm von Dir wäre.
Du willst doch nicht für Programme von Anderen eine Sperre einbauen?Da könnte man ja auf ganz andere Ideen kommen...
Ich möchte ja nicht immer gleich was unterstellen.
Aber bei so grenzwertigen Themen ist es Recht sinnvoll den Umstand etwas genauer zu beschreiben.Wenn der Fenstertitel immer gleich bleibt, kann Dir das vielleicht weiterhelfen:
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]$Test = GUICreate("Test", 213, 106, 347, 179)
[/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW)
If WinExists("Test") Then
sleep(2000)
;dient nur der Veranschauloichung, dass Fenster existiert
WinSetState("Test","",@SW_HIDE)
sleep(2000)
; Abfrage von was auch immer...
WinSetState("Test","",@SW_SHOW)
EndIfWhile 1
[/autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEndMit der Prüfung würde ich einen Timestamp erstellen in der Registry und über Atomzeit vergleichen.
Nachteil: kein Internet --> kein Program...zweiter Ansatz:
Arbeite nicht mit Zeit sondern mit einer festen Anzahl Aufrufe des Programms.
Dazu sind die meisten kommerziellen Programmierer auch übergegangen eben wegen der Zeitverstell-Probleme. -
Hallo Jam00,
Zitat aus der Hilfe dazu:
Zitatfilename filename of the picture to be loaded : supported types BMP, JPG, GIF(but not animated).
-
Hallo videotuner und willkommen,
versuch es doch mal so:
Spoiler anzeigen
[autoit]Local $var, $var2, $input
[/autoit] [autoit][/autoit] [autoit]
$input = InputBox("Programmführer", "Tippen Sie OK ein.")Switch $input
[/autoit]
Case "OK"
$var = MsgBox(0, "Sie haben OK eingegeben", "Sie haben OK eingegeben")
Case Else
$var2 = MsgBox(0, "Sie haben nicht OK eingegeben", "Sie haben nicht OK eingegeben")
EndSwitch -
@r1fLeX
1. eine solche "Geschichte" läßt erahnen, worum es geht.
2. Ein Bot ist ein Bot, da gibt es keine guten Spiele.
Basta. -
ich bitte mein Mißtrauen zu entschuldigen.
Aber wer kaum die Funktion MouseClick kennt, und damit ein ganzes Speil programmiert, da bin ich echt beeindruckt.Hab selten eine so "nette" Story gehört, um den PixelSearch erklärt zu bekommen.
Ich will ja nicht behaupten, dass es dabei "nur" um einen BOT geht...Könntest Du Dein Spiel mal posten juby?
-
Hallo xXTobi93Xx,
ich denke die beste Motivation kommt von innen.
Ich bin sicher, dass auch Dir manche Dinge an Deinem Windows-System nicht 100% gefallen.
Dass wäre doch der beste Ansatz um etwas umzusetzen.Stell Dir vor Du gehst zu einem Autohändler und kaufst ein Auto.
Kaum hast Du den Schlüssel in der Hand fragst Du den Händler:
Wo soll ich jetzt hinfahren?
...Da frage ich mich dann, warum Du ein Auto gekauft hast...
( ist nicht Ernst gemeint )Edit:
Natürlich wünsche ich auch Dir einen GUTEN RUTSCH in's neue Jahr...PS: Sobald Du eine Idee hast kannst Du sicher sein, dass Du hier alle Unterstützung erhälst.
-
Ich hab Dein Bild mal in meine Demo von oben eingebaut.
Bitte die Unterschiede selber überprüfen und dementsprechend anpassen
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
#Include <WinAPI.au3>Global $hGUI, $hImage, $hGraphic, $hImage1
[/autoit] [autoit][/autoit] [autoit]; Create GUI
[/autoit] [autoit][/autoit] [autoit]
$hGUI = GUICreate("Show PNG", 450, 550,-1,-1, BitOR($WS_POPUP,$DS_MODALFRAME,$WS_EX_LAYERED),$WS_EX_ACCEPTFILES);,$DS_SETFOREGROUND)); Load PNG image
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_StartUp()
$hImage = _GDIPlus_ImageLoadFromFile("Back.png")
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")
[/autoit] [autoit][/autoit] [autoit]
GUISetState(); 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($hImage)
_GDIPlus_ShutDown(); Draw PNG image
[/autoit]
Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam)
_WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_UPDATENOW)
_GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
_WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_VALIDATE)
Return $GUI_RUNDEFMSG
EndFunc -
steht in der Hilfe:
GUICtrlCreatePic:PNG can be used with GDI+. See example 3.
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
#Include <WinAPI.au3>Global $hGUI, $hImage, $hGraphic, $hImage1
[/autoit] [autoit][/autoit] [autoit]; Create GUI
[/autoit] [autoit][/autoit] [autoit]
$hGUI = GUICreate("Show PNG", 350, 301); Load PNG image
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_StartUp()
$hImage = _GDIPlus_ImageLoadFromFile("MAIN.png")
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")
[/autoit] [autoit][/autoit] [autoit]
GUISetState(); 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($hImage)
_GDIPlus_ShutDown(); Draw PNG image
[/autoit]
Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam)
_WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_UPDATENOW)
_GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
_WinAPI_RedrawWindow($hGUI, 0, 0, $RDW_VALIDATE)
Return $GUI_RUNDEFMSG
EndFunc -
siehe AutoIt Hilfe --> GUISetIcon
-
Hallo BugFix,
für die _SQLite_EXEC brauchst Du eigentlich keine @error-Abfrage.
Die steht doch schon in der Funktion _SQLITE_EXEC selbst drin, oder?Spoiler anzeigen
If @error > 0 Then
Return SetError(1, 0, $SQLITE_MISUSE) ; DllCall Error
EndIf -
ich denke in Vertretung aller kann man auf Deine Frage nur antworten:
NEIN.Ich fürchte aber, dass Du den Fehler begehst, etwas machen zu wollen und Deine Lösungssuche schon von vornherein einschränkst,
indem Du die Lösung Deiner Wahl schon präsentierst und nur noch hinterfragst ob das auch geht, anstatt einfach Dein Problem zu schildern.Man kann fast alles machen.
Die Lösung sieht aber meistens anders aus, als man sich das selber mit dem vorhandenen Wissen vorstellen kann.Daher mein Vorschlag:
Stelle Dein Problem vor und lass andere für Dich denken.
Von den Ideen können wir dann alle profitieren. -
irgendein Zeilenumbruch ist da schon drin.
Siehe:Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>$Form1 = GUICreate("Form1", 352, 82, 374, 242,-1, 0x10)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$input = GUICtrlCreateInput("", 34, 16, 200, 21)
guictrlsetstate(-1,8)
$edit = GUICtrlCreateEdit("", 34, 42, 200, 21)
guictrlsetstate(-1,8)
$start1 = GUICtrlCreateButton("start1", 264, 16, 75, 25, 0)
$start2 = GUICtrlCreateButton("start2", 264, 40, 75, 25, 0)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $start1
variante1()
case $start2
variante2()
EndSwitch
WEndfunc variante1()
[/autoit] [autoit][/autoit] [autoit]
$bla = GUICtrlRead($input)
ConsoleWrite("-"&$bla&"-" & @CRLF)
if not FileExists($bla) Then
MsgBox(48,"Achtung!", $bla)
Else
MsgBox(48,"Achtung!", "alles ok")
EndIf
EndFuncfunc variante2()
[/autoit]
$bla = GUICtrlRead($edit)
ConsoleWrite("-"&$bla&"-" & @CRLF)
if not FileExists($bla) Then
MsgBox(48,"Achtung!", $bla)
Else
MsgBox(48,"Achtung!", "alles ok")
EndIf
EndFuncWenn Du den Text aus Control 1 in das Edit-Control kopierst, funktioniert Deine Abfrage.
Nur bei Drag&Drop wird automatisch ein Zeilenumbruch eoingefügt.
Ob man den unterdrücken kann weiß ich leider nicht. Hab iin der Hilfe so nix gesehen. -
Hi,
hab nur einen kleinen Verbesserungsvorschlag:
Damit die Fortschrittsanzeige beim Indexieren egal bei wieviel Elementen immer bis zum Ende läuft...
Deine Zeile 327 ersetzt:Spoiler anzeigen
[autoit]ProgressSet(100/UBound($array)*$i, $i & " von " & UBound($array) -1 & " Elemente gespeichert.")
[/autoit] -
Hallo Padmak,
das mit den mehrzeiligen Dos-Befehlen würde ich so lösen:
im Temp-Ordner eine .bat Datei erstellen
Befehle mit FilewriteLine in die Batch schreiben
und dann diese mit RunWait und Parameter @SW_HIDE starten -
bei mir auch
-
probier das mal aus:
Spoiler anzeigen
[autoit]#include <GuiConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#include <GuiListView.au3>$Path_LandOfTheDead = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\UNREAL TECHNOLOGY\INSTALLED APPS\LANDOFTHEDEAD", "Folder")
[/autoit] [autoit][/autoit] [autoit]$Form1 = GUICreate("test")
[/autoit] [autoit][/autoit] [autoit]
$List = _GUICtrlListView_Create($Form1, "123", 10, 10, 200, 300)
$Add = GUICtrlCreateButton("add", 250, 10, 50, 20)
$Rem = GUICtrlCreateButton("rem", 250, 30, 50, 20)
$Save = GUICtrlCreateButton("save", 250, 60, 50, 20)
$Text = GUICtrlCreateInput("", 10, 320, 150, 18)GUISetState(@SW_SHOW)
[/autoit] [autoit][/autoit] [autoit]While (1)
[/autoit] [autoit][/autoit] [autoit]
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $Add
_GUICtrlListView_AddItem($List, GUICtrlRead($Text))
Case $msg = $Rem
_GUICtrlListView_DeleteItemsSelected($List)
Case $msg = $Save
for $i = 0 to _GUICtrlListView_GetItemCount($List) -1
IniWrite("TEST.ini", "AdvancedEngine.AdvancedMapList", "Maps"&$i&"= ", _GUICtrlListView_GetItemText($List, $i))
NextEndSelect
[/autoit]
WEndDu musst dir halt darüber klar sein, dass Du "Maps=" nicht mehrmals verwenden kannst, da er sonst immer überschrieben wird.
Das zuweisen der Variable kannst Du ja in deinem Script ändern...
Maps=maps1 (wenn Du diese Map aus der ini ausliest...)
Maps=maps2 (wenn Du diese Map aus der ini ausliest...)