Szerző Téma: Rablás  (Megtekintve 5694 alkalommal)

Nem elérhető Gabor..

  • 1883
  • Gabor..
    • Profil megtekintése
Rablás
« Dátum: 2012. Február 25. - 08:48:50 »
+10 Show voters
Sziasztok!
Itt van életem elsõ nagyobb projektje! Egy rablás script.
Letöltés:  Pawn: http://www.mediafire.com/?psirb4abu7h72ju   
                Amx: http://www.mediafire.com/?kv59fevd5lc1dfl
Itt a kód, ha nem akarod letölteni!
 
#include <a_samp>
#include <streamer>
#include <zcmd>
#define COLOR_GREEN 0x33FF33AA
#define COLOR_RED 0xFF0000AA
#define COLOR_BLUE 0x33CCFFAA
#define COLOR_ORANGE 0xFF9900AA
public OnGameModeInit()  // FS-ben OnFilterScriptInit()
{
    CreateDynamicObject(2942, 2159.3999023438, 939.90002441406, 10.199999809265, 0, 0, 269.99450683594);
    CreateDynamicObject(2942, 2032.6999511719, 1319.4000244141, 10.5, 0, 0, 270);
    CreateDynamicObject(2942, 2183.6000976563, 2162.1999511719, 10.5, 0, 0, 357.97277832031);
    CreateDynamicObject(2942, 2159.3999023438, 939.90002441406, 10.199999809265, 0, 0, 269.99450683594);
    CreateDynamicObject(2942, 2085.6999511719, 2047.4000244141, 10.699999809265, 0, 0, 89.989013671875);
    return 1;
}
CMD:rabol(playerid, params[])
{
   if(GetPVarInt(playerid,\"rabol\") == 0)
   {
      if(IsPlayerInRangeOfPoint(playerid,1.0,2032.0376,1319.3666,10.8203) || IsPlayerInRangeOfPoint(playerid,1.0, 2158.7371,939.8642,10.8203) || IsPlayerInRangeOfPoint(playerid,1.0, 2183.2349,2161.5310,10.8203) || IsPlayerInRangeOfPoint(playerid,1.0,2086.3616,2047.7804,11.0579)) // Értelemszerûen bõvítheted! De akkor az OnGameModeInit()-hez is rakj objecteket
      {
        SendClientMessage(playerid,COLOR_RED,\"Beleütöttél egyet az ATM-be, és kiesett a sok pénz! Gyorsan szedd fel a lóvét!!\");
        TogglePlayerControllable(playerid,0);
        SetPlayerWantedLevel(playerid,6);
        SetPVarInt(playerid,\"rabol\",1);
        SendClientMessageToAll(COLOR_BLUE,\"[RIASZTÁS]: Kirabolták az ATM-et!\");
       
        SetTimerEx(\"rabolas\",15000,0,\"i\",playerid);
      }
      else SendClientMessage(playerid,COLOR_GREEN,\"Nemvagy ATM közelébe! Mennyé közelebb! :\'S\");
   }
   else SendClientMessage(playerid,COLOR_RED,\"Most raboltál! 5 perc múlva újra rabolhatsz\");
   return 1;
}
forward rabolas(playerid);
public rabolas(playerid)
{
   new rcash =(random(50000-10000)+10000);
   
   TogglePlayerControllable(playerid,1);
   GivePlayerMoney(playerid, rcash);
   SendClientMessage(playerid,COLOR_ORANGE,\"Kész vagy! Gyorsan fuss el, miellõtt ideérnek a zsaruk!\");
   
   SetTimerEx(\"rabolasido\",300000,0,\"i\",playerid);
}
forward rabolasido(playerid);
public rabolasido(playerid)
{
   SendClientMessage(playerid,COLOR_GREEN,\"Na, vaze letelt az idõ, mostmár rabolhatsz újra\");
   SetPVarInt(playerid,\"rabol\",0);
   SetPlayerWantedLevel(playerid,0);
   return 1;
}

 Hát ennyi lenne, ha hibát találtok benne, azt jelezzétek! Köszi! :)
UPDATED v2.0! - PVar használata
                v2.0.1! - Az a bug, hogy 1 milliárd$-t rabolsz javítva!   (Kód, letöltési link fríssítve!)
                v2.1! -  Több ATM-et lehet rabolni + egy kis apróság, hogy 6 körözési csillagod lesz!
A SCRIPT MÁR RÉGI!
« Utoljára szerkesztve: 2012. November 27. - 20:40:08 írta Gabor.. »

Nem elérhető DrAkE

  • 2078
    • Profil megtekintése
Rablás
« Válasz #1 Dátum: 2012. Február 25. - 09:03:31 »
0 Show voters
4 hiba én szemszögembõl:
1. bool változó vagy PVar használata jobb.
2. Nem MAX_PLAYER_NAME kellene, hanem MAX_PLAYERS
3. Nincsenek tagolva, átláthatatlan.
4. Nem hiszem hogy jó dolog ilyen trágár mondatokat belerakni, hiszen nem viccesek.

Nem elérhető Flash

  • 5726
  • (っ◕‿◕)っ
    • Profil megtekintése
Rablás
« Válasz #2 Dátum: 2012. Február 25. - 09:14:56 »
0 Show voters
A szövege is elég gyerekes.

Nem elérhető Gabor..

  • 1883
  • Gabor..
    • Profil megtekintése
Rablás
« Válasz #3 Dátum: 2012. Február 25. - 09:19:04 »
0 Show voters
Jó jó, bocsánat. Hát ez az elsõ ilyen scriptem, nem vagyok profi
« Utoljára szerkesztve: 2012. Február 25. - 09:24:04 írta Gabor.. »

Nem elérhető Norby

  • 1575
    • Profil megtekintése
Rablás
« Válasz #4 Dátum: 2012. Február 25. - 09:22:36 »
0 Show voters
[mod]Legközelebb tedd ki a kategóriát![/mod]

Nem elérhető Gabor..

  • 1883
  • Gabor..
    • Profil megtekintése
Rablás
« Válasz #5 Dátum: 2012. Február 25. - 09:24:57 »
0 Show voters
Kivan téve, de eltûnt O_o Nem tudom miért

Nem elérhető lusta19

  • 9084
  • £u$taÐi$znó
    • Profil megtekintése
Rablás
« Válasz #6 Dátum: 2012. Február 25. - 09:31:15 »
0 Show voters
Idézetet írta: Gabor.. date=1330158297\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"17485\" data-ipsquote-contentclass=\"forums_Topic
Kivan téve, de eltûnt O_o Nem tudom miért
 
Mert ha kirakod a kategóriát és utána beleszerkesztesz a témába eltûnik, szóval ha szerkeszted a témát utána a kategóriát is be kell állítani újra  :)

Nem elérhető Exec$

Rablás
« Válasz #7 Dátum: 2012. Február 25. - 09:55:12 »
0 Show voters
Szép nekem nagyon tetszik :D

Nem elérhető Norby

  • 1575
    • Profil megtekintése
Rablás
« Válasz #8 Dátum: 2012. Február 25. - 10:03:50 »
0 Show voters
Idézetet írta: Exec$ date=1330160112\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"17485\" data-ipsquote-contentclass=\"forums_Topic
Szép nekem nagyon tetszik :D
 
Hát ha neked ez tetszik akkor egy idõsek lehettek.. :D

Nem elérhető CANNONN

  • 2139
    • Profil megtekintése
Rablás
« Válasz #9 Dátum: 2012. Február 25. - 10:41:46 »
0 Show voters
Idézetet írta: DrAkE date=1330157011\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"17485\" data-ipsquote-contentclass=\"forums_Topic
4 hiba én szemszögembõl:
1. bool változó vagy PVar használata jobb.
2. Nem MAX_PLAYER_NAME kellene, hanem MAX_PLAYERS
3. Nincsenek tagolva, átláthatatlan.
4. Nem hiszem hogy jó dolog ilyen trágár mondatokat belerakni, hiszen nem viccesek.
 
Egyetértek!
Kicsit úgy tûnik, mintha összedobtad volna.

Nem elérhető Gabor..

  • 1883
  • Gabor..
    • Profil megtekintése
Rablás
« Válasz #10 Dátum: 2012. Február 25. - 11:15:00 »
+2 Show voters
Jó, hát nem vagyok profi, de azért nemkéne szarozni meg stb...  :(, mert ez nemjól esik. Lehet, hogy van más megoldás, de az a lényeg, hogy müködik, és hogy én írtam, így gyakorolok, lehet, hogy máskor jobblesz vagy valami.(A tanácsokat megfogadom, és megpróbálom megnézni, hogy hogyan tudom átírni)

Rablás
« Válasz #11 Dátum: 2012. Február 25. - 11:20:52 »
0 Show voters
Senki nem szarozta le, ezt nem így kell felfogni :D
Ezek tanácsok, amiket ha betartasz, akkor valószínûleg csak dícséreteket fogsz legközelebb kapni, ha nem kapnál visszajelzést hogy mit hogy lehetne jobban megcsinálni, nem fejlõdnél :)
( Pl. átírhatod a scriptet annak megfelelõen amiket leírtak, megváltoznának a vélemények és jó irányba :) )

Nem elérhető Gabor..

  • 1883
  • Gabor..
    • Profil megtekintése
Rablás
« Válasz #12 Dátum: 2012. Február 25. - 11:23:06 »
0 Show voters
Okés, megpróbálom! :) Hát ez igaz,hogy csak akkor fejlõdök.
UI.: Update!
« Utoljára szerkesztve: 2012. Február 25. - 11:34:26 írta Gabor.. »

Nem elérhető csont

  • 153
    • Profil megtekintése
Rablás
« Válasz #13 Dátum: 2012. Február 25. - 12:48:13 »
0 Show voters
Szerintem is fasxa kis script  ;)

Nem elérhető Gabor..

  • 1883
  • Gabor..
    • Profil megtekintése
Rablás
« Válasz #14 Dátum: 2012. Február 25. - 13:08:11 »
0 Show voters
Köszi^^ :) Lehet nemsokára update lesz PVar-ra!

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal