Beiträge von autoBert

**autoBert**

Hallo LuZ1F3R,
da ich keinen Roter habe, heir einmal da abgespeckte Skript:

Spoiler anzeigen

[autoit]

#include <IE.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

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

$Username = "root"
$PW = "xxxxxxx"

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

#region ### START Koda GUI section ### Form=
$Form2 = GUICreate("EasyBox 602 Manager", 591, 349, 464, 189)
$Group1 = GUICtrlCreateGroup(" Informationen ", 8, 8, 369, 329, $BS_FLAT)
$List1 = GUICtrlCreateList("", 16, 24, 353, 305, BitOR($WS_VSCROLL, $WS_BORDER))
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button3 = GUICtrlCreateButton("Fenster schließen", 392, 312, 187, 25, $WS_GROUP)
$Group2 = GUICtrlCreateGroup("Befehle", 384, 8, 201, 177)
$Button1 = GUICtrlCreateButton("Neue IP besorgen", 392, 24, 187, 73, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Aktuelle Verbindungsinfos", 392, 104, 187, 73, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
; Case $GUI_EVENT_CLOSE, $Button3 so geht es auch dann sparst du dir den case $Button3
Exit
Case $Button2
MsgBox(0,"","Button 2")
#cs
$ie=_IECreate("http://192.168.2.1", 0, 0)
$form = _IEGetObjById($ie,'tF')
$object = _IEGetObjByName($ie,'user')
_IEFormElementSetValue($object, $Username)
$object2 = _IEGetObjByName($ie,'pws')
_IEFormElementSetValue($object2, $PW)
_IEFormSubmit($form)
_IEQuit($ie)
;eingeloggt
_GUICtrlListBox_ResetContent($List1)
GUICtrlSetData($List1, "Verbindungsinformationen:")
GUICtrlSetData($List1, "--------------------------------------")

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

$ie=_IECreate("http://192.168.2.1/status_main.stm", 0, 0)
$form = _IEGetObjById($ie,'tF')
$object = _IEGetObjByName($ie,'user')
_IEFormElementSetValue($object, $Username)
$object2 = _IEGetObjByName($ie,'pws')
_IEFormElementSetValue($object2, $PW)
_IEFormSubmit($form)

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

$body = _IEBodyReadTEXT($ie)
$bodyArray = StringSplit($body, @LF)
For $x=1 to $bodyArray[0]
If StringInStr($bodyArray[$x],"adsl:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Verbindung: " & $bodyToken[2] & " " & $bodyToken[3])
EndIf
If StringInStr($bodyArray[$x],"modus:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Modus: " & $bodyToken[3] & " " & $bodyToken[4])
EndIf
If StringInStr($bodyArray[$x],"download:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Download: " & $bodyToken[2] & " " & $bodyToken[3] & "kbps")
EndIf
If StringInStr($bodyArray[$x],"upload:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Upload: " & $bodyToken[2] & " " & $bodyToken[3] & "kbps")
EndIf
If StringInStr($bodyArray[$x],"wan ip:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Wan IP: " & $bodyToken[3] & " " & $bodyToken[4])
EndIf
If StringInStr($bodyArray[$x],"dhcp server:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "DHCP Server: " & $bodyToken[3])
EndIf
If StringInStr($bodyArray[$x],"Anzahl DHCP-Clients")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "DHCP Clients connected: " & $bodyToken[3] & " " & $bodyToken[4])
EndIf
Next
_IEQuit($ie)
#ce
Case $Button3
MsgBox(0,"","Button 3")
Exit
Case $Button1
MsgBox(0,"","Button 1")
#cs
GUICtrlSetData($List1, "")
; #######################################################
; Neu Verbinden
; #######################################################
; Loginform
$IE=_IECreate("http://192.168.2.1", 0, 1)
$form = _IEGetObjById($ie,'tF')
$object = _IEGetObjByName($ie,'user')
_IEFormElementSetValue($object, $Username)
$object2 = _IEGetObjByName($ie,'pws')
_IEFormElementSetValue($object2, $PW)
_IEFormSubmit($form)
_GUICtrlListBox_ResetContent($List1)
GUICtrlSetData($List1, "Restarte Internetverbindung")
GUICtrlSetData($List1, "Dies wird ca 20 Sekunden dauern.")
GUICtrlSetData($List1, "Bitte warten...")
Sleep(2000)
;Zum Button navigieren
;Hier Anpassen!!!!
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{TAB}")
Send("{SPACE}")
_IEQuit($IE)
Sleep(20000)
; Neu Verbunden
$ie=_IECreate("http://192.168.2.1", 0, 0)
$form = _IEGetObjById($ie,'tF')
$object = _IEGetObjByName($ie,'user')
_IEFormElementSetValue($object, $Username)
$object2 = _IEGetObjByName($ie,'pws')
_IEFormElementSetValue($object2, $PW)
_IEFormSubmit($form)
_IEQuit($ie)
;eingeloggt
GUICtrlSetData($List1, "Verbindungsinformationen:")
GUICtrlSetData($List1, "--------------------------------------")

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

$ie=_IECreate("http://192.168.2.1/status_main.stm", 0, 0)
$form = _IEGetObjById($ie,'tF')
$object = _IEGetObjByName($ie,'user')
_IEFormElementSetValue($object, $Username)
$object2 = _IEGetObjByName($ie,'pws')
_IEFormElementSetValue($object2, $PW)
_IEFormSubmit($form)

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

$body = _IEBodyReadTEXT($ie)
$bodyArray = StringSplit($body, @LF)
For $x=1 to $bodyArray[0]
If StringInStr($bodyArray[$x],"adsl:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Verbindung: " & $bodyToken[2] & " " & $bodyToken[3])
EndIf
If StringInStr($bodyArray[$x],"modus:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Modus: " & $bodyToken[3] & " " & $bodyToken[4])
EndIf
If StringInStr($bodyArray[$x],"download:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Download: " & $bodyToken[2] & " " & $bodyToken[3] & "kbps")
EndIf
If StringInStr($bodyArray[$x],"upload:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Upload: " & $bodyToken[2] & " " & $bodyToken[3] & "kbps")
EndIf
If StringInStr($bodyArray[$x],"wan ip:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "Wan IP: " & $bodyToken[3] & " " & $bodyToken[4])
EndIf
If StringInStr($bodyArray[$x],"dhcp server:")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "DHCP Server: " & $bodyToken[3])
EndIf
If StringInStr($bodyArray[$x],"Anzahl DHCP-Clients")<>0 then
$bodyFound = $bodyArray[$x]
$bodyToken = StringSplit($bodyFound, " ")
GUICtrlSetData($List1, "DHCP Clients connected: " & $bodyToken[3] & " " & $bodyToken[4])
EndIf
Next
_IEQuit($ie)
#ce
EndSwitch
WEnd

[/autoit]

in dem ich keinen Fehler finden kann. Falls du keinen ganz grassen Fehler (den ich dann leider übersehen habe) eingebaut hast sollte das Skript funktionieren, ansonsten schau dir [ offen ] Tutorial: Wie man Script-Fehler erfolgreich sucht/findet bzw. richtig debuggt an,

mfg (Auto)Bert

**autoBert**

Zitat von MR.Multibot

Ja stimmt es bewirkt immer noch genau dasselber kann man auch anders pausen ein lägen ???(ansstat sleep)

sllep ist die schlechteste Methode, da es das komplete Skript pasiertm
die optimale Methode [autoit]AdlibRegister[/autoit] hat dir Schnitzel bereits gepostet
du kannst es aber auch mit [autoit]TimerInit
TimerDiff[/autoit]lösen

Entscheide dich für eine Methode (ohne sleep) stell dein Skript vor, falls es noch Probleme gibt und dir wid geholfen,

mfg (Ato)Bert

**autoBert**

Schau dir

[autoit]

GuiCtrlSetImage

[/autoit]

an. In meinen MP3-Player (Link siehe Signatur) ändere ich das Hintergrundbild (falls vorhanden) bei jedem neuen Titel
Edit: zu langsam

mfg (Auto)Bert

**autoBert**

Zitat von Ubuntu

Das kann ja nicht mal bei Youtube selber. (Oder weisst du wer hinter dem Bildschrim sitzt und Lady Gaga videos hochlädt?)
Man kann nur vermuten.

Der 1. Artikel den ich zu Suche "YouTube Download legal" gesichtet habe, kommt zu folgendem Ergebniss: Zitat aus: http://www.loadblog.de/video-musik/youtu…rboten-erlaubt/

Zitat

...
Nach deutschem Recht ist es nicht erlaubt, Kopien von “offensichtlich rechtwidrigem” Material zu machen, allerdings ist auch das Wort “offensichtlich” umstritten. Beim neuesten Hollywood-Blockbuster ist es natürlich eindeutig — eindeutiger etwa als beim Video eines Teenies, der vor der Kamera seinen Lieblings-Pophit trällert.
...

mfg (Auto)Bert

**autoBert**

Dann schau einmal in den Anhang von diesem Post: [Beispiel] NeMP3-P (MP3-Player) Version 0.8.4.6 ich habe es selbst nur kurz mit MPeg-Files getestet, das ging gut.
Unterstützte Formate: *.avi;*.mpg;*.wmv;*.mov;*.3gp;*.asf;*.mp4;*.flv;*.rv

mfg (Auto)Bert

**autoBert**

Zitat von ProblemUser

Das Abspielen ging ja im VLC oder WMP

Für beides gibt es afaik eine UDF. einfach einmal die SUchFUnktion benutzen,

mfg (Auto)Bert

**autoBert**

Und wie ist es hiermit [ gelöst ] Gui Flash und Bild

mfg (Auto)Bert

**autoBert**

Hallo GE IXI TIM,

damit du Tester findest solltest du dein Skript auf die neue AutoItversion anpassen. Hier ein Beispiel-Skript zu InetGetInfo, da es @inetGetbytesread und @inetgetactive nicht mehr gibt:

Spoiler anzeigen

[autoit]

Global $nKPerSec, $tDiff, $iToDo, $iRTime, $sMSG
Global $iSize = InetGetSize("http://www.autoit.de") ;siehe Hilfe zu InetgetSize
if $iSize = 0 then $iSize = 90000 ;Schätzwert sollte eigentlich nicht vorkommen
$hDownLoad = InetGet("http://www.autoit.de", @ScriptDir & "\Testdownload.htm", 1, 1)
Global $tStart = TimerInit()
Dim $aData[3]

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

Do
Sleep(250)
If $aData[0] > 0 Then
_CalcPerformance($aData[0],$aData[2])
TrayTip("downloading", $sMSG, 10, 16)
EndIf
$aData = InetGetInfo($hDownLoad,-1)
Until $aData[2]
$aData = InetGetInfo($hDownLoad,-1)
_CalcPerformance($aData[0],$aData[2])

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

InetClose($hDownload) ; Handle schließen um die Resourcen freizugeben.
MsgBox(0, "", "Bytes gelesen: " & $aData[0] & @CRLF & _
"Größe: " & $aData[1] & @CRLF & _
"Komplett?: " & $aData[2] & @CRLF & _
"Erfolgreich?: " & $aData[3] & @CRLF & _
"@error: " & $aData[4] & @CRLF & _
"@extended: " & $aData[5] & @CRLF)

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

;FileDelete(@ScriptDir & "\Testdownload.htm")

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

Func _CalcPerformance($iRead,$bDone)
$tDiff = TimerDiff($tStart)
$iToDo = Round(($iSize - $iRead) / 1024, 2)
ConsoleWrite($iRead & "/" & $iSize & @CRLF)
$nKBPerSec = Round($iRead / $tDiff * 1000 / 1024, 2)
if ($iSize = 0) and not $bDone Then
$iRTime = "unbekannt"
Else
$iRTime = Round($iToDo / $nKBPerSec, 0)
EndIf
$sMSG = "bisher heruntergeladen = " & $iRead & @CRLF & "durchschnittlich KB/s = " & $nKBPerSec & @CRLF
If not $bDone Then
$sMSG = $sMSG & "vermutete Restdauer = " & $iRTime
Else
$sMSG = $sMSG & "benötigte Zeit = " & Round($tDiff / 1000, 0)
EndIf
if $iSize > 0 Then $sMSG = $sMSG & " sec"
EndFunc ;==>_CalcPerformance

[/autoit]

mfg (Auto)Bert

**autoBert**

Hallo cr4yzz,

beim Programmende mit [autoit]IniWrite[/autoit] speichern
beim nächsten Programmstart mit [autoit]IniRead[/autoit]lesen
danach mit [autoit]GuiCtrlSetData[/autoit]den Inputs zuweisen,

Edit: Skript:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>

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

GuiCreate("Test",1024,800)
$inp_text = GUICtrlCreateInput("", 16, 416, 177, 21)
$inp_text2 = GUICtrlCreateInput("", 224, 416, 177, 21)
$bt_textsave = GUICtrlCreateButton("Speichern", 224, 480, 105, 17)
GUICtrlSetData($inp_text, IniRead("ini", "SavedVariables", "Text1", ""))
GUICtrlSetData($inp_text2, IniRead("ini", "SavedVariables", "Text2", ""))
GUISetState()

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $bt_textsave
_textsave()
Exit
EndSwitch
WEnd

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

Func _textsave()
$savedtext1 = GUICtrlRead($inp_text)
$savedtext2 = GUICtrlRead($inp_text2)
IniWrite("ini", "SavedVariables", "Text1", $savedtext1)
IniWrite("ini", "SavedVariables", "Text2", $savedtext2)
EndFunc ;==>_textsave

[/autoit]

mfg (Auto)Bert

**autoBert**

Hallo LordKill94,

dein Vorhaben ist in dieser Größe (257*257) nicht durchführbar, denn

Zitat von Hilfe zu AutoIt3 Standardbegrenzungen

GUI_MAXCONTROLS 65532 Maximale Anzahl von Controls in einem GUI-Fenster

mfg (Auto)Bert

**autoBert**

Hallo BurakSZ,

ich bevorzuge zwar den OnEvent-Modus, mache aber kleinere Guis für Optionen auch im GuiGetMsg-Modus, da muss man nur am Anfang dieser Gui

[autoit]

Global $b_OldOnEventMode = Opt("GuiOnEventMode", 0)

[/autoit]

sich beim umschalten den alten Zustand zwischenspeichern und am Ende diesen wieder herstellen

[autoit]

Opt("GuiOnEventMode", $b_OldOnEventMode)

[/autoit]

~~aber eigentlich gehört dieser Thread doch in Off-Topic bzw. Talk, ist zwar AutoIt spezifisch aber keine echte Hilfeanfrage~~

mfg (Auto)Bert

**autoBert**

Hallo Aldi,

das Board hat auch eine SUchFUnktion, wenn du dort nach Flash suchst, bekommst du 331 Treffer, unter anderem auch [ gelöst ] Gui Flash und Bild

mfg (Auuto)Bert

**autoBert**

Hallo crocojunk,

GuiGetMsg hat im OnEvent-Modus nichts zu suchen. Du solltest dir in der Hilfe das Kapitel GUI-Referenz - OnEvent Modus genau durchlesen,

mfg (Auto)Bert

**autoBert**

Zitat von n00b69

Danke schön Kann geclosed werden.

Hier werden nur Threads von Admins/Mods geclosed die den Forenregeln widersprechen.
Du kannst das aber selbst machen, indem du deinen Eröffnungspost bearbeitest, dort den Präfix (nähe Überschrift) auf gelöst stellst und danach speicherst,

mfg (Auto)Bert

**autoBert**

Zitat von tomcat

Compilieren geht.

Autoit datei:
[autoit]
$pid = WinGetProcess("MineSweeper") ;process auswählen
[/autoit] [autoit][/autoit] [autoit]
MsgBox(0,"","PID: " & $pid )
$dll = DllOpen("dll.dll")
;~ MsgBox(0,"Test",DllCall($dll,"int","EnabledebugPriv"))
$ItemName = DllCall($dll,"int","ReadMemoryAdress","int",$pid)
[/autoit] [autoit][/autoit] [autoit]
MsgBox(0,"Return value",$ItemName)
DllClose($dll)
[/autoit]

Gibt 0 aus, müsste wenn minsweeper counter läuft >0 sein.

Alles anzeigen

Dein Skript sieht verdächtig nach etwas aus, was unseren Forenregeln widerspricht.

mfg (Auto)Bert

**autoBert**

Zitat von GE IXI TIM

Würd mich nämlich interessteren...
hab en youtubedownloader gemacht un hat en video im YT dazu...aber meine mutter meinte ich sollt ihn rausmachen, weil wenn en Mod von youtube sieht wie ich werbung mache für ein programm mit dem man sich YT videos ziehen kann...schlecht schlecht

Quelle YouTube-Nutzungsbedingungen:

Zitat

Sie erklären sich damit einverstanden, auf Nutzerübermittlungen (wie unten definiert) oder andere auf der Webseite verfügbar gemachte Inhalte (einschließlich YouTube-Inhalte wie unten definiert) nicht über irgendwelche andere Technologien oder Mittel als die Video-Wiedergabeseiten der Webseite selbst, den YouTube-Player oder solche anderen Mittel zuzugreifen, die YouTube ausdrücklich für diesen Zweck bestimmt;

deine Mutter hat also Recht. Wenn es ein YT-Mod sieht (und stört, da du ja ein Mittel bereit stellst, dass diesen Bestimmungen widerspricht) löscht er dein Video und sperrt dir evtl. deinen Account, den du ja benötigst um Videos hochladen zu können. Der Downloader selbst ist nicht illegal, beim Benutzen kommt es auf den Einzelfall an. Wenn derjenige der das Video downloaded erkennen kann, dass das angebotene Video gegen geltendes Recht bei YouTube angeboten wird, ist es auf jeden Fall illegal

mfg (Auto)Bert

**autoBert**

Hallo tomcat,

poste doch bitte dein Skript und die dazugehörige DLL,

mfg (Auto)Bert

**autoBert**

Hallo n00b69,
schau hier Wenn mal was nicht geht ... bitte zuerst hier nachschauen ... hinein

mfg (Auto)Bert

**autoBert**

Zitat von Cartan12

Sein Binärcode ist falsch...
Versuchs nochmal so:

Dr Binärcode passt, siehe ;Fremddateien "includen" (ohne FileInstall)

wenn man BugFix 's

[autoit]

_CreateTmpBinaryCall($sDataPath, '$data')

[/autoit]

aufruft Schreibt sie automatisch (1* in der Scite-Console und 1* im Clipboard) die Daten und eine Funktion um ein Tmp-File zu schreiben. Hier ein kleines Beispiel-Skript mit den Daten von Skriptbär die als Bild eingebunden werden:

Spoiler anzeigen

[autoit]

#NoTrayIcon
#include <Constants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

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

#include <screencapture.au3>

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

Opt('GUIOnEventMode', 1)
Opt('TrayOnEventMode', 1)
Opt('TrayMenuMode', 1)
Opt("TrayIconHide", 1) ;hide the Trayicon

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

Local $sData = ""
$sData &= "0xFFD8FFE000104A46494600010101004800480000FFDB0043000302020302020303030304030304050805050404050A070706080C0A0C0C0B0A0B0B0D0E12100D0E110E0B0B1016101113141515150C0F171816141812141514FFDB00430103040405040509050509140D0B0D1414141414141414141414141414141414141414141414141414141414141414141414141414141414141414141414141414FFC000110800AA00E303011100021101031101FFC4001D000100010403010000000000000000000000060405070801020309FFC4004210000103030202070504090304030100000100020304051106211231070813224151611432718191154272A1091623336282A2B1C15253E12492A3F05493B2F1FFC4001D010100020301010101000000000000000000040503060702010809FFC4003E1100020103010309070302040701000000000102030411210512310613415161718191A1142232B1C1D1F00742E115F1166272822333525392A2B2D2FFDA000C03010002110311003F00FAA6802008020080200802038E480B7DE3515AB4F53FB45D2E5496D83FDDAC9DB137EAE202C73A90A6B33785DA48A16F5AE65B9420E4FA926DFA102BBF597E8C6CA3336AFA1A8DF87FE843EAB3F389AEDBD792AB9ED8B0A6F12ACBC35F91B351E48EDDAEB31B492EFC47FF00A68B41EB7BD1507F0FEB1CD9F316DAAC7D7B3513FC43B37FEE7A4BEC597F80B942D67985FF009C3FFD176B4759BE8C2F523590EB0A1A771FFE707D281F174AD681F553296D7B0ABF0D65E3A7CF0575C72476EDB2CCED24FF00D3897FF2D9912D977A1BDD232AADF59057D33FDD9A9A41231DF070242B64D49651AA54A73A5270A9169AE87A32AD7D31840100401004010040100401004010040100401004010040100406BE74F7D706C9D0CEA1FD58A6B454DF752985B33A26C822A781AEF778E4DCE48DF01A7623719545B436B52B0F75ACC8E9BC98E425E728EDDDF3A91A74536B2F2E4DAC6711D135AF16D6BD66BA6AAEB4FD236B60F632EADB0D23B6F67B4B3B23FF00D8497E7E040F45CEAEF9497D5DE212DC5D9C7CDEBE583AD597217626CFC39C1D5975CDE9FF008AC2F3C98AAE31D55D2A9D555B5135654B8E5D354486479F8B9C492B5C9D7A955E6A49B7DAF26F5439AB78737462A31EA4925E48EB050679858F7B27B9553DBECFC8E4BC64C7CF14B2DB8E792C8A4668D63DF4F6A1BEE89AFF006CB05DAB6CF539C97D1CC581DF880D9C3D082158DB5EDC5ABCD19B460BCB2B2DA74F9BBDA51A8BB5671DCF8AF068D90E8A7AEFDCE82786835ED20B853121BF6BD0C6192B3D6488775C3D59C38FF495BBD8F29D690BC8F8AFAAFB791C7F6DFE9B539A75B63CF0FF00E893D3FDB2E8EC52CFFA8DBCD33AAED1ACACF05D6C97182E54130EE4D03F233E208E608F1070478ADEA956A75E0AA529653EA386DDD95CD85676F750709AE29FE6ABB568CBB2CC420802008020080200802008020080200802008020080203AB9C18D24EC0203E51F4977D1AF7A57D53AA4BFB58EE15AF34EE3BFEC19DC87FA1AD5C576BDE7B55D4E4B8670BC343F6D6C2B5FE97B1ADAC3838C537FEA97BD2F56CED69881C0216B7332577D2488599F2461C1B90A346A6B82AF9F49E0E91DA9CD7E0B70A52793EBACB1C4AC6595CEFBABD346075D23C27B23867BBF92FA91923708B4D5DA4B49CB57BC13A9D72D72DAC82765EF24C8D6363BA8CD82BDDADB50DC19513456CA6A36C52C0D7111CB2BDF96123912D6B1FBF31C5EAB7CE4AC672AB5679F7525A7465FF006F53907EA5DCD27696F45C539CA4DA7D2925AACF536D77E3B0DD37383065C4019C64AE907E7C394010040100401004010040100401004010040100401018E7AC3EB07686E86B545CE290C756694D2D3381DC4B2911B08F817F17F2955DB46E3D96D2A55EA5A77F05EA6CDC99D9EB6A6D8B6B592CC5C9397FA63EF4BD133E6ADB29C70363C6C0602E1137AE4FD8B5A6F2D920A0A731BC2C4F5455D59E519274F510A9A76823395066B0F4354BAA9B922E7269B05FBB14AA59E9212BBD38970A4D39900F029B822CEEFB4EF57A5C1DF832BD451E617BDA47EE7A4F2D243166704CB4A37DD6462AF4E3E3CF77F25E5D365BC2E933707AA9690FD58E8C5B5523386A2EB50FAB7679860C3183E186717F32EA9C9BB7E66C54DF19B6FE8BE59F13F3FF002DAFFDB76B4A09E94D28FD5FABC7810FEBE5AAE7B6744F4960A395D1555EABA30E2C38708612252E07CF8C423E6A66D8BAF66A0927AC9FF2717E51549FB2AA34DE1C9FA2D7E78308F42FD76B53E801059F5C53CDAA2CCC018CB84647B7423F88938947C4877F11E4AAACF6DE128D7D7B7A4D7AC76F5D5A629DDADF8F5FEE5DFD7F3ED66E97477D30E90E952845469ABE535C5C1A1D25307705445F8E2761CDF8918F2256D74AE29578EF53964DF6D6FADEF23BD4269FCD77AE24CB3BA904E3940719CA03CAAEAA2A2A696A27788E18985EF7BB935A0649FA2F8DA8ACB3E36A2B2CC43A6FAC7D05FAFD151CD6C75BE8A579636B65A80401F74B9BC23841DB3B9C655352DA71A925171C27D253D2DA50A95375C70BAF246BA47EBD9D1868398D3515C26D575CD770BA2B2B0491B7D7B5710C3CBEE92A4D4BFA14F44F3DC42BAE50D85B3DD52DF7FE5D7D745EA6C252CFED34D0CDC0F8BB4607F04830E6E467047815626CA9E564F543E840100401004010040101AE1D73A2A8D45A5AD960A197352D9BED17C00EF2358D731ADF997B88F5605A6F29A7295BAA10E2F5F05F9E8755FD3E70B6BEA979597BA96EA7D4E5AE7C961F6334BE86948C6DBAE4ADE4FD175664AED141ED3818EF05"
$sData &= "E3814B5EA6E191F4A503A22D6B878AF8E19D4D4EFAAA66458AC62A210E6B7C167A5066AB2B8DD96195B4162C38B4B558C68E48F52E7A4AEA9B342DECA3761B24990C69E6703270B3AA4961322C6E65AB5C116BAED301CD3DC5EDD22653BC6BA48D5568C92AE78E9E18F8A595E23603E2E2701788D19CA6A10E2F445B476846941D493D12CBF036E2C96B86C766A1B7D38E182920640C1FC2D6803FB2ED7469468538D28F08A4BC8E0B5EB4AE2ACEB4F8C9B6FBDEA69BF5B8BA1D51D26B28184BA0B3D2361E1CEC247FED1C7E8631FCAB41DBD70A774A9FFD2BD5EBF2C1A56D4CD6AFBAB8451806AF4D870398C6FE8B5ACA650CA8F59647E99968AAD9574924B495519E264D03CB1EC3E61C371F259A156A527983D4852B58EF6F2D1F5A324E97EB23D2D68E63228F533AED4B18C361BB40DA827E3210243FF7ABAA5B6AEE92C379EF27D2BEDA14345572BFCCB3EBC7D499C5D7E35E52465B55A62C752F1F7E2EDA21F42F72B3872827C2505EA497CA0BD871A717E6BEE5B6E7FA42F5F3598A3D2D60A776F974DDBC99F907B567FEBB29708A2155E545FAF86947D5FD8A3D4DD62FA54D67D1B56D7BF53D15A9B2D31924A7A1A18DB1B99C8C65EFE270246C7079ECB0CF69D7AA9C5E123ED5DA77F5ECDD5751474CE8963BB2F3FDCC4D77EB133D5699ABA0A3B53E8AE3510F65ED62A3223CE03CB5BC390719C6FB641F05154D25845054DBAA749C211C49AE3923BD5AB409E90FA74D21667C7C74DEDADAAA9046C628732BC1F88670FF0030532D21CED68A22EC4B7F6BBEA50E84F2FB96A7D8B68C3405B99DDCE50040100401004010040707914069174CDAF9D74E9C6E953049DAD2DB8B6DA1A0FBCD67EF07C4485FF40B90EDBBC94B69CA4B84311FABF56FC8FD11C9AD97CD6C28466B12A999F76748FF00EA979B21FAF747C74B5F05DE89A0D157F78F08D9B2119FEA1BFC43950DED15092AB0F865F3FE7EE6C9B2EFE5383B6ABF143E5FC7CB034FDA8B5ED7614151C9EEEAB2C3327D8AD7B3086EEBDC63D069D735B8E4C9563A01D800E0ACE952C1A8DCD5C3C9778ED6D6BC103656B0A7A15F2B8CAD4836AFA89E1D75666B637BE08CBB87B2767271DEE5E39D8839E5EEED935F71271AF1C7E7E7E2361B08C276159B7ABEBF4E3F4F3EA9FC96B12303B83DE19C2BBE6F28D62371878C9EBA5B4D327D4D4D2B99DCA73DB1C8F11CBF320FC9596CBB5552EE326BE1D7F3C4C3B42F1AB5704FE2D0C9F3CACA782492470646C69739C790006EBA0B6A2B2CD29E86926A8B7CDA82F971BA4C0992B2A249CF178024903E4303E4B8C55A92B8AD3ACFF736CD7AAD1726E4FA48F4BA5DEE3FBB3F45E943040741F516CACD35B96866FE270BC35BBA9865433A60B1D7D803720357C8E7891AA524B42C35361E227B8B3A44295328E2D3F4F0D4092A29C4B1807BA5A0FE457D4D2662E6571922397CA4963A79A9A19A78E85CF2E14BDABBB3E791DDCE3F25923292EE2BABD2F75C53D3ABA3C8825650B1AE76D83BEEA7426F06AF5682523E9D742FD00697D1DACA8F5ED828A3A0757D821A7928181C1B14D2703DF235A49E025AD68C6DCDDE656F96B6F084B9E8E9948ECF61B2EDEDAB2BBA31C6F452C77E1E7B0CF8390CAB4364394010040100401004010168D5FA8A0D23A5AEF7AA9DE1B7D24B54E1E618C2EC7CF18F9AC55AAC68D39559708A6FC897696D3BDB9A76D4FE29C94577B783E65D92E35159739A7AA7F6951572BA691E7EF48E3C4E3F324AE093AAEAD594E7C64DBF33F63D6A10A34634E92F760925DC96119E345C4CD4BA66AECF360C8C6F1C04F81CE47D1DFF00E95AD182B8A12B77C7A3F3BCE6DB464ECEEA1751E1D3F9DDF23A592CE1C1BDDC11B107C151C5B4B0CF7735CC8BA7AD44003854BA70355BAAE4C291EDA56B5B246E67A8190ACE9C92F8960D7AAA75358BC97BA174157FBA91AF23C01DD5D5150A8BDD792AAB29D3F89115BE69BA975FC55BA19087C8E0D91AC69259E032D209EE83B1C72F1DC9A7BBB6ABCFA961E1BE84B8786BC3A1E3EA5DDADE5356EE9E782E197C7C74E3D2B3F426B410326A5696C8D971B12D93B4DFD4E79FA2D8A8C23382DD79F1C9AE55938CDE563C304874ED0F60D965C005C40F90FF00FAB67D954772329BE9FA1537555CDA8F51E1AF2B5D45A5EB783F79337B16FF0036C7F2CA97B466E16D3C717A79E9F22BA6F08C106C01C4343765A0AA04171C9EFF00AB111663802CBECFA0DC4582F3A5590C4E2D6649F151A76FA98274D25A108B8E9690127832BC732D157528E4B15558453825EDC2C528915D24B5646EED03407003017850C10AA76107BDC01CD72FAF81575118CEFD13A22E38C0CA9745F41AA5F45C7547D3EEA75A72B6C9D0458AB2E93CF5374BCF15CE696A242F716BF021193E0216C581C8782E8B63070A11DEE2F53B16C1A53A7614E551E652F79E7B787A60CDCA79B004010040100401004010180FAE7EACFB0FA25FB2E27E2A2F3571D3607311B4F68F3F0EE35A7F1AD6394571CC584A29EB378FABF4583A4F202C7DAF6CC6B497BB4A2E5E3C17ABCAEE349ADAC2D731C3620E42E3ACFD2359A7933CF4732F655B4538D9B2E1A47A3BFE71F45716B5715632EB399ED78EF539C1F47D09B4B6DF62D4150D68C324776AD1F8B73F9E561BCA5CDDCC92E9D7CFF935E856E72DA2DF15A797F04FAD54E23A761C77885EE92CB358B89B7268BDD340D9070B9B969E6AEE8C13586554E4E3AA2BA934E50F6864EC7F6A793F276F972FC95AD1B4A59CE352354BCAD8DDCE85DA3A12C34C19C0191389C018DB85C390DBC7D15AAA1AC71C13FA35F52BDD5CEF678BFBA7F42ABB00D180000B3F37830EF179A58441"
$sData &= "035A3CB75B0D187374D44AF93DE93645B5DB4D58A7A7076692F23F21FE555ED17BDBB05DFF009EA619EA44A1B280EEF054CA918B74AB75B98198E1591D3C1F705AAAED0242416E428F2A7967871C91BBEDB29E9207B8B4072C528A488B522A28C45A9A60E95F8E4AA6A259296B3C904B930BC9C2C0D1553D488DD600DE2CEE56320CD10E874A4FAC355DA6C54AD227B9D64346C20722F786E7E59CFC94CB587395A305D2CA6AB6CEE6AC28AFDCD2F367D76B45B29ECB6BA3B7D233B2A5A5859044C1F758D686B47D005D45249611DA631508A8C7822AD7D3D040100401004010040101A53D6FAED5BADBA5CB6696B452D45CE6B5518269A92274AFEDA621CEEEB727DC6C473EAB9B7295D5BABA85B518B96EACE16BABFE17A9FA079034A86CDD955768DD4D415496332692C47B5F5B6D78147A27AA5EB7BD3239AE31D369F81DBE2ADFDA4D8FC0CCFD0B815596FC99BDAFAD4C4176EAFC97DD12F6972F365DBB71B7CD57D9A47CDEBE499B07A3BAB7DA34DD3C2CACB9D55CE48FFD2D10B0EF9E4327FA96D56DC98B6A2973B3726BC17D5FA9CBB6872BAEEF26DD382827E2FCF87A13F6E83B1099B2BADF1C92347087484BB6CE7C4FAABB7B26CA52529534DAEBD4D5FF00A95E61C5546976685C458ADE1B81454EDDB1DD88059BFA759FFD98F9222FB4D77C66FCD9D0E9FA13EEC3C1F8490B1BD996BD11C771F7DAAB74CB274759BB2FDD3F2078387F95865B3B73FE5BF33D7B467E24741198C96BC60AF1B92869247DDE4F81E9147C72342CD4E1BD248F127845CC9C0CAB822961AFA03593BA6E1C8772CF9782AEAD45CE6E479D0B64F42213CB0A0CE9EE8C14CE8C1E6A3B47C2DF5A447192B04F431B31E6A83515B298608E49A477BB1C4D2E71F800A0CD3969159657D66DBC220B5DD17EA8B8173D96A9037CA491919FA39C0A8AECAE27AA8FC91593B6AB2D774895FF00A35D4F6C8DD24D64A931B464BA0026C0F33C04E146A9695E9ACB83F9FC88352DAAC7571316DDDA1A5E0F319054145454D09F753ED20354F4ED4F5F23734D62A596B5D91906470ECA31FD6E70FC0B61D894B9CB9737C22BD5FE325EC7A3CEDEA9BE104DF9E8BF3B0FA10B7C3A21CA0080200802008020080202921B650D1545555434B0413D4383EA2663035D2900005E4732000327C02F2A293CA5C4C93AB39C546726D47865F0E9D3A8836ADEB0DD1BE87ED1B78D636A8668CF0BE9A09C544ED38CE0C71F1387D15B50D977B73FF2A937DB8C2F3784525CED6B0B45FF001AB25E397E4B2CC5575EBEFA122E26DA6DD79BAB838B438C2C8633CB7CB9DC5BEFF77C3C15E4392F78F5A928C7D7E4BEA69F77CBAD9D6FA5384A6FB925EAFE85B2FBD776A28A8ADF5347A41B236AB27826AE208D811CA3F55EE9F2794A528CAAF0ECFE4ABBAE5DCA8D2854A76F9DEE872FE0B869FEB8B5972C7B5E926C7C447EE6BB381E3CE3DD45ADB1234FE1A9E9FC936CF96356BACD4B7C774BF832769DE9F6C5786B45553565B9E7C5EC0F68F9B77FC95355B29D3E0D336DB7DB542BAF7A2E3EA644B7DD292EB009A92A23A88C8CF131D9FAF9280D38E8CBD8548545983C9EEF89B27BCDCAF0E2A4B0CC879C74C2393881DBC02C50A4A12CA3D39651ECE1905673C9C3630D681E4BE02CD736B5CFD8055B718C8C1659DB83B2AE9703CB29A1B53AE4F3C6EECE06FBCFFF00017C851755E5F031E32795CEBE9AC54AF14AC65347E321192E3FDCAC92A90A31C41611E26D456862BD47AE5E24716BAA6568F132700F90FF00854F52FB1D6CACA951F411A8FA4E3492F7AA6AE9B7E65DDA33E63FE1478ED0D7A57A9139FDD7C4A9B95934CF4BAD6C7758A2A7AF70CC578A2C34B88F0947DE1E79DC7870F3529D3A37BF1E8FAD7D7F3C8F93A746EF49F1EB5F5325756BE89CF46B6CBECF53490415D5B54D8FB48482248236F71D9F52F79DF7F3575B26D256D09B9AD5BF45F8CB0D9D69ECAA4DAD5BF44668072AF4B839401004010040100401018D7AC474ACFE863A26BDEA8A78E19EBE9DAC8A921A804B2499EF0D68201048192E2011B34AB2D9B67EDD750A0DE13E3DC8AFBFBAF63B79555C5703E5FF00487D61FA46E959EF65FF0052D5BA8A43BDBE91DECF4C0780ECD980EF8BB27D575FB2D936769AD2A6B3D6F57E6721DA7B5EE6B2DD9CF8F4705E4446DD41C8F0E55DF046875EB65EA4D6C16C74A431A37272556D7AA96ACA1A9BD5AA28C4CC1258FDA20B5C25B9EC5847E4D1FE16AAEBEEB93EB378F64DF8D28BFDABEC4D74FE9D6C61BDD54B71706CF6966A28C8DA7EC81EE66400153CA4DEACD9E85248C9361A37DB9CC929DE6390722D5826935865C524E0F3178321DBAFA7818CA9F7BFD607F750274B1F09774AE33A4CBDB5C1C010720A8E4F387B4BB91C1080F29E6ECE339D8E39AC7396EA0592B266E492E553525A9F4B6BDC2A256B183771C051BE29611E1B2AEE9511DBA93806D1C6DC9F5532AB54E3BAB823E3C259310EADBCCD5323DCE7607801C87A2D7EB3DED59595AA36623D49776C6F7B5CFC9F20A9AA4927829EAD4C107AEBAC5238B43F0EF276CA3651592A8994DA7354DCECD7F83ECD8A7AC7CAE0D751D3B0C8F97F0B4737797D392CD42A4E135CDEAFA918E9559C26B735EC3E8869AA192DD60B7D34C7F6D142C6C9F8B1DEFCF2BA7528B84145F13A0D34E3049973030B2990E50040100401004010040692FE926D6AD6DB7496918E407B5964BA54333B80C0638BE44BA5FF00B56FBC95B7DE9D4B8EAD3EAFE8691CA6BA54E9C2967B7EDF534768A9C492716174E4B0714BAAEE6DB24B414C063658AA4B08D7EACCC85A26DE1F20711CCE16B779326ECBA5BF3736660B5D209A666DC8"
$sData &= "00B58AB2C23A3D1A7BD244EED56FCB4602A7A92CB364A34F089A5929BB2209F05199694D6096DBEA1AC232760BE4B52641E091DBA56D748C6023889008F35166F7513692DF9244D236F030379E3CD402F168048D2E2DCEE3C1635522E4E39D51EB0F887B048D208C82BDB49E8CF85AABB4F4752098E5746EF5DC28552D632F85E0F8D64B5D2586B692E2D91ED6490B4121CD3E38C0D946A76D5215379EA8F0A2D32CBABE96EB2C45B4D413CFC4F24F66C276516E6155F08B662ABBCD7BA8C6578D13ABAE8D91B4B64A8323B60642D8C0F9B8855156D6EE6BDCA6FD17CD95B3A5565C224729BAB2EB3BD480D5BE86D919F78CB3191E3E018083F50B053D89773799B51F1CFCBEE43FE9D5E7C7089869EEA6DA76091B2DFEEB5B78783930C0053447D0E0977D1C15CD1D85463AD59397A2FBFA9229EC7A4B5AB26FD0CCDA5741E9FD130186C769A5B735C30F74318E37FE279EF3BE64ABEA36F4A82C528A45C52A14A82C538A45FD4833840100401004010040101C72407CA8EB83ACBF5E3A7ED4B2B1C1F4B6D7B6D70EF9C08461FF00F90C87E6BB2F27EDFD9EC619E32D7CFF008C1C5F94D75CEDD4FA969E462FB75386B42D9CE635A792FF0046C030A056654546648D14E6B1B192B59BB6F2CD97646145332DD80B4969DB395AD56C9D16D70641B43981A32555CB89B1D2C60BDFDA623686B300058F049DFEA3B4FA9E0B65376D50E73630705CC639F8F52003B7AAF5184A4F113E4EBC69477A7C3F3A8B9F457D26DBF55EBDFB16D71CF5AEA7A5754D4D50670C500C868692772E24F80C63C764BBB4A94A873B534CBC25D2C6CBDAB42EEF5DAD04E4D2CB7C12E8F3667427032A89BC2C9BC140E3C4E2EF3395ADCA6E527225258583BB2A9D1ECECB82954EF650D27A9E1D3CF02A59511C9C9C33E455942E6954E0CC4E2D713BE5493C9CA038C8080A0ABBF50510265A960C7834F11FA0DD505EEDFD97B3D37735E2B1D19CBF2597E84885BD5A9F045B23576E91590E5B454AE908FBF29C03F0037FECB98ED5FD4FB5B7CC6C2839BEB97BABC965BEE7BA5BD0D9152A3CD496179951A22E971BD4F57535B37146D018D89800682773EBB0C73F32AF3915B5B6A6DC75EF2FE4B75622A296229BD5F5BD16EF16F8B306D1A146D9C69D2E3C5B7E9F525ABA894E10040100401004010040473A46D590E84D077FD43391D9DB28A5AAC1FBCE6B496B7E6703E6A4DB517715A1497EE69182BD554694AA3E847C70AB9A6AFA896AEA2432D44D23A591EE3BB9C4924FD72BBC51C456EAE0703DA9094D39BE25C2848E10A5F41A3D545EE95DB2835915B344CB49D4BC1E1F0056BB76916FB2E6D37132E586B4B58C39DFE2B5AAB0726747B6A98489851DDCB1A3750B99C1790AE5736F1DA7372C5286090AB64F665C7CDD91E4B1A864C9CE9997A06D3D4F6CB1DC2E10C2D8BDBEA0BBBAD03668036C0E59CAAFBDA8E53516F82365D8B6F0A54E7520B1BCCC9552FE088F99D9515D54DCA4FB7436582CC8A20ED96BFBC4AC1D5CE58A523D24793DCA2CE47B48A59AA5F17BAF737E05574EE6AD379849AF1332A716B547B1AB75441C6C91F82304071C853657352B52DF84DE3A75662508C658688EDCE4A86BCF6B33E469E45CE272B45DA552BA78AB3725D196DFCCB1A4A3D0B059E5C1E7BAD0AEE34E7C51694DB45348C6B41206FE6B57A94E9D37BC96A4C4D990F45D01A2B0C0E38E29F33123C9DCBF2C2FD4FC8CB1763B128292C4A6B7DFFBB55E51C2F0349BEA9CEDC4A5D1C3C8BF2DDC82100401004010040100406AE7E904D7674DF43D4D618E50CA9D415AC84B41C130C5891FFD42207D1CB6CE4DDBF3B78EABE105EAF4FB9ADEDDAEE95B6E2FDDF25A9F3BE3CBE3C0FA2EAB0D19C93683DE8B6DFE7DCB95B8170CE723EBFF00B95219A3D65AE0BED300DE2CEDC3CCE36F2512A2C95D38E5978B7D7BA91ED730EC48C83E3BAA7AD494B89EE8CE545E624BECDAB78784176361CCF89F355D52DBA8D86D769E309E84C28B5436468EFEEA04A81B253BE4D712EB4F7D0EDF89459D12C21739E92AC5FB1801D9257C8D0E9333BA374744DA4D9349DA68DCDE0923A667683F8C8CBBF3256975E5BF5652ED3AF59D3E66DE107C525E7D25757CBDE6B41F52B5ADA55527187896B463C594BC7EAA977C9183A972F1299F70784B2F08506A5432A896DAA9F00EEA9EB5433A45BE2B9C945297B7BCD3EF30F22A9E3B4A7673DE8EABA575FF0026574954582E31D4D2DCD9889ED6BCF3864E6ADE9DD59ED25BB4A4B2FF006BE3E5D3E1930B8D4A5F12D3ACA39EC7971FD9B87E03954D73B029D479DC6BB9FDF24A85D35D2748B4F073DA0C4E712401C6EF33851ED392942AD58C654DBCB5F13FA70F347DAB7AE306F24FE360646D681800600F25FA0611508A8C5612357E3C4ECBD008020080E39A0394010040101F347F480F480DD51D3943A7E398B2974ED0B6191DB9689E502570C01CCB7B21CFC1752E4DDBF3566EABE337E8B4FB9CDF6FDC3A975CDAD5457AF135FE96027679858C7C61FCF8DA07303BB92092318D8EFBE16D717866A373184E9E165CBCBEC995D4F27B3D4991EF6B5CD8C3DADED0BB72070B4119C6339C388F7483BACE9B92351AF4631C28A2E74D545996C85A2589CE05AC77163801390796E4F36BBCF63B2F325BDE3F5FCE944095151D1FE7E779526B98C8D84779A7BB968DB21ADCF80FEDF33CD61E6B79BFCEBFCE246952C2FCEC3D63AC072E0401E7E9FF00A3FE16095122CA05C692FF00342E1DED87828F2A0988D7A94DE8C91D2EAF670005C5AE502568F25AD3DAA92D74279D0DC435CF497A7ED00F691CB5224940FF006D9DF7E7E4D23E6ABEF93B6B69D4EA"
$sData &= "5EACD8F62555B476851B74F39797DCB57F23E87018185CC4FD1C586A6AC493BCE76CE02E7F7975CE5C4DAE19C791694E9E228F2F681950B9E326E9D25AA0D6139C0032B1CAB1F777051CB540B73CB2140A958CB145B6A6A33E3B2A4B8AF8C99A312DB3CB92B52BAAE4E840A491DB2D4EEAB68C9F089E4EBBD4D38E1654CCC1E004870B5EABCA1BDB55BB4AE271EC52963CB3833AB6A72E315E45E7411A9BA6A0EDA79A69A3A761777DC5C038EC39FA13F45D1BF4BE77FB676CD4BCBBAD39C28C74DE936B7A5A2D1F66F151B639BA14234E1149C9F5742FE7064E5FABCD3820080E0A018407280200802029EBEBA0B6D14F57532361A6823749248EE4C6B46493E8002BEA4E4D457167994945393E08F895AA3A42ACD7DD206A5D4B3D4344770B8CB72F65AA947060B8F037809C3886F0B79721E4BBB5B5BAB7B78515D09238E5ED6552BB9C93CC99E36FBD7B419A3358DA48E405EE078831E46486F0B41F1D86D819F0595C71AE0F32C249A59649F4E586FB7AF6765AECF74AE79FFA870A5A5756452E06630626B48E6483C44ECFE4073C73AF4A927CE492E8E38EFD7F3815D3B39DD49CE9473FC7F7F52694BD00F4A33D3764DD0D7F8C88010D928F8D8E739C09238B1D99E1E78CB816E0E33B457B5AC13D6B47CFF33F230FF41BD970A32F2FCFB9D2E1D0E74936464EDAED197F2F61904937D9B2BD8721B8C4AC04BF383B1D87CCAC90DA563531BB563E6BE5D042ADB12FA0DE68CBC9FCC875C2A2A682AE6A6AA865A59E2716BA29A2313E3DF3BB4FBBB3B9056509426934F25155B2AB0E316714F730E1EF2CBB8995552834F81591DC33E2B14A92645744DB7EA0DA50DC7505FF00544CCCC7470B6869DC79768F3C4F23D435AD1FCEB40E54D6E6E9D3B75D3ABF0E1F9D8757FD3FD9DFF1EADEC97C2B7577BD5FA2F53742E555EC74334DFE96EDF1F05CAEFAE3D92DA75BA97AF47A9DCE11DF92890A6DC46320EDE8B90AB82F308EC2B7039EE79A3B85D67DDD29AAEB7B488460E7B5EEEDE5E3F965609DD2EB0E39583CA5ABE2CEFC956D6BB33C6051CB53C448F25437175924C2052B9F9395ACDC57C93611C14B3C9C2D272B53BFB8DD8364D844B5CF2F3279AD0A737565BCCB0847064AE8B284C3639AA5D9E2A894E3CB85BB7F7CAFD97FA53B33D8F613BA92D6B49BF05EEAF54DF89A1EDAABBF74E0BF6AC7D49AAED05084010040100401004010102E9E34CEA0D67D0EEAEB0E969208AFB72B7CB494EEA890C6CEF8E178E200E09617007C090A758D4A546EA9D4ADF0A797F9DE44BB854A94270A7C5A34DFA2CFD16CE6321AAE9075592ED8BADD606E00F433C837F8060F8ADCEEB954FE1B5878BFB2FB9ACD1D819D6BCBC17DCDA8D0BD537A28E8F1911B5E8CB7CD52CE555726FB64B9F30E978B87F970B56B8DAF7D73F1D578EA5A2F42F696CCB4A3C209F7EBF332D430C74D0B22898D8E2600D6B18301A072002A86DB79659A4A2B0B81DD7C3E84058B54686D3DADA8DD4B7FB350DE20231C1590364E1FC248C83EA3759E8D7AB6F2DEA53717D8C8F56DE95758AB14FBCD68E953A80E9EBEB67ACD135AFB056632DA1AB73A6A571F20E3DF67C7BC3D16DD65CA7AF49A8DCADE5D6B47F67E86A17DC96B5B8CCA8FBAFABA3EFF00334BB5F745FAAFA2ABD1B66A3B5CD4129CF6523BBD14CDF38DE3BAE1CB96E33BE1744B4DA36F790DFA52CFD3BCE5B7FB02BDB4DC5C4FA31D4EB46BF47F40F6333C7D9D5DD0BEE730C7FB87F67FF8DB1AE51B7EE55CED09B5C23A2F0E3EB93AEF262C5D86CD8424B129664FC787A244E7A4ABEB6DD454D4B9CBEA24C7083827C87CCFF6F45C67963B415B50A56C9EB36DF847F96BC8DE6D57BCE5E1E64260B8BA473CF1E7B370071E27C7E9FE572B95DA45A462DF81582E40BF19EF06E71E793B285536828C9433ABCFA6097186564E054713CB81FE06FF0093F97E4A3CEF71A64CB1A79D4EAD9CB9F2007EF7F80A055BBC99610D59D03F2C04F8EEAAAADCF6922103CA49151DC5C68C95181413CF9271C968D75772AB2715C09B0896EA92E7BDAC60E2738E00F5586DA8CABD48D282CB6F0BBD929621172970467CB35B9969B5D2D2339451B5B9F338DCFD57F45F6558C3665850B2A7C29C547C96AFC5EA726AD51D6AB2A8FA5E4AD56A6108020080200802008020080200802008020080202CBAB746D975D5927B45FADB05CEDF30EF433B3383FEA69E6D70F02082167A35EA5BCD54A52C3461AB469D78EE545945C6DD6FA7B45BA9A8A92210D2D2C4D8628DBC9AC6801A3E40058A52739394B8B3DC62A9C5463C11ADBD2C748EDA9D7F590B0F1C5697B628D80ED24996F17C0E4BDBF25F9FB95D56775B5E493F7611DDF46DBF37E88C94AEA30CAEA7E7AA5F73CECF7C652DBB266EDA5797485D8F0681C4EF8171CFAF12E5B56EDC66CD928B4A9F1CBFB717E7F32E6DBAB5D119B8C02483E8010037F220FD542752955A999C75E9E1AB5D7DDC11337DC6194FF3A3CF8957437613637E1606E06FE99FEDC3F52BE56B9C2DEC99A8B4F42B61AC0E6C8FCECE76DF40AB5DEEF6EAEB26C61C59D854B7B369072081855F7379CD677999E9C5349A3CDF539E4A86B5FEF6912428143552F03762AAA2B2C9708E4A8D15466EFAAA861E03246C7F6AFDF180DDF7F9E07CD751FD3ED97FD4B9436E9AF769BDF7FEDD57FED8206D9ABECF652EB969E7FC64CF6DD805FB8CE60728020080200802008020383B203AB240F24377C78F821F13C9DD0FA10040100401004010040627E92FABE5A35B4F35C6DD27D8B7973BB432C4DCC533F739919E649F786F939395AA6D5E4F5B6D052A90F76A3E9E87DEBEAB5EBC90EA5B29BDE8BC3E26137696"
$sData &= "BB684A99A3D4948E8A8637889F3D3CA1CD00073985BC8E388B7C07AF25F9D76C6C69D9DF3A35A3F026DE383CA5869FE7496B6B39D2A5BD5961378CE7AB2FE653D4D7565BDA20AD0D865A86B9D1F0C8D7EDDD683DD2703123B6FE15A457B39DB38CDF0D3EADFC97996D1AEDA70968DE71E897CDF9174B56A5A77C0F74B208C3E2328C9C61A371F96143542752AF3537C1E3BDFF00726D3B98286FF5ACF87F62B7F583B1B75410FDE28DE5D818CBF84B88F96C3E27D154C28BF6B8283D1C925DD94979F1EE2C9D56ADE52EA4FCF197E5C3BCB80BB08E95E4CD1B444D602E73C00DC81B1F259AA593B87993CCA4F4D74FDDC7B5E985D8CFB0B8E69762C67D3F3C8B5D06B26D539BBFBD8073F772D2FF00EC47D157D4D9EE09F67DD2F9926DAF2351ACF4FA68E5F22436CA5AFD42386868E6A93E6C6EC3E2790F9AB1D9BC9BDA7B567BB634253ED4B45DEDE8BC59612BCB6B75BD56697674F971326F46FA12B34DD6CF5D5E6313491F66C8E3771708272ECED8CEC397AAFD4BC80E46DCF26B9DB9BE71E72A24925AEEAE2F2FADBC70D34E2CD2F6CED3A77EE11A49EEC73C7A5F7190576235B08020080200802008020387343DA41DC141C435A1A0003007820394010040100401004010040101417CB4477CB64D452B8B63971C44007201071BF81C61556D3B08ED3B595ACA4E29B8BCAE3EEC94BD7187D86484F725BD8CF1F558207A8FABDE8EBFCAE9A3A192D150E25CE96DB2767B9F1E120B3FA5525F724F64DFFC74B75FF974F4E1E846E6D2798E8C86D575571DB34D1EA59238860704F481F90396E1E3C437C3C16955FF004DADA4E4E8DC34DE78C53C678F06BADF99994EA26B5D17D387D0AFA4EADBD9D15453D45F3B76C94D2C2CC5396F048F07127BFBE09271E2A1D97E98D2B7B9E7EB5C6FA5C16E630FA1FC4F87513EA5E4E541D08E994D67BFF92B23EAE9493D3C9057DEEAE68A521D2369E36C79770904E4F1789C8F2C29B65FA65616D252AB5E72C61E1622B47A743ED5E279AD7952B271696BF6C3FBF612AB17431A4AC3276B15B054CFC41DDA553CC9B8181DD3DDD81F25B95972436258A5B96EA4D74CBDEF9E9E84775AA49B7BCF5F0ECF93269053C74D1B63898D8D8D180D68C003D02DBE308C128C561184F45EC0401004010040100401004010040100401004010040100401004010040100401004010040100401004010040100407FFFD9"
;=================================================================================================================
$hGui = GUICreate('Test',575,300,100,100);,$WS_POPUP)
$picAB = GUICtrlCreatePic(_CreateTmpFile("data.jpg", $sdata),0,0,575,300)
GUICtrlSetState(-1, $GUI_DISABLE)

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

