Szerző Téma: Vkey Bõvített (bajvan) (Megtekintve 1076 alkalommal)

filip95 · « **Dátum:** 2012. január 02. - 10:37:42 »

Üdv mindenkinek.

Szeretnék egy kis segítséget kérni, persze amit ti is felhasználhattok..

Az az 1 gondom lenne ezzel a kóddal:

#include a_samp
#define OFF                 0
#define ON                  1
//SpeedBoost
new globC;
//CarJump
new glob10;
//HyperStop
new globS;
//Motorháztetõ
new globB;
//Csomagtartó
new globnB;
//Riasztó
new globA;
//Motor
new globE;
new bool:booot=false;
new bool:boonet=false;
new engine, lights, alarm, doors, bonnet, boot, objective;
// -----------------------------------------------------------------------------
public OnFilterScriptInit()
{
    print(\"\\n\");
print(\"------------------------------\");
print(\"Vkey system by Filip [2012] \");
print(\"------------------------------\");
print(\"\\n\");
return 1;
}
//------------------------------------------------------------------------------
public OnPlayerCommandText(playerid, cmdtext[])
{
if(strcmp(cmdtext, \"/vkey\", true) == 0)
{
ShowPlayerDialog(playerid,1,DIALOG_STYLE_LIST,\"Vkey rendszer by {0d00ff}Filip\",\"{127a04}SpeedBoost\\n{056cf2}CarJump\\n{ff0000}HyperStop\\n{ff0000}Motorháztetö\\n{ff0000}Csomagtarto\\n{ff0000}Riasztó\\n{ff0000}Motor\\n{ff0000}Összes Kikapcsolása\",\"BEKAPCSOL\",\"Mégse\");
return 1;
}
return 0;
}
//------------------------------------------------------------------------------
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid==1 && response==1)
{
    switch(listitem)
    {
       case 0:
   {
            globC = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Bekapcsoltad a SpeedBoost Módot. A KEY_SUBMISSION (2-es) gombal tudod aktiválni.\");
   }
          case 1:
       {
            glob10 = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Bekapcsoltad a CarJump módot. A KEY_SUBMISSION (2-es) gombal tudod aktiválni.\");
       }
       case 2:
       {
            globS = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Bekapcsoltad a Hyper Stop módot. A KEY_SUBMISSION (2-es) gombal tudod aktiválni.\");
       }
       case 3:
       {
            globB = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Kitudod nyitni a motorháztetõt. A KEY_SUBMISSION (2-es) gombal tudod aktiválni.\");
       }
       case 4:
       {
            globnB = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Kitudod nyitni a csomagtartót. A KEY_SUBMISSION (2-es) gombal tudod aktiválni.\");
       }
       case 5:
       {
            globA = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Riasztó bekapcsolása a KEY_SUBMISSION (2-es) gombal.\");
       }
       case 6:
       {
            globE = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Motor ki/be kapcsolása a KEY_SUBMISSION (2-es) gombal.\");
       }
          case 7:
       {
            glob10 = 0;
            globC = 0;
            globS = 0;
            globB = 0;
            globnB = 0;
            globA = 0;
            globE = 0;
            SendClientMessage(playerid,0x0009ffAA,\"Kikapcsoltad az összes módot\");
       }
        }
}
return 1;
}
//------------------------------------------------------------------------------
public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
new engin;
if(newkeys & KEY_SUBMISSION)
    {
if(glob10 == 1)
{
        new Float:x, Float:y, Float:z;
        GetVehicleVelocity(GetPlayerVehicleID(playerid), x, y, z);
        SetVehicleVelocity(GetPlayerVehicleID(playerid), x, y, z + 0.3);
        }
if(globC == 1)
{
        new Float:vx,Float:vy,Float:vz;
GetVehicleVelocity(GetPlayerVehicleID(playerid),vx,vy,vz);
SetVehicleVelocity(GetPlayerVehicleID(playerid), vx * 1.3, vy *1.3, vz * 1.3);
        }
if(globS == 1)
{
        SetVehicleVelocity(GetPlayerVehicleID(playerid) ,0.0 ,0.0 ,0.0);
        }
if(globB == 1)
{
        GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
        SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, ON, objective);
booot=true;
        }
        else if( booot )
    {
           SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
            SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, OFF, objective);
            booot=false;
}
if(globnB == 1)
{
if( !boonet )
{
        GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
        SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, ON, boot, objective);
boonet=true;
}
        }
        else if( boot )
    {
         GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
         SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, OFF, boot, objective);
        boonet=false;
}
if(globA == 1)
{
        GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
        SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, ON, doors, bonnet, boot, objective);
}
if(globE == 1)
{
        GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
        SetVehicleParamsEx(GetPlayerVehicleID(playerid), ON, lights, alarm, doors, bonnet, boot, objective);
engine=true;
}
else if( engin )
    {
         GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
         SetVehicleParamsEx(GetPlayerVehicleID(playerid), OFF, lights, alarm, doors, bonnet, boot, objective);
        engine=false;
}
}
    return 1;
}

hogy ha a vkeyt elõhozom és valameik menüre rákattintok akkor ugye a fire gombal azt csinálja amire én kattintottam.

PL Rákattntok a Riasztóra, és ha beszállok egy kocsiba klikkelek akkor elkellene kezdeni riasztóznia. Tehát a baj az, hogy hiába választom ki a vkey listában a menüket semmit nem csinál egyikse!

Segítsetek had bõvítsem még a vkeyt

DrAkE · « **Válasz #1 Dátum:** 2012. január 02. - 11:28:35 »

Ezt nem hiszem hogy ide kellet volna nyitni.

IXT · « **Válasz #2 Dátum:** 2012. január 02. - 11:31:48 »

Kicsit eltévedt

filip95 · « **Válasz #3 Dátum:** 2012. január 02. - 11:42:05 »

bocsesz csak már itt assetudom mivan összezavarodtam én amikor utoljára voltam akkor még nem ijen volt a forum asszem

BoOy · « **Válasz #4 Dátum:** 2012. január 02. - 12:03:49 »

[pawn]public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
if(newkeys & KEY_FIRE)
{
   if(glob10 == 1)
   {
new Float:x, Float:y, Float:z;
GetVehicleVelocity(GetPlayerVehicleID(playerid), x, y, z);
SetVehicleVelocity(GetPlayerVehicleID(playerid), x, y, z + 0.3);
}
}
if(newkeys & KEY_FIRE)
{
   if(globC == 1)
   {
      new Float:vx,Float:vy,Float:vz;
   GetVehicleVelocity(GetPlayerVehicleID(playerid),vx,vy,vz);
   SetVehicleVelocity(GetPlayerVehicleID(playerid), vx * 1.3, vy *1.3, vz * 1.3);
      }
}
if(newkeys & KEY_FIRE)
{
   if(globS == 1)
   {
      SetVehicleVelocity(GetPlayerVehicleID(playerid) ,0.0 ,0.0 ,0.0);
      }
}
if(newkeys & KEY_FIRE)
{
   if(globB == 1)
   {
      GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
      SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, ON, objective);
   booot=true;
      }
      else if( booot )
{
       SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
      SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, OFF, objective);
booot=false;
   }
}
if(newkeys & KEY_FIRE)
{
   if(globnB == 1)
   {
   if( !boonet )
   {
      GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
      SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, ON, boot, objective);
   boonet=true;
   }
      }
      else if( boot )
{
       GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
       SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, OFF, boot, objective);
    boonet=false;
   }
}
if(newkeys & KEY_FIRE)
{
   if(globA == 1)
   {
      GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
      SetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, ON, doors, bonnet, boot, objective);
   }
}
if(newkeys & KEY_FIRE)
{
   if(globE == 1)
   {
      GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
      SetVehicleParamsEx(GetPlayerVehicleID(playerid), ON, lights, alarm, doors, bonnet, boot, objective);
   engine=true;
   }
   else if( engin )
{
       GetVehicleParamsEx(GetPlayerVehicleID(playerid), engine, lights, alarm, doors, bonnet, boot, objective);
       SetVehicleParamsEx(GetPlayerVehicleID(playerid), OFF, lights, alarm, doors, bonnet, boot, objective);
    engine=false;
   }
}
return 1;
}[/pawn]
[/quote]
Nem egybe kéne írni az összeset? mivel sok a KEY_FIRE

