Beiträge von Techmix

  • Quick Draw Text zeichnen

    Hi!

    Also ich habe ja auch schon Hier oder da mal mit der QD gearbeitet, und du mußt erst die Surface erstellen - dann geht´s auch mit der Font!

    Spoiler anzeigen
    [autoit]

    $GFX_Gui = GUICreate($_Caption, $GFX_Gui_Width, $GFX_Gui_Height, 0, 0, $WS_POPUP)
    GUISetBkColor(0x000000)
    _QuickDraw_CreateSurface($GFX_Gui, 0, 0, $GFX_Gui_Width, $GFX_Gui_Height)
    GUIDelete($GFX_Gui)
    $GFX_Gui = GUICreate($_Caption, $GFX_Gui_Width, $GFX_Gui_Height, 0, 0, $WS_POPUP)
    _QuickDraw_CreateSurface($GFX_Gui, 0, 0, $GFX_Gui_Width, $GFX_Gui_Height)
    GUISetState()
    $_Txt_DebugFont = _QuickDraw_CreateFont("Arial")

    [/autoit]

    bzw. in deinem Falle:

    Spoiler anzeigen
    [autoit]

    #include "QuickDraw.au3"
    #include <Misc.au3>

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

    _QuickDraw_enable('Meine GUI',800,480,0,0,False)
    _QuickDraw_SetLineWidth( 10 )
    _QuickDraw_SetRenderTarget( $Normal_Buffer)
    $normalFont = _QuickDraw_CreateFont( 'Arial')
    MsgBox(0,0,$normalfont) ;Gibt mir den Wert 0 zurück

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

    While Not _IsPressed('1B')
    _QuickDraw_ClearBuffer( 0xFFFFFFFF )
    _QuickDraw_Text( 100,100, 'Jetzt sollte es gehen!', 28, $normalFont, $Draw_LINE, 0xFF009400)
    _QuickDraw_SwapBuffers()
    WEnd

    [/autoit]

    Und der Text kann nur Einzeilig ausgegeben werden, ein @crlf oder so hilft nicht - musste bedenken!

    Grüsse!

  • _IELoadWait bei JS-Fehler

    Hallo!
    Als du könntest es so probieren:

    Spoiler anzeigen
    [autoit]

    while 1
    if _ProcessGetCPU("iexplore.exe") = 0 then ExitLoop
    WEnd
    Func _ProcessGetCPU($strProcess = "Idle", $iSampleTime = 500, $sComputerName = @ComputerName)

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

    ;~ All Parameters are optional:
    ;~ - Idle process will be measured if first parameter is not set
    ;~ - 500 ms is default sample time
    ;~ - This computer will be measured by default
    ;~ Process could be string ("Name") or PID number (1234)
    ;~ When more processes are runing with identical name, then the last opened is measured (use PID for other)
    ;~ For NORMAL MODE(one time measuring): set Sample value to more than 0 ms
    ;~ ( average CPU usage will be measured during sleep time within function)
    ;~ For LOOP MODE (continuous measuring): set Sample value to 0 ms
    ;~ ( average CPU usage will be measured between two function calls )
    ;~ Total CPU usage is: ( 100 - _ProcessGetCPU())
    ;~ Success: Returns process CPU usage in percent
    ;~ (Sample times below 100ms may return inaccurate results)
    ;~ (First result in Loop Mode may be inaccurate,
    ;~ because first call in Loop Mode is only used to trigger counters)
    ;~ Failure: Returns -1 ( wrong process name or PID )
    ;~ : Returns -2 ( WMI service not found or Computer not found)

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

    if $strProcess = "" then $strProcess = "Idle"
    if $iSampleTime = "" AND IsString($iSampleTime) then $iSampleTime = 500
    if $sComputerName = "" then $sComputerName = @ComputerName

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

    if not IsDeclared("iP1") AND $iSampleTime = 0 then ;first time in loop mode
    $bFirstTimeInLoopMode = 1
    else
    $bFirstTimeInLoopMode = 0
    endif

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

    if not IsDeclared("iP1") then
    assign("iP1", 0, 2) ;forced global declaration first time
    assign("iT1", 0, 2)
    endif

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

    $objWMIService = ObjGet("winmgmts:\\" & $sComputerName & "\root\CIMV2")
    if @error then return -2

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

    if number($strProcess) then
    $strProcess = " WHERE IDProcess = '" & $strProcess & "'"
    else
    $strProcess = " WHERE Name = '" & $strProcess & "'"
    endif

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

    if $iSampleTime OR $bFirstTimeInLoopMode = 1 then ;skip if Loop Mode, but not First time

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

    $colItems = $objWMIService.ExecQuery ("SELECT * FROM Win32_PerfRawData_PerfProc_Process" & $strProcess)

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

    For $objItem In $colItems

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

    $iT1 = $objItem.TimeStamp_Sys100NS
    $iP1 = $objItem.PercentProcessorTime
    next

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

    if $objItem = "" then return -1 ;process not found

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

    sleep($iSampleTime)
    endif

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

    $colItems = $objWMIService.ExecQuery ("SELECT * FROM Win32_PerfRawData_PerfProc_Process" & $strProcess)

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

    For $objItem In $colItems

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

    $iP2 = $objItem.PercentProcessorTime
    $iT2 = $objItem.TimeStamp_Sys100NS
    next

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

    if $objItem = "" then return -1 ;process not found

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

    $iPP = ($iP2 - $iP1)
    $iTT = ($iT2 - $iT1)

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

    if $iTT = 0 Then return 100 ;do not divide by 0

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

    $iCPU = round( ($iPP/$iTT) * 100, 0)

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

    $iP1 = $iP2
    $iT1 = $iT2
    Return $iCPU
    EndFunc ;==>_ProcessGetCPU() by novaTek ...ver 0.11

    [/autoit]

    ...ist aber ungetestet - weiß nicht genau wegen JS...

    Grüsse!

  • Request an die AutoIT Spezialisten :-)

    Moin, und herzlich Willkommen!

    Als erstes muß man wissen mit welchem Browser du auf die Intranetseite gehst, FF3 und IE sind von Au3 aus zu steuern - bei Chrome & Co gibt es schwierigkeiten.
    Sollen die 'Links' ständig überwacht werden oder eher 'Live' also wenn du das Programm bedienst - beides ist möglich.
    Prinizipiel gibt es mehrere Möglichkeiten dieses zu realisieren, man kann auch z.B. Java-Applets mit ner Bilderkennung steuern.

    So gesehen ist das garnicht sooo kompliziert, je nach dem wie man das lösen will.

    Grüsse!

  • AutoIt3 Compiler/Parser

    Also ich habe mir mal gerade die ISMS (Link von Greenhorn) von TheShadowAE angeguckt 8| Ist ja echt beeindruckend! Ich hätte mit einem viiiel höheren Aufwand gerechnet... So gesehen ist die Idee garnicht mal so abwiegig!

    Also der AutoIt Interpreter wurde mit C++ geschrieben, und jetzt soll AutoIt erneut in C / C++ verfasst werden?? Nunja ich selber habe mir ja schon sehr langwierige AutoIt Funktionen in C geschrieben und der Geschwindigkeitszuwachs lag bei mir bei bis zu 1000%.
    Wenn man das jetzt weiterspinnt, und eben die Autoit Funktionen in Templates packt, einen 'AutoIt Source-Reader' verwendet der erst den AutoIt Source ausliesst, dann die benötigten Templates auswertet, und aus der Summe wird ein C++ Code erstellt. DANN kann man noch etwas mit den Compiler Tricksen, SSE & Co - ausserdem kann man auf eine gewaltige Auswahl von freien Compilern zugreifen! Dadurch Evtl dann sogar Linux&Co...

    Also ich kann C - muss es aber erst wieder etwas Trainieren; und Arbeiten muß ich auch, Familie und Kinder hab ich auch - bleiben meißt nur 1-2 Stunden am späten Abend. ...Ich Denke das ist zuwenig.
    Prinzipiell kann man ja auch C++ mit C mischen, sogesehen ist es gar nicht so schlimm mit welcher Sprache programmiert wird.
    ;)

    Grüsse!

  • AutoIt3 Compiler/Parser

    Batch?? :rofl:

    Nunja, ich Denke Ihr (du) stellt euch das zu leicht vor!

    Ich selber kann zwar einzelne Funktionen in andere Sprachen übersetzten - ABER es basiert eben nicht alles auf DLL-Calls! Übersetze dir mal nen ganzen Ars... voll mit Formeln... Und viele Funktionen mußt dir selber erstellen wie Arraybinarysearch,...

    Ich Denke das würde der Rahmen sprengen!

    Grüsse!

  • AutoIt3 Compiler/Parser

    Und wie stellt ihr euch das mit den Includes und so vor??

    Und ich kann mir das schlecht OHNE den AutoIt Interpreter vorstellen... Sonst müssen ja X-Wieviele Funktionen übersetzt werden! Und ausserdem gibt es in AU3 nicht float-, char-, str- Variablen ; das mußt du dann alles Manuell interpretieren bzw. Auslesen lassen.


    Grüsse

  • Benöte ein programm für Serien Briefe ( schwierige vorraussetzungen )

    AUFGEPASST!
    Das hört sich auch für mich sehr Kommerziell an, derjenige der es macht kriegt nen Zehner - und der´s besitzt verdient ein paar Tausender!

    Soll er sich doch einen Programmierer einstellen, über ne Argentur - Da zahlste 18,50 die STUNDE für 'unsere' Arbeit (is ja nur ein Hobby...)

    Ich kenne sowas... Dann Jault der Auftragsgeber rum, macht ordentlich Druck - verlangt kostenfreie Updates, unterstellt einen iwelche Fehler (meißt Layer8, aber der Programmierer ist immer schuld). Und das nach nem halben Jahr Arbeit...

    Lasst es!

  • reicht GDI+ für Strategiespiel?

    Kommt drauf an...
    ...aber ich würde dir eine Engine an´s Herz legen - diese 'Rendern' schneller und haben (meißtens) weniger CPU-Verbrauch.

    Ich kenne:
    QuickDraw (2D)
    Irrlicht (au3Irr2 2D & 3D)
    GDI+ (wer nicht 2D)
    au3Impact (3D - etwas Kompliziert)
    prospeed (2D - kompliziert)

    Diese habe ich auch nicht umsonst in dieser Reihenfolge vorgeschlagen...

    Grüsse!

  • Arbeitsspeicher freigeben?!?

    Hallo,
    ich wollt nur mal anmerken das die Funktion '_ReduceMemory' die von Autobert vorgeschlagen wurde zwar ganz gut funzt, ABER der Speicherverbrauch wird ausschliesslich vom RAM in die Auslagerungsdatei verlegt. Wenn dein Script viele, viele Stunden läuft kann das zu Problemen und Abstürzen führen.

    Grüsse!