[FilterScript] Weapon Menu v1
#1

PREFACE

I started a new pawn on a forum. Dialog about the running and wanted to do FS. I wanted to share with you so are the first fs. Bug may have warning. Do not make unnecessary comments.
SCREENSHOTS




DOWNLOAD


http://s2.dosya.tc/download/MqvlAZ/weaponmenu.rar.html

Add To Remove Warning per mode.

Код:
#pragma tabsize 0
Best uses.
Reply
#2

Nice Job.
Reply
#3

Thank you.
Reply
#4

Nice!1
Reply
#5

Quote:
Originally Posted by ChriZ
Посмотреть сообщение
PREFACE

I started a new pawn on a forum. Dialog about the running and wanted to do FS. I wanted to share with you so are the first fs. Bug may have warning. Do not make unnecessary comments.
SCREENSHOTS




DOWNLOAD


http://s2.dosya.tc/download/MqvlAZ/weaponmenu.rar.html

Add To Remove Warning per mode.

Код:
#pragma tabsize 0
Best uses.
On topic :

Very good for your 1st try!

Anyways, you could fix the indentation.

I'll give you some suggestions :

- Add more weapons.
- Add weapons category ( Melee, Assault Rifles, Sub Machine Guns ).
- Add a money check. I've gave you an example below :
pawn Код:
case 0 :
{
    if ( GetPlayerMoney( playerid ) < 300 )
        return SendClientMessage( playerid, -1, "Not enough money." );

    GivePlayerWeapon( playerid, 7, 1 );

    GivePlayerMoney( playerid, - 300 );
}
------------

Off topic :

What image hosting do you use?

------------
Reply
#6

When you add all the weapons are incorrect. Next time I'll be more careful.

Thank you!
Reply
#7

THIS DOSE NOT WORK FOR ME



Код:
/* ChriZ - Serdar BAYRAK*/

#define COLOR_GREEN 0x9EC73DAA
#include <a_samp>

#if defined FILTERSCRIPT

public OnFilterScriptInit()
{
	print("\n--------------------------------------");
	print(" Weapon system fulled - active");
	print("--------------------------------------\n");
	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

#else

main()
{
	print("\n----------------------------------");
	print(" Weapon system fulled - active");
	print("----------------------------------\n");
}

#endif

public OnGameModeInit()
{
	return 1;
}

public OnGameModeExit()
{
	return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
	return 1;
}

public OnPlayerConnect(playerid)
{
	return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
	return 1;
}

public OnPlayerSpawn(playerid)
{
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
	return 1;
}

public OnVehicleSpawn(vehicleid)
{
	return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
	return 1;
}

public OnPlayerText(playerid, text[])
{
	return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
	if (strcmp("/weapon", cmdtext, true, 10) == 0)
	{
ShowPlayerDialog(playerid, 1, DIALOG_STYLE_LIST, "Weapon Menu", "Golf Club\nNite Stick\nKnife\nShovel\nKatana\nChainsaw\nCane\nGrenade\nTear Gas\nShotgun\nMP5\nM4\nTec9\nRocket Launcher\nSpreycan\nFire Exhinguisher\nCamera\nParachute", "Okay", "Cancel");
	}
	return 0;
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
	return 1;
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
	return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
	return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
	return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
	return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
	return 1;
}

public OnRconCommand(cmd[])
{
	return 1;
}

public OnPlayerRequestSpawn(playerid)
{
	return 1;
}

public OnObjectMoved(objectid)
{
	return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
	return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
	return 1;
}

public OnVehicleMod(playerid, vehicleid, componentid)
{
	return 1;
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
	return 1;
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
	return 1;
}

public OnPlayerSelectedMenuRow(playerid, row)
{
	return 1;
}

public OnPlayerExitedMenu(playerid)
{
	return 1;
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
	return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
	return 1;
}

public OnRconLoginAttempt(ip[], password[], success)
{
	return 1;
}

public OnPlayerUpdate(playerid)
{
	return 1;
}

public OnPlayerStreamIn(playerid, forplayerid)
{
	return 1;
}

public OnPlayerStreamOut(playerid, forplayerid)
{
	return 1;
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
	return 1;
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
	return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    if(dialogid == 1)
    {
        switch(listitem)
        {
            case 0:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}Golf Club{FFFFFF} and purchased.");
                  GivePlayerWeapon(playerid,WEAPON_GOLFCLUB, 100);
                  GivePlayerMoney(playerid, -100);
                }
			case 1:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}Nite Stick{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_NITESTICK, 100);
				 GivePlayerMoney(playerid, -100);
                }
            case 2:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}knife{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_KNIFE, 100);
				 GivePlayerMoney(playerid, -100);
                }
                                            case 3:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}shovel{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_SHOVEL, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 4:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}katana{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_KATANA, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 5:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}chainsaw{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_CHAINSAW, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 6:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}cane{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_CANE, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 7:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}grenade{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_GRENADE, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 8:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}tear gas{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_TEARGAS, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 9:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}shotgun{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_SHOTGUN, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 10:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}mp5{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_MP5, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 11:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}m4{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_M4, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 12:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}tec9{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_TEC9, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 13:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}rocket launcher{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_ROCKETLAUNCHER, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 14:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}spreycan{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_SPRAYCAN, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 15:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}fire exhinguisher{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_FIREEXTINGUISHER, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 16:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}camera{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_CAMERA, 100);
				 GivePlayerMoney(playerid, -100);
}
                                            case 17:
                {
                SendClientMessage(playerid, COLOR_GREEN,"{6EF83C}INFORMATION{FFFFFF}: 100$ giving {F81414}parachute{FFFFFF} and purchased.");
				 GivePlayerWeapon(playerid,WEAPON_PARACHUTE, 100);
				 GivePlayerMoney(playerid, -100);
}
}
    }
    return 1;
}












Код:
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(225) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(231) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(237) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(243) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(249) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(255) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(261) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(267) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(273) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(279) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(285) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(291) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(297) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(303) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(309) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(315) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(321) : warning 217: loose indentation
C:\Users\Owner\Documents\Los Angeles GANSTAS\new server - Copy\filterscripts\weaponmenu.pwn(327) : warning 217: loose indentation
Pawn compiler 3.2.3664	 	 	Copyright © 1997-2006, ITB CompuPhase


18 Warnings.
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)