Projekte by Speedy

Re: Projekte by Speedy

Beitragvon ThaSpeedy » 6. Apr 2010, 11:32

Danie_L hat geschrieben:Gelungenes Tool...aber kann man eventuell auch..IPs löschen aus der liste?

Edit// habs mir schon selbst beantwortet^^ :mrgreen:


Ja kann man, im Ordner Daten einfach die IP-Adresse suchen, und dann die Datei löschen :-P
I never comment my sourcecode. What's HARD to write must be HARD to read!
Bild
ThaSpeedy
Hobby-Bastler
 
Beiträge: 397
Registriert: 1. Aug 2008, 17:19
Hat Gedankt: 0 time
 Danksagungen: 7 times

Re: Der Neue WHO Writer

Beitragvon ThaSpeedy » 20. Jun 2010, 01:38

Hier, der Source der alten Version mit Abbruchtaste (ESC)
Kann, darf nach belieben verändert werden solange es Regelkonform bleibt ;)

Code: Alles auswählen
; ###################################################################################
; ################### This Script was written bye ThaSpeedy #########################
; ###################     The Copyright is Bye ThaSpeedy    #########################
; ###################          Written at March 2010        #########################
; ###################################################################################

; <COMPILER: v1.0.47.6>
;#NoTrayIcon
#SingleInstance
#Persistent

abbord = 0


; Dateiname: WHO-writerBeta.1.0.0.1.ahk
; ###################################################################################
; ################### This Script was written bye ThaSpeedy #########################
; ###################     The Copyright is Bye ThaSpeedy    #########################
; ###################          Written at 13.10.2008        #########################
; ###################            Update 23.06.2009          #########################
; ###################################################################################
; ###################################################################################
; ##########################          Close Ports       #############################
; ###################################################################################
Esc::
abbord = 1
return
F1:: ;F1 => Close Ports
function_ports()
return
; ###################################################################################
; ##########################          Remote Scan       #############################
; ###################################################################################
F2:: ;F2 => Remote Scan
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote scan ;Angrifftyp zuordnen
viren = 1 ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use xy
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Trojan Transfer      #############################
; ###################################################################################
F3:: ;F3 => transfer
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = trojan transfer ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use xy
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################         Remote Block       #############################
; ###################################################################################
F4:: ;F4 => remote block
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote block ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################        Remote Kill AV      #############################
; ###################################################################################
F5:: ;F5 => remote kill av
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill av ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Remote Kill BPR      #############################
; ###################################################################################
F6:: ;F6 => remote kill bpr
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill bpr ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Remote Kill PCI      #############################
; ###################################################################################
F7:: ;F7 => remote kill pci
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill pci ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Remote Kill IDS      #############################
; ###################################################################################
F8:: ;F8 => remote kill ids
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill ids ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Remote Kill SDK      #############################
; ###################################################################################
F9:: ;F9 => remote kill sdk
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill sdk ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Remote Smash MK      #############################
; ###################################################################################
F10:: ;F10 => remote smash mk
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash mk ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################       Remote Smash AV      #############################
; ###################################################################################
F11:: ;F11 => remote smash av
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash av ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################      Remote Manipulate     #############################
; ###################################################################################
F12:: ;F12 => remote manipulate
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote manipulate ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################            MSG             #############################
; ###################################################################################
SHIFT & F2::
Send, remote subscan
keywait, ENTER,D
SEND, attack
loop 10000
{
   SEND ^a                  ;STRG + A
   sleep 10           ;warten das es auch klappt
   SEND ^c         ;STRG + C
   sleep 10       ;warten das es auch klappt
   checkza = %clipboard%    ;ZA Speichern in variable
   checkinput = attack    ;attack
   IF(checkinput = checkza) ;vergleichen
   {
   checkza =          ;Za wieder leeren
   sleep 10        ;warten das es auch klappt
   SEND, {Enter}       ;ENTER   
   sleep 750       ;warten vllt. reicht das schon fürs nächste:-)
   break
   }
   else           ;hat wohl nicht geklappt :-(
   checkza =      ; ZA Leeren
   Send {Delete}       ;die Zeile Löschen
   sleep 10      ;warten das es auch klappt
        SEND, %checkinput%    ;Und nochmal das eintragen was wir vergleichen
   sleep 800
   
}
Sleep 750
SEND, OK
loop 10000
{
   SEND ^a                  ;STRG + A
   sleep 10           ;warten das es auch klappt
   SEND ^c         ;STRG + C
   sleep 10       ;warten das es auch klappt
   checkza = %clipboard%    ;ZA Speichern in variable
   checkinput = OK    ;ok
   IF(checkinput = checkza) ;vergleichen
   {
   checkza =          ;Za wieder leeren
   sleep 10        ;warten das es auch klappt
   
   SEND, {Enter}
   sleep 750          ;ENTER   
      ;warten vllt. reicht das schon fürs nächste:-)
   CLIPBOARD := save_clip
   break
   }
   else           ;hat wohl nicht geklappt :-(
   checkza =      ; ZA Leeren
   Send {Delete}       ;die Zeile Löschen
   sleep 10      ;warten das es auch klappt
        SEND, %checkinput%    ;Und nochmal das eintragen was wir vergleichen
   sleep 800
   

}
return
; ###################################################################################
; ##########################      Remote Smash OPENS     ############################
; ###################################################################################
SHIFT & F3:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash opens ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; #######################      Remote Smash SHUTDOWNER     ##########################
; ###################################################################################
SHIFT & F4:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash shutdowner ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; #######################      Remote Smash GINUI    ################################
; ###################################################################################
SHIFT & F5:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash ginui ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; #######################     Remote Smash CRASHER   ################################
; ###################################################################################
SHIFT & F6:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash crasher ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; #######################     Remote Smash HACKERZ   ################################
; ###################################################################################
SHIFT & F7:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash hackerz ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; #########################     Remote Smash BOMB   #################################
; ###################################################################################
SHIFT & F8:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote smash bomb ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################     Remote KILL MK    ##################################
; ###################################################################################
SHIFT & F9:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill mk ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################     Remote KILL FW    ##################################
; ###################################################################################
SHIFT & F10:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = remote kill fw ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################      TROJAN WRITE     ##################################
; ###################################################################################
SHIFT & F11:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = trojan write ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ##########################      trojan defacement     ##################################
; ###################################################################################
SHIFT & F12:: ;F12
adresse = ^v ;IP einer Varibale zuordnen
save_clip = %clipboard%
angriff_typ = trojan defacement ;Angrifftyp zuordnen
viren = max ; 1 Virus benutzen
header_function(adresse) ;function header => target xx.xx.xx.xx
angrif_function(angriff_typ) ; function => z.b. remote scan
Footer_function(viren,adresse,save_clip) ;funtion fotter => use x viren
log_function(save_clip) ;Logfunktion
return
; ###################################################################################
; ###################################################################################
; ########################## FUNKTIONEN NICHT VERÄNDERN #############################
; ###################################################################################
; ###################################################################################
function_ports()
{
Send, close ports{ENTER}
}
header_function(IP)
{
; Diese Function Sendet den target Befehlt
SEND, Target %IP%{ENTER} ;IP wurde
Sleep 200
}

angrif_function(ART)
{

SEND, %ART%
loop 10000
{
   SEND ^a                  ;STRG + A
   sleep 10           ;warten das es auch klappt
   SEND ^c         ;STRG + C
   sleep 10       ;warten das es auch klappt
   checkza = %clipboard%    ;ZA Speichern in variable
   checkinput = %ART%    ;angriffsart zuweisen
   IF(checkinput = checkza) ;vergleichen
   {
   checkza =          ;Za wieder leeren
   sleep 10        ;warten das es auch klappt
   SEND, {Enter}       ;ENTER   
   sleep 100      ;warten vllt. reicht das schon fürs nächste:-)
   break
   }
   else           ;hat wohl nicht geklappt :-(
   checkza =      ; ZA Leeren
   Send {Delete}       ;die Zeile Löschen
   sleep 10      ;warten das es auch klappt
        SEND, %checkinput%    ;Und nochmal das eintragen was wir vergleichen
   sleep 100        ;warten vllt. klappt beim nächsten mal :-)
   
}
}
Footer_function(anzahl,adresse,save_clip) ; anzahl muss!!!! definiert werden
{
global abbord
if(abbord = 1)
{

}
else
{
Sleep 750
SEND, use %anzahl%
loop 10000
{
   SEND ^a                  ;STRG + A
   sleep 10           ;warten das es auch klappt
   SEND ^c         ;STRG + C
   sleep 10       ;warten das es auch klappt
   checkza = %clipboard%    ;ZA Speichern in variable
   checkinput = use %anzahl% ; Wie viel Viren ?
   IF(checkinput = checkza) ;vergleichen
   {
   checkza =          ;Za wieder leeren
   sleep 10        ;warten das es auch klappt
   SEND, {Enter}       ;ENTER   
   sleep 100       ;warten vllt. reicht das schon fürs nächste:-)
   break
   }
   else           ;hat wohl nicht geklappt :-(
   checkza =      ; ZA Leeren
   Send {Delete}       ;die Zeile Löschen
   sleep 10      ;warten das es auch klappt
        SEND, %checkinput%    ;Und nochmal das eintragen was wir vergleichen
   sleep 100
   
}
}
if(abbord = 1)
{

}
else
{
Sleep 750
SEND, attack
loop 10000
{
   SEND ^a                  ;STRG + A
   sleep 10           ;warten das es auch klappt
   SEND ^c         ;STRG + C
   sleep 10       ;warten das es auch klappt
   checkza = %clipboard%    ;ZA Speichern in variable
   checkinput = attack    ;attack
   IF(checkinput = checkza) ;vergleichen
   {
   checkza =          ;Za wieder leeren
   sleep 10        ;warten das es auch klappt
   SEND, {Enter}       ;ENTER   
   sleep 100       ;warten vllt. reicht das schon fürs nächste:-)
   break
   }
   else           ;hat wohl nicht geklappt :-(
   checkza =      ; ZA Leeren
   Send {Delete}       ;die Zeile Löschen
   sleep 10      ;warten das es auch klappt
        SEND, %checkinput%    ;Und nochmal das eintragen was wir vergleichen
   sleep 100
   
}
}
if(abbord = 1)
{

}
else
{
Sleep 750
SEND, OK
loop 10000
{
   SEND ^a                  ;STRG + A
   sleep 10           ;warten das es auch klappt
   SEND ^c         ;STRG + C
   sleep 10       ;warten das es auch klappt
   checkza = %clipboard%    ;ZA Speichern in variable
   checkinput = OK    ;ok
   IF(checkinput = checkza) ;vergleichen
   {
   checkza =          ;Za wieder leeren
   sleep 10        ;warten das es auch klappt
   ;KeyWait, ENTER, D    ;ENTER   
   sleep 100       ;warten vllt. reicht das schon fürs nächste:-)
   CLIPBOARD := save_clip
   break
   }
   else           ;hat wohl nicht geklappt :-(
   checkza =      ; ZA Leeren
   Send {Delete}       ;die Zeile Löschen
   sleep 10      ;warten das es auch klappt
        SEND, %checkinput%    ;Und nochmal das eintragen was wir vergleichen
   sleep 100
   
}
}
abbord = 0
CLIPBOARD := save_clip
}

GuiClose:
ExitApp
return
I never comment my sourcecode. What's HARD to write must be HARD to read!
Bild
ThaSpeedy
Hobby-Bastler
 
Beiträge: 397
Registriert: 1. Aug 2008, 17:19
Hat Gedankt: 0 time
 Danksagungen: 7 times

Re: Projekte by Speedy

Beitragvon Gast » 20. Jun 2010, 23:00

# Vorheriger Beitrag wurde aus dem Beitrag Der neue WHO Writer verschoben [Falsches Thema]
Gast
 

Re: Projekte by Speedy

Beitragvon ThaSpeedy » 21. Jun 2010, 00:08

