|
You last visited: Today at 04:04
Advertisement
[AutoIt] METIN2 hidden ansteuern
Discussion on [AutoIt] METIN2 hidden ansteuern within the Metin2 Hacks, Bots, Cheats, Exploits & Macros forum part of the Metin2 category.
03/26/2010, 21:07
|
#46
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
_KeySend
_ vergessen
|
|
|
03/26/2010, 21:58
|
#47
|
elite*gold: 103
Join Date: Mar 2009
Posts: 1,721
Received Thanks: 927
|
bei mir klapps leider auch nicht
€: habe folgendes prob:
habe ich das script richtig?
|
|
|
03/27/2010, 01:35
|
#48
|
elite*gold: 115
Join Date: Feb 2009
Posts: 353
Received Thanks: 44
|
trotz dem _ gehts ned =(
|
|
|
03/27/2010, 01:42
|
#49
|
elite*gold: 115
Join Date: Feb 2009
Posts: 353
Received Thanks: 44
|
So jetzt kommt wenigstens nicht mehr befehl fehler..
aber es schribt nichts in metin rein...
kannst du mir bitte helfen ?
PHP Code:
#RequireAdmin #include <KeySend.au3> for $1 = 1 to 10 _SendKey ("METIN2", "{A}") sleep ($SleepDelay) next
|
|
|
03/27/2010, 07:31
|
#50
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
ohne die {}
|
|
|
03/27/2010, 09:51
|
#51
|
elite*gold: 115
Join Date: Feb 2009
Posts: 353
Received Thanks: 44
|
Macht leider keinen unterschied...
|
|
|
03/29/2010, 02:01
|
#52
|
elite*gold: 115
Join Date: Feb 2009
Posts: 353
Received Thanks: 44
|
Wenn du mal einen Code rein stellen könntest der z.b. a oder si an metin schickt , wäre es sehr nett.
Bitte =)
Wenn es dann noch nicht funktioniert dann fersuche ich es auf eine andere art und weise..(vll mit weiterer hilfe von dir)
lg MagicDave
p.s Am besten wäre es wenn du einen code machen könntest bei dem man ein metin2 fenster ausuchen kann damitt es immer an den richtigen prozess sendet...
|
|
|
03/29/2010, 02:05
|
#53
|
elite*gold: 103
Join Date: Mar 2009
Posts: 1,721
Received Thanks: 927
|
Quote:
Originally Posted by MagicDave
Wenn du mal einen Code rein stellen könntest der z.b. a oder si an metin schickt , wäre es sehr nett.
Bitte =)
Wenn es dann noch nicht funktioniert dann fersuche ich es auf eine andere art und weise..(vll mit weiterer hilfe von dir)
lg MagicDave
p.s Am besten wäre es wenn du einen code machen könntest bei dem man ein metin2 fenster ausuchen kann damitt es immer an den richtigen prozess sendet...
|
bin ich auch dafür
|
|
|
03/29/2010, 19:46
|
#54
|
elite*gold: 1
Join Date: Feb 2009
Posts: 1,726
Received Thanks: 729
|
Auf Wunsch der Com.
Code:
library KeySend;
uses
Windows,
Messages,
SysUtils,
Variants,
Classes,
Graphics,
Controls,
Forms,
Dialogs;
{$R *.res}
function GetHandle(Titel: PChar): HWnd;
var wnd: HWnd;
begin
wnd := FindWindow(nil, Titel);
if wnd = 0 then
wnd := FindWindow(Titel, nil);
if wnd = 0 then
ShowMessage ('Handle nicht gefunden!');
wnd := FindWindow(nil, Titel);
if wnd <> 0 then
Result := wnd;
end;
procedure SendKey(Handle: HWnd; key: PChar; const shift: TShiftState;
const specialkey: Boolean);
type
TBuffers = array [0..1] of TKeyboardState;
var
pKeyBuffers: ^TBuffers;
lParam: LongInt;
Taste: Word;
begin
Taste := Word(Key);
if IsWindow(Handle) then
begin
pKeyBuffers := nil;
lParam := MakeLong(0, MapVirtualKey(Ord(Taste), 0));
if specialkey then
lParam := lParam or $1000000;
New(pKeyBuffers);
try
GetKeyboardState(pKeyBuffers^[1]);
FillChar(pKeyBuffers^[0], SizeOf(TKeyboardState), 0);
if ssShift in shift then
pKeyBuffers^[0][VK_SHIFT] := $80;
if ssAlt in shift then
begin
pKeyBuffers^[0][VK_MENU] := $80;
lParam := lParam or $20000000;
end;
if ssCtrl in shift then
pKeyBuffers^[0][VK_CONTROL] := $80;
if ssLeft in shift then
pKeyBuffers^[0][VK_LBUTTON] := $80;
if ssRight in shift then
pKeyBuffers^[0][VK_RBUTTON] := $80;
if ssMiddle in shift then
pKeyBuffers^[0][VK_MBUTTON] := $80;
SetKeyboardState(pKeyBuffers^[0]);
if ssAlt in Shift then
begin
PostMessage(Handle, WM_SYSKEYDOWN, Ord(Taste), lParam);
PostMessage(Handle, WM_SYSKEYUP, Ord(Taste), lParam or $C0000000);
end
else
begin
PostMessage(Handle, WM_KEYDOWN, Ord(Taste), lParam);
PostMessage(Handle, WM_KEYUP, Ord(Taste), lParam or $C0000000);
end;
Application.ProcessMessages;
SetKeyboardState(pKeyBuffers^[1]);
finally
if pKeyBuffers <> nil then
Dispose(pKeyBuffers);
end; { If }
end;
end; { PostKeyEx }
exports
SendKey index 1,
GetHandle index 2;
begin
ShowMessage ('By General Desert');
end.
|
|
|
03/30/2010, 14:08
|
#55
|
elite*gold: 115
Join Date: Feb 2009
Posts: 353
Received Thanks: 44
|
Quote:
Originally Posted by General Desert
Auf Wunsch der Com.
Code:
library KeySend;
uses
Windows,
Messages,
SysUtils,
Variants,
Classes,
Graphics,
Controls,
Forms,
Dialogs;
{$R *.res}
function GetHandle(Titel: PChar): HWnd;
var wnd: HWnd;
begin
wnd := FindWindow(nil, Titel);
if wnd = 0 then
wnd := FindWindow(Titel, nil);
if wnd = 0 then
ShowMessage ('Handle nicht gefunden!');
wnd := FindWindow(nil, Titel);
if wnd <> 0 then
Result := wnd;
end;
procedure SendKey(Handle: HWnd; key: PChar; const shift: TShiftState;
const specialkey: Boolean);
type
TBuffers = array [0..1] of TKeyboardState;
var
pKeyBuffers: ^TBuffers;
lParam: LongInt;
Taste: Word;
begin
Taste := Word(Key);
if IsWindow(Handle) then
begin
pKeyBuffers := nil;
lParam := MakeLong(0, MapVirtualKey(Ord(Taste), 0));
if specialkey then
lParam := lParam or $1000000;
New(pKeyBuffers);
try
GetKeyboardState(pKeyBuffers^[1]);
FillChar(pKeyBuffers^[0], SizeOf(TKeyboardState), 0);
if ssShift in shift then
pKeyBuffers^[0][VK_SHIFT] := $80;
if ssAlt in shift then
begin
pKeyBuffers^[0][VK_MENU] := $80;
lParam := lParam or $20000000;
end;
if ssCtrl in shift then
pKeyBuffers^[0][VK_CONTROL] := $80;
if ssLeft in shift then
pKeyBuffers^[0][VK_LBUTTON] := $80;
if ssRight in shift then
pKeyBuffers^[0][VK_RBUTTON] := $80;
if ssMiddle in shift then
pKeyBuffers^[0][VK_MBUTTON] := $80;
SetKeyboardState(pKeyBuffers^[0]);
if ssAlt in Shift then
begin
PostMessage(Handle, WM_SYSKEYDOWN, Ord(Taste), lParam);
PostMessage(Handle, WM_SYSKEYUP, Ord(Taste), lParam or $C0000000);
end
else
begin
PostMessage(Handle, WM_KEYDOWN, Ord(Taste), lParam);
PostMessage(Handle, WM_KEYUP, Ord(Taste), lParam or $C0000000);
end;
Application.ProcessMessages;
SetKeyboardState(pKeyBuffers^[1]);
finally
if pKeyBuffers <> nil then
Dispose(pKeyBuffers);
end; { If }
end;
end; { PostKeyEx }
exports
SendKey index 1,
GetHandle index 2;
begin
ShowMessage ('By General Desert');
end.
|
Ehhm ist das jetzt die KeySend.au3 oder wie?
|
|
|
03/31/2010, 18:09
|
#56
|
elite*gold: 0
Join Date: Jan 2009
Posts: 105
Received Thanks: 17
|
Bei mir sturtzt immer autoit ab. (Autoit hat ein Problem festgestellt ...). Hab Win. XP
|
|
|
03/31/2010, 18:29
|
#57
|
elite*gold: 138
Join Date: Jan 2009
Posts: 2,216
Received Thanks: 6,018
|
Klar geht ControlSend beim Metin2 Fenster. Ist in jedem meiner Bots drin... oO
|
|
|
03/31/2010, 23:04
|
#58
|
elite*gold: 103
Join Date: Mar 2009
Posts: 1,721
Received Thanks: 927
|
Quote:
Originally Posted by marmalada
Bei mir sturtzt immer autoit ab. (Autoit hat ein Problem festgestellt ...). Hab Win. XP
|
me, too...hab allerdings vista.
|
|
|
04/09/2010, 13:48
|
#59
|
elite*gold: 115
Join Date: Feb 2009
Posts: 353
Received Thanks: 44
|
Quote:
Originally Posted by MagicDave
Ehhm ist das jetzt die KeySend.au3 oder wie?
|
Ja ich hab mich selbst zittiert ^-^.
Ich wurde einfach ignoriert und wollte nochmas nachfragen... wie verwendet man jetzt diesen Code????
lg MagicDave
|
|
|
04/09/2010, 19:34
|
#60
|
elite*gold: 6
Join Date: Aug 2009
Posts: 1,611
Received Thanks: 859
|
Das heißt man kann auch nen Angelbot im Hintergrund laufen lassen?
|
|
|
 |
|
Similar Threads
|
Metin2 DE 04.03.2010: [HIDDEN]Relogger &'nd [HIDDEN]Potter in einem!
06/14/2011 - Metin2 Hacks, Bots, Cheats, Exploits & Macros - 77 Replies
----------------------------------------Deutsch--- -------------------------------------
Tag Leute,
ich habe gesucht und gesucht und nichts gefunden, als ich nach einem HIDDEN Relogger oder nach einem HIDDEN Potter gesucht habe. Da habe ich mir gedacht, mache ich doch mal einen HIDDEN Potter und HIDDEN Relogger in einem! Und hier ist es:
http://img408.imageshack.us/img408/2521/screenxj. jpg
(c) by 7Ultimate & EMINEM
Dieser Bot sollte für dich HIDDEN potten (je nach Einstellung) und...
|
Autoit Hidden Pickupbot mit autoit
08/12/2010 - Metin2 - 3 Replies
Hi,
ich habe eine frage undzwar:
Wenn man einen hidden spamemrbot machen möchte könnte man ja anstatt send..... einfach control send ........ nehmen und dann halt den fensternamen usw eingeben.
aber wenn man einen pickuobot so machen möchte sendet er nur an den chatt die tasten und kann man das auch iwie so machen das der bot auch nur an spiel tastendrücke sendet und nicht in den chatt und so?
|
Hidden ansteuern
07/14/2010 - AutoIt - 24 Replies
Hallo,
ich wollte mir ein ein bot für meitn2 machen für mein crit shami
ich habe dann etwas gesucht und ein tehrad http://www.elitepvpers.com/forum/metin2-hacks-bots- cheats-exploits-macros/501638-autoit-metin2-hidden -ansteuern.html gefunden wie man metin2 hidden ansteuern kann habe bissen herumgebastelt und nach dem endlich keine ^Error's
mehr kamen stürzte autoit einfach ab
das kommt dann immer
http://img816.imageshack.us/img816/8983/errorm.th .jpg
|
[AUTOIT] hidden bots
03/24/2009 - AutoIt - 7 Replies
hi^^ hab mir 2 bots für metin2 gemacht und wollte fragen ob/wie man die so machen kann , dass ich sie im hintergrund laufen lassen kann. könnte mir vlt eine tut dafür geben oder es machen? hier mal die bots:
1.
Opt('PixelCoordMode', 2)
Opt('MouseCoordMode', 2)
hotkeyset ( "{F7}" , "start")
hotkeyset ("{numpad3}" , "ende")
|
All times are GMT +1. The time now is 04:04.
|
|