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/?kv59fevd5lc1dflItt 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!
Üzenetek megjelenítése
, 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)