Beiträge von Derek Westbrook

  • Autoabspeichern | D-INI| Hilfe wird wirklich dringend benötigt

    @FerienFreak
    Also einmal das Response aus dem System

    Spoiler anzeigen
    if(dialogid==DIALOG_AUTOHAUS)
    {
    if(response)
    {
    //Autoverkauf
    new id=GetPVarInt(playerid,"buyCarID");
    if(GetPlayerMoney(playerid)<ahCar[id][a_preis])
    {
    SendClientMessage(playerid,COLOR_RED,"Du hast nicht genügend Geld.");
    RemovePlayerFromVehicle(playerid);
    return 1;
    }
    GivePlayerMoney(playerid,-ahCar[id][a_preis]);
    CreateVehicle(ahCar[id][a_model],ahInfo[ahCar[id][ah_id]][ah_x],ahInfo[ahCar[id][ah_id]][ah_y],ahInfo[ahCar[id][ah_id]][ah_z],ahInfo[ahCar[id][ah_id]][ah_r], 1, 1, -1);
    SendClientMessage(playerid,COLOR_RED,"Herzlichen Glückwunsch zum neuen Auto");
    RemovePlayerFromVehicle(playerid);
    }
    else
    {
    RemovePlayerFromVehicle(playerid);
    SendClientMessage(playerid,COLOR_RED,"Dann eben nicht...");
    }
    return 1;
    }


    Und dann noch die Funktion aus dem Gamemode

    Spoiler anzeigen
    Function OnPlayerBuyCar(playerid,Model,Preis,Autohaus)//CARSYS
    {
    if(IsPlayerConnected(playerid) && !Dtc_PlayerHaveCar[playerid][Dtc_PlayerKey[playerid]])
    {
    CallRemoteFunction("M_GivePlayerMoney","id",playerid,-Preis);
    if(Autohaus == 0)
    {
    AddToBizzTill(0,Preis/2);
    }
    else if(Autohaus == 2)
    {
    AddToBizzTill(0,Preis);
    }
    else if(Autohaus == 3)
    {
    AddToBizzTill(0,Preis/2);
    }
    else if(Autohaus == 4)
    {
    AddToBizzTill(0,Preis/10);
    }
    SendClientMessage(playerid, COLOR_LIGHTBLUE, "*Du hast dir ein Auto gekauft.");
    SendClientMessage(playerid, COLOR_LIGHTBLUE, "*Gehe zu der KFZ Stelle und hole dir ein Kennzeichen.");
    SendClientMessage(playerid, COLOR_LIGHTBLUE, "Fahre vorsichtig..Und denk an die StraßenVerkehrsOrdnung!");
    SetParkPlatz(playerid,Autohaus);
    new name[MAX_PLAYER_NAME], str[128];
    GetPlayerName(playerid, name, sizeof name);
    format(str, sizeof str, "/Autos/%s%d.dtcar", name,Dtc_PlayerKey[playerid]);
    new File: hFile = fopen(str, io_write);
    if (hFile)
    {
    new var[32];
    format(var, 32, "CarId=0\n");fwrite(hFile, var);
    format(var, 32, "CarModel=%d\n",Model);fwrite(hFile, var);
    format(var, 32, "CarPos_x=%.3f\n",PlayerCar[playerid][Dtc_PlayerKey[playerid]][CarPos_x]);fwrite(hFile, var);
    format(var, 32, "CarPos_y=%.3f\n",PlayerCar[playerid][Dtc_PlayerKey[playerid]][CarPos_y]);fwrite(hFile, var);
    format(var, 32, "CarPos_z=%.3f\n",PlayerCar[playerid][Dtc_PlayerKey[playerid]][CarPos_z]);fwrite(hFile, var);
    format(var, 32, "CarRotate=%.3f\n",PlayerCar[playerid][Dtc_PlayerKey[playerid]][CarRotate]);fwrite(hFile, var);
    format(var, 32, "CarNitro=0\n");fwrite(hFile, var);
    format(var, 32, "CarHyd=0\n");fwrite(hFile, var);
    format(var, 32, "CarWheel=0\n");fwrite(hFile, var);
    format(var, 32, "CarAusp=0\n");fwrite(hFile, var);
    format(var, 32, "CarSideL=0\n");fwrite(hFile, var);
    format(var, 32, "CarSideR=0\n");fwrite(hFile, var);
    format(var, 32, "CarFB=0\n");fwrite(hFile, var);
    format(var, 32, "CarRB=0\n");fwrite(hFile, var);
    format(var, 32, "CarSpoiler=0\n");fwrite(hFile, var);
    format(var, 32, "CarRoof=0\n");fwrite(hFile, var);
    format(var, 32, "CarHood=0\n");fwrite(hFile, var);
    format(var, 32, "CarVents=0\n");fwrite(hFile, var);
    format(var, 32, "CarLamps=0\n");fwrite(hFile, var);
    format(var, 32, "CarPJ=-1\n");fwrite(hFile, var);
    format(var, 32, "CarC1=-1\n");fwrite(hFile, var);
    format(var, 32, "CarC2=-1\n");fwrite(hFile, var);
    format(var, 32, "Preis=%d\n",Preis);fwrite(hFile, var);
    format(var, 32, "Plate=XXX\n");fwrite(hFile, var);
    fclose(hFile);
    }
    OnPlayerCarLogin(playerid);
    }
    }


    Kennt sich denn hier niemand mit D-INI aus? :(

  • [jTool] Alle Befehle auslesen | j_cmdsAuslesen.vbs

    Hallo Jeffry, ich hab dein Tool mal mit meinem GM ausprobiert und nach ein paar sekunden tauchte dieses Fesnster auf.


    Windows Script Host


    Skript: C:\Users\*****\Desktop\Neuer Ordner\jtool.vbs
    Zeile: 100
    Zeichen: 45
    Fehler: Ungültiger Prozedurablauf oder ungültiges Argument 'Mid'
    Code: 800A00005
    Quelle: Laufzeitfehler in Microsoft VBScript

  • Samp Callback wird nicht aufgerufen

    Nichts :/


    wegen der Uhrzeit bitte nicht verwirren lassen, der Server steht in einer anderen Zeit zone

  • DINI | Auto einfach abspeichern, aber wie?

    DINI | Auto einfach abspeichern, aber wie?







    Tagchen, Ich bin´s mal wieder, ich arbeite momentan an einem
    Trucker system für dass man sich selber einen LKW kaufen muss.


    Ich habe nur folgendes Problem, Wie speichere ich die autos ab ^^


    Was ich bis jetzt getan habe:


    • Autos spawnen vom Script aus
    • KaufDialog beim einsteigen in eines der Fahrzeuge

    Was ich noch machen möchte


    • Autos werden nach dem Kauf gespawnt
    • Autos werden abgespeichert
    • Autos haben eine Zulässige Maximal zuladung
    • Auto kann überladen werden
    • Polizei kann das Gewicht des Autos überprüfen
    • Ladung wird beim Disconect vom Spieler abgespeichert (Gewicht und ladungs art)

    Kann mir wer helfen?


    Ich würde ihn/Sie selbstverständlich in den Credits im Gamemode bzw auf dem Server erwähnen.