Szerző Téma: fegyver vétel  (Megtekintve 1453 alkalommal)

fegyver vétel
« Dátum: 2011. október 01. - 20:02:01 »
0 Show voters
Sziasztok.
Egy fegyver vásárló script kellene, de olyan hogy csak az tudja használni akinek 1000score van már.. és akinek megvan az 1000pont az tud venni fegyvereket.
pl: az illetõ beírja hogy /fegyobolt akinek van 1000pontja annak kiadja a fegyverek listáját és ha megveszi akkor megkapja a fegyvert, az árát pedig levonja.
Ha pedig nincs meg az 1000pont akkor kiír neki valami szöveget...

fegyver vétel
« Válasz #1 Dátum: 2011. október 01. - 20:41:01 »
+1 Show voters
Tessék eredetileg ezt Flash írta pénzel de én átírtam neked score ra :)
Ha nem megyen akkor szóljál mert lehet erontottam!
Ha megyen +! :P
[pawn]
#include <a_samp>
#include <zcmd>
#pragma tabsize 0
#define Dialog_weapon 1
#define Dialog_pistols 2
#define Dialog_MicroSmGs 3
#define Dialog_shotguns 4
#define Dialog_armour 5
#define Dialog_SMG 6
#define Dialog_assault 7
#define red 0xE60000FF
public OnFilterScriptInit(){print(\" >>Fegyverlehívó script aktív!<< \");return 1;}
public OnFilterScriptExit(){print(\" >>Fegyverlehívó script inaktív!<< \");return 1;}
COMMAND:fegyver(playerid,params[])
{
ShowPlayerDialog(playerid,Dialog_weapon,2,\"Fegyver vétel\",\"Pistols\\nMicro SMGs\\nShotguns\\nArmour\\nSMG\\nAssault\\n\",\"Tovább\",\"Bezár\");
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(dialogid == Dialog_weapon)
{
if(response)
{
if(listitem==0)
{
ShowPlayerDialog(playerid,Dialog_pistols,2,\"Pistols\",\"9mm\\nSilenced 9mm\\nDesert eagle\\n\",\"Megvesz\",\"Bezár\");
}
if(listitem==1)
{
ShowPlayerDialog(playerid,Dialog_MicroSmGs,2,\"Micro SMGs\",\"Tec9\\nMicro SMG\\n\",\"Megvesz\",\"Bezár\");
}
if(listitem==2)
{
ShowPlayerDialog(playerid,Dialog_shotguns,2,\"Shotguns\",\"Shtogun\\nSawn off shotgun\\nCombat shotgun\\n\",\"Megvesz\",\"Bezár\");
}
if(listitem==3)
{
ShowPlayerDialog(playerid,Dialog_armour,2,\"Armour\",\"Armour\\n\",\"Megvesz\",\"Bezár\");
}
if(listitem==4)
{
ShowPlayerDialog(playerid,Dialog_SMG,2,\"SMG\",\"SMG\\n\",\"Megvesz\",\"Bezár\");
}
if(listitem==5)
{
ShowPlayerDialog(playerid,Dialog_assault,2,\"Assault\",\"AK47\\nM4\\n\",\"Megvesz\",\"Bezár\");
}
}
}
if(dialogid == Dialog_pistols)
{
if(response)
{
if(listitem==0)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 22,5000);
GetPlayerScore(playerid, 1000);
}
if(listitem==1)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 23,5000);
GetPlayerScore(playerid, 1000);
}
if(listitem==2)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 24,5000);
GetPlayerScore(playerid, 1000);
}
}
}
if(dialogid == Dialog_MicroSmGs)
{
if(response)
{
if(listitem==0)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 32,5000);
GetPlayerScore(playerid, 1000);
}
if(listitem==1)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 28,5000);
GetPlayerScore(playerid, 1000);
}
}
}
if(dialogid == Dialog_shotguns)
{
if(response)
{
if(listitem==0)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 25,5000);
GetPlayerScore(playerid, 1000);
}
if(listitem==1)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 26,5000);
GetPlayerScore(playerid, 1000);
}
if(listitem==2)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 27,5000);
GetPlayerScore(playerid, 1000);
}
}
}
if(dialogid == Dialog_armour)
{
if(response)
{
if(listitem==0)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
SetPlayerArmour(playerid, 100);
GetPlayerScore(playerid, 1000);
}
}
}
if(dialogid == Dialog_SMG)
{
if(response)
{
if(listitem==0)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 29,5000);
GetPlayerScore(playerid, 1000);
}
}
}
if(dialogid == Dialog_assault)
{
if(response)
{
if(listitem==0)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 30,5000);
GetPlayerScore(playerid, 1000);
}
if(listitem==1)
{
if( GetPlayerMoney( playerid ) < 5000 ) return SendClientMessage( playerid, red, \"Nincs elég pontod![1000]\");
GivePlayerWeapon(playerid, 31,5000);
GetPlayerScore(playerid, 1000);
}
}
}
return 1;
}
[/pawn]

fegyver vétel
« Válasz #2 Dátum: 2011. október 01. - 21:07:36 »
0 Show voters
Köszi:)   +
A témát lehet zárni ^-^

fegyver vétel
« Válasz #3 Dátum: 2011. október 01. - 21:09:22 »
0 Show voters
Zárd le a témát te vagy egy adminisztátort megkérnék! Ott lent írja hogy Téma Zárása

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal