|
You last visited: Today at 13:27
Advertisement
AHK exe decompilen
Discussion on AHK exe decompilen within the General Coding forum part of the Coders Den category.
08/12/2013, 20:12
|
#1
|
elite*gold: 0
Join Date: Jul 2012
Posts: 4
Received Thanks: 0
|
AHK exe decompilen
Hey ich versuche mich momentan schwer daran eine exe zu decompilen
und zwar ist es eine Autohotkey exe die anscheinend mit einem exe compressor geschützt wurde ich komme weder mit resource hacke noch mit nem normalem decompiler an den source ran wäre nice wenn mir das jmd decompilen könnte
oder mir sagen wie ich das machen kann
|
|
|
08/15/2013, 11:10
|
#2
|
elite*gold: 50
Join Date: Sep 2012
Posts: 3,841
Received Thanks: 1,462
|
Code:
; <COMPILER: v1.0.48.5>
#NoEnv
#SingleInstance, force
ProgrammPfad = %A_MyDocuments%\Revoltes Keybinder
Config = %ProgrammPfad%\Config.ini
Ifnotexist %ProgrammPfad%
{
FileCreateDir, %ProgrammPfad%
IniWrite, 0, %Config%, Overlays, HealOverlayX
IniWrite, 0, %Config%, Overlays, HealOverlayY
IniWrite, 0, %Config%, Overlays, VerkaufOverlayX
IniWrite, 0, %Config%, Overlays, VerkaufOverlayY
IniWrite, 0, %Config%, Overlays, MatsOverlayX
IniWrite, 0, %Config%, Overlays, MatsOverlayY
IniWrite, 0, %Config%, Overlays, KundeOverlayX
IniWrite, 0, %Config%, Overlays, KundeOverlayY
MsgBox, 0, Rückmeldung, Der Keybinderordner und die ConfigDatei wurden automatisch angelegt!`nOrdner-Pfad: %ProgrammPfad%`nConfig-Pfad: %Config%
}
loggedin = 0
sell_count = 0
mats_amount = 0
waffen = 0
got_mats = 0
got_pakete = 0
deagle = 0
shotgun = 0
mp5 = 0
m4 = 0
rifle = 0
ak47 = 0
sdpistol = 0
9mm = 0
katana = 0
price = 0
ovloadet = 0
settimer, loggedstate, 500
#NoEnv
imp_server := "http://benni.reasondev.de/revoltes/sqlapi.php"
imp_pin := 0
imp_read(table, a, b) {
global imp_server
query := imp_server "?action=read&table=" table "&a=" a "&b=" b imp_secure()
return imp_query(query)
}
imp_read_where(table, a, b, c) {
global imp_server
query := imp_server "?action=read_where&table=" table "&where=" a "&is=" b "&column=" c imp_secure()
return imp_query(query)
}
imp_read_where_not(table, a, b, c) {
global imp_server
query := imp_server "?action=read_where_not&table=" table "&where=" a "&is=" b "&column=" c imp_secure()
return imp_query(query)
}
imp_read_where_greater(table, a, b, c) {
global imp_server
query := imp_server "?action=read_where_greater&table=" table "&where=" a "&is=" b "&column=" c imp_secure()
return imp_query(query)
}
imp_read_where_less(table, a, b, c) {
global imp_server
query := imp_server "?action=read_where_less&table=" table "&where=" a "&is=" b "&column=" c imp_secure()
return imp_query(query)
}
imp_write(table, a, b, c) {
global imp_server
query := imp_server "?action=write&table=" table "&a=" a "&b=" b "&c=" c imp_secure()
return imp_query(query)
}
imp_compare(table, a, b, c) {
global imp_server
query := imp_server "?action=compare&table=" table "&a=" a "&b=" b "&c=" c imp_secure()
return imp_query(query)
}
imp_create_row(table, a) {
global imp_server
query := imp_server "?action=create_row&table=" table "&a=" a imp_secure()
return imp_query(query)
}
imp_delete_row(table, a) {
global imp_server
query := imp_server "?action=delete_row&table=" table "&row=" a imp_secure()
return imp_query(query)
}
imp_create_table(table, a) {
global imp_server
query := imp_server "?action=create_table&name=" table "&columns=" a imp_secure()
return imp_query(query)
}
imp_delete_table(table) {
global imp_server
query := imp_server "?action=delete_table&name=" table imp_secure()
return imp_query(query)
}
imp_list_columns(table) {
global imp_server
query := imp_server "?action=list_columns&table=" table imp_secure()
return imp_query(query)
}
imp_list_rows(table) {
global imp_server
query := imp_server "?action=list_rows&table=" table imp_secure()
return imp_query(query)
}
imp_add_column(table, a) {
global imp_server
query := imp_server "?action=add_column&table=" table "&column=" a imp_secure()
return imp_query(query)
}
imp_delete_column(table, a) {
global imp_server
query := imp_server "?action=delete_column&table=" table "&column=" a imp_secure()
return imp_query(query)
}
imp_rename_column(table, a, b) {
global imp_server
query := imp_server "?action=rename_column&table=" table "&column=" a "&newname=" b imp_secure()
return imp_query(query)
}
imp_row_exist(table, a) {
global imp_server
query := imp_server "?action=row_exist&table=" table "&row=" a imp_secure()
return imp_query(query)
}
imp_exec(a) {
global imp_server
query := imp_server "?action=exec&query=" a imp_secure()
return imp_query(query)
}
imp_hash(a, b = "md5") {
global imp_server
query := imp_server "?action=hash&str=" a "&algo=" b imp_secure()
return imp_query(query)
}
imp_mail(a, c, b = "E-Mail") {
global imp_server
query := imp_server "?action=mail&to=" a "&subject=" b "&message=" c imp_secure()
return imp_query(query)
}
imp_table_exist(table) {
global imp_server
query := imp_server "?action=table_exist&name=" table imp_secure()
return imp_query(query)
}
imp_count_rows(table) {
global imp_server
query := imp_server "?action=count_rows&table=" table imp_secure()
return imp_query(query)
}
imp_get_row(table, a) {
global imp_server
query := imp_server "?table=" table "&action=get_row&row=" a imp_secure()
return imp_query(query)
}
imp_check_table(table) {
global imp_server
query := imp_server "?table=" table "&action=check_table" imp_secure()
return imp_query(query)
}
imp_query(a) {
urlDownloadToFile, %a%, %A_Temp%/response.tmp
FileRead, response, %A_Temp%/response.tmp
FileDelete, %A_Temp%/response.tmp
if(response)
return response
else
return false
}
imp_secure() {
global imp_pin
if(imp_pin > 0)
return "&key=" round(A_Hour * imp_pin, 4)
}
#NoEnv
PLAYER_STATE_LEAVING_VEHICLE := 0
PLAYER_STATE_NORMAL := 1
PLAYER_STATE_DRIVING := 50
PLAYER_STATE_DYING := 54
PLAYER_STATE_DEAD := 55
hModule := DllCall("LoadLibrary", Str, A_ScriptDir . "\API.dll")
if(hModule == -1 || hModule == 0)
{
MsgBox, 48, API - Fehler, Die API.dll konnte nicht gefunden werden.`nDer Keybinder wird nun beendet.
ExitApp
}
AddChatMessage_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_AddChatMessage")
BlockChatInput_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BlockChatInput")
BoxCreate_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxCreate")
BoxDestroy_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxDestroy")
BoxHide_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxHide")
BoxSetBorder_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxSetBorder")
BoxSetBorderColor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxSetBorderColor")
BoxSetColor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxSetColor")
BoxSetHeight_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxSetHeight")
BoxSetPos_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxSetPos")
BoxSetWidth_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxSetWidth")
BoxShow_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_BoxShow")
DestroyAllVisual_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_DestroyAllVisual")
GetAmmoForCurrentWeapon_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetAmmoForCurrentWeapon")
GetChatLine_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetChatLine")
GetCityName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetCityName")
GetClipForCurrentWeapon_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetClipForCurrentWeapon")
GetCurrentWeaponId_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetCurrentWeaponId")
GetCurrentWeatherId_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetCurrentWeatherId")
GetOnlinePlayers_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetOnlinePlayers")
GetPlayerArmor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerArmor")
GetPlayerData_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerData")
GetPlayerHealth_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerHealth")
GetPlayerId_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerId")
GetPlayerIdByName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerIdByName")
GetPlayersInVehicle_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayersInVehicle")
GetPlayerMoney_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerMoney")
GetPlayerName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerName")
GetPlayerNameById_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerNameById")
GetPlayerPing_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerPing")
GetPlayerPingById_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerPingById")
GetPlayerPingByName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerPingByName")
GetPlayerPos_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerPos")
GetPlayerScore_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerScore")
GetPlayerScoreById_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerScoreById")
GetPlayerScoreByName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerScoreByName")
GetPlayerSkin_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerSkin")
GetPlayerState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerState")
GetPlayerWanteds_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetPlayerWanteds")
GetRadioSlot_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetRadioSlot")
GetScreenSizeX_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetScreenSizeX")
GetScreenSizeY_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetScreenSizeY")
GetServerIp_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetServerIp")
GetVehicleEngineState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleEngineState")
GetVehicleFirstColor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleFirstColor")
GetVehicleHealth_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleHealth")
GetVehicleHornState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleHornState")
GetVehicleId_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleId")
GetVehicleLightState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleLightState")
GetVehicleLockState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleLockState")
GetVehicleModel_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleModel")
GetVehicleName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleName")
GetVehicleSeatState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleSeatState")
GetVehicleSecondColor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleSecondColor")
GetVehicleSirenState_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleSirenState")
GetVehicleSpeed_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetVehicleSpeed")
GetZoneName_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_GetZoneName")
HideAllVisual_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_HideAllVisual")
ImageCreate_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageCreate")
ImageDestroy_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageDestroy")
ImageHide_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageHide")
ImageSetAlign_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageSetAlign")
ImageSetPos_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageSetPos")
ImageSetRotation_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageSetRotation")
ImageShow_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ImageShow")
IsChatOpen_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsChatOpen")
IsDialogOpen_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsDialogOpen")
IsMenuOpen_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsMenuOpen")
IsPlayerDriver_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsPlayerDriver")
IsPlayerFrozen_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsPlayerFrozen")
IsPlayerInAnyInterior_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsPlayerInAnyInterior")
IsPlayerInAnyVehicle_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsPlayerInAnyVehicle")
IsPlayerInRangeOfPoint_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsPlayerInRangeOfPoint")
IsPlayerInRangeOfPoint2D_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsPlayerInRangeOfPoint2D")
IsUpdateAvailable_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_IsUpdateAvailable")
LineCreate_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineCreate")
LineDestroy_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineDestroy")
LineHide_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineHide")
LineSetColor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineSetColor")
LineSetHeight_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineSetHeight")
LineSetPos_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineSetPos")
LineSetWidth_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineSetWidth")
LineShow_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_LineShow")
RegisterTextBind_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_RegisterTextBind")
SendChat_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_SendChat")
ShowAllVisual_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ShowAllVisual")
ShowDialog_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ShowDialog")
ShowGameText_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_ShowGameText")
TextBindTimer_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextBindTimer")
TextCreate_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextCreate")
TextDestroy_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextDestroy")
TextHide_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextHide")
TextSetAlign_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextSetAlign")
TextSetColor_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextSetColor")
TextSetPos_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextSetPos")
TextSetString_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextSetString")
TextShow_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_TextShow")
UnblockChatInput_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_UnblockChatInput")
UnloadOverlay_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_UnloadOverlay")
UnregisterAllTextBinds_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_UnregisterAllTextBinds")
UnregisterTextBind_func := DllCall("GetProcAddress", UInt, hModule, Str, "API_UnregisterTextBind")
AddChatMessage(Color, Text)
{
global AddChatMessage_func
Result := DllCall(AddChatMessage_func, Int, Color, Str, Text)
return Result
}
BlockChatInput()
{
global BlockChatInput_func
Result := DllCall(BlockChatInput_func)
return Result
}
BoxCreate()
{
global BoxCreate_func
Result := DllCall(BoxCreate_func)
return Result
}
BoxDestroy(BoxIndex)
{
global BoxDestroy_func
Result := DllCall(BoxDestroy_func, Int, BoxIndex)
return Result
}
BoxHide(BoxIndex)
{
global BoxHide_func
Result := DllCall(BoxHide_func, Int, BoxIndex)
return Result
}
BoxSetBorder(BoxIndex, Width)
{
global BoxSetBorder_func
Result := DllCall(BoxSetBorder_func, Int, BoxIndex, Int, Width)
return Result
}
BoxSetBorderColor(BoxIndex, Color)
{
global BoxSetBorderColor_func
Result := DllCall(BoxSetBorderColor_func, Int, BoxIndex, UInt, Color)
return Result
}
BoxSetColor(BoxIndex, Color)
{
global BoxSetColor_func
Result := DllCall(BoxSetColor_func, Int, BoxIndex, UInt, Color)
return Result
}
BoxSetHeight(BoxIndex, Height)
{
global BoxSetHeight_func
Result := DllCall(BoxSetHeight_func, Int, BoxIndex, Int, Height)
return Result
}
BoxSetPos(BoxIndex, X, Y)
{
global BoxSetPos_func
Result := DllCall(BoxSetPos_func, Int, BoxIndex, Int, X, Int, Y)
return Result
}
BoxSetWidth(BoxIndex, Width)
{
global BoxSetWidth_func
Result := DllCall(BoxSetWidth_func, Int, BoxIndex, Int, Width)
return Result
}
BoxShow(BoxIndex)
{
global BoxShow_func
Result := DllCall(BoxShow_func, Int, BoxIndex)
return Result
}
DestroyAllVisual()
{
global DestroyAllVisual_func
Result := DllCall(DestroyAllVisual_func)
return Result
}
GetAmmoForCurrentWeapon()
{
global GetAmmoForCurrentWeapon_func
Result := DllCall(GetAmmoForCurrentWeapon_func)
return Result
}
GetChatLine(Line, ByRef Output)
{
global GetChatLine_func
VarSetCapacity(Output, 252)
Result := DllCall(GetChatLine_func, Int, Line, StrP, Output)
return Result
}
GetCityName(ByRef City)
{
global GetCityName_func
VarSetCapacity(City, 32, 0)
Result := DllCall(GetCityName_func, StrP, City)
return Result
}
GetClipForCurrentWeapon()
{
global GetClipForCurrentWeapon_func
Result := DllCall(GetClipForCurrentWeapon_func)
return Result
}
GetCurrentWeaponId()
{
global GetCurrentWeaponId_func
Result := DllCall(GetCurrentWeaponId_func)
return Result
}
GetCurrentWeatherId()
{
global GetCurrentWeatherId_func
Result := DllCall(GetCurrentWeatherId_func)
return Result
}
GetOnlinePlayers()
{
global GetOnlinePlayers_func
Result := DllCall(GetOnlinePlayers_func)
return Result
}
GetPlayerArmor()
{
global GetPlayerArmor_func
Result := DllCall(GetPlayerArmor_func)
return Result
}
GetPlayerData()
{
global GetPlayerData_func
Result := DllCall(GetPlayerData_func)
return Result
}
GetPlayerHealth()
{
global GetPlayerHealth_func
Result := DllCall(GetPlayerHealth_func)
return Result
}
GetPlayerId()
{
global GetPlayerId_func
Result := DllCall(GetPlayerId_func)
return Result
}
GetPlayerIdByName(Name)
{
global GetPlayerIdByName_func
Result := DllCall(GetPlayerIdByName_func, Str, Name)
return Result
}
GetPlayersInVehicle(ByRef Seat1, ByRef Seat2, ByRef Seat3, ByRef Seat4)
{
global GetPlayersInVehicle_func
Result := DllCall(GetPlayersInVehicle_func, IntP, Seat1, IntP, Seat2, IntP, Seat3, IntP, Seat4)
return Result
}
GetPlayerMoney()
{
global GetPlayerMoney_func
Result := DllCall(GetPlayerMoney_func)
return Result
}
GetPlayerName(ByRef Name)
{
global GetPlayerName_func
VarSetCapacity(Name, 24)
Result := DllCall(GetPlayerName_func, StrP, Name)
return Result
}
GetPlayerNameById(Id, ByRef Name)
{
global GetPlayerNameById_func
VarSetCapacity(Name, 24)
Result := DllCall(GetPlayerNameById_func, Int, Id, StrP, Name)
return Result
}
GetPlayerPing()
{
global GetPlayerPing_func
Result := DllCall(GetPlayerPing_func)
return Result
}
GetPlayerPingById(Id)
{
global GetPlayerPingById_func
Result := DllCall(GetPlayerPingById_func, Int, Id)
return Result
}
GetPlayerPingByName(Name)
{
global GetPlayerPingByName_func
Result := DllCall(GetPlayerPingByName_func, Str, Name)
return Result
}
GetPlayerPos(ByRef X, ByRef Y, ByRef Z, ByRef R)
{
global GetPlayerPos_func
Result := DllCall(GetPlayerPos_func, FloatP, X, FloatP, Y, FloatP, Z, FloatP, R)
return Result
}
GetPlayerScore()
{
global GetPlayerScore_func
Result := DllCall(GetPlayerScore_func)
return Result
}
GetPlayerScoreById(Id)
{
global GetPlayerScoreById_func
Result := DllCall(GetPlayerScoreById_func, Int, Id)
return Result
}
GetPlayerScoreByName(Name)
{
global GetPlayerScoreByName_func
Result := DllCall(GetPlayerScoreByName_func, Str, Name)
return Result
}
GetPlayerSkin()
{
global GetPlayerSkin_func
Result := DllCall(GetPlayerSkin_func)
return Result
}
GetPlayerState()
{
global GetPlayerState_func
Result := DllCall(GetPlayerState_func)
return Result
}
GetPlayerWanteds()
{
global GetPlayerWanteds_func
Result := DllCall(GetPlayerWanteds_func)
return Result
}
GetRadioSlot()
{
global GetRadioSlot_func
Result := DllCall(GetRadioSlot_func)
return Result
}
GetScreenSizeX()
{
global GetScreenSizeX_func
Result := DllCall(GetScreenSizeX_func)
return Result
}
GetScreenSizeY()
{
global GetScreenSizeY_func
Result := DllCall(GetScreenSizeY_func)
return Result
}
GetServerIp(ByRef Address)
{
global GetServerIp_func
VarSetCapacity(Address, 21, 0)
Result := DllCall(GetServerIp_func, StrP, Address)
return Result
}
GetVehicleEngineState()
{
global GetVehicleEngineState_func
Result := DllCall(GetVehicleEngineState_func)
return Result
}
GetVehicleFirstColor()
{
global GetVehicleFirstColor_func
Result := DllCall(GetVehicleFirstColor_func)
return Result
}
GetVehicleHealth()
{
global GetVehicleHealth_func
Result := DllCall(GetVehicleHealth_func)
return Result
}
GetVehicleHornState()
{
global GetVehicleHornState_func
Result := DllCall(GetVehicleHornState_func)
return Result
}
GetVehicleId()
{
global GetVehicleId_func
Result := DllCall(GetVehicleId_func)
return Result
}
GetVehicleLightState()
{
global GetVehicleLightState_func
Result := DllCall(GetVehicleLightState_func)
return Result
}
GetVehicleLockState()
{
global GetVehicleLockState_func
Result := DllCall(GetVehicleLockState_func)
return Result
}
GetVehicleModel()
{
global GetVehicleModel_func
Result := DllCall(GetVehicleModel_func)
return Result
}
GetVehicleName(ModelId, ByRef VehicleName)
{
global GetVehicleName_func
VarSetCapacity(VehicleName, 24, 0)
Result := DllCall(GetVehicleName_func, Int, ModelId, StrP, VehicleName)
return Result
}
GetVehicleSeatState(Seat)
{
global GetVehicleSeatState_func
Result := DllCall(GetVehicleSeatState_func, Int, Seat)
return Result
}
GetVehicleSecondColor()
{
global GetVehicleSecondColor_func
Result := DllCall(GetVehicleSecondColor_func)
return Result
}
GetVehicleSirenState()
{
global GetVehicleSirenState_func
Result := DllCall(GetVehicleSirenState_func)
return Result
}
GetVehicleSpeed()
{
global GetVehicleSpeed_func
fMult := 1.45
Result := DllCall(GetVehicleSpeed_func, Float, fMult)
return Result
}
GetZoneName(ByRef Zone)
{
global GetZoneName_func
VarSetCapacity(Zone, 32, 0)
Result := DllCall(GetZoneName_func, StrP, Zone)
return Result
}
HideAllVisual()
{
global ShowAllVisual_func
Result := DllCall(ShowAllVisual_func)
return Result
}
ImageCreate(ImagePath)
{
global ImageCreate_func
path = %A_ScriptDir%
Result := DllCall(ImageCreate_func, Str, path . ImagePath)
return Result
}
ImageDestroy(ImageIndex)
{
global ImageDestroy_func
Result := DllCall(ImageDestroy_func, Int, ImageIndex)
return Result
}
ImageHide(ImageIndex)
{
global ImageHide_func
Result := DllCall(ImageHide_func, Int, ImageIndex)
return Result
}
ImageSetAlign(ImageIndex, Align)
{
global ImageSetAlign_func
Result := DllCall(ImageSetAlign_func, Int, ImageIndex, Int, Align)
return Result
}
ImageSetPos(ImageIndex, PosX, PosY)
{
global ImageSetPos_func
Result := DllCall(ImageSetPos_func, Int, ImageIndex, Int, PosX, Int, PosY)
return Result
}
ImageSetRotation(ImageIndex, Rotation)
{
global ImageSetRotation_func
Result := DllCall(ImageSetRotation_func, Int, ImageIndex, Int, Rotation)
return Result
}
ImageShow(ImageIndex)
{
global ImageShow_func
Result := DllCall(ImageShow_func, Int, ImageIndex)
return Result
}
IsChatOpen()
{
global IsChatOpen_func
Result := DllCall(IsChatOpen_func)
return Result
}
IsDialogOpen()
{
global IsDialogOpen_func
Result := DllCall(IsDialogOpen_func)
return Result
}
IsMenuOpen()
{
global IsMenuOpen_func
Result := DllCall(IsMenuOpen_func)
return Result
}
IsPlayerDriver()
{
global IsPlayerDriver_func
Result := DllCall(IsPlayerDriver_func)
return Result
}
IsPlayerFrozen()
{
global IsPlayerFrozen_func
Result := DllCall(IsPlayerFrozen_func)
return Result
}
IsPlayerInAnyInterior()
{
global IsPlayerInAnyInterior_func
Result := DllCall(IsPlayerInAnyInterior_func)
return Result
}
IsPlayerInAnyVehicle()
{
global IsPlayerInAnyVehicle_func
Result := DllCall(IsPlayerInAnyVehicle_func)
return Result
}
IsPlayerInRangeOfPoint(X, Y, Z, Radius)
{
global IsPlayerInRangeOfPoint_func
Result := DllCall(IsPlayerInRangeOfPoint_func, Float, X, Float, Y, Float, Z, Float, Radius)
return Result
}
IsPlayerInRangeOfPoint2D(X, Y, Radius)
{
global IsPlayerInRangeOfPoint2D_func
Result := DllCall(IsPlayerInRangeOfPoint2D_func, Float, X, Float, Y, Float, Radius)
return Result
}
IsUpdateAvailable()
{
global IsUpdateAvailable_func
Result := DllCall(IsUpdateAvailable_func)
return Result
}
LineCreate()
{
global LineCreate_func
Result := DllCall(LineCreate_func)
return Result
}
LineDestroy(LineIndex)
{
global LineDestroy_func
Result := DllCall(LineDestroy_func, Int, LineIndex)
return Result
}
LineHide(LineIndex)
{
global LineHide_func
Result := DllCall(LineHide_func, Int, LineIndex)
return Result
}
LineSetColor(LineIndex, Color)
{
global LineSetColor_func
Result := DllCall(LineSetColor_func, Int, LineIndex, Int64, Color)
return Result
}
LineSetHeight(LineIndex, Height)
{
global LineSetHeight_func
Result := DllCall(LineSetHeight_func, Int, LineIndex, Int, Height)
return Result
}
LineSetPos(LineIndex, PosX, PosY)
{
global LineSetPos_func
Result := DllCall(LineSetPos_func, Int, LineIndex, Int, PosX, Int, PosY)
return Result
}
LineSetWidth(LineIndex, Width)
{
global LineSetWidth_func
Result := DllCall(LineSetWidth_func, Int, LineIndex, Int, Width)
return Result
}
LineShow(LineIndex)
{
global LineShow_func
Result := DllCall(LineShow_func, Int, LineIndex)
return Result
}
RegisterTextBind(Bind, X, Y, Z, Radius, Loop = 1, Timeout = 7000, GroupId = 0, Delay = 0)
{
global RegisterTextBind_func
Result := DllCall(RegisterTextBind_func, Str, Bind, Float, X, Float, Y, Float, Z, Float, Radius, Int, Loop, Int, Timeout, Int, GroupId, Int, Delay)
return Result
}
SendChat(Text)
{
global SendChat_func
Result := DllCall(SendChat_func, Str, Text)
return Result
}
ShowAllVisual()
{
global ShowAllVisual_func
Result := DllCall(ShowAllVisual_func)
return Result
}
ShowDialog(Style, Title, Text, Button)
{
global ShowDialog_func
Result := DllCall(ShowDialog_func, Int, Style, Str, Title, Str, Text, Str, Button)
return Result
}
ShowGameText(Text, Time, Style)
{
global ShowGameText_func
Result := DllCall(ShowGameText_func, Str, Text, Int, Time, Int, Style)
return Result
}
TextBindTimer(TextBindTime)
{
global TextBindTimer_func
Result := DllCall(TextBindTimer_func, Int, TextBindTime)
return Result
}
TextCreate(Font, FontSize, Bold, Italic)
{
global TextCreate_func
Result := DllCall(TextCreate_func, Str, Font, Int, FontSize, Int, Bold, Int, Italic)
return Result
}
TextDestroy(TextIndex)
{
global TextDestroy_func
Result := DllCall(TextDestroy_func, Int, TextIndex)
return Result
}
TextHide(TextIndex)
{
global TextHide_func
Result := DllCall(TextHide_func, Int, TextIndex)
return Result
}
TextSetAlign(TextIndex, Align)
{
global TextSetAlign_func
Result := DllCall(TextSetAlign_func, Int, TextIndex, Int, Align)
return Result
}
TextSetColor(TextIndex, Color)
{
global TextSetColor_func
Result := DllCall(TextSetColor_func, Int, TextIndex, Int64, Color)
return Result
}
TextSetPos(TextIndex, PosX, PosY)
{
global TextSetPos_func
Result := DllCall(TextSetPos_func, Int, TextIndex, Int, PosX, Int, PosY)
return Result
}
TextSetString(TextIndex, Text)
{
global TextSetString_func
Result := DllCall(TextSetString_func, Int, TextIndex, Str, Text)
return Result
}
TextShow(TextIndex)
{
global TextShow_func
Result := DllCall(TextShow_func, Int, TextIndex)
return Result
}
UnblockChatInput()
{
global UnblockChatInput_func
Result := DllCall(UnblockChatInput_func)
return Result
}
UnloadOverlay()
{
global UnloadOverlay_func
Result := DllCall(UnloadOverlay_func)
return Result
}
UnregisterAllTextBinds()
{
global UnregisterAllTextBinds_func
Result := DllCall(UnregisterAllTextBinds_func)
return Result
}
UnregisterTextBind(TextBindId)
{
global UnregisterTextBind_func
Result := DllCall(UnregisterTextBind_func, Int, TextBindId)
return Result
}
DestroyAllVisual()
; #include API.ahk
#IfWinActive, GTA:SA:MP
:?:/register::
Suspend Permit
sleep 50
Sendinput, {enter}
GetPlayerName(regName)
checkav := imp_row_exist("users", "" regName "")
Random, regKey, 1, 9999999999
if instr(checkav,"")
{
StringReplace, checkav, checkav, , , all
}
if(checkav = 1)
{
Error("Der Account {0087FF}" regName " {FAFAFA}existiert schon in der Datenbank!")
sleep 50
Error("Wende dich an einen der Systemadministratoren falls Probleme auftauchen!")
registeractive = 0
return
}
if(loggedin = 0)
{
if ( !A_IsSuspended )
{
suspend
}
Msg("Gib eine gültige E-Mail Adresse an! Dort werden dir die Daten geschickt.")
sleep 200
Sendinput, tE-Mail:{space}
input, regMail,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
if(strlen(regmail) != 0)
{
sleep 500
imp_create_row("users", "" regName "")
imp_write("users", "" regName "", "rechte", "0")
imp_write("users", "" regName "", "uID", "" regKey "")
imp_write("users", "" regName "", "email", "" regMail "")
mailtext = Dein Name wurde registriert: %regName%, deine uID ist: %regKey%
imp_mail("" regMail "", "" mailtext "", "Revoltes-Keybinder - Registration")
sleep 500
Msg("Du hast dich erfolgreich registiert!")
Sleep 50
Msg("Es wurde eine Mail an '" regMail "' geschickt, sie enthält deine uID.")
sleep 50
Msg("Um deinen Account zu aktivieren nutze '/validate', hierzu brauchst du deine uID!")
}
else
{
Error("Es wurde keine Mail-Adresse angegeben, wiederhole den Vorgang!")
return
}
}
else
{
Error("Du bist schon eingeloggt!")
}
suspend, off
return
:?:/validate::
Suspend Permit
sleep 50
Sendinput, {enter}
GetPlayerName(valName)
uID := imp_read("users", "" valName "", "uID")
if instr(uID,"")
{
StringReplace, uID, uID, , , all
}
Msg("Gib nun deine uID aus der E-Mail an um deine Keybinder-Rechte zu aktivieren!")
sleep 200
if ( !A_IsSuspended )
{
suspend
}
Sendinput, t/w %valName%{space}
input, regID,V I M,{enter}
sleep 100
suspend, off
GetChatLine(1, regcheck)
sleep 500
RegExMatch(regcheck,"(.*) flüstert zu (.*): (.*)",checkedID)
if(checkedID3 = uID)
{
if ( !A_IsSuspended )
{
suspend
}
imp_write("users", "" valName "", "rechte", "1")
sleep 100
Msg("Gib nun ein Wunschpasswort ein! Dieses solltest du keinem zeigen oder sagen.")
sleep 100
Sendinput, tWunschpasswort:{space}
input, regPW,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
if(strlen(regPW) != 0)
{
sleep 100
imp_write("users", "" valName "", "passwort", "" regPW "")
sleep 100
Msg("Dein Passwort wurde gespeichert: {0087FF}" regPW "{FAFAFA}, logge dich nun mit '/login' ein!")
}
else
{
Error("Es wurde kein Passwort eingegeben, wiederhole den Vorgang mit '/validate'!")
return
}
}
else
{
Error("Die angegebene uID {0087FF}" checkID2 "{FAFAFA} ist falsch, bitte überprüfe den Code!")
sleep 50
Error("Falls du keine E-Mail erhalten hast, kontaktiere uns per E-Mail: ")
}
suspend, off
return
:?:/chgpass::
Suspend Permit
sleep 50
Sendinput, {enter}
GetPlayerName(pwName)
oldpw := imp_read("users", "" pwName "", "passwort")
if instr(oldpw,"")
{
StringReplace, oldpw, oldpw, , , all
}
Msg("Um dein Passwort zu ändern, gib nun dein aktuelles Passwort ein!")
if ( !A_IsSuspended )
{
suspend
}
sleep 100
Sendinput,tAktuelles Passwort:{space}
input, aktpw,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
suspend, off
sleep 100
if(aktpw = oldpw)
{
if ( !A_IsSuspended )
{
suspend
}
Msg("Dein altes Passwort ist {0087FF}" oldpw "{FAFAFA}, nun kannst du ein neues festlegen!")
sleep 100
Sendinput, tNeues Passwort:{space}
input, newpw,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
if(strlen(newpw) != 0)
{
Msg("Erfolg! Dein neues Passwort ist {0087FF}" newpw "{FAFAFA}, halte es geheim!")
Msg("Der ehältst in kürze eine E-Mail mit dem neuen Passwort, falls du es vergisst!")
getmail := imp_read("users", "" pwName "", "email")
mailtext = Du hast dein Passwort von '%oldpw%' zu '%newpw%' geändert! Halte es geheim!!
imp_mail("" getmail "", "" mailtext "", "Revoltes-Keybinder - Passwortänderung")
imp_write("users", "" pwName "", "passwort", "" newpw "")
}
}
else if(strlen(aktpw) = 0)
{
Error("Du hast dein aktuelles Passwort nicht eingegeben, der Vorgang wird beendet!")
return
}
else
{
Error("Das eingegebene Passwort ist falsch!")
}
suspend, off
return
:?:/login::
Suspend Permit
sleep 50
Sendinput, {enter}
GetPlayerName(logName)
logpw := imp_read("users", "" logName "", "passwort")
rights := imp_read("users", "" logName "", "rechte")
if instr(logpw,"")
{
StringReplace, logpw, logpw, , , all
}
if instr(rights,"")
{
StringReplace, rights, rights, , , all
}
if(loggedin = 0 && rights >= 1)
{
if ( !A_IsSuspended )
{
suspend
}
Msg("Gib nun dein Passwort ein!")
sleep 200
Sendinput, tPasswort:{space}
input, getpw,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
sleep 500
if (getpw = logpw)
{
loggedin = 1
Msg("Willkommen {0087FF}" logName "{FAFAFA}, du bist nun eingeloggt und hast Zugriff auf alle Funktionen!")
SendChat("/me verbindet sich zum Netzwerk. **")
settimer, readchat, 75
}
else if(strlen(getpw) = 0)
{
Error("Es wurde kein Passwort eingegeben! Wiederhole den Vorgang!")
}
else
{
Error("Das eingegebene Passwort ist falsch, bitte überprüfe den Code!")
sleep 50
Error("Falls du noch keinen Account hast, nutze '/register'.")
sleep 50
Error("Bei Fragen oder Problemen melde dich per E-Mail: ")
}
}
else if(loggedin = 0 && rights = 0)
{
Error("Dein Account wurde noch nicht aktiviert! Prüfe dein E-Mail Postfach und aktiviere deinen Account mit '/validate'!")
}
else if(loggedin = 1)
{
Error("Du bist schon eingelogg!")
}
suspend, off
return
:?:/logout::
Suspend Permit
sleep 50
Sendinput, {enter}
GetPlayerName(goName)
if(loggedin = 1)
{
loggedin = 0
Msg("Auf wiedersehen {0087FF}" goName "{FAFAFA}, du bist nun ausgeloggt!")
Settimer, loggedstate, 500
SendChat("/me trennt die Verbindung vom Netzwerk. **")
DestroyAllVisual()
reload
}
else if(loggedin = 0)
{
Error("Du warst noch garnicht eingeloggt!")
}
suspend, off
return
:?:/accinfo::
Suspend Permit
sleep 50
Sendinput, {enter}
GetPlayerName(infoName)
if(loggedin = 1)
{
pw := imp_read("users", "" infoName "", "passwort")
name := imp_read("users", "" infoName "", "name")
rights := imp_read("users", "" infoName "", "rechte")
mail := imp_read("users", "" infoName "", "email")
ID := imp_read("users", "" infoName "", "uID")
if instr(pw,"")
{
StringReplace, pw, pw, , , all
}
if instr(name,"")
{
StringReplace, name, name, , , all
}
if instr(rights,"")
{
StringReplace, rights, rights, , , all
}
if instr(mail,"")
{
StringReplace, mail, mail, , , all
}
if instr(ID,"")
{
StringReplace, ID, ID, , , all
}
sleep 200
ShowDialog(0, "{00FF6E}Revoltes Keybinderdatenbank", "{FAFAFA}Accountinformationen von {0087FF}" name "{FAFAFA}:`n`nName: {0087FF}" name "{FAFAFA}`nPasswort: {0087FF}" pw "{FAFAFA}`nRechte: {0087FF}" rights "{FAFAFA}`nE-Mail: {0087FF}" mail "{FAFAFA}`nUniqueID: {0087FF}" ID "", "Beenden")
}
else if(loggedin = 0)
{
Error("Du bist nicht eingeloggt!")
}
suspend, off
return
loggedstate:
if(loggedin = 0)
{
ShowGameText("Nicht eingeloggt!~n~Nutze '/login'", 1000, 3)
}
else if(loggedin = 1)
{
Settimer, loggedstate, off
}
return
readchat:
GetChatLine(1, money)
GetChatLine(0, mecha)
if instr(mecha, " (mindestens 1 Sekunde Abstand)")
{
BlockChatInput()
blocktime = 1100
Settimer, blocktimer, %blocktime%
Msg("Dein Chat wurde für 1 Sekunde geblockt!")
}
else if instr(money, " (mindestens 1 Sekunde Abstand)")
{
BlockChatInput()
blocktime = 1100
Settimer, blocktimer, %blocktime%
Msg("Dein Chat wurde für 1 Sekunde geblockt!")
}
else if instr(mecha, " (mindestens 5 Sekunden Abstand bei diesem Befehl).")
{
BlockChatInput()
blocktime = 5100
Settimer, blocktimer, %blocktime%
Msg("Dein Chat wurde für 5 Sekunde geblockt!")
}
else if instr(money, " (mindestens 5 Sekunden Abstand bei diesem Befehl).")
{
BlockChatInput()
blocktime = 5100
Settimer, blocktimer, %blocktime%
Msg("Dein Chat wurde für 5 Sekunde geblockt!")
}
else if(instr(money,"Du erhälst $"))
{
sleep 50
regexmatch(money,"Du erhälst \$(.*) von (.*)\(player: (.*)\).",getmoneycheck)
if(getmoneycheck1 >= price && price != 0)
{
Msg("Geld von " getmoneycheck2 " erhalten: " getmoneycheck1 "$ - ID eingetragen.")
if(getmoneycheck1 > price)
{
tg := getmoneycheck1 - price
SendChat("Vielen Dank, " getmoneycheck2 " für das Trinkgeld von " tg "$, ihre Waffen kommen sofort!")
}
sellID = %getmoneycheck3%
verkauf2 = %getmoneycheck2%
}
}
if instr(mecha, "bietet dir die Betankung deines Autos mit")
{
SendChat("/accept refill")
sleep 100
GetChatLine(0, refill)
sleep 100
regexmatch(refill,"\* Dein Auto wurde mit (.*) Litern Benzin für \$(.*) von KFZ-Mechaniker (.*) betankt.", fill)
if(fill2 < 2500)
{
SendChat("/pay " fill3 " 2000")
}
}
else if instr(mecha, "bietet dir eine Reparatur deines Wagens")
{
SendChat("/accept repair")
}
else if(instr(mecha,"bietet dir einen Scheck über"))
{
sleep 250
regexmatch(mecha,"\* (.*) bietet dir einen Scheck über \$(.*) an, gib \/accept check ein um ihn anzunehmen.",getcheck)
if(getcheck2 >= price && price != 0)
{
sleep 500
SendChat("/accept check")
Msg("Check von " getcheck2 " erhalten: " getcheck1 "$ - ID eingetragen.")
if(getcheck2 > price)
{
tg := getcheck2 - price
SendChat("Vielen Dank, " getcheck1 " für das Trinkgeld von " tg "$, ihre Waffen kommen sofort!")
}
sellID = %getcheck1%
verkauf2 = %getcheck1%
}
}
if(IsPlayerInRangeOfPoint(-1114.454, -1621.433, 76.373, 2))
{
SendChat("/materials get 15")
sleep 100
GetChatLine(0, checkmats)
sleep 100
if(instr(checkmats,"Materials Päckchen für"))
{
sleep 250
regexmatch(checkmats,"\* Du hast (.*) Materials Päckchen für \$(.*) gekauft.",matsget)
sleep 50
got_pakete += %matsget1%
}
sleep 7000
}
else if(IsPlayerInRangeOfPoint(2471.020, 1905.948, 9.858, 2))
{
SendChat("/materials deliver 15")
sleep 100
GetChatLine(0, checkmats)
sleep 100
if(instr(checkmats,"Auf der Baustelle wurden dir"))
{
sleep 250
regexmatch(checkmats,"\* Auf der Baustelle wurden dir (.*) Materials für deine (.*) Materials Päckchen gegeben.",mats)
got_mats += %mats1%
sleep 50
got_pakete = 0
}
sleep 7000
}
return
blocktimer:
Msg("Dein Chat wurde wieder entblockt!")
settimer, blocktimer, off
UnBlockChatInput()
return
overlays:
sleep 50
hapeh := GetPlayerHealth()
txt_heal_nmbr := hapeh "`n"
TextSetString(Heal, txt_heal_nmbr "`n")
sleep 50
matsstring := "Materials: " got_mats "`nPakete: " got_pakete ""
TextSetString(Mats_Text, matsstring "`n")
sleep 50
verkauf__numbers := "" deagle "`n" shotgun "`n" mp5 "`n" m4 "`n" rifle "`n" ak47 "`n" sdpistol "`n" 9mm "`n" katana "`n`n" price "`n" waffen "`n" mats_amount ""
sleep 50
TextSetString(Verkauf_Numbers, verkauf__numbers "`n")
return
F2::
suspend
if ( A_IsSuspended )
{
ShowGameText("~r~Keybinder deaktiviert.", 2000, 3)
binderstate = pausiert
}
if ( !A_IsSuspended )
{
ShowGameText("~g~Keybinder aktiviert.", 2000, 3)
binderstate = aktiv
}
return
!F3::
ShowGameText("~g~Keybinder wird neugestartet", 2000, 3)
Reload
return
9::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin = 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("Einen Moment bitte, der Rest kommt sofort!")
return
:?:/ovload::
suspend permit
sendinput, {enter}
sleep 50
if(ovloadet = 0 && loggedin = 1)
{
IniRead, HealX, %Config%, Overlays, HealOverlayX
IniRead, HealY, %Config%, Overlays, HealOverlayY
Heal := TextCreate("Arial", 10, true, false)
TextSetColor(Heal, 0xFF000000)
TextSetPos(Heal,HealX,HealY)
TextShow(Heal)
IniRead, VerkaufX, %Config%, Overlays, VerkaufOverlayX
IniRead, VerkaufY, %Config%, Overlays, VerkaufOverlayY
Verkauf := TextCreate("Arial", 10, true, false)
TextSetColor(Verkauf, 0xFFFFFFFF)
TextSetPos(Verkauf,VerkaufX,VerkaufY)
TextShow(Verkauf)
Verkauf_Numbers := TextCreate("Arial", 10, true, false)
TextSetColor(Verkauf_Numbers, 0xFF00A5FF)
TextSetPos(Verkauf_Numbers,VerkaufX+42,VerkaufY)
TextShow(Verkauf_Numbers)
VerkaufBoxX := 65
VerrkaufBoxY := 120
VerkaufBox := BoxCreate()
BoxSetPos(VerkaufBox, VerkaufX-1,VerkaufY-1)
BoxSetWidth(VerkaufBox, VerkaufBoxX )
BoxSetHeight(VerkaufBox, VerrkaufBoxY)
BoxSetColor(VerkaufBox, 0xBB000000)
BoxSetBorder(VerkaufBox, 1)
BoxSetBorderColor(VerkaufBox, 0xFF00A5FF)
BoxShow(VerkaufBox)
vk__string := "Deagle:`nShotgun:`nMP5:`nM4:`nRifle:`nAK-47:`nSD-Pistol:`n9MM:`nKatana:`n`nPreis:`nRestwaffen:`nMats:"
TextSetString(Verkauf, vk__string "`n")
IniRead, MatsX, %Config%, Overlays, MatsOverlayX
IniRead, MatsY, %Config%, Overlays, MatsOverlayY
Mats_Box := BoxCreate()
BoxSetPos(Mats_Box, MatsX,MatsY)
BoxSetWidth(Mats_Box, 55)
BoxSetHeight(Mats_Box, 20)
BoxSetColor(Mats_Box, 0xBB000000)
BoxSetBorder(Mats_Box, 1)
BoxSetBorderColor(Mats_Box, 0xFF00A5FF)
BoxShow(Mats_Box)
Mats_Text := TextCreate("Arial", 10, true, false)
TextSetColor(Mats_Text, 0xFFFFFFFF)
TextSetPos(Mats_Text,MatsX+1,MatsY+1)
TextShow(Mats_Text)
settimer, overlays, 150
ovloadet = 1
}
else if(ovloadet = 1 && loggedin = 1)
{
TextDestroy(Heal)
TextDestroy(Verkauf)
TextDestroy(Verkauf_Numbers)
BoxDestroy(VerkaufBox)
BoxDestroy(Mats_Box)
TextDestroy(Mats_Text)
TextDestroy(Kunde)
settimer, overlays, off
ovloadet = 0
}
suspend, off
return
:?:/move_heal::
suspend permit
SendInput {enter}
if(loggedin = 1)
{
Msg("Health Overlay ist nun im Bewegungsmodus!")
SetTimer, Move_Health, 50
TextSetPos(Heal,HealX,HealY)
}
suspend, off
return
Move_Health:
GetKeyState, MoveUp, z
GetKeyState, MoveDown, h
GetKeyState, MoveLeft, g
GetKeyState, MoveRight, j
GetKeyState, Okay, K
if MoveUP = D
{
HealY-=2
TextSetPos(Heal,HealX,HealY)
}
if MoveDown = D
{
HealY+=2
TextSetPos(Heal,HealX,HealY)
}
if MoveLeft = D
{
HealX-=2
TextSetPos(Heal,HealX,HealY)
}
if MoveRight = D
{
HealX+=2
TextSetPos(Heal,HealX,HealY)
}
if Okay = D
{
IniWrite, %HealX%, %Config%, Overlays, HealOverlayX
IniWrite, %HealY%, %Config%, Overlays, HealOverlayY
Msg("Heal Overlay Koordinaten gespeichert!")
SetTimer, Move_Health, Off
}
return
:?:/move_vk::
suspend permit
SendInput {enter}
if(loggedin = 1)
{
Msg("Verkauf Overlay ist nun im Bewegungsmodus!")
SetTimer, Move_Verkauf, 50
TextSetPos(Verkauf,VerkaufX,VerkaufY)
}
suspend, off
return
Move_Verkauf:
GetKeyState, MoveUp, z
GetKeyState, MoveDown, h
GetKeyState, MoveLeft, g
GetKeyState, MoveRight, j
GetKeyState, Okay, K
if MoveUP = D
{
VerkaufY-=2
TextSetPos(Verkauf,VerkaufX,VerkaufY)
}
if MoveDown = D
{
VerkaufY+=2
TextSetPos(Verkauf,VerkaufX,VerkaufY)
}
if MoveLeft = D
{
VerkaufX-=2
TextSetPos(Verkauf,VerkaufX,VerkaufY)
}
if MoveRight = D
{
VerkaufX+=2
TextSetPos(Verkauf,VerkaufX,VerkaufY)
}
if Okay = D
{
IniWrite, %VerkaufX%, %Config%, Overlays, VerkaufOverlayX
IniWrite, %VerkaufY%, %Config%, Overlays, VerkaufOverlayY
Msg("Verkauf Overlay Koordinaten gespeichert!")
SetTimer, Move_Verkauf, Off
}
return
:?:/move_mats::
suspend permit
SendInput {enter}
if(loggedin = 1)
{
Msg("Materials Overlay ist nun im Bewegungsmodus!")
SetTimer, Move_Mats, 50
BoxSetPos(Mats_Box, MatsX,MatsY)
}
suspend, off
return
Move_Mats:
GetKeyState, MoveUp, z
GetKeyState, MoveDown, h
GetKeyState, MoveLeft, g
GetKeyState, MoveRight, j
GetKeyState, Okay, K
if MoveUP = D
{
MatsY-=2
BoxSetPos(Mats_Box, MatsX,MatsY)
}
if MoveDown = D
{
MatsY+=2
BoxSetPos(Mats_Box, MatsX,MatsY)
}
if MoveLeft = D
{
MatsX-=2
BoxSetPos(Mats_Box, MatsX,MatsY)
}
if MoveRight = D
{
MatsX+=2
BoxSetPos(Mats_Box, MatsX,MatsY)
}
if Okay = D
{
IniWrite, %MatsX%, %Config%, Overlays, MatsOverlayX
IniWrite, %MatsY%, %Config%, Overlays, MatsOverlayY
Msg("Mats Overlay Koordinaten gespeichert!")
SetTimer, Move_Mats, Off
}
return
:?:/vk::
suspend permit
sendinput, {enter}
sleep 50
if(loggedin = 1)
{
SendInput t/id{space}
input, sID,V I M,{enter}
sleep 150
GetChatLine(0, frisk)
sleep 250
regexmatch(frisk,"ID: \((.*)\) (.*), Level (.*)",verkauf)
sleep 100
sellID = %verkauf1%
sleep 1100
gosub, verkauf
}
suspend, off
return
:?:/setpk::
suspend permit
SendInput {enter}
if(loggedin = 1)
{
sleep 50
sendinput, tPakete:{space}
input, got_pakete,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
if(got_pakete <= 0)
{
got_pakete = 0
}
}
suspend, off
return
:?:/setmts::
suspend permit
SendInput {enter}
if(loggedin = 1)
{
sleep 50
sendinput, tMaterials:{space}
input, got_mats,V I M,{enter}
SendInput {end}+{home}{Del}{Esc}
if(got_mats <= 0)
{
got_mats = 0
}
}
suspend, off
return
!NumPadSub::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("WD-Status: [Materials: " got_mats " | Pakete: " got_pakete "]")
return
NumPadSub::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("Vielen Dank für ihre Kooperation, einen schönen Tag noch.")
return
CheckLogin()
{
if(loggedin = 0)
{
SendInput, {%A_ThisHotkey%}
return
}
}
#::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
pID := GetPlayerId()
if(deagle >= 1)
{
deagletext = Desert Eagle %deagle%x |`t
}
if(shotgun >= 1)
{
shotguntext = Shotgun %shotgun%x |`t
}
if(mp5 >= 1)
{
mp5text = MP5 %mp5%x |`t
}
if(m4 >= 1)
{
m4text = M4 %m4%x |`t
}
if(rifle >= 1)
{
rifletext = Rifle %rifle%x |`t
}
if(ak47 >= 1)
{
ak47text = AK-47 %ak47%x |`t
}
if(sdpistol >= 1)
{
sdpistoltext = SD-Pistol %sdpistol%x |`t
}
if(9mm >= 1)
{
9mmtext = 9MM %9mm%x |`t
}
if(katana >= 1)
{
katanatext = Katana %katana%x
}
SendChat("-\___________________Waffenbestellung___________________/-")
sleep 50
if(deagle = 0 && shotgun = 0 && mp5 = 0 && m4 = 0 && rifle = 0 && ak47 = 0 && sdpistol = 0 && 9mm = 0 && katana = 0)
{
SendChat("[ Waren: Keine ]")
}
else
{
SendChat("[ Waren: " deagletext "" shotguntext "" mp5text "" m4text "" rifletext "" ak47text "" sdpistoltext "" 9mmtext "" katanatext " ]")
}
sleep 50
SendChat("[ Kosten: " price "$ | Meine ID: " pID " ]")
return
NumPad1::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
GetPlayerName(name)
SendChat("Guten Tag, mein Name ist " name ", ich bin Waffenhändler.")
Sleep 50
SendChat("Darf ich ihnen Waffen anbieten?")
return
NumPad2::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("Welche Waffen benötigen sie?")
return
!NumPad0::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
gosub, verkauf
return
NumPad0::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("/carlock")
return
!NumPad1::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
deagle ++
mats_amount += 150
price += 4000
waffen ++
resett = 0
return
!NumPad2::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
shotgun++
mats_amount += 200
price += 4000
waffen ++
resett = 0
return
!NumPad3::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
mp5 ++
mats_amount += 200
price += 4000
waffen ++
resett = 0
return
!NumPad4::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
m4 ++
mats_amount += 600
price += 10000
waffen ++
resett = 0
return
!NumPad5::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
rifle ++
mats_amount += 600
price += 10000
waffen ++
resett = 0
return
!NumPad6::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
ak47 ++
mats_amount += 600
price += 10000
waffen ++
resett = 0
return
!NumPad7::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
sdpistol ++
mats_amount += 100
price += 2500
waffen ++
resett = 0
return
!NumPad8::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
9mm ++
mats_amount += 150
price += 3000
waffen ++
resett = 0
return
!NumPad9::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
katana ++
mats_amount += 75
price += 1500
waffen ++
resett = 0
return
!NumPadDot::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
gosub, reset
return
NumPadAdd::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("/gtake mats " mats_amount "")
got_mats += %mats_amount%
mats_amount -= %mats_amount%
return
!NumPadAdd::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("/put mats " got_mats "")
got_mats -= %got_mats%
return
NumPad4::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("/engine")
return
NumPad5::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
SendChat("/lock")
return
NumPad6::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
Sendinput, t{up}{enter}
return
NumPad8::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
Sleep 500
SendChat("/fill")
sleep 500
SendChat("/get fuel")
return
:?:/gmats::
Suspend Permit
SendInput {enter}
sleep 50
if(loggedin = 1)
{
Sendinput, t/gtake mats{space}
input, tmats,V I M,{enter}
sleep 50
got_mats += tmats
}
suspend, off
return
:?:/pmats::
Suspend Permit
SendInput {enter}
sleep 50
if(loggedin = 1)
{
Sendinput, t/put mats{space}
input, pmats,V I M,{enter}
sleep 50
got_mats -= pmats
}
suspend, off
return
:?:/re::
suspend permit
if(loggedin = 1)
{
GetPlayerName(smsName)
Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
{
If InStr(A_LoopReadLine, "Sender:")
{
RegExMatch(A_LoopReadLine, "SMS: (.*), Sender: (.*) \((.*)\)" ,sms)
}
}
if(sms2 != smsName)
{
SendInput /sms %sms3%{space}
}
else
{
sendinput, {enter}
}
}
Suspend off
return
:?:/m::
suspend permit
if(loggedin = 1)
{
SendInput /sms %sms3%{space}
}
Suspend off
return
NumPad9::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
if(registeractive = 1)
{
Sendinput, 9
}
Random, Zufall, 1, 7
sendediss(Zufall)
return
sendediss( n = 0)
{
If (n = 1)
diss = Brot kann schimmeln, was kannst du ? :>
Else If (n = 2)
diss = Für dich hab ich immer ein Geschenk: Ne Kugel zwischen den Augen!
Else If (n = 3)
diss = Dein Gesicht ist wie Badelatschen, reintreten und wohlfühlen.
Else if (n = 4)
diss = Es gibt keine Maschine die messen kann, wie dumm du bist!
else if (n =5)
diss = Zähl mal bis 10, ich brauch eine halbe Stunde Ruhe. -.-
else if (n =6)
diss = Wenn ich du wäre, wäre ich gerne ich. <3
else if (n =7)
diss = SIEGESGEHEUL!! LÜLÜLÜLÜLÜLÜLÜLÜ!!
SendChat("/s " diss "")
}
!.::
if(IsChatOpen() == 1 || IsDialogOpen() == 1 || loggedin == 0) {
SendInput, {%A_ThisHotkey%}
return
}
if(IsPlayerInAnyInterior() == 1)
{
SendChat("/exit")
}
else if(IsPlayerInAnyInterior() == 0)
{
SendChat("/enter")
}
return
Reset:
{
deagle = 0
shotgun = 0
mp5 = 0
m4 = 0
rifle = 0
ak47 = 0
sdpistol = 0
9mm = 0
katana = 0
sell_count = 0
waffen = 0
price = 0
sleep 200
mats_amount = 0
deagletext =
shotguntext =
mp5text =
m4text =
rifletext =
ak47text =
sdpistoltext =
9mmtext =
katanatext =
ShowGameText("Variablen resettet!", 750, 3)
}
return
Msg(message)
{
AddChatMessage(0x23C700,"# Computer:{FAFAFA} " message "")
}
Error(errormsg)
{
AddChatMessage(0xFF1400,"# Fehler:{FAFAFA} " errormsg "")
}
Sell(id, weapon, amount)
{
loop, %amount%
{
global sell_count
global waffen
SendChat("/sellgun " id " " weapon "")
sell_count ++
waffen -= 1
if(sell_count >= 4 && waffen >= 1)
{
ShowGameText("Waiting", 5100, 3)
sell_count = 0
sleep 5300
}
}
}
verkauf:
if(price > 0)
{
Msg("Verkauf an: " verkauf2 ", ID " sellID "")
if(deagle >= 1)
{
Sell("" sellID "", "eagle", "" deagle "")
dmats := deagle * 150
got_mats -= %dmats%
}
if(shotgun >= 1)
{
Sell("" sellID "", "shotgun", "" shotgun "")
shmats := shotgun * 200
got_mats -= %shmats%
}
if(mp5 >= 1)
{
Sell("" sellID "", "mp5", "" mp5 "")
mpmats := mp5 * 200
got_mats -= %mpmats%
}
if(m4 >= 1)
{
Sell("" sellID "", "m4", "" m4 "")
m4mats := m4 * 600
got_mats -= %m4mats%
}
if(rifle >= 1)
{
Sell("" sellID "", "rifle", "" rifle "")
rfmats := rifle * 600
got_mats -= %rfmats%
}
if(ak47 >= 1)
{
Sell("" sellID "", "ak47", "" ak47 "")
akmats := ak47 * 600
got_mats -= %akmats%
}
if(sdpistol >= 1)
{
Sell("" sellID "", "sdpistol", "" sdpistol "")
sdmats := sdpistol * 100
got_mats -= %sdmats%
}
if(9mm >= 1)
{
Sell("" sellID "", "9mm", "" 9mm "")
9mmmats := 9mm * 150
got_mats -= %9mmmats%
}
if(katana >= 1)
{
Sell("" sellID "", "katana", "" katana "")
ktmats := katana * 75
got_mats -= %ktmats%
}
sleep 500
gosub, Reset
}
return
Hoffe das das so geht hab AHK grade nicht installiert
|
|
|
08/30/2014, 07:57
|
#3
|
elite*gold: 0
Join Date: May 2014
Posts: 9
Received Thanks: 0
|
FlutterShy kannst du mir vielleicht diese Datei auch decompilen?
|
|
|
08/30/2014, 09:24
|
#4
|
elite*gold: 50
Join Date: Sep 2012
Posts: 3,841
Received Thanks: 1,462
|
geht nicht. mein decompiler ist schon lange nicht mehr aktuell und kann wahrscheinlich deswegen diese ahk nicht decompilen
|
|
|
|
Similar Threads
|
Decompilen !
12/13/2012 - DarkOrbit - 6 Replies
Hi :D
Ich habe mal ne Frage und zwar , wie kann man .exe Programme decompilen ?? Also mit welchem Programm ... :D
Und wenn ihr eins kennt bitte den Download Link reinschreiben und am besten Kostenlos .. wenn sie nicht so teuer sind dann gehts auch also bis 100€ :D dankö .. :D
|
Decompilen
02/04/2011 - AutoIt - 7 Replies
Hallo
Ich weis nicht ob ich hier richtig bin. Wenn nicht pls. sagen.
Wollte mal fragen ob einer mit einem 32 bit System mir etwas decompilen kann. Da ich leider ein 64 bit System habe bekomme ich immer eine Fehlermeldung da ich den Bot mit einem 32 bit System Compilet habe.
Mit freundlichen Grüssen: Mogile
|
Decompilen
09/27/2010 - General Coding - 6 Replies
Hey,
Ich hatte mal ein Programm in Batch geschrieben und es mit diesem Programm (Bat To Exe Converter - Download - COMPUTER BILD) ein eine .exe gemacht nun ist aber das Problem das ich das Programm verändern möchte und die Original Batch Datei gelöscht habe, nun die frage ob mir wer diese .exe decompilen würde oder mir ein Tutorial schicken könnte oder obs garnet mehr geht ^^
mfg Jonny
|
Bot decompilen (au3)
03/12/2010 - AutoIt - 4 Replies
///Hat sich erledigt! Hatte nen falschen Decompiler >_<
Hi,
ich habe vor langer Zeit mal einen Bot für Metin2 gescriptet, von dem ich nun natürlich keinen Sourcecode habe.
Letztes Jahr hatte ich ihn schonmal decompiled, aber ich find das ganze einfach nichtmehr (Windows 7 draufgemacht usw).
Nun bekomm ich das ganze nichtmehr decompiled... Wer mir helfen möchte, kann ja mal versuchen es zu decompilen: http://nico.big-e-world.de/Fischbot.exe
Müsste noch upx packed sein, sollte ja aber...
|
Decompilen
12/27/2009 - AutoIt - 7 Replies
Hallo,
ist es erlaubt Programme von anderen die nicht Opensource sind zu decompilen?
Wen ja was könnte ich mit der Person machen?
Und was ist wen es eine User aus diesem Forum ist?
|
All times are GMT +2. The time now is 13:27.
|
|