Sziasztok!
Ez az elsõ scriptem amit publikálok.
A lényege hogy beírjuk hogy /horgasz kidob egy mólónál és ne nagyon menjünk arébb mert csak ott lehet horgászni a mólónál
És csak akkor lehet horgászni ha van horgászbot
Sorok száma:109
Elkészítési idõ:10 perc
Készítõ:Clarence_Callahan(én)
Parancsok:/bolt hogy megvedd a horgászbotot
/horgaszinfo a horgászással kapcsolatos információ
/horgasz belépés horgásznak
/horgaszas a horgaszas elkezdése
/horgaszkilep kilépés a horgászatból
Kód:
#include
#include
#include
new horgasz[MAX_PLAYERS];
new horgaszbot[MAX_PLAYERS];
new horgasztimer;
#define dialog_bolt 1421
forward horgaszas (playerid);
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\"Horgász script BY:Clarence_Callahan\");
print(\"--------------------------------------\\n\");
return 1;
}
public OnPlayerConnect( playerid )
{
horgasz[playerid]=0;
horgaszbot[playerid]=-1;
return 1;
}
public OnPlayerDisconnect(playerid,reason)
{
horgasz[ playerid ] = 0;
horgaszbot[ playerid ] = 0;
return 1;
}
public OnDialogResponse( playerid, dialogid, response, listitem, inputtext[ ] )
{
if(dialogid ==dialog_bolt)
{
if(response)
{
if( listitem==0)
{
horgaszbot[playerid]++;
SendClientMessage(playerid,-1,\"{00ff00}Vásároltál egy horgászbotot\");
}
}
}
return 1;
}
CMD:bolt(playerid,params[])
{
ShowPlayerDialog(playerid,dialog_bolt,DIALOG_STYLE_LIST,\"Horgászcuccok vásárlása\", \"Horgászbot-Ára: 10000$\", \"Vásárlás\", \"Mégsem\");
return 1;
}
CMD:horgaszinfo(playerid, params[])
{
SendClientMessage(playerid,-1,\"{00ff00}Horgász segítség\");
SendClientMessage(playerid,-1,\"{00ff00}Horgász halat de vigyázz nehogy cápa legyen.Mielõtt horgásznál vedd meg a botot{fff000}/bolt\");
return 1;
}
CMD:horgasz ( playerid, params[ ] )
{
if(horgasz[playerid]==1) return SendClientMessage(playerid,-1,\"{ff0000}Már halász vagy!\");
horgasz[playerid]=1;
SetPlayerPos(playerid,2101.7273,-104.2698,2.3051);
SendClientMessage(playerid,-1,\"{00ff00}Sikeres horgászást.Segítségért {fff000}/halaszinfo\");
return 1;
}
CMD:horgaszas ( playerid, params[ ] )
{
if(horgaszbot[playerid]==1)return SendClientMessage(playerid,-1,\"{ff0000}Nincs horgaszbotod vagyél egyet /bolt\");
if(!IsPlayerInRangeOfPoint(playerid, 10.0,2101.7273,-104.2698,2.3051 )) return SendClientMessage(playerid,-1, \"{ff0000}Nem vagy a megadott helyen\" );
if(horgasz[playerid]==1)
{
GameTextForPlayer( playerid, \"~b~~r~~g~Horgaszás\", 3000, 3);
horgasztimer = SetTimer(\"horgaszas\", 15000, true);
horgaszbot[ playerid ]--;
TogglePlayerControllable(playerid,0);
}else{SendClientMessage(playerid,-1,\"{ff0000}Nem vagy horgász!\"); }
return 1;
}
CMD:horgaszkilep(playerid,params[])
{
horgasz[playerid]=0;
SpawnPlayer(playerid);
SendClientMessage(playerid,-1,\"{00ff00}Kiléptél a horgászásból\");
return 1;
}
public horgaszas (playerid)
{
switch(random(4))
{
case 0:
SendClientMessage(playerid,0x15ff00AA,\"Tonhal Ára:9000$\")||GivePlayerMoney(playerid,9000);
case 1:
SendClientMessage(playerid,0x15ff00AA,\"Nem volt kapás!\");
case 2:
SendClientMessage(playerid,0x15ff00AA,\"Ponty Ára:8000$\")||GivePlayerMoney(playerid,8000);
case 3:
SendClientMessage(playerid,0x15ff00AA,\"Elkapott a cápa és meghaltál\"),GameTextForPlayer(playerid, \"~b~~r~~g~Meghaltál!\",3000,3),SetPlayerHealth(playerid,-100),horgasz[playerid]=0;
}
KillTimer(horgasztimer);
TogglePlayerControllable(playerid,1);
return 1;
}
Várom a véleményeket
