konri100
Members-
Postów
58 -
Rejestracja
-
Ostatnia wizyta
Osiągnięcia konri100
-
mam takie cos #include <NomadMemory.au3> ; ściągnąc i skopiowac do katalogu autoit Include #include <WindowsConstants.au3> Opt("WinWaitDelay", 100) Opt("WinTitleMatchMode", 4) Global $client = "Nostale" $PID = WinGetProcess($client) Global $hprocess = _MemoryOpen($PID) Global $hwnd = WinGetHandle($client) ; send single keyboard event to non active window ; event = pressed, down, up ; kdown = key down delay ; note: supports only lower case keys + NUMx, Fx, some special keys and @ Func KeySend($inkey, $evt = "pressed", $kdown = 50) $user32 = DllOpen("user32.dll") If $user32 = -1 Then ConsoleWrite("KeySend: cannot open user32.dll") Exit EndIf ; handling for special keys Switch StringUpper($inkey) Case "@" $skey = 0x40 $lparam = 0x00100001 DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYDOWN, "int", 0x71, "long", $lparam) DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_CHAR, "int", $skey, "long", $lparam) Sleep(20) DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYUP, "int", 0x71, "long", BitOR($lparam, 0xC0000000)) Case "F1", "F2", "F3", "F4", "F5", "F6", "F7", "F8", "F9", "F10", "F11", "F12" $skey = 0x6f + Int(StringMid($inkey, 2)) ContinueCase Case "NUM0", "NUM1", "NUM2", "NUM3", "NUM4", "NUM5", "NUM6", "NUM7", "NUM8", "NUM9" If StringUpper(StringLeft($inkey, 3)) = "NUM" Then $skey = 0x60 + Int(StringMid($inkey, 4)) EndIf ContinueCase Case "RETURN", "SPACE", "TAB", "BACK", "END", "HOME", "SNAPSHOT", "INSERT", "DELETE", "LEFT", "RIGHT", "UP", "DOWN" Switch StringUpper($inkey) Case "RETURN" $skey = 0x0D Case "SPACE" $skey = 0x20 Case "TAB" $skey = 0x09 Case "BACK" $skey = 0x08 Case "END" $skey = 0x23 Case "HOME" $skey = 0x24 Case "SNAPSHOT" $skey = 0x2c Case "INSERT" $skey = 0x2d Case "DELETE" $skey = 0x2e Case "LEFT" $skey = 0x25 Case "RIGHT" $skey = 0x27 Case "UP" $skey = 0x26 Case "DOWN" $skey = 0x28 EndSwitch $ret = DllCall($user32, "int", "MapVirtualKey", "int", $skey, "int", 0) $lparam = BitShift($ret[0], -16) $lparam = BitOR($lparam, 1) DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYDOWN, "int", $skey, "long", $lparam) Sleep($kdown) DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYUP, "int", $skey, "long", BitOR($lparam, 0xC0000000)) Case Else ; default lower case key handling $key = DllCall($user32, "int", "VkKeyScan", "int", Asc(StringLower($inkey))) $skey = $key[0] $ret = DllCall($user32, "int", "MapVirtualKey", "int", $skey, "int", 0) $lparam = BitShift($ret[0], -16) $lparam = BitOR($lparam, 1) Select Case $evt = "pressed" DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYDOWN, "int", $skey, "long", $lparam) Sleep($kdown) DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYUP, "int", $skey, "long", BitOR($lparam, 0xC0000000)) Case $evt = "down" DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYDOWN, "int", $skey, "long", $lparam) Case $evt = "up" DllCall($user32, "int", "PostMessage", "hwnd", $hwnd, "int", $WM_KEYUP, "int", $skey, "long", BitOR($lparam, 0xC0000000)) EndSelect EndSwitch DllClose($user32) EndFunc ;==>KeySend HotKeySet("{HOME}", "start") HotKeySet("{END}", "stop") Local $start = 1 Func start() $start = 0 EndFunc Func stop() $start = 1 EndFunc While 1 if $start = 0 Then KeySend("Space") Sleep(500) EndIf WEnd no i sie spacja nie naciska, co zrobic zeby sie naciskala ?
-
FFCloud666 zareagował(a) na odpowiedź w temacie:
Fishbot Na Hs3?
-
a dziala na zminimalizowanym ?
-
Kacperek1212 zareagował(a) na odpowiedź w temacie:
Fishbot Działający
-
Czy jest jakiś działa jący fishbot na zminimalizowanym, używałem xangelbot 2.7 ale nie działa już
- 3 odpowiedzi
-
-1
-
widget997 zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
widget997 zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
widget997 zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
Mam tego hacka i sam nie wiem czy on działa na zwykłe hity, na skile zawsze a na hity to raz kiedyś mi coś tak jakby mrugnęło, jeżeli nie działa to jest może DMG hack na skile i na hity (bez konia)
-
4ggr35510n zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
4ggr35510n zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
[Tut] Naciskanie Klawisza Co X Sekund Itp.
konri100 odpowiedział(a) na temat konri100 w Niezbędnik Programisty - Archiwum
Mylisz "źle" a "nieoptymalnie" ... Jest dobrze ale nie optymalnie. -
[Tut] Naciskanie Klawisza Co X Sekund Itp.
konri100 odpowiedział(a) na temat konri100 w Niezbędnik Programisty - Archiwum
Co źle ? jakoś mi działa wszystko ładnie ? -
hfaua zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
4ggr35510n zareagował(a) na odpowiedź w temacie:
[Tut] Naciskanie Klawisza Co X Sekund Itp.
-
[Tut] Naciskanie Klawisza Co X Sekund Itp.
konri100 odpowiedział(a) na temat konri100 w Niezbędnik Programisty - Archiwum
Czego wy chcecie ? Ciągle ludzie piszą zróbcie mi bota co wpisuje/naciska ... To powiedziałem jak to zrobić, nie wiem po co te plusy mi plusy do szczęścia nie potrzebne. -
[Tut] Naciskanie Klawisza Co X Sekund Itp.
konri100 odpowiedział(a) na temat konri100 w Niezbędnik Programisty - Archiwum
Dałem cały kod po pierwsze, po drugie autoit żre proca bo jest głodny po trzecie hotkeye nie są w zmiennej btw. kup okulary Woj96 najpierw skompiluj otworz notatnik wlacz program i wcisnij HOME a potem powiedz czy to caly kod czy czesc, ok ? po co w takim programie gui ? -
[Tut] Naciskanie Klawisza Co X Sekund Itp.
temat opublikował(a) konri100 w Niezbędnik Programisty - Archiwum
Ponieważ wiele osób chce aby coś im się wpisywało lub naciskało klawisz przedstawiam ten tut. Przykład Local $start = 1 ;deklaracja zmiennej Func start() ;funkcja start $start = 0 ;przypisanie 0 do zmiennej EndFunc ;koniec funkcji Func stop() $start = 1 ;tego nie będę opisywać bo można się domyśleć EndFunc Func wyjdz() exit ;wyjście z programu EndFunc While 1 ;pętla nieskończona HotKeySet("{HOME}", "start") ;jak naciśniesz HOME to włączy sie funkcja start podobnie poniższe HotKeySet("{END}", "stop") HotKeySet("{DELETE}", "wyjdz") if $start = 0 Then ;jeżeli start równe 0 to ... Send("z") ;naciska z Sleep(50) ;czeka 0,05 sekundy EndIf ;koniec instrukcji WEnd ;koniec pętli Przyciski piszemy tak {KLAWISZ} jeśli jest to tego typu: enter,shift,!,%,&,home,insert itd. A klawisze alfabetu a,b,c,d,e,f... bez {} czyli Send("z") A np. ctrl+a Send("^a") Sleep(Czas na jaki ma się zatrzymać), Sleep(1000) czeka 1 sekundę (podajemy w milisekundach Gdy będziecie robić takie proste boty możecie użyć tego Local $start = 1 Func start() $start = 0 EndFunc Func stop() $start = 1 EndFunc Func wyjdz() exit EndFunc While 1 HotKeySet("{HOME}", "start") HotKeySet("{END}", "stop") HotKeySet("{DELETE}", "wyjdz") if $start = 0 Then ;Tutaj instrukcje które mają się wykonać EndIf WEnd Mam nadzieje, że pomogłem jak macie pytania to pisać A i np. żeby wcisnęło enter i wpisało saada 123 to instrukcja Send("{ENTER}") Sleep(100) Send("saada 123") -
Ja radzę żebyś zaczął naukę w wieku 13-14 lat wcześniej nic ci do głowy nie wejdzie. Jak miałem 12 lat i zobaczyłem kod php jednej gry www to się przestaszyłem potem 13 latek i wszystko do główki szło :P tera mam 14 latek i robię se gierki www i to dosyć zaawansowane ale tylko w php html css mysql i trochę js (przydał by się flash i ajax ):P a i myślę że mógł byś się teraz uczyć html to nie takie drudne ale html to nie język programowania tylko język internetowy ale jak się nauczysz html to potem możesz php i po php już dowolny język powinnien ci wchodzić
-
Mam pytanie jak włączyć 3 konta naraz bo gdy włączę 1 i zmienimalizuje to potem sie odłącza tamto i nie wiem jak trzeba to zmienimalizować aby było więcej kont
-
oczywiście klik + odpowiedni skrypt php
-
Navicat jest to program do obsługi bazy danych jak się połączyć ? może tak
-
[Tut]Stawianie Serwera Na Hamachi Od Podstaw Wideo
temat opublikował(a) konri100 w Metin2 - Tworzenie serwerów prywatnych
INSTALACJA http://www.youtube.com/v/gOwD7nxMwhQ&hl=pl_PL&fs=1& pliki serwerowe: http://www.megaupload.com/?d=QES8WTX1 skana nie dam bo za dużo zajmuje http://www.youtube.com/v/ENshSJLCo5s&hl=pl_PL&fs=1& link: http://www.speedyshare.com/files/22687807/download/portmap.rar skan : http://www.virustotal.com/pl/analisis/f29964109121c2496eb143307e71babbc492c1a19719360011867c6b1ad310ee-1275238871 http://www.youtube.com/v/NfnvG2H3ZMM&hl=pl_PL&fs=1& plik : http://www.speedyshare.com/files/22686722/download/Metin2%20Connect%20Changer1.7.1.rar skan: http://www.virustotal.com/pl/analisis/7d9d1e8f79ca7076728fde58372767eccdf8bc1df931c57ada89968e7577f184-1275239001 Zapisywanie danych serwera http://www.youtube.com/v/DUGeHpwuKvw&hl=pl_PL&fs=1& BAZA DANYCH łączenie się + gm http://www.youtube.com/v/_nhX8VfJNaI&hl=pl_PL&fs=1&"] navicat: http://www.sciagnij.pl/programy/p/Windows-Programowanie-Bazy_danych-Navicat_for_MySQL_Lite/75 to też ma za dużo jak na moją prędkość tworzenie nowego konta http://www.youtube.com/v/NIOWiX7PoeM&hl=pl_PL&fs=1& hasło:*00A51F3F48415C7D4E8908980D443C29C69B60C9 niedługo kolejne