filip95 · « **Válasz #5 Dátum:** 2012. január 02. - 12:06:26 »

Tiéd se megy most nézem XD lol de figyu ha már javítod ezeket beletehetnéd

BoOy · « **Válasz #6 Dátum:** 2012. január 02. - 12:09:35 »

Figyelj ha megnézed valakinek jó valakinek nem...én nem tudom hogy mi a baj nekem a szerómon f***ántisulon indul...Tehát szerintem valami ott bibis.

Idézetet írta: filip95 date=1325502386\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"15136\" data-ipsquote-contentclass=\"forums_Topic

Tiéd se megy most nézem XD lol de figyu ha már javítod ezeket beletehetnéd

Elõzõ megjegyzést fixáltam.

filip95 · « **Válasz #7 Dátum:** 2012. január 02. - 12:15:09 »

az nembaj ha sok a KEY_Fire mert ugyis csak akkor fog mûködni az a bizonyos modul ha kiválasztod de kipróbálom egybeírom
nah tesztelem
de amúgy az is cink ebbe a scriptbe hogy ha nem ülsz kocsiban akkor is bejön a menü

XD
neem mostsemjó nemmûködik..

Következõ hozzászólás: ( 2012. január 02. - 12:19:08 )

nemjó megint az a hiba rákattintok a menübe pl a hyperstopra és semmi speedbostra és semmi
hijába klikkelek semmit se csinál de még csak kise írja a sendclientmessagekat..
még 1 javítás kéne, hogy a menü csak akkor jöjjön be ha a player kocsiban ül

még 1: ( 2012. január 02. - 12:35:17 )

jaa máár érteem egybeírtam most 1 keyfiren van az összes teszteltem de még mindig nemjó

valami gázvan mostmár értem kiválaasztom hogy pl hyperstop és valamiért mint ha nem mûködni ugye ki se írja hogy aktiváljam a Fire gombal pedig az SendClientMesagge szal itt más a bibi
Ezt kellene írnia:

case 2:
       {
            globS = 1;
            SendClientMessage(playerid,0x0009ffAA,\"Bekapcsoltad a Hyper Stop módot. A Nitró(KEY_FIRE) gombal tudod aktiválni.\");
       }

de nem írja ki

Szerintem ezzel van a gáz:

ShowPlayerDialog(playerid,1,DIALOG_STYLE_LIST,\"Vkey rendszer by: BoOy\",\"{127a04}SpeedBoost\\n{056cf2}CarJump\\n{ff0000}HyperStop\\n{ff0000}Motorháztetö\\n{ff0000}Csomagtarto\\n{ff0000}Riasztó\\n{ff0000}Motor\\n{ff0000}Összes Kikapcsolása\",\"BEKAPCSOL\",\"Mégse\");

hmmm nemértem