• Versicherungen für Fahrzeuge (Autos, LKW, Helikopter und Flugzeuge)

    1. offizieller Beitrag
      • Offizieller Beitrag


      Hallo zusammen!


      Folgende Scriptinhalte stammen von Guitoxx, danke dafür.


      Was tut dieses Script?

      Mithilfe dieses Scripts könnt ihr sowohl eure Fahrzeuge als auch eure Helikopter oder Flugzeuge im Spiel versichern lassen.
      Ein versichertes Fahrzeug taucht im Falle seiner Zerstörung wieder in der Garage des Besitzers auf, die Versicherung selbst kann über das Garagen-Menu abgeschlossen werden.


      WICHTIG: Beachtet bitte den Schwierigkeitsgrad dieses Tutorials. Erklärungen zu Variablen, Klassen und Querys werden hier nicht beantwortet.

      Im Zweifelsfall: SQF Script Guide und Schwierigkeitsgrad für Tutorials


      Also fangen wir an.


      Öffnet zuerst folgende Datei: dialog\impound.hpp

      Fügt dort nun unter "Class controlsBackground" folgende neue Klasse hinzu:

      Code: impound.hpp
      class InsureCar : life_RscButtonMenu
        {
            idc = 97480;
            text = "Assurer";
            onButtonClick = "[] call life_fnc_InsureCar;";
            x = 0.43 + (6.25 / 40) + (1 / 250 / (safezoneW / safezoneH));
            y = 0.9 - (1 / 25);
            w = (6.25 / 40);
            h = (1 / 25);
        };


      Anschließend erstellt eine Datei mit dem Namen fn_insureCar.sqf und folgendem Inhalt in diesem Verzeichnis: dialog\function





      Natürlich solltet ihr dann die Klasse "class insureCar{};" eurer Function.h unter "Class Dialog_Controls" hinzufügen.


      Nun wird Serverseitig in eurer config.cpp folgende Klasse unter "Class TON_System" erstellt: class insureCar{};

      Im Anschluss öffnet eure life_server\Functions\Systems\fn_spawnVehicle.sqf, sucht dort den "_query" und ersetzt ihn durch folgendes:

      SQL: fn_spawnVehicle.sqf
      _query = format["SELECT id, side, classname, type, pid, alive, active, plate, color, insure FROM vehicles WHERE id='%1' AND pid='%2'",_vid,_pid];


      Ebenfalls in dieser Datei sucht ihr folgende Zeile: _vehicle setVariable["dbInfo",[(_vInfo select 4),_vInfo select 7]];

      und fügt dort "_vInfo select 9" hinzu, das ganze sollte dann so aussehen:

      C: fn_spawnVehicle.sqf
      _vehicle setVariable["dbInfo",[(_vInfo select 4),_vInfo select 7, _vInfo select 9]];


      Ebenfalls innerhalb dieser Datei ersetzt ihr diese Zeile: [1,"Your vehicle is ready!"] remoteExecCall ["life_fnc_broadcast",_unit];

      Durch folgendes (Texte natürlich je nach Sprache ändern...):

      C: fn_spawnVehicle.sqf
      if((_vInfo select 9) == 1) then {
[1,"Votre véhicule est prêt et assurer!"] remoteExecCall ["life_fnc_broadcast",_unit];
}
else {
[1,"Votre véhicule est prêt!"] remoteExecCall ["life_fnc_broadcast",_unit];
};


      Erstellt nun unter life_server\functions\Systems eine Datei mit dem Namen fn_insureCar.sqf und folgendem Inhalt:


      Danach ersetzt ihr den Inhalt folgender Datei in eurer Mission mit folgendem Inhalt: \dialog\function\fn_garageLBChange.sqf

      Für Farbänderungen dienen folgende Zeilen:



      Unter dialog\function\fn_impoundMenu.sqf sucht ihr nach folgender Zeile: _tmp = [_x select 2,_x select 8];
      und fügt dort "_x select 9" hinzu, was so aussehen sollte:

      C: fn_impoundMenu.sqf
      _tmp = [_x select 2,_x select 8, _x select 9];


      Öffnet nun eure cleanup.fsm unter life_server\FSM\cleanup.fsm und ersetzt den Inhalt durch folgenden:


      Texte ändert ihr in folgenden Zeilen:


      C: cleanup.fsm
      diag_log "" Assurer !"";" \n




diag_log "" Pas Assurer !"";" \n


      Öffnet nun eure Config_Vehicles.hpp und fügt für alle Fahrzeuge welche ihr versichern wollt unter LifeCfgVehicles folgendes hinzu: assurPrice[] = { 1000, 1000, 1000, 1000 };

      Erstellt dann folgenden Eintrag in eurer CfgRemoteExec.hpp: F(TON_fnc_insureCar,SERVER)

      Sucht nun unter life_server\functions\Systems\fn_getVehicles.sqf nach eurem "_query" und ersetzt diesen durch folgendes:

      SQL: fn_getVehicles.sqf
      _query = format["SELECT id, side, classname, type, pid, alive, active, plate, color, insure FROM vehicles WHERE pid='%1' AND alive='1' AND active='0' AND side='%2' AND type='%3'",_pid,_side,_type];


      Nun fügt ihr eurer Datenbanktabelle "vehicles" die Spalte "insure" hinzu, hier die Struktur:



      Zum Schluss öffnet eure life_server\Functions\Systems\fn_vehicleCreate.sqf und fügt unter private "_insureSystem " hinzu. Danach erstellt ihr dort noch folgende Variable am oberen Ende der Datei: _insureSystem = 0;

      danach sucht nach folgender Zeile: _vehicle setVariable["dbInfo",[_uid,_plate]];
      und fügt dort "_insureSystem" hinzu, das sollte dann so aussehen: _vehicle setVariable["dbInfo",[_uid,_plate,_insureSystem]];


      Das soll es gewesen sein. Viel Spaß damit! :P

      ###### EDIT
      Vor mir war eine Frage wie man es einstellen könnte das bei jedem Neustart die Versicherung entfernt wird sowie das man die Fahrzeuge nicht im ChopShop verkaufen wenn sie versichert sind. ~


      Dafür schreibst du eine neue Prozedur in deine DB und lässt die am anfang callen wenn der grade hochgefahren wird:

      Das hier ist ein beispielcode, kein C&P Code!

      Code
      CREATE DEFINER=`minolife`@`localhost` PROCEDURE `deleteDeadVehicles`()
BEGIN
	UPDATE `vehicle` SET `insurance`= 0 WHERE `insurance`= 1;
END


      Beim Chopshop fragst du einfach nach den DBinfos in der datei fn_chopShopMenu.sqf;
      Das hier ist ein beispielcode, kein C&P Code!

      Sollte recht einfach sein :)

      Software Entwickler -
      Präzises Rätselraten, basierend auf unzuverlässigen Daten und fragwürdigem Wissen der Auftraggeber.

      Ich bekomme Fehler.

      Jemand eine Idee?

      So hab das jetzt hinzugefügt und kriege folgender Fehler:

      22:41:03 Error in expression <dbinfo select 2 };
      if(alive _x && _ins == 0) then {
      _className = typeOf _x;
      _cl>
      22:41:03 Error position: <== 0) then {
      _className = typeOf _x;
      _cl>
      22:41:03 Error Allgemeiner Fehler in Ausdruck
      22:41:03 File mpmissions\__CUR_MP.Altis\core\shops\fn_chopShopMenu.sqf, line 28

      und so Sieht die Chopshop aus:

      Spoiler anzeigen


      #include "..\..\script_macros.hpp"
      /*
      File: fn_chopShopMenu.sqf
      Author: Bryan "Tonic" Boardwine


      Description:
      Opens & initializes the chop shop menu.
      */
      if(life_action_inUse) exitWith {hint localize "STR_NOTF_ActionInProc"};
      disableSerialization;
      private["_nearVehicles","_control"];
      _nearVehicles = nearestObjects [getMarkerPos (_this select 3),["Car","Truck","Air"],25];


      life_chopShop = SEL(_this,3);
      //Error check
      if(EQUAL(count _nearVehicles,0)) exitWith {titleText[localize "STR_Shop_NoVehNear","PLAIN"];};
      if(!(createDialog "Chop_Shop")) exitWith {hint localize "STR_Shop_ChopShopError"};


      _control = CONTROL(39400,39402);
      {
      _dbinfo = _x getvariable ["dbInfo",[]];
      _ins = 0;
      if (count _dbinfo > 0) then { _ins = _dbinfo select 2 };
      if(alive _x && _ins == 0) then {
      _className = typeOf _x;
      _classNameLife = _className;
      _displayName = getText(configFile >> "CfgVehicles" >> _className >> "displayName");
      _picture = getText(configFile >> "CfgVehicles" >> _className >> "picture");


      if(!isClass (missionConfigFile >> CONFIG_LIFE_VEHICLES >> _classNameLife)) then {
      _classNameLife = "Default"; //Use Default class if it doesn't exist
      diag_log format["%1: LifeCfgVehicles class doesn't exist",_className];
      };


      _price = switch(playerSide) do {
      case civilian: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),0)};
      case west: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),1)};
      case independent: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),2)};
      case east: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),3)};
      };
      _multiplicator = LIFE_SETTINGS(getNumber,"vehicleChopShop_Multiplicator");
      _price = _multiplicator * _price;
      if(!isNil "_price" && EQUAL(count crew _x,0)) then {
      _control lbAdd _displayName;
      _control lbSetData [(lbSize _control)-1,str(_forEachIndex)];
      _control lbSetPicture [(lbSize _control)-1,_picture];
      _control lbSetValue [(lbSize _control)-1,_price];
      };
      };
      } foreach _nearVehicles;

      sowie in der SpawnVehicle.sqf:

      21:40:55 Error in expression <ate",_unit];
      };


      if((_vInfo select 9) == 1) then {
      [1,"Ihr Fahrzeug ist bereit>
      21:40:55 Error position: <== 1) then {
      [1,"Ihr Fahrzeug ist bereit>
      21:40:55 Error Generic error in expression
      21:40:55 File life_server\Functions\Systems\fn_spawnVehicle.sqf, line 187


      1:47:48 Error in expression <vehicleAnimate",_unit];
      };
      if((_vInfo,9) == 1) then {
      [1,"Ihr Fahrzeug ist be>
      1:47:48 Error position: <,9) == 1) then {
      [1,"Ihr Fahrzeug ist be>
      1:47:48 Error Missing )
      1:47:48 File life_server\Functions\Systems\fn_spawnVehicle.sqf, line 187

      Und hier noch die Spawn Vehicle:

      Spoiler anzeigen


      #include "\life_server\script_macros.hpp"
      /*
      File: fn_spawnVehicle.sqf
      Author: Bryan "Tonic" Boardwine


      Description:
      Sends the query request to the database, if an array is returned then it creates
      the vehicle if it's not in use or dead.
      */
      private["_vid","_sp","_pid","_query","_sql","_vehicle","_nearVehicles","_name","_side","_tickTime","_dir","_servIndex","_damage"];
      _vid = [_this,0,-1,[0]] call BIS_fnc_param;
      _pid = [_this,1,"",[""]] call BIS_fnc_param;
      _sp = [_this,2,[],[[],""]] call BIS_fnc_param;
      _unit = [_this,3,ObjNull,[ObjNull]] call BIS_fnc_param;
      _price = [_this,4,0,[0]] call BIS_fnc_param;
      _dir = [_this,5,0,[0]] call BIS_fnc_param;
      _spawntext = _this select 6;
      _unit_return = _unit;
      _name = name _unit;
      _side = side _unit;
      _unit = owner _unit;


      if(EQUAL(_vid,-1) OR EQUAL(_pid,"")) exitWith {};
      if(_vid in serv_sv_use) exitWith {};
      serv_sv_use pushBack _vid;
      _servIndex = serv_sv_use find _vid;


      /*_query = format["SELECT id, side, classname, type, pid, alive, active, plate, color, inventory, gear, fuel, damage FROM vehicles WHERE id='%1' AND pid='%2'",_vid,_pid];*/
      _query = format["SELECT id, side, classname, type, pid, alive, active, plate, color,inventory, gear, fuel, damage, insure FROM vehicles WHERE id='%1' AND pid='%2'",_vid,_pid];


      _tickTime = diag_tickTime;
      _queryResult = [_query,2] call DB_fnc_asyncCall;


      if(EXTDB_SETTING(getNumber,"DebugMode") == 1) then {
      diag_log "------------- Client Query Request -------------";
      diag_log format["QUERY: %1",_query];
      diag_log format["Time to complete: %1 (in seconds)",(diag_tickTime - _tickTime)];
      diag_log format["Result: %1",_queryResult];
      diag_log "------------------------------------------------";
      };


      if(EQUAL(typeName _queryResult,typeName "")) exitWith {};


      _vInfo = _queryResult;
      if(isNil "_vInfo") exitWith {serv_sv_use deleteAt _servIndex;};
      if(EQUAL(count _vInfo,0)) exitWith {serv_sv_use deleteAt _servIndex;};


      if(EQUAL(SEL(_vInfo,5),0)) exitWith {
      serv_sv_use deleteAt _servIndex;
      [1,format[(localize "STR_Garage_SQLError_Destroyed"),_vInfo select 2]] remoteExecCall ["life_fnc_broadcast",_unit];
      };


      if(EQUAL(SEL(_vInfo,6),1)) exitWith {
      serv_sv_use deleteAt _servIndex;
      [1,format[(localize "STR_Garage_SQLError_Active"),_vInfo select 2]] remoteExecCall ["life_fnc_broadcast",_unit];
      };


      if!(EQUAL(typeName _sp,typeName "")) then {
      _nearVehicles = nearestObjects[_sp,["Car","Air","Ship"],10];
      } else {
      _nearVehicles = [];
      };


      if(count _nearVehicles > 0) exitWith {
      serv_sv_use deleteAt _servIndex;
      [_price,_unit_return] remoteExecCall ["life_fnc_garageRefund",_unit];
      [1,(localize "STR_Garage_SpawnPointError")] remoteExecCall ["life_fnc_broadcast",_unit];
      };


      _query = format["UPDATE vehicles SET active='1', damage='""[]""' WHERE pid='%1' AND id='%2'",_pid,_vid];


      _trunk = [_vInfo select 9] call DB_fnc_mresToArray;
      _gear = [_vInfo select 10] call DB_fnc_mresToArray;
      _damage = [_vInfo select 12] call DB_fnc_mresToArray;


      [_query,1] spawn DB_fnc_asyncCall;
      if(typeName _sp == "STRING") then {
      _vehicle = createVehicle[(_vInfo select 2),[0,0,999],[],0,"NONE"];
      waitUntil {!isNil "_vehicle" && {!isNull _vehicle}};
      _vehicle allowDamage false;
      _hs = nearestObjects[getMarkerPos _sp,["Land_Hospital_side2_F"],50] select 0;
      _vehicle setPosATL (_hs modelToWorld [-0.4,-4,12.65]);
      sleep 0.6;
      } else {
      _vehicle = createVehicle [(_vInfo select 2),_sp,[],0,"NONE"];
      waitUntil {!isNil "_vehicle" && {!isNull _vehicle}};
      _vehicle allowDamage false;
      _vehicle setPos _sp;
      _vehicle setVectorUp (surfaceNormal _sp);
      _vehicle setDir _dir;
      };
      _vehicle allowDamage true;
      //Send keys over the network.
      [_vehicle] remoteExecCall ["life_fnc_addVehicle2Chain",_unit];
      [_pid,_side,_vehicle,1] call TON_fnc_keyManagement;
      _vehicle lock 2;
      //Reskin the vehicle
      [_vehicle,_vInfo select 8] remoteExecCall ["life_fnc_colorVehicle",_unit];
      _vehicle setVariable["vehicle_info_owners",[[_pid,_name]],true];
      _vehicle setVariable["dbInfo",[(_vInfo select 4),_vInfo select 7,_vInfo select 9],true];
      _vehicle disableTIEquipment true; //No Thermals.. They're cheap but addictive.
      [_vehicle] call life_fnc_clearVehicleAmmo;


      // Avoid problems if u keep changing which stuff to save!
      if(EQUAL(LIFE_SETTINGS(getNumber,"save_veh_virtualItems"),1)) then {
      _vehicle setVariable["Trunk",_trunk,true];
      }else{
      _vehicle setVariable["Trunk",[[],0],true];
      };


      if(EQUAL(LIFE_SETTINGS(getNumber,"save_veh_fuel"),1)) then {
      _vehicle setFuel (_vInfo select 11);
      }else{
      _vehicle setfuel 1;
      };


      if (count _gear > 0 && (EQUAL(LIFE_SETTINGS(getNumber,"save_veh_gear"),1))) then {
      _items = _gear select 0;
      _mags = _gear select 1;
      _weapons = _gear select 2;
      _backpacks = _gear select 3;


      for "_i" from 0 to ((count (_items select 0)) - 1) do {
      _vehicle addItemCargoGlobal [((_items select 0) select _i), ((_items select 1) select _i)];
      };
      for "_i" from 0 to ((count (_mags select 0)) - 1) do {
      _vehicle addMagazineCargoGlobal [((_mags select 0) select _i), ((_mags select 1) select _i)];
      };
      for "_i" from 0 to ((count (_weapons select 0)) - 1) do {
      _vehicle addWeaponCargoGlobal [((_weapons select 0) select _i), ((_weapons select 1) select _i)];
      };
      for "_i" from 0 to ((count (_backpacks select 0)) - 1) do {
      _vehicle addBackpackCargoGlobal [((_backpacks select 0) select _i), ((_backpacks select 1) select _i)];
      };
      };


      if (count _damage > 0 && (EQUAL(LIFE_SETTINGS(getNumber,"save_veh_damage"),1))) then {
      _parts = getAllHitPointsDamage _vehicle;


      for "_i" from 0 to ((count _damage) - 1) do {
      _vehicle setHitPointDamage [format["%1",((_parts select 0) select _i)],(_damage select _i)];
      };
      };


      //Sets of animations
      if(EQUAL(SEL(_vInfo,1),"civ") && EQUAL(SEL(_vInfo,2),"B_Heli_Light_01_F") && !(EQUAL(SEL(_vInfo,8),13))) then {
      [_vehicle,"civ_littlebird",true] remoteExecCall ["life_fnc_vehicleAnimate",_unit];
      };
      //Cop Lichter nach ausparken
      if((_vInfo select 1) == "cop" && (_vInfo select 2) in [
      "C_SUV_01_F","C_Hatchback_01_sport_F","C_Hatchback_01_F","B_MRAP_01_F","O_MRAP_02_F","B_Quadbike_01_F","B_MRAP_01_hmg_F","I_MRAP_03_F","I_MRAP_03_hmg_F","B_Heli_Light_01_F","O_Heli_Light_02_unarmed_F","B_Heli_Transport_01_F","I_Heli_light_03_unarmed_F","B_APC_Tracked_01_CRV_F"]) then {
      _vehicle setVariable["lights",false,true];
      };
      //Medic Lichter nach ausparken
      if((_vInfo select 1) == "med" && (_vInfo select 2) in [
      "C_SUV_01_F",
      "C_Hatchback_01_sport_F",
      "C_Hatchback_01_F",
      "B_MRAP_01_F",
      "C_Van_01_box_F",
      "C_Van_01_fuel_F",
      "O_MRAP_02_F",
      "B_Quadbike_01_F",
      "B_MRAP_01_hmg_F",
      "I_MRAP_03_F",
      "I_MRAP_03_hmg_F",
      "B_Heli_Light_01_F",
      "O_Heli_Light_02_unarmed_F",
      "B_Heli_Transport_01_F",
      "O_Truck_03_transport_F",
      "I_Heli_light_03_unarmed_F",
      "I_Truck_02_transport_F",
      "B_APC_Tracked_01_CRV_F"]) then {
      _vehicle setVariable["lights",false,true];
      };


      if(EQUAL(SEL(_vInfo,1),"cop") && (SEL(_vInfo,2)) in ["C_Offroad_01_F","B_MRAP_01_F","C_SUV_01_F","C_Hatchback_01_sport_F","B_Heli_Light_01_F","B_Heli_Transport_01_F"]) then {
      [_vehicle,"cop_offroad",true] remoteExecCall ["life_fnc_vehicleAnimate",_unit];
      };


      if(EQUAL(SEL(_vInfo,1),"med") && EQUAL(SEL(_vInfo,2),"C_Offroad_01_F")) then {
      [_vehicle,"med_offroad",true] remoteExecCall ["life_fnc_vehicleAnimate",_unit];
      };


      /*[1,_spawntext] remoteExecCall ["life_fnc_broadcast",_unit];*/
      //Alter Text darüber

      if((_vInfo select 9) == 1) then {
      [1,"Ihr Fahrzeug ist bereit und versichert!"] remoteExecCall ["life_fnc_broadcast",_unit];
      } else {
      [1,"Ihr Fahrzeug ist bereit!"] remoteExecCall ["life_fnc_broadcast",_unit];
      };
      */
      serv_sv_use deleteAt _servIndex;


      Vielen dank für deine hilfe.

      Grüsse

      Einmal editiert, zuletzt von Cris-2015 (30. Juni 2016 um 02:04)

      Und wieder einen Sturen copy/paster erwischt...

      Code
      _control = CONTROL(39400,39402);
{
_dbinfo = _x getvariable ["dbInfo",[]];
_ins = 0;
if (count _dbinfo > 0) then { _ins = _dbinfo select 2 };
if(alive _x && _ins == 0) then {
_className = typeOf _x;
_classNameLife = _className;
_displayName = getText(configFile >> "CfgVehicles" >> _className >> "displayName");
_picture = getText(configFile >> "CfgVehicles" >> _className >> "picture");


      Nächstes mal Code genauer anschauen und nicht direkt C&P... änder den Code zu folgendem:

      Code
      _dbinfo = _x getvariable ["dbInfo",[]];
_ins = 0;
if (count _dbinfo > 0) then { _ins = _dbinfo select 2 };
if(alive _x && _ins == 0) then {
_className = typeOf _x;
_classNameLife = _className;
_displayName = getText(configFile >> "CfgVehicles" >> _className >> "displayName");
_picture = getText(configFile >> "CfgVehicles" >> _className >> "picture");

      Einfach die beiden oberen Zeilen löschen also das Control und die Klammer... Eventuelles Mitdenken setze ich voraus.


      Spawnvehicle ist es ähnlich:

      Code
      if((_vInfo select 9) == 1) then {
[1,"Ihr Fahrzeug ist bereit und versichert!"] remoteExecCall ["life_fnc_broadcast",_unit];
} else {
[1,"Ihr Fahrzeug ist bereit!"] remoteExecCall ["life_fnc_broadcast",_unit];
};

      Du fragst nach dem 9 Element im Array was bei dir offensichtlich


      Code
      _trunk = [_vInfo select 9] call DB_fnc_mresToArray;
_gear = [_vInfo select 10] call DB_fnc_mresToArray;
_damage = [_vInfo select 12] call DB_fnc_mresToArray;

      Der Trunk bzw das Virtuelle Inventar ist. ~ anders gesagt, du musst zählen wieviele Elemente du bereits aus dem Array holst.

      Da du beim punkt 12 schon den Schaden hast solltest du es auf 13 legen (Ohne nochmal groß drüber zu schauen).

      Code
      if((_vInfo select 13) == 1) then {
[1,"Ihr Fahrzeug ist bereit und versichert!"] remoteExecCall ["life_fnc_broadcast",_unit];
} else {
[1,"Ihr Fahrzeug ist bereit!"] remoteExecCall ["life_fnc_broadcast",_unit];
};

      Software Entwickler -
      Präzises Rätselraten, basierend auf unzuverlässigen Daten und fragwürdigem Wissen der Auftraggeber.

      Hallo
      Irgendwie checke ich es gerade nicht ganz

      jetzt habe ich folgender Fehler

      18:01:37 Error in expression <e "STR_Shop_ChopShopError"};


      _dbinfo = _x getvariable ["dbInfo",[]];
      _ins = 0;
      >
      18:01:37 Error position: <_x getvariable ["dbInfo",[]];
      _ins = 0;
      >
      18:01:37 Error Nicht definierte Variable in Ausdruck: _x
      18:01:37 File mpmissions\__CUR_MP.Altis\core\shops\fn_chopShopMenu.sqf, line 19


      Spoiler anzeigen


      if(life_action_inUse) exitWith {hint localize "STR_NOTF_ActionInProc"};
      disableSerialization;
      private["_nearVehicles","_control"];
      _nearVehicles = nearestObjects [getMarkerPos (_this select 3),["Car","Truck","Air"],25];


      life_chopShop = SEL(_this,3);
      //Error check
      if(EQUAL(count _nearVehicles,0)) exitWith {titleText[localize "STR_Shop_NoVehNear","PLAIN"];};
      if(!(createDialog "Chop_Shop")) exitWith {hint localize "STR_Shop_ChopShopError"};


      _dbinfo = _x getvariable ["dbInfo",[]];
      _ins = 0;
      if (count _dbinfo > 0) then { _ins = _dbinfo select 14 };
      if(alive _x && _ins == 0) then {
      _className = typeOf _x;
      _classNameLife = _className;
      _displayName = getText(configFile >> "CfgVehicles" >> _className >> "displayName");
      _picture = getText(configFile >> "CfgVehicles" >> _className >> "picture");


      if(!isClass (missionConfigFile >> CONFIG_LIFE_VEHICLES >> _classNameLife)) then {
      _classNameLife = "Default"; //Use Default class if it doesn't exist
      diag_log format["%1: LifeCfgVehicles class doesn't exist",_className];
      };


      _price = switch(playerSide) do {
      case civilian: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),0)};
      case west: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),1)};
      case independent: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),2)};
      case east: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),3)};
      };
      _multiplicator = LIFE_SETTINGS(getNumber,"vehicleChopShop_Multiplicator");
      _price = _multiplicator * _price;
      if(!isNil "_price" && EQUAL(count crew _x,0)) then {
      _control lbAdd _displayName;
      _control lbSetData [(lbSize _control)-1,str(_forEachIndex)];
      _control lbSetPicture [(lbSize _control)-1,_picture];
      _control lbSetValue [(lbSize _control)-1,_price];
      };
      } foreach _nearVehicles;

      Okay ja war ne Foreach

      Software Entwickler -
      Präzises Rätselraten, basierend auf unzuverlässigen Daten und fragwürdigem Wissen der Auftraggeber.

      Gut hab ich gemacht aber immernoch diesen Fehler:

      18:55:43 Error position: <_ins == 0) then {
      _className = typeOf _x>
      18:55:43 Error Nicht definierte Variable in Ausdruck: _ins
      18:55:43 File mpmissions\__CUR_MP.Altis\core\shops\fn_chopShopMenu.sqf, line 23

      Spoiler anzeigen


      #include "..\..\script_macros.hpp"
      /*
      File: fn_chopShopMenu.sqf
      Author: Bryan "Tonic" Boardwine


      Description:
      Opens & initializes the chop shop menu.
      */
      if(life_action_inUse) exitWith {hint localize "STR_NOTF_ActionInProc"};
      disableSerialization;
      private["_nearVehicles","_control"];
      _nearVehicles = nearestObjects [getMarkerPos (_this select 3),["Car","Truck","Air"],25];


      life_chopShop = SEL(_this,3);
      //Error check
      if(EQUAL(count _nearVehicles,0)) exitWith {titleText[localize "STR_Shop_NoVehNear","PLAIN"];};
      if(!(createDialog "Chop_Shop")) exitWith {hint localize "STR_Shop_ChopShopError"};


      {
      _dbinfo = _x getvariable ["dbInfo",[]];
      _ins = 0;
      if (count _dbinfo > 0) then { _ins = _dbinfo select 14 };
      if(alive _x && _insure == 0) then {
      _className = typeOf _x;
      _classNameLife = _className;
      _displayName = getText(configFile >> "CfgVehicles" >> _className >> "displayName");
      _picture = getText(configFile >> "CfgVehicles" >> _className >> "picture");


      if(!isClass (missionConfigFile >> CONFIG_LIFE_VEHICLES >> _classNameLife)) then {
      _classNameLife = "Default"; //Use Default class if it doesn't exist
      diag_log format["%1: LifeCfgVehicles class doesn't exist",_className];
      };


      _price = switch(playerSide) do {
      case civilian: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),0)};
      case west: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),1)};
      case independent: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),2)};
      case east: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),3)};
      };
      _multiplicator = LIFE_SETTINGS(getNumber,"vehicleChopShop_Multiplicator");
      _price = _multiplicator * _price;
      if(!isNil "_price" && EQUAL(count crew _x,0)) then {
      _control lbAdd _displayName;
      _control lbSetData [(lbSize _control)-1,str(_forEachIndex)];
      _control lbSetPicture [(lbSize _control)-1,_picture];
      _control lbSetValue [(lbSize _control)-1,_price];
      };
      };
      } foreach _nearVehicles;

      Verrätst du mir wo diese 14 her kommt?

      Code
      if (count _dbinfo > 0) then { _ins = _dbinfo select 14 }; // <<< die da????

      Die steht nirgendswo in irgendeinem Code drin.
      Auf jedenfall machst du aus der 14 eine 2

      Software Entwickler -
      Präzises Rätselraten, basierend auf unzuverlässigen Daten und fragwürdigem Wissen der Auftraggeber.

      Ich habe mich dachte das were der Datenbanksatz

      aber geht leider noch nicht

      kriege jetzt diesen Fehler

      19:08:29 Error in expression <_dbinfo select 2 };
      if(alive _x && _ins == 0) then {
      _className = typeOf _x;
      _cl>
      19:08:29 Error position: <== 0) then {
      _className = typeOf _x;
      _cl>
      19:08:29 Error Allgemeiner Fehler in Ausdruck
      19:08:29 File mpmissions\__CUR_MP.Altis\core\shops\fn_chopShopMenu.sqf, line 23
      19:08:42 Error in expression <_dbinfo select 2 };
      if(alive _x && _ins == 0) then {
      _className = typeOf _x;
      _cl>
      19:08:42 Error position: <== 0) then {
      _className = typeOf _x;
      _cl>
      19:08:42 Error Allgemeiner Fehler in Ausdruck
      19:08:42 File mpmissions\__CUR_MP.Altis\core\shops\fn_chopShopMenu.sqf, line 23


      Spoiler anzeigen


      #include "..\..\script_macros.hpp"
      /*
      File: fn_chopShopMenu.sqf
      Author: Bryan "Tonic" Boardwine


      Description:
      Opens & initializes the chop shop menu.
      */
      if(life_action_inUse) exitWith {hint localize "STR_NOTF_ActionInProc"};
      disableSerialization;
      private["_nearVehicles","_control"];
      _nearVehicles = nearestObjects [getMarkerPos (_this select 3),["Car","Truck","Air"],25];


      life_chopShop = SEL(_this,3);
      //Error check
      if(EQUAL(count _nearVehicles,0)) exitWith {titleText[localize "STR_Shop_NoVehNear","PLAIN"];};
      if(!(createDialog "Chop_Shop")) exitWith {hint localize "STR_Shop_ChopShopError"};


      {
      _dbinfo = _x getvariable ["dbInfo",[]];
      _ins = 0;
      if (count _dbinfo > 0) then { _ins = _dbinfo select 2 };
      if(alive _x && _ins == 0) then {
      _className = typeOf _x;
      _classNameLife = _className;
      _displayName = getText(configFile >> "CfgVehicles" >> _className >> "displayName");
      _picture = getText(configFile >> "CfgVehicles" >> _className >> "picture");


      if(!isClass (missionConfigFile >> CONFIG_LIFE_VEHICLES >> _classNameLife)) then {
      _classNameLife = "Default"; //Use Default class if it doesn't exist
      diag_log format["%1: LifeCfgVehicles class doesn't exist",_className];
      };


      _price = switch(playerSide) do {
      case civilian: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),0)};
      case west: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),1)};
      case independent: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),2)};
      case east: {SEL(M_CONFIG(getArray,CONFIG_LIFE_VEHICLES,_classNameLife,"rentalprice"),3)};
      };
      _multiplicator = LIFE_SETTINGS(getNumber,"vehicleChopShop_Multiplicator");
      _price = _multiplicator * _price;
      if(!isNil "_price" && EQUAL(count crew _x,0)) then {
      _control lbAdd _displayName;
      _control lbSetData [(lbSize _control)-1,str(_forEachIndex)];
      _control lbSetPicture [(lbSize _control)-1,_picture];
      _control lbSetValue [(lbSize _control)-1,_price];
      };
      };
      } foreach _nearVehicles;

      Ich kann mich ja irren aber ich glaube dann hast du ein Fehler beim TUT gemacht. Außer , versuchst du ein Gemietet Fahrzeug zu verkaufen? Das kann man noch bedenken.

      Software Entwickler -
      Präzises Rätselraten, basierend auf unzuverlässigen Daten und fragwürdigem Wissen der Auftraggeber.

      Ich habe das Versicherungs System eingebaut es Funktioniert auch alles bis auf das Ausparken! Und zwar wenn ich mein Fahrzeug in der Garage Versichere und ich es danach ausparken will Spawnt das Fahrzeug nicht mehr aus der Garage.

      Es steht oben Rechts nur "Fahrzeug wird bereitgestellt, bitte warten..."

      Aber es Spawnt nicht.

      Wäre nett wenn mir jemand weiterhelfen würde, ich habe jetzt 3 Stunden an dem Ding geschaut aber nichts gefunden woran es liegen könnte.

      Wie gesagt in der Datenbank wird "insure" auch auf "1" gesetzt wenn ich es Versichert habe, aber ingame will das Fahrzeug nicht mehr Spawnen... Komisch.. wäre echt nett wenn mir jemand weiterhelfen könnte, bin am Verzweifeln...

      Ich Benutze die Version 4.3

      MfG

      d4ccfe34e7e85df1132cf7f0832e56.gif

      Habe das hier gefunden in der RPT Log:


      Nur weiß ich nicht was ich dort genau abändern soll.

      Das ist die Datei:


      Wäre Super wenn mir jemand weiterhelfen würde.

      MfG

      d4ccfe34e7e85df1132cf7f0832e56.gif

      Lesen und schauen

      Code
      if(EQUAAL(SEL(_vInfo select 9) == 1) then { <<< da fehlt eine klammer  wie im RPT log steht

      Software Entwickler -
      Präzises Rätselraten, basierend auf unzuverlässigen Daten und fragwürdigem Wissen der Auftraggeber.

      jetzt bekomme ich wieder diesen fehler in der RPT:


      Hab es so abgeändert wie du mir geschrieben hast @Shinji

      d4ccfe34e7e85df1132cf7f0832e56.gif