Szerző Téma: Kamionos munka  (Megtekintve 1983 alkalommal)

Nem elérhető Rexii

  • 471
    • Profil megtekintése
Kamionos munka
« Dátum: 2012. április 06. - 17:58:02 »
+4 Show voters
Sziasztok!
Készítettem egy kamionos munkát,remélem hasznát veszitek majd!
Parancsok: /setkamion <-> Kamionos leszel
/startmunka <-> Munka kezdés
/folytatmunka <-> Anyagok kiszállítása,amit a startmunkánál felvettél
/lead <-> Szállítmány leadása
/stopmunka <-> Munka befejezése
/sfbeviszem <-> San Fierroba viszed a szállítmányt több pénzért!
/leadsf <-> Leadod a San Fierroba szánt rakományt!
/kc <-> Kamionos chat
 
 #include <a_samp>
#include <zcmd>
#include <sscanf2>
#define Munka_Kamionos 1
#define Munka_Nincs 1
//============================[ Munkavétel ]=============================//
CMD:setkamion(playerid, params[])
{
          SetPVarInt(playerid, \"Kamionos\", Munka_Kamionos);
         SendClientMessage(playerid, 0x33CCFFAA,  \"Kamionos lettél!\");
         return 1;
}
//=======================[ Munkakezdés ]===================================//
CMD:startmunka(playerid, params[])
{
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Kamionos)
    {
        SendClientMessage(playerid, 0xFF0000AA, \"Elkezdted a munkát!Menj és vedd fel a szállítmányt!\");
        SetPlayerCheckpoint(playerid, 1041.5366, -902.1572, 42.5155, 2.0);
    }
    else if(GetPVarInt(playerid, \"Kamionos\") == Munka_Nincs)
    {
        SendClientMessage(playerid, 0xAFAFAFAA, \"Nem vagy kamionos!\");
    }
    return 1;
}
//======================[ Munka folytatás ]=================================//
CMD:folytatmunka(playerid, params[])
{
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Kamionos)
    {
      SendClientMessage(playerid, 0xFF0000AA, \"Felvetted a szállítmányt!\");
      SendClientMessage(playerid, 0xAFAFAFAA, \"Felvettél Dízelt és Ólommentes benzint!Vezess óvatosan!\");
      SendClientMessage(playerid, 0xAFAFAFAA, \"Vidd ki a szállítmányt a térképeden jelölt helyre!\");
      SetPlayerCheckpoint(playerid, 2732.4202, -1852.7104, 9.6027, 2.0);
    }
      else if(GetPVarInt(playerid, \"Kamionos\") == Munka_Nincs)
      {
       SendClientMessage(playerid, 0xAFAFAFAA, \"Nem vagy kamionos!\");
}
return 1;
}
//=================================[ San Fierroba vitel ]===============================================//
CMD:sfbeviszem(playerid, params[])
{
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Kamionos)
    {
      SendClientMessage(playerid, 0xFF0000AA, \"Felvetted a szállítmányt!\");
      SendClientMessage(playerid, 0xAFAFAFAA, \"Felvettél Dízelt és Ólommentes benzint!Vezess óvatosan!\");
      SendClientMessage(playerid, 0xAFAFAFAA, \"Vidd ki a szállítmányt a térképeden jelölt helyre!\");
      SendClientMessage(playerid, 0xAFAFAFAA, \"Jelen esetben úgy döntöttél,hogy San Fierroba viszed!\");
      SendClientMessage(playerid, 0xAFAFAFAA, \"Szép hosszú,sikeres utat kívánok!\");
      SetPlayerCheckpoint(playerid, -2103.1917,  208.0761,  35.2732, 2.0);
    }
      else if(GetPVarInt(playerid, \"Kamionos\") == Munka_Nincs)
      {
       SendClientMessage(playerid, 0xAFAFAFAA, \"Nem vagy kamionos!\");
}
return 1;
}
//=======================[ Érkezés ]=============================//
CMD:lead(playerid, params[])
{
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Kamionos)
    {
        SendClientMessage(playerid, 0xFF0000AA, \"Leadtad a szállítmányt és kaptál $2000-t!\");
        GivePlayerMoney(playerid,2000);
}
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Nincs)
{
    SendClientMessage(playerid, 0xFF0000AA, \"Nem vagy kamionos!\");
}
return 1;
}
//==========================[ Érkezés San Fierroba ]=================================//
COMMAND:leadsf(playerid, params[])
{
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Kamionos)
    {
        SendClientMessage(playerid, 0xFF0000AA, \"Leadtad a szállítmányt és kaptál $13000-t!\");
        GivePlayerMoney(playerid,13000);
}
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Nincs)
{
    SendClientMessage(playerid, 0xFF0000AA, \"Nem vagy kamionos!\");
}
return 1;
}
//==========================[ Munka befejezés ]================================//
CMD:stopmunka(playerid, params[])
{
    if(GetPVarInt(playerid, \"Kamionos\") == Munka_Nincs) return SendClientMessage(playerid, 0x33CCFFAA, \"Eddig sem voltál kamionos!\");
   
SendClientMessage(playerid, 0x33CCFFAA, \"Úgy döntöttél,hogy mára befejezted a munkát!\");
return 1;
}
//==============================[ Kamionos chat ]==========================================//
CMD:kc(playerid, params[])
{
    new
          Szoveg[128],
          Neve[MAX_PLAYER_NAME];
    if(sscanf(params,\"s[128]\", Szoveg))return SendClientMessage(playerid,0x00FF00,\"HIBA: /kc [szöveg]\");
    GetPlayerName(playerid, Neve, MAX_PLAYER_NAME);
    format(Szoveg, sizeof(Szoveg), \"*%s mondja(rádió): %s\", Neve, Szoveg);
    SendClientMessageToAll(0x33CCFFAA, Szoveg);
    return 1;
}
//==========================[ Help ]=====================================//
CMD:khelp(playerid, params[])
{
SendClientMessage(playerid, 0x33CCFFAA, \"Kamionos munka parancsok: /setkamion <-> Kamionos leszel\");
SendClientMessage(playerid, 0x33CCFFAA,\"/startmunka <-> Munka kezdés\");
SendClientMessage(playerid, 0x33CCFFAA,\"/folytatmunka <-> Anyagok kiszállítása,amit a startmunkánál felvettél\");
SendClientMessage(playerid, 0x33CCFFAA,\"/lead <-> Szállítmány leadása\");
SendClientMessage(playerid, 0x33CCFFAA,\"/stopmunka <-> Munka befejezése\");
SendClientMessage(playerid, 0x33CCFFAA,\"/sfbeviszem <-> San Fierroba viszed a szállítmányt több pénzért!\");
SendClientMessage(playerid, 0x33CCFFAA,\"/leadsf <-> Leadod a San Fierroba szánt rakományt!\");
SendClientMessage(playerid, 0x33CCFFAA,\"/kc <-> Kamionos chat,CSAK KULTÚRÁLTAN!\");
return 1;
}

 
Elkészítésében segítséget nyújtott Gabor.. is!
Ha hibát vesztek észre vagy esetleg van valami amivel fel lehetne turbózni kérlek írjatok!
Köszi!
Használjátok egészséggel!
« Utoljára szerkesztve: 2012. április 07. - 10:25:08 írta Rexii »

Nem elérhető Dead

  • 2045
    • Profil megtekintése
Kamionos munka
« Válasz #1 Dátum: 2012. április 06. - 18:40:44 »
0 Show voters
Idézetet írta: Rexii date=1333727882\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"19721\" data-ipsquote-contentclass=\"forums_Topic

 A kód ideiglenesen leszedve turbózás miatt!

 

?
nem az van a szabálzatban, hogy kint kell lennie a forráskódnak?

Nem elérhető Rexii

  • 471
    • Profil megtekintése
Kamionos munka
« Válasz #2 Dátum: 2012. április 07. - 10:07:49 »
0 Show voters
De,de elsiettem a dolgot és kiderült,hogy egy csomó mindenen még tuningolni kell! És ott van,hogy IDEIGLENESEN,egyébként tényleg nem lenne értelme ezt feltenni!

Dupla hozzászólás automatikusan összefûzve. ( 2012. április 07. - 10:24:38 )

A kód feltéve!Boccs hogy megvárakoztattalak titeket vele,lehet hogy még dolgozni fogok rajta és akkor frissíteni fogom a kódot!
« Utoljára szerkesztve: 2012. április 07. - 10:24:38 írta Rexii »

Kamionos munka
« Válasz #3 Dátum: 2012. április 19. - 15:35:54 »
+1 Show voters
szerintem jó ment a + ;D

Nem elérhető Rexii

  • 471
    • Profil megtekintése
Kamionos munka
« Válasz #4 Dátum: 2012. április 19. - 19:27:08 »
+1 Show voters
Idézetet írta: Striker date=1334842554\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"19721\" data-ipsquote-contentclass=\"forums_Topic
szerintem jó ment a + ;D
 
Köszi!
Jó régi script... még igazán kezdõ voltam :D

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal