All pastes #997051 Raw Edit

[FS]Mihaitus business

public text v1 · immutable
#997051 ·published 2008-04-25 13:09 UTC
rendered paste body
//#include <a_samp>
#include <core>
#include <float>
#include <string>
#include <time>
#pragma tabsize 0
#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1
#define COLOR_RRED 0xFF0000AA
#define COLOR_GREEN 0x008000FF
#define COLOR_LIGHTGREEN 0x00CC00FF
#define COLOR_ADMIN 0x333333FF
#define COLOR_ORANGE 0xFF8000FF
#define COLOR_LIGHTBLUE 0x00BFFFFF
#define COLOR_PINK 0xFF80C0FF
#define COLOR_RED 0x88111188
#define COLOR_LIGHTRED 0xFF0000AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_BLUE 0x33CCFFAA
#define COLOR_DARKBLUE 0x3399FFAA
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GRAD1 0xB4B5B7AA
#define COLOR_GRAD2 0xBFC0C2AA
#define COLOR_GRAD3 0xCBCCCEAA
#define COLOR_GRAD4 0xD8D8D8AA
#define COLOR_GRAD5 0xE3E3E3AA
#define COLOR_GRAD6 0xF0F0F0AA
#define COLOR_INVISIBLE 0xFFFFFF00
#define COLOR_SYSTEM 0xEFEFF7AA
#define columnwidth 235
new Menu:MbM;
new Menu:MbHP;
new Menu:MbAP;
new Menu:MbW;
new Menu:MbC;
new Mb;