GUISetOnEvent($GUI_EVENT_SECONDARYUP,'_RightClick')
GUISetOnEvent($GUI_EVENT_CLOSE, '_Exit')
GUISetOnEvent($GUI_EVENT_MINIMIZE, '_Minimize')
TraySetOnEvent($TRAY_EVENT_MOUSEOVER, '_Restore')

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

$hbtnExit = GUICtrlCreateButton("be&enden",500,275,60,20)
GUICtrlSetOnEvent(-1,'_Exit')

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

GUISetState()

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

While 1
Sleep(125)
WEnd

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

Func _Exit()
Exit
EndFunc

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

Func _Minimize()
;Opt("TrayIconHide", 0) ;shows the Trayicon
TraySetState(1)
GUISetState(@SW_HIDE)
EndFunc

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

Func _Restore()
;Opt("TrayIconHide", 1) ;hide the Trayicon
TraySetState(2)
GUISetState(@SW_SHOW)
EndFunc

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

Func _RightClick()
ConsoleWrite(@GUI_CtrlHandle & " " & $hbtnExit )
Switch @GUI_CtrlId
case $hbtnExit
Exit
;weitere Case Abragen ....
EndSwitch
EndFunc

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

; erstellt im TEMPDIR die Datei $sFileName mit Daten von $sBin
;BugFix http://www.autoit.de/index.php?page…teTmpBinaryCall
Func _CreateTmpFile($sFileName, $sBin)
Local $sFile = @TempDir & "\" & $sFileName
Local $hFileOut = FileOpen($sFile, 18)
FileWrite($hFileOut, Binary($sBin))
FileClose($hFileOut)
Return $sFile
EndFunc ;==>_CreateTmpFile

[/autoit]

Edit: Scheint ja auch mit GDI+ zu klappen,

mfg (Auto)Bert

**autoBert**

neues Update siehe Post #1,

Bei Verison 0.8.4.6 wird wenn _SoundGetWaveVolume 0 zurückgibt dieser Wert nicht mehr in die Ini geschrieben. Ausserdem wurde ein Slider für die Positionierng eingebaut, dieser ist aber noch sehr buggy.

Die Virenwächter scheinen jetzt mein Programm zu akzeptieren, denn Ergebnis ist 0,
siehe: http://www.virustotal.com/de/analisis/97…c0ed-1276457725

mfg (Auto)Bert

Beiträge von autoBert

Hängen in einer Schleife.....

Guictrlcreatepic

Guictrlcreatepic

Runterladen von YoutubeVideos

[Frage] Gibt es eine möglichkeit *.ogg VIDEOS abzuspielen?

[Frage] Gibt es eine möglichkeit *.ogg VIDEOS abzuspielen?

Flash Dateien (swf) mit Autoit Öffnen

Youtube-Downloader+Converter

Gespeicherte Daten in InputBoxen einfügen?

viele viele labels gehen nicht :)

GUIOnEventMode oder GUIGetMsg?

Flash Dateien (swf) mit Autoit Öffnen

Arrays?? wie funktionieren sie??

iFrame auslesen

Problem mit dll-Funktionen2

Runterladen von YoutubeVideos

Problem mit dll-Funktionen2

iFrame auslesen

Binärcode eines Bildes als Bild in einer GUI darstellen

[Beispiel] NeMP3-P (MP3-Player) Version 0.8.4.7