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: [Only registered and activated users can see links. Click Here To Register...]")
}
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: [Only registered and activated users can see links. Click Here To Register...]")
}
}
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