ah, sry, habmir nur func 1 angeschaut und deswegen gesagt dass die 2te schleife nicht startet.
Beiträge von Turbolocke
-
-
ja. Diene erste while schleife läuft weiter, und kommt gar nicht zu der while 2 ( gehts dass eigentlich, while 2?)
-
Du willst doch eigentlich wissen, ob das script genauso arbeitet, wenns per autostartverknüpfung geladen wird, als wenn du es normal doppelklickst oder?
Wenn dem so ist, lautet die Antwort "JA, ,das ist der Sinn einer Verknüpfung". -
Ja, ich sag auch mal hallo^^
-
du musst halt die checksumme in ner ini datei abspeichern, bzw im script reinstellen, und dann vergleichen lassen.
$Check=1233445
if
Pixelchecksum($1,$2,$3,$4) = $check then
blablablaso in etwa glaub ich.
-
kann das sein dass du bei cpu_count nen fehler gemacht hast? Zeile 30-34, da haste bei einmal -1 exit, ok passt, aber dann zweimal >1, und unterscheidest weiter unten multiprozessor und einfach.
so wie ich das sehe, is da ein fehler drin oder? -
das script "installiert" in dem sinne den bootskin

und das drumherum ist um den richtigen eintrag zu finden,
denn wenn mehrer boot einträge dort stehen haste ein problem sonst wenn dus auf deine weise machst
Nicht unbedingt, dann wird das halt nur auf den Standartboot geschrieben.
Ist eigentlich auch so gewollt, da du ein problem hast, wenn n bug drin ist.Dann kannste nämlich gar nicht mehr booten.Die exe, war die ursprünglich mal ntoskrnl.exe?also, enthält sie nur das bild, oder auch den sound?
und 3.^^
wo kann man des rutnerladen?^^ -
Es ist generell einfach die sounds zu ändern, indem man einfach unter windows die mediendateien ersetzt.Hab mich aber bis jetzt nur mit denen beschäftigt die während dem betrieb abgespielt werden, zB beim minimieren eines ordners, öffnen eines ordners etc.
Da gabs aber auch eine die beim starten von windows abgespielt wird.
UNd die wird hier verwendet.
Naja, was ich nicht versteht is das ganze briborium drumherum, und der ini eintrag.Und die eexe die reinkopiert wird^^ -
@aznai:
Was sind das für exen die du reinkopierst? -
und der spielt dann beim Booten was ab oder hält er das booten an?
und 2tens:Pass bloß auf was du mit der Boot.ini machst, hab au gedacht es wäre alles perfekt, und dann verteil ich den shceiß, und plötzlich sind drei Rechner schrott^^ -
mit dem teil dasss ich gebaut hab.Bis jetzt hab ich es nur auf Xp home edition getestet.
Es bergt aber Gefahren: Wenn Ein bug drin ist, weil ich da" unter die Haube" eingreife,dann stürzt windows ab, und wird nicht wieder startbar sein.
Ist mir einmal bei Professional passiert, drum habich das auf eis gelegt.
Bei homeedtion funzt es gut und einwandfrei. -
Machs halt so, dass so bald der taskmanager sich öffnet gleich wieder mit winkill oder so geschlossen wird.
Und dann jedes mal ,wenn der gekillt wurde der blockinput auf 1 gesetzt wird.
Müsste funktionieren.(Ungetestet). -
Würde mich auch freuen, wenn sich jemand von den Kennern da mal ransetzten könnte.
Ich wär ein begieriger Leser des tuts^^ -
Ich bastel gerade ein installationpacket, hab die Oberfläche jetzt fertig gestaltet, würde ganz gern wissen was ihr davon haltet.
Achja und wenn ihr mir sagt, welche Programme man noch hinzufügen könnte, immer her mit den ideen....Spoiler anzeigen
[autoit]#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>$Form1_1 = GUICreate("Installationstool von Turbolocke,Version 1.2", 963, 666, 191, 116)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUISetFont(8, 400, 0, "Arial")
GUISetBkColor(0xFF0000)
$Headline = GUICtrlCreateLabel("Dies ist ein Silentinstaller, 1 !!! Klick auf einen der Buttons genügt um das Programm zu starten.Bitte immer warten bis die Tastatursperre aufgehoben wird,erst dann ist das Programm beendet", 40, 16, 916, 18)
GUICtrlSetColor(-1, 0x000080)
GUICtrlSetCursor (-1, 2)
$LabelAlldup = GUICtrlCreateLabel("Alldup untersucht die Festplatte auf doppelte Dateien", 24, 64, 258, 18)
$LabelSh = GUICtrlCreateLabel("Tensiert", 24, 96, 305, 18)
$LabelDec = GUICtrlCreateLabel("Zensiert", 24, 128, 250, 18)
$LabelCamtasia = GUICtrlCreateLabel("Camtasia Studio ist ein perfekter Bildschirmrecorder, 1 A Qualität", 24, 160, 315, 18)
$LabelGenius = GUICtrlCreateLabel("Driver Genius hält ihre Treiber auf neuesten Stand", 24, 192, 246, 18)
$LabelTuneup = GUICtrlCreateLabel("Tuneup Utilities ist der Saubermann für ihren PC", 24, 224, 236, 18)
$LabelWinamp = GUICtrlCreateLabel("Winamp ist ein sehr gutes Musik/Filmwiedergabeprogramm", 24, 264, 285, 18)
$Alldup = GUICtrlCreateButton("Alldup installieren", 448, 64, 193, 17, 0)
GUICtrlSetCursor (-1, 0)
$Shrink = GUICtrlCreateButton("Zensiert", 448, 96, 193, 17, 0)
GUICtrlSetCursor (-1, 0)
$Decrypter = GUICtrlCreateButton("Zensiert", 448, 128, 195, 17, 0)
GUICtrlSetCursor (-1, 0)
$Camtasia = GUICtrlCreateButton("Camtasia Studio 5.0 installieren", 448, 160, 193, 17, 0)
GUICtrlSetCursor (-1, 0)
$Genius = GUICtrlCreateButton("Driver Genius 8.0 installieren", 448, 192, 193, 17, 0)
GUICtrlSetCursor (-1, 0)
$Tuneup = GUICtrlCreateButton("Tuneup Utilities 2008 installieren", 448, 224, 193, 17, 0)
GUICtrlSetCursor (-1, 0)
$Winamp = GUICtrlCreateButton("Winamp lite version Deutsch installieren", 448, 264, 193, 17, 0)
GUICtrlSetCursor (-1, 0)
$Alles = GUICtrlCreateButton("Du willst alles auf einmal installieren?Dann Klick mich EINMAL, und ich werde alles installieren.", 56, 416, 753, 33, 0)
GUICtrlSetFont(-1, 10, 400, 0, "Arial")
GUICtrlSetColor(-1, 0x000080)
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit]
WEnd
edit: Bin daruaf aufmerksam gemacht worden das teilweise problematische Programme drin sind, werd ich mal wegzensieren^^ -
So hab jetzt noch sicherungen eingebaut, und ein tool, um alles wieder auf standart zu setzten.
Ist alles ( die .exe und die .au3 ) hochgeladen, wäre nett, wenn ihr euch das mal anshcaut....
http://www.file-upload.net/download-10293…nderer.rar.html -
in dem du mal die Variablen richtig deklarierst zum Beisspiel^^
-
Ich hab ein ganz kurzes Programm geschrieben, das den Starthintergrund von xp ( Das is dieses Logo und dem Ladebalken ganz am anfang) umändert.
Da ich aber nur einen Pc habe, würde ich das gerne von jemanden testen lassen,ob das überall gleich funktioniert.Hinweis: Sollte eigentlich gut funktionieren, hab als anfang einfach mal so ne Hexe als hintergrund genommen, das war einfach das erste passende Bild( vom Format her) das ich gefunden habe.
[autoit]
Allerdings wird bei diesem Programm die boot.ini von Windows bearbeitet,daher ist das alles etwas gefährlich.Aus diesem grund die exe nur!!! einmal!!!!!! ausführen, da ich noch keinerlei sicherungen eingebaut habe.
Den Hintergrund kriegt man wieder auf Standart,in dem man die boot.ini manuell nochmal bearbeitet.( wie steht im Quellcode am schluss
erstmal den kurzen Quellcode:
[/autoit][autoit][/autoit][autoit][/autoit]
if FileExists("C:\WINDOWS\system32\Nto_bild.exe")=1 Then
MsgBox(1,"","Du hast die datei bereits installiert, Aus Sicherheitsgründen darf das skript nicht weiter ausgeführt werden.")
Exit
Else
FileInstall("C:\Nto_bild.exe","C:\WINDOWS\system32\Nto_bild.exe")
$1=IniRead("C:\boot.ini","boot loader","default","0")
$2 = IniRead("C:\boot.ini","operating systems",$1,"0")
IniWrite ( "C:\boot.ini", "operating systems",$1, $2 & "/KERNEL=Nto_bild.exe" )
MsgBox(1,"Bearbeitung abgeschlossen","Die Bearbeitung wurde abgeschlossen,Du kannst die einstellung wieder rückgänging machen indem du die ini Datei bearbeitest.So gehts wieder auf standart: C:\boot.ini öffnen. Achtung: Ist eine Systemdatei, die musst du unter Ordneransicht sichtbar machen. 1. Versteckte dateien einblenden, und 2. Systemdateien einblenden.")
EndIfedit: Die datei ist um 1 mb zu groß..MIST^^werds morgen woanders hochladen....
-
Villeicht mit 2 inputs?
[autoit]#Include <process.au3>
[/autoit][autoit][/autoit][autoit]
HotKeySet("^!y", "MeinExit")if InputBox("Passort","Um auf meine geheimsten Sachen zugreifen zu können muss du das Passwort kennen.", "", "*M10") = "Passwort" then
[/autoit][autoit][/autoit][autoit]
Login()EndIf
[/autoit][autoit][/autoit][autoit]Func Login()
[/autoit][autoit][/autoit][autoit]
if InputBox("Login","Um auf meine geheimsten Sachen zugreifen zu können muss du den login kennen.", "", "*M10") = "Loginname" then
Login()Func MeinExit()
[/autoit]
Exit
EndFunc -
Da ich grundsätzlich faul bin( in beziehung auf Tipparbeit) wollte ich gerne ein Tool basteln, das mir eine Installation automatisiert.( Ähnlich diesem Recorder von sclite)
[autoit]
und zwar möchte ich dazu die Buttoninformation auslesen lassen.Diese Information wird ja bei dem Info tool angezeigt.
Wie lese ich die aus? hab dazu keine pasende Funktion gefunden.
edit:
dank anno2008 funktioniert das auslesen. Wie kann ich jetzt nur den nützlichen teil auslesen?>>>> Window <<<<
[/autoit][autoit][/autoit][autoit]
Title:
Class: Shell_TrayWnd
Position: 0, 866
Size: 1440, 34
Style: 0x96000000
ExStyle: 0x00000088
Handle: 0x0003006C>>>> Control <<<<
[/autoit][autoit][/autoit][autoit]
Class: ToolbarWindow32
Instance: 2
ClassnameNN: ToolbarWindow322
Advanced (Class): [CLASS:ToolbarWindow32; INSTANCE:2]
ID:
Text: Ausgeführte Anwendungen
Position: 150, 0
Size: 1076, 30
ControlClick Coords: 501, 15
Style: 0x52009345
ExStyle: 0x00000000
Handle: 0x0001008E>>>> Mouse <<<<
[/autoit][autoit][/autoit][autoit]
Position: 651, 885
Cursor ID: 2
Color: 0xA2A5AE>>>> StatusBar <<<<
[/autoit][autoit][/autoit][autoit]>>>> Visible Text <<<<
[/autoit][autoit][/autoit][autoit][/autoit][autoit]
Start
12:27
Infobereich
TF_FloatingLangBar_WndTitle
Ausgeführte Anwendungen
Ausgeführte Anwendungen>>>> Hidden Text <<<<
[/autoit]
Müsste doch dann mit String replace oder so funktionieren oder?