public OnFilterScriptInit()
{

    print("\n------------------------------------");
	print(" >>>>>>>> Mihaitu`s business <<<<<<< ");
	print(" >>>>>>>>>> By [AC]Mihaitu <<<<<<<<< ");
	print("------------------------------------\n");

    Mb = CreatePickup(1274, 2, 2099.4182,-2445.2949,13.5469);
 	MbM = CreateMenu("~y~Shop",1,80,150,columnwidth,columnwidth);
	SetMenuColumnHeader(MbM, 0, "What do you wanna buy ?");
	AddMenuItem(MbM,0,"Health");
	AddMenuItem(MbM,0,"Armour");
	AddMenuItem(MbM,0,"Weapons");
	AddMenuItem(MbM,0,"Commands");
	AddMenuItem(MbM,0,"Nothing");

 	MbHP = CreateMenu("~b~Health ~y~Deposit",2,80,150,columnwidth,columnwidth);
	SetMenuColumnHeader(MbHP, 0, "Select a pack");
	AddMenuItem(MbHP,0,"Buy 20HP");
	AddMenuItem(MbHP,0,"Buy 50HP");
	AddMenuItem(MbHP,0,"Buy 70HP");
	AddMenuItem(MbHP,0,"Buy 100HP");
	AddMenuItem(MbHP,0,"Back");
	
	AddMenuItem(MbHP,1,"$2000");
	AddMenuItem(MbHP,1,"$5000");
	AddMenuItem(MbHP,1,"$7000");
	AddMenuItem(MbHP,1,"$10000");
	AddMenuItem(MbHP,1," ");

	MbAP = CreateMenu("~b~Armour ~y~Deposit",2,80,150,columnwidth,columnwidth);
	SetMenuColumnHeader(MbAP, 0, "Select a pack");
	AddMenuItem(MbAP,0,"Buy 20AP");
	AddMenuItem(MbAP,0,"Buy 50AP");
	AddMenuItem(MbAP,0,"Buy 70AP");
	AddMenuItem(MbAP,0,"Buy 100AP");
	AddMenuItem(MbAP,0,"Back");
	
	AddMenuItem(MbAP,1,"$2000");
	AddMenuItem(MbAP,1,"$5000");
	AddMenuItem(MbAP,1,"$7000");
	AddMenuItem(MbAP,1,"$10000");
	AddMenuItem(MbAP,1," ");

 	MbW = CreateMenu("~y~Weapons ~b~Deposit",1,80,150,columnwidth,columnwidth);
	SetMenuColumnHeader(MbW, 0, "Select a pack");
	AddMenuItem(MbW,0,"Fast killing pack");
	AddMenuItem(MbW,0,"Power killing pack");
	AddMenuItem(MbW,0,"Back");
	
	AddMenuItem(MbAP,1,"$20000");
	AddMenuItem(MbAP,1," ");

 	MbC = CreateMenu("~b~Commands",1,80,150,columnwidth,columnwidth);
	SetMenuColumnHeader(MbC, 0, "Select a command");
	AddMenuItem(MbC,0,"Tune a car (LV1)");
	AddMenuItem(MbC,0,"Huntpoint 2 (ANYLV)");
	AddMenuItem(MbC,0,"Kick a player (LV4)");
	AddMenuItem(MbC,0,"Back");

	AddMenuItem(MbC,1,"$50000");
	AddMenuItem(MbC,1,"$25000");
	AddMenuItem(MbC,1,"$100000");
	AddMenuItem(MbC,1," ");

	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

ChangeMenu(playerid,Menu:oldmenu,Menu:newmenu){
	if(IsValidMenu(oldmenu))
	HideMenuForPlayer(oldmenu,playerid);
	ShowMenuForPlayer(newmenu,playerid);
	return 1;
}

CloseMenu(playerid,Menu:oldmenu){
	HideMenuForPlayer(oldmenu,playerid);
	TogglePlayerControllable(playerid,1);
	ExitShop(playerid);
	return 1;
}

ExitShop(playerid){
	ClearAnimations(playerid);
}

/*OnPlayerSelectMenuRow other functions explications :

1.TogglePlayerControlable(playerid, 0 or 1) : 0 makes the player uncontrolable and 1 makes him controlable .
2.1st GivePlayerMoney(playerid, ammount) sets how mouch money should be given to ID o .
  2nd GivePlayerMoney(playerid, -ammount) sets how mouch money should be taken from the custommer .
3.SendClientMessage(playerid,color,text) : color = The color of the text ( for colors look at the top of te script ) , text " ... " = the text that you want to be sent to the custommer .
  
*/

public OnPlayerSelectedMenuRow(playerid, row){
	new Menu:current = GetPlayerMenu(playerid);
	if(current==MbM){
		switch(row){
			case 0: ChangeMenu(playerid,current,MbHP);
			case 1: ChangeMenu(playerid,current,MbAP);
			case 2: ChangeMenu(playerid,current,MbW);
			case 3: ChangeMenu(playerid,current,MbC);
			case 4: CloseMenu(playerid,current),TogglePlayerControllable(playerid,1);
		}
		return 1;
	}
	if(current==MbHP){
        new Float:hlth;
		switch(row){
            case 0: GetPlayerHealth(playerid, hlth),SetPlayerHealth(playerid, hlth+20),GivePlayerMoney(playerid == 0, 2000),GivePlayerMoney(playerid, -2000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//      Use SetPlayerHealth(playerid, hlth+???)
            case 1: GetPlayerHealth(playerid, hlth),SetPlayerHealth(playerid, hlth+50),GivePlayerMoney(playerid == 0, 5000),GivePlayerMoney(playerid, -5000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//            to give health to a player .
            case 2: GetPlayerHealth(playerid, hlth),SetPlayerHealth(playerid, hlth+70),GivePlayerMoney(playerid == 0, 7000),GivePlayerMoney(playerid, -7000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//        You can give to a player 1-100 health .
            case 3: GetPlayerHealth(playerid, hlth),SetPlayerHealth(playerid, hlth+100),GivePlayerMoney(playerid == 0, 10000),GivePlayerMoney(playerid, -10000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");// Don`t forget to change the menu rows as well !
            case 4: ChangeMenu(playerid,current,MbM);
		}
		return 1;
	}
	
	if(current==MbAP){
        new Float:arm;
		switch(row){
			case 0: GetPlayerArmour(playerid, arm),SetPlayerArmour(playerid, arm+20),GivePlayerMoney(playerid == 0, 2000),GivePlayerMoney(playerid, -2000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//        Use SetPlayerArmour(playerid, arm+???)
			case 1: GetPlayerArmour(playerid, arm),SetPlayerArmour(playerid, arm+50),GivePlayerMoney(playerid == 0, 5000),GivePlayerMoney(playerid, -5000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//             to give armour to a player .
			case 2: GetPlayerArmour(playerid, arm),SetPlayerArmour(playerid, arm+70),GivePlayerMoney(playerid == 0, 7000),GivePlayerMoney(playerid, -7000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//       You can give to a player 1-100 armour .
			case 3: GetPlayerArmour(playerid, arm),SetPlayerArmour(playerid, arm+100),GivePlayerMoney(playerid == 0, 10000),GivePlayerMoney(playerid, -10000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");// Don`t forget to change the menu rows as well !
			case 4: ChangeMenu(playerid,current,MbM);
		}
		return 1;
	}
	if(current==MbW){
        	switch(row){
            case 0: GivePlayerWeapon(playerid, 30, 1000),GivePlayerWeapon(playerid, 32, 1000),GivePlayerWeapon(playerid, 41, 1000),GivePlayerMoney(playerid == 0, 20000),GivePlayerMoney(playerid, -20000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");// GivePlayerWeapon(playerid, weaponid, bullets) . With this function you can give to a player some weapons .
            case 1: GivePlayerWeapon(playerid, 31, 1000),GivePlayerWeapon(playerid, 26, 1000),GivePlayerWeapon(playerid, 34, 1000),GivePlayerMoney(playerid == 0, 15000),GivePlayerMoney(playerid, -15000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//              Just set the weapons IDs and set how mouch bullets should have each weapon .
            case 2: ChangeMenu(playerid,current,MbM);
		}
		return 1;
	}
	if(current==MbC){
		switch(row){
            case 0: SendClientMessage(playerid,COLOR_BLUE,"The command for tunning a car is /ltune !!!"),GivePlayerMoney(playerid == 0, 50000),GivePlayerMoney(playerid, -50000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");                // Here you can set what commands should buy the player .
		    case 1: SendClientMessage(playerid,COLOR_BLUE,"The command for HuntPoint2 is /huntpoint(specialplace2) !!!"),GivePlayerMoney(playerid == 0, 25000),GivePlayerMoney(playerid, -25000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");//      Just modify what text will send the client !
            case 2: SendClientMessage(playerid,COLOR_BLUE,"The command for KICK a car is /kick(playerid) !!!"),GivePlayerMoney(playerid == 0, 100000),GivePlayerMoney(playerid, -100000),TogglePlayerControllable(playerid,1),SendClientMessage(playerid,COLOR_BLUE,"Your money , my target sir !");        //    & Don`t forget to change the menu rows as well !
            case 3: ChangeMenu(playerid,current,MbM);
		}
		return 1;
	}
    return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
   if(pickupid == Mb)
   {
      ShowMenuForPlayer(MbM, playerid);
      TogglePlayerControllable(playerid,0);
      return 1;
   }
   return 1;
}

DestroyScript