wie falsches Thema^^
wenn man exe-dateien postet sollte man den entsprechenden quellcode auch zeigen ansonsten verbirgt sich unter umständen ein virus dahin :mrgreen:
I never comment my sourcecode. What's HARD to write must be HARD to read!
Bild
ThaSpeedy
Hobby-Bastler
 
Beiträge: 397
Registriert: 1. Aug 2008, 17:19
Hat Gedankt: 0 time
 Danksagungen: 7 times

Re: Projekte by Speedy

Beitragvon Gast » 21. Jun 2010, 11:53

Hi speedy.

wäre es vllt möglich, dass du deinen WHO scan0r wieder aktivierst?
Gast
 

Re: Projekte by Speedy

Beitragvon ATZENPOWER » 21. Jun 2010, 15:09

ThaSpeedy hat geschrieben:wie falsches Thema^^
wenn man exe-dateien postet sollte man den entsprechenden quellcode auch zeigen ansonsten verbirgt sich unter umständen ein virus dahin :mrgreen:


den quellcode hat summa.... das reicht doch sicher oder?....

sry.... aber der quellcode war nicht der, welcher verwendet wurde.... ich habe den bedeutend einfacheren code verwendet, welcher das entern noch benötigt und daher auf eine antilagprotection verzichten kann.... somit ist er viel kleiner und übersichtlicher....

deswegen habe ich um das verschieben gebeten....
BildBildBildBildBildBildBild

Bild
ATZENPOWER
Geschäftsführung
 
Beiträge: 1759
Registriert: 28. Jun 2008, 20:29
Hat Gedankt: 113 times
 Danksagungen: 176 times

Re: Projekte by Speedy

Beitragvon ThaSpeedy » 21. Jun 2010, 18:28

cry hat geschrieben:Hi speedy.

wäre es vllt möglich, dass du deinen WHO scan0r wieder aktivierst?

Wäre schon möglich , Geb mir nen guten Grund ;)
I never comment my sourcecode. What's HARD to write must be HARD to read!
Bild
ThaSpeedy
Hobby-Bastler
 
Beiträge: 397
Registriert: 1. Aug 2008, 17:19
Hat Gedankt: 0 time
 Danksagungen: 7 times

Re: Projekte by Speedy

Beitragvon Gast » 23. Jun 2010, 19:19

Weil du ein guter Progger bist und es die stolz macht, die Danksagungen zu hören und zu wissen, dass wenn die Leute gefragt werden, woher sie das geile Prog haben, sie antworten werden: "Schau mal im WHO Forum nach. Speedy(oder ThaSpeedy) hat dieses gute Programm geschrieben." ;)
Gast
 

Re: Projekte by Speedy

Beitragvon ThaSpeedy » 24. Jun 2010, 20:13

cry hat geschrieben:Weil du ein guter Progger bist und es die stolz macht, die Danksagungen zu hören und zu wissen, dass wenn die Leute gefragt werden, woher sie das geile Prog haben, sie antworten werden: "Schau mal im WHO Forum nach. Speedy(oder ThaSpeedy) hat dieses gute Programm geschrieben." ;)


:lol:
Das ist kein Guter Grund :mrgreen:
Den Source hab ich leider verlegt^^ deswegen is nix mehr mit Online stellen
I never comment my sourcecode. What's HARD to write must be HARD to read!
Bild
ThaSpeedy
Hobby-Bastler
 
Beiträge: 397
Registriert: 1. Aug 2008, 17:19
Hat Gedankt: 0 time
 Danksagungen: 7 times

Re: Projekte by Speedy

Beitragvon ThaSpeedy » 24. Sep 2010, 15:52

Neue Version In AutoIt geschrieben!
Wesentlicht übersichtlicher
Code: Alles auswählen
#include <Misc.au3>
Global $viren
Global $lagg
Global $abbrechen
Global $okay_eingabe
Global $dll = DllOpen("user32.dll") ; IS Pressed DLL
HotKeySet("{ESC}", "cancel")
HotKeySet("+{F1}", "viren")
HotKeySet("+{F2}", "lagg")
HotKeySet("+{F3}", "okay_eingabe")
HotKeySet("{F1}", "cp")
HotKeySet("{F2}", "Hacken")
HotKeySet("{F3}", "Hacken")
HotKeySet("{F4}", "Hacken")
HotKeySet("{F5}", "Hacken")
HotKeySet("{F6}", "Hacken")
HotKeySet("{F7}", "Hacken")
HotKeySet("{F8}", "Hacken")
HotKeySet("{F9}", "Hacken")
HotKeySet("{F10}", "Hacken")
HotKeySet("{F11}", "Hacken")
HotKeySet("{F12}", "Hacken")
HotKeySet("^{F1}", "msg")
HotKeySet("^{F2}", "Hacken")
HotKeySet("^{F3}", "Hacken")
HotKeySet("^{F4}", "Hacken")
HotKeySet("^{F5}", "Hacken")
HotKeySet("^{F6}", "Hacken")
HotKeySet("^{F7}", "Hacken")
HotKeySet("^{F8}", "Hacken")
HotKeySet("^{F9}", "Hacken")
HotKeySet("^{F10}", "Hacken")
HotKeySet("^{F11}", "Hacken")
Func cp()
Send("Close Ports{ENTER}")
EndFunc
Func msg()
Send("MSG {{ }}{LEFT}")
Do
  sleep(10)
Until _IsPressed("0D",$dll) = 1
EndFunc
Func cancel()
$abbrechen = True
EndFunc
Func okay_eingabe()
If($okay_eingabe = True) Then
  $okay_eingabe = False
 
Else
  $okay_eingabe = True

EndIf
If($lagg = True And $viren = True And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AN" & @CRLF & "OK-Bestätigung   -> AN" , 11)
ElseIf($lagg = True And $viren = False And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AN" & @CRLF & "OK-Bestätigung   -> AN", 11)
ElseIf($lagg = False And $viren = True And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS", 11)
ElseIf($lagg = False And $viren = False And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS" , 11)
ElseIf($lagg = False And $viren = False And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AN" , 11)
ElseIf($lagg = True And $viren = False And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS" , 11)
EndIf
EndFunc
Func viren()
If($viren = True) Then
  $viren = False
Else
  $viren = True
EndIf
If($lagg = True And $viren = True And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AN" & @CRLF & "OK-Bestätigung   -> AN" , 11)
ElseIf($lagg = True And $viren = False And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AN" & @CRLF & "OK-Bestätigung   -> AN", 11)
ElseIf($lagg = False And $viren = True And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS", 11)
ElseIf($lagg = False And $viren = False And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS" , 11)
ElseIf($lagg = False And $viren = False And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AN" , 11)
ElseIf($lagg = True And $viren = False And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS" , 11)
EndIf
EndFunc
Func lagg()
If($lagg = True) Then
  $lagg = False
Else
  $lagg = True
EndIf
If($lagg = True And $viren = True And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AN" & @CRLF & "OK-Bestätigung   -> AN" , 11)
ElseIf($lagg = True And $viren = False And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AN" & @CRLF & "OK-Bestätigung   -> AN", 11)
ElseIf($lagg = False And $viren = True And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS", 11)
ElseIf($lagg = False And $viren = False And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS" , 11)
ElseIf($lagg = False And $viren = False And $okay_eingabe = True) Then
  TrayTip("INFO", "Vireneingabe    ->  AUS"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AN" , 11)
ElseIf($lagg = True And $viren = False And $okay_eingabe = False) Then
  TrayTip("INFO", "Vireneingabe    ->  AN"  & @CRLF &  "Eingabeprüfung  -> AUS" & @CRLF & "OK-Bestätigung   -> AUS" , 11)
EndIf
EndFunc
Func Hacken()
If @HotKeyPressed = "{F2}" Then
  $type = "remote scan"
EndIf
If @HotKeyPressed = "{F3}" Then
  $type = "trojan transfer"
EndIf
If @HotKeyPressed = "{F4}" Then
  $type = "remote block"
EndIf
If @HotKeyPressed = "{F5}" Then
  $type = "remote kill av"
EndIf
If @HotKeyPressed = "{F6}" Then
  $type = "remote kill bpr"
EndIf
If @HotKeyPressed = "{F7}" Then
  $type = "remote kill pci"
EndIf
If @HotKeyPressed = "{F8}" Then
  $type = "remote kill ids"
EndIf
If @HotKeyPressed = "{F9}" Then
  $type = "remote kill sdk"
EndIf
If @HotKeyPressed = "{F10}" Then
  $type = "remote smash mk"
EndIf
If @HotKeyPressed = "{F11}" Then
  $type = "remote smash av"
EndIf
If @HotKeyPressed = "{F12}" Then
  $type = "remote manipulate"
EndIf
If @HotKeyPressed = "^{F2}" Then
  $type = "remote smash opens"
EndIf
If @HotKeyPressed = "^{F3}" Then
  $type = "remote smash shutdowner"
EndIf
If @HotKeyPressed = "^{F4}" Then
  $type = "remote smash ginui"
EndIf
If @HotKeyPressed = "^{F5}" Then
  $type = "remote smash crasher"
EndIf
If @HotKeyPressed = "^{F6}" Then
  $type = "remote smash hackerz"
EndIf
If @HotKeyPressed = "^{F7}" Then
  $type = "remote smash bomb"
EndIf
If @HotKeyPressed = "^{F8}" Then
  $type = "remote kill mk"
EndIf
If @HotKeyPressed = "^{F9}" Then
  $type = "remote kill fw"
EndIf
If @HotKeyPressed = "^{F10}" Then
  $type = "trojan write"
EndIf
If @HotKeyPressed = "^{F11}" Then
  $type = "trojan defacement"
EndIf
$target = ClipGet()
do_hack($target,$type)

EndFunc
Func lagg_protect($input)
Local $okay = False, $cp
Do
  sleep(100)
  Send("^a")
  sleep(100)
  Send("^c")
  sleep(100)
  $cp = ClipGet()
  If ($cp=$input) Then
   $okay=True
  Else
   Send("^a")
   sleep(100)
   Send("{DEL}")
   sleep(100)
   Send($input)
  Endif
Until $okay = True
EndFunc
Func do_hack($target,$type)
Local $okay, $weiter
$abbrechen = False
$okay = False
Do
  if($abbrechen = False) Then
   Send("target " & $target)
   if($lagg = True) Then
    lagg_protect("target " & $target)
   EndIf
   sleep(500)
   Send("{ENTER}")
  EndIf
  If($abbrechen = False) Then
   sleep(500)
   Send($type)
   if($lagg = True) Then
    lagg_protect($type)
   EndIf
   sleep(500)
 
   Send("{ENTER}")
  EndIf
  sleep(500)
  If($abbrechen = False) Then
   If($viren = True) Then
    Send("use ")
    Do
     Sleep(10)
    Until _IsPressed("0D",$dll) = 1
   Else
    Send("use max")
    If($lagg=True)Then
     lagg_protect("use max")
    EndIf
   EndIf
 
   sleep(500)
   Send("{ENTER}")
  EndIf
  sleep(500)
  If($abbrechen = False) Then
   Send("attack")
   If($lagg = True) Then
    lagg_protect("attack")
   EndIf
   sleep(500)
   Send("{ENTER}")
   sleep(500)
  EndIf
  If($abbrechen = False) Then
   Send("ok")
   If($lagg = True) Then
    lagg_protect("ok")
   EndIf
   sleep(500)
   If($okay_eingabe = False) Then
    Send("{ENTER}")
   EndIf
  EndIf
  $okay = True
 
Until $okay = True
$abbrechen = False

ClipPut($target)

EndFunc
While 1 * Sleep(1000)
;endlosschleife...
WEnd
I never comment my sourcecode. What's HARD to write must be HARD to read!
Bild
ThaSpeedy
Hobby-Bastler
 
Beiträge: 397
Registriert: 1. Aug 2008, 17:19
Hat Gedankt: 0 time
 Danksagungen: 7 times

VorherigeNächste

Zurück zu Projekte



Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast