Beiträge von Cartan12

Cartan12

Ich kann echt nur den Kopf schütteln...
Erst Sachen klauen, dann um Gnade betteln, die dir sogar teilweise erstattet wurde, dann noch ein geklautes Video hochladen und wieder behaupten es sei deins und zum Schluss Viren auf der Homepage. Das das nun im Register von Google ist und du deine Webside eigendlich in die Tonne kloppen kanst (schon allein, weil dieser Thread an 3. Stelle von Google kommt, wenn man "Tempelsoft" eingibt) hast du mit Recht verdient!
Ich verstehs echt nicht, aber ich glaub ich gebs auf, hier mit zu diskutiern... Irgendwann reichts dann auch
Evtl. sollte auch dieser Thread geclosed werden

Cartan12

Nun ja, das Script fehlt i-wie

Cartan12

Zitat von HopFail

Und: Falls du das sagen wolltest, es ist nicht mein Browsergame, sondern shayns.

Mein Post war auch an Shayn gerichtet...

Cartan12

Zitat von HopFail

23.5.10 21:16:35 HTTP filter archive http://jacero.bplaced.net/ JS/TrojanDownloader.Pegel.BP trojan connection terminated ***\*** Threat was detected upon access to web by the application: C:\Program Files\Mozilla Firefox\firefox.exe. 19.5.10 18:53:10 HTTP filter file http://recsaz.com/23/430.jar a variant of Java/TrojanDownloader.Agent.NAX trojan connection terminated - quarantined ***\*** Threat was detected upon access to web by the application: C:\Program Files\Java\jre6\bin\java.exe. 19.5.10 18:53:09 HTTP filter file http://recsaz.com/23/430.jar a variant of Java/TrojanDownloader.Agent.NAX trojan connection terminated - quarantined ***\*** Threat was detected upon access to web by the application: C:\Program Files\Java\jre6\bin\java.exe. 19.5.10 18:53:09 HTTP filter file http://recsaz.com/23/430.jar a variant of Java/TrojanDownloader.Agent.NAX trojan connection terminated - quarantined ***\*** Threat was detected upon access to web by the application: C:\Program Files\Java\jre6\bin\java.exe. 19.5.10 18:53:08 HTTP filter file http://recsaz.com/23/430.jar a variant of Java/TrojanDownloader.Agent.NAX trojan connection terminated - quarantined ***\*** Threat was detected upon access to web by the application: C:\Program Files\Java\jre6\bin\java.exe.

Ähm.. das hat nichts mit AutoIt zu tun...
Das bedeutet das sich (vielleicht, ich trauen vielen Virenprogrammen noch nicht so ganz ^^) ein JavaScript Virus in dein Browsergame geschlichen hat.

Cartan12

Wie gesagt, besser alles in eine .ini:

Spoiler anzeigen

$deutsch = IniReadSection("Wörterbuch.ini", "Wörter")
$vokabel = InputBox("","")
For $i = 0 To UBound($deutsch)
If $vokabel == $deutsch[$i][0] Then MsgBox(0,"",$deutsch[$i][1])
Next

[autoit]

$deutsch = IniReadSection("Wörterbuch.ini", "Wörter")
$vokabel = InputBox("","")
For $i = 0 To UBound($deutsch)
If $vokabel == $deutsch[$i][0] Then MsgBox(0,"",$deutsch[$i][1])
Next

[/autoit]

Spoiler anzeigen

[autoit]

$spanisch = "la"
$deutsch = "Die"
IniWrite("Wörterbuch.ini", "Wörter", $spanisch, $deutsch)

[/autoit]

Cartan12

Hab Win 7, das ständig zwischen verschiedenen (tata, wer hät's gedacht) AVATAR - Wallpapern umschaltet...
Der Großteil der Sachen auf dem Desktop sind (natürlich) AutoIt-Scripte

Cartan12

Ich finde Scriptklau ohne den eigentlichen Programmieren was zu sagen ziehmlich ***** (mal milde ausgedrückt)
So was kann ich gar nicht haben!!!
Nun ja, ich glaub wir sollten doch noch abwarten, bis der Täter sich dazu geäußert hat -.-

Edit: Hab gerad das gefunden:

Spoiler anzeigen

Zitat

Name: Tempelsoft Registry Cleanz

Preis: Freeware

Beschreibung: Sie kennen doch bestimmt Programme wie CCleaner oder andere, die die Registry aufräumen. Dieses ist ein weiteres. Es löscht nur absolut nicht benötigte Dateien, und keine die für sie selbst oder für das System wichtig sind.

Würd ich niemals ausführen (will nicht wissen, was das mit meiner Registry macht.
Wurd auch als Virus anerkannt (nein, ich hab kein Avira^^)

Cartan12

Keine gute Idee!
Machs z.B. mit 2 Arrays:

Spoiler anzeigen

[autoit]

Dim $deutsch[2] = ["Die","Der See"]
Dim $spanisch[2] = ["la","lago"]
$vokabel = InputBox("","")
For $i = 0 To UBound($spanisch)
If $vokabel == $spanisch[$i] Then MsgBox(0,"",$deutsch[$i])
Next

[/autoit]

Am besten ist eine Ini mit 2 Sektionen: Einer Deutschen und einer Spanischen.
Dann kanste ja noch so ne "hinzufügen" funktion machen, oder so...

Edit: Falls du weitere Hilfe brauchst: Ich mache gerne bei dem Projekt mit

Cartan12

Zitat von Ubuntu

Es fehlen zwei,
Ich hab mal das gemacht http://img580.imageshack.us/img580/9628/ani.gif

Läuft leider falschrum :pinch:

Werd ich morgen ändern, bis dann.

mfg Ubuntu

Das ganze dann noch mit 3facher Geschwindigkeit, und du kannst es nehmen

Cartan12

Bei mir klappts selber nich^^
würd mich freuen eine Funktionierende Version zu haben...

Cartan12

Die darfste nich hochladen (wegen Copiright und so...)

Cartan12

Scripte kannste ganz einfach über https://autoit.de/index.php?page…ebin#post162120
auf pastebin hochladen und dann über Skype den Link schicken^^

Cartan12

1. Klar, das machen wir alle
2. Du musst nur auf die blauen Befehle, wie z.B.

[autoit]

MsgBox

[/autoit]

klicken, und eine Online Hilfe öffnet sich
3. Lad dir mal die deutsche Hilfe runter
4. Hier ein gutes Tut http://wiki.autoit.de/wiki/index.php/Tutorial
5. Fragen kannste ja hier stellen
6. Falls du Skype hast, kannste ja mal deinen Skype-Namen per PN schicken

Cartan12

Wie wärs noch mit sowas?

ScreenSaver

[autoit]

#include <misc.au3>
#Include <ScreenCapture.au3>

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

_screenSaver()

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

Func _screenSaver()
MsgBox(48, "Hinweis", "Ziehen sie mit der Linken Maustaste ein Feld, was dann als Bilddatei abgespeichert werden kann")
While 1
If _IsPressed(01) Then
$pos1 = MouseGetPos()
While _IsPressed(01)
Sleep(10)
WEnd
$pos2 = MouseGetPos()
$screen = _ScreenCapture_Capture("", $pos1[0], $pos1[1], $pos2[0], $pos2[1])
$pfad = FileSaveDialog("Datei speichern als...", @MyDocumentsDir, "Bilddateien(*.jpg ; *.bmp ; *.png)|JPEG(*.jpg)|Bitmap(*.bmp)|PNG(*.png)|Alle(*.*)", 18)
If StringRight($pfad, 3) <> "jpg" Or StringRight($pfad, 3) <> "bmp" Or StringRight($pfad, 3) <> "png" Then $pfad &= ".jpg"
If @error Then
MsgBox(48, "SceenSaver", "Fehler beim Speichern!")
ExitLoop
EndIf
_ScreenCapture_SaveImage($pfad, $screen)
MsgBox(0, "ScreenSaver", "Bild gespeichert!")
_WinAPI_DeleteObject($screen)
ExitLoop
EndIf
Sleep(100)
WEnd
EndFunc

[/autoit]

Ich glaub das fehlte noch...
Klappt auf jeden Fall ganz gut, und ist sogar als Funktion gemacht.
Wenn's dir so noch nicht passt, kannst's ja nochmal ändern...
Ging ja nur um die Idee

Mfg
Cartan12

Cartan12

Ich verstehs nicht...
So wie er's hat KANN es auch nicht gehen, denn da fehlt ja die GUI, aber das steht ja da.
Das heißt, du sollst deine eigene GUI da hinschreiben.
Also:
Gib uns mal dein GANZES Script

Cartan12

Evtl. so:

Spoiler anzeigen

[autoit]

#include <GuiEdit.au3>
#include <GuiStatusBar.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <misc.au3>

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

Global $anzahl = 0

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

$Form1 = GUICreate("ZZ - ZeichenZähler", 299, 52, 192, 124)
$Label1 = GUICtrlCreateLabel("Anschläge seit Start des Systems", 0, 0, 160, 17)
$Label2 = GUICtrlCreateLabel("0", 8, 24, 200, 17)
$Label3 = GUICtrlCreateLabel("Zeichen", 216, 24, 43, 17)
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
If _IsAnyKeyPressed() >= 0 Then
$anzahl = $anzahl + 1
GUICtrlSetData($Label2, $anzahl)
EndIf
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

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

EndSwitch
WEnd

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

Func _IsAnyKeyPressed($start = 0, $end = 255)
For $i = $start to $end
if (_IsPressed(Hex($i))) Then return $i
Next
return -1
EndFunc

[/autoit]

Cartan12

Zitat von volle

While 1 controlsend("Unbenannt - Editor","","Edit1","Test")
Sleep(50)
Controlsend("Unbenannt - Editor","","edit1","{enter}")
wend

Jetzt fällt dir aber der Unterschied auf
Ich wusste auch nicht, das selbst Groß- und Kleinschreibung beachtet werden

Cartan12

Zum 1. Problem:

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.6.1
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#include <ScrollBarConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiButton.au3>
#include <StructureConstants.au3>
#include <GUIScrollBars.au3>
;#include <GUIScroll.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>

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

Global $sIni = @ScriptDir & "\Gui.ini"
Global $iEdits = IniRead($sIni, "Edits", "Count", 1)
Global $hEdit[$iEdits], $iTop = -20

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

$Kundenkartei = GUICreate("Kundenkartei", 1401, 992, -4, -4)
$Load = GUICtrlCreateButton("Load", 30, 16, 75, 25)
$Save = GUICtrlCreateButton("Save", 130, 16, 75, 25)
$PageControl1 = GUICtrlCreateTab(39, 65, 1204, 824)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet2 = GUICtrlCreateTabItem("1 ")
$TabSheet3 = GUICtrlCreateTabItem("2 ")
$hAdd = GUICtrlCreateButton("Hinzufügen", 330, 16, 75, 25)
For $i = 0 To $iEdits - 1
_newEdit($i)
Next
GUICtrlCreateTabItem("")
;GUIRegisterMsg($WM_VSCROLL, "WM_VSCROLL")
_GUIScrollBars_Init($TabSheet3)
GUISetState(@SW_SHOW)
;Scrollbar_Create($TabSheet3, $SB_VERT, 10000)
;Scrollbar_Step(20, $TabSheet3, $SB_VERT)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $hAdd
ReDim $hEdit[UBound($hEdit) + 1]
_newEdit($iEdits)
$iEdits += 1
EndSwitch
WEnd
Func _newEdit($iEditNr)
GUISwitch($Kundenkartei,$TabSheet3)
ConsoleWrite($iEditNr & @CRLF)
$iTop += 110
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 56, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 236, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 416, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 596, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 776, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
$hEdit[$iEditNr] = GUICtrlCreateEdit("", 956, $iTop, 180, 70, BitOR($WS_VSCROLL, $ES_WANTRETURN))
GUICtrlSetState($TabSheet3, $GUI_SHOW)
EndFunc ;==>_newEdit

[/autoit]

Cartan12

Du meinst sowas wie TCP?
Das ist extrem langsam, aber evtl. schneller als deine Methode...

Cartan12

Das liegt bestimmt nicht an Win7 64bit (habs selber am laufen).
Ich glaub du nimmst dir für den Anfang zu viel vor

Beiträge von Cartan12

Tempelsoft.de = Klau-Seite?

[Beispiel] Textbausteine verwalten (kleines Update)

Tempelsoft.de = Klau-Seite?

Tempelsoft.de = Klau-Seite?

Spanischwörterbuch^^

Wie sieht euer Desktop aus?

Tempelsoft.de = Klau-Seite?

Spanischwörterbuch^^

Mit Gimp Videos erstellen

IOM4 im PC Magazin 11/2008

IOM4 im PC Magazin 11/2008

Hilfe

Hilfe

Real Dektop Tools [Leute gesucht & in bearbeitung]

Func - Problem

Tastatur Zähler

ControlSend

tabsheet

Dateien hochladen (möglichst ohne ftp)

Func - Problem