Bank sys. (With Teammate)

Started by Gito Baloch, Feb 01, 2022, 03:57 PM

Previous topic - Next topic
Print
Go Down Pages1
User actions

Gito Baloch

Feb 01, 2022, 03:57 PM Last Edit: May 18, 2023, 09:22 AM by Gito Baloch
Old Version


Before PlayerCLass
Code Select
const rpmsg = "[#FCFB92]";

on Player Class
Code Select
TeamupFrom = null;
 TeamupReq = 0;
 Team1 = "None";
 Team2 = "None";
 InTeam = false;
 CanBuy = false;
 CanUse = false;
 Bomb = false;
on Script Load
Code Select
pkc <- CreatePickup( 410, 1, 0, Vector(-948.597, -344.569, 7.22694), 255, true ); //bankRobpIckuP

ct <- CreateObject( 4578, 1, -945.596, -342.627, 7.58308, 255 )
BankRob <- 300;
BankBeingRobbed <- false;
BankRobbed <-  false;
BankTime <- 0;
bankin <- CreateCheckpoint(null, 0, true, Vector(-937.568, -351.482, 17.8038), ARGB(255,255,255,255),2)// banklocker entrance.
bankout <- CreateCheckpoint(null, 0, true, Vector(-939.012, -351.882, 7.22692), ARGB(255,255,255,255),2)// banklocker exit.
bankb <- CreateCheckpoint(null, 0, true, Vector(-666.965, 1209.25, 11.1073), ARGB(255,255,16,0),1)// bank bomb.

on Player Pickup
Code Select
if( pickup.Model == 410  )
    {
    if(stats[player.ID].InTeam == false) ER2("You must be in team with someone to rob bank.",player);
    else if (BankBeingRobbed == true) return false;
    else if(BankRob > 0) MessagePlayer(""+rpmsg+"-> The bank can be robbed after [#ffffff]"+BankRob+""+rpmsg+" seconds.",player);
    else {
    local plr = FindPlayer(stats[player.ID].Team2); 
    if ( Distance( player.Pos.x, player.Pos.y , plr.Pos.x, plr.Pos.y ) > 3 ) ER2("Your team mate must be near to you.", player );
    else if(BankRob == 0 && stats[player.ID].InTeam == true)
    {
    BankBeingRobbed = true;
    BankTime = 10;
    NewTimer("BankRobbery",1000,11,player.ID, plr.ID);
    }
    }
    }
functions
Code Select
function BankRobbery(player, plr)
{
local player = FindPlayer(player);
local plr = FindPlayer(plr);
{
if(BankTime > 0){
BankTime--;
player.PlaySound(370);
plr.PlaySound(370);
player.IsFrozen = true;
player.IsFrozen = true;
}
else {
    local cashh = Random(60000,70000);
    local cashhh = Random(60000,70000);   
    Message(""+rpmsg+"-> [#" + format("%02X%02X%02X", player.Color.r, player.Color.g, player.Color.b) + "]"+ player.Name +" "+rpmsg+"has robbed "+casha+"$"+cashh+""+rpmsg+" from [#ffffff]International Bank.");
    Message(""+rpmsg+"-> [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+ plr.Name +" "+rpmsg+"has robbed "+casha+"$"+cashhh+""+rpmsg+" from [#ffffff]International Bank.");
    IncCash(player, cashh);
    IncCash(plr, cashhh);
    stats[player.ID].WantedLevel+=5;
    stats[plr.ID].WantedLevel+=5;
    player.WantedLevel+=5;
    plr.WantedLevel+=5;
    BankRobbed = true;
    BankBeingRobbed = false;
    BankRob = 300;
    player.PlaySound(470);
    plr.PlaySound(470);
    player.IsFrozen = false;
player.IsFrozen = false;
}
}
}

function YourDetail(player)
{
local player = FindPlayer(player);
{
if (player && BankBeingRobbed == false && player.Team == 1 && stats[player.ID].InTeam == true && stats[player.ID].InJail == 0 && stats[ player.ID ].Robbing == false && stats[player.ID].Smuggler == false)
{
local plr = FindPlayer(stats[player.ID].Team2);
Announce("Teammate: ~g~"+plr.Name+" ~h~| Distance: ~g~"+Distance( player.Pos.x, player.Pos.y , plr.Pos.x, plr.Pos.y )+"",player,1);
}
else if (player && BankBeingRobbed == true && player.Team == 1 && stats[player.ID].InJail == 0 && stats[ player.ID ].Robbing == false && stats[player.ID].Smuggler == false)
{
local plr = FindPlayer(stats[player.ID].Team2);
Announce("Robbing Bank: ~g~"+BankTime+"",player,1);
Announce("Robbing Bank: ~g~"+BankTime+"",plr,1);
}

}
}

on Player Command

Code Select
else if(cmd == "buybomb")
{
if(stats[player.ID].CanBuy == false) ER2("You must be at ammunation to use this command.",player);
else if(stats[player.ID].Bomb == true) ER2("You already have bomb.",player);
else if(stats[player.ID].InTeam == false) ER2("You must be in team with someone to use this command.",player);
else if (!text && player.Cash < 8000) ER2(""+rpmsg+"You must have "+casha+"$8000 "+rpmsg+"to buy this bomb.",player);
else {
stats[player.ID].Bomb = true;
MessagePlayer(""+rpmsg+"-> You have bought a bomb.",player);
}
return 0;
}
else if(cmd == "usebomb")
{
if(stats[player.ID].Bomb == false) ER2("You don't have bomb.",player);
else if(stats[player.ID].InTeam == false) ER2("You must be in team with someone to use this command.",player);
 if(stats[player.ID].CanUse == false) ER2("You must be inside the banklocker to use this command.",player);
else {
stats[player.ID].Bomb = false;
MessagePlayer(""+rpmsg+"-> You have used the bomb.",player);
MessagePlayer("[#ffffff]-> It will [#ff0000]explode [#ffffff]in next 5 seconds.",player);
NewTimer( "Door", 20000, 1 );
NewTimer( "DoorExplode", 5000, 1, player.ID );
cta <- CreateObject( 380, 1, Vector( -945.589, -343.758, 7.46694), 255 );
}
return 0;
}

else if(cmd == "bankrob")
{
if(BankRob == 0) MessagePlayer(""+rpmsg+"-> The bank can be [#ff0000]robbed "+rpmsg+"now",player);
else {
MessagePlayer(""+rpmsg+"-> The bank can be robbed after [#ffffff]"+BankRob+""+rpmsg+" seconds.",player);
}
return 0;
}
on Time Change
Code Select
if(BankRob > 0){
BankRob--;
}
on Time Change
Code Select
if(BankRob > 0){
BankRob--;
}

on Player Join
Code Select
  NewTimer("YourDetail", 1000, 0, player.ID);
Programming is the language I speak, the world I shape, and the future I code

UncleRus

#1
Feb 03, 2022, 08:53 AM
Good job
I LoperkinDead.My brothers scripters TimyrSem,VladSem

Gito Baloch

#2
Feb 04, 2022, 03:57 PM
Team commands also added.

onPlayerCommand
Code Select
else if ( cmd == "teamup" )
{
    if (stats[player.ID].InTeam == true) ER2("You are already in a team.",player);
    else if( !text ) SYN2( "/" + cmd + " <player name>", player );
 else
    {
        local plr = GetPlayer( GetTok( text, " ", 1) );           
        if ( !plr ) MessagePlayer( "Invalid player!", player );
        else if ( plr.ID == player.ID ) MessagePlayer( "You can't bribe yourself!", player );
        else if ( plr.Team == 0 ) ER2( "You can't ask cop for teaming up.", player );
        else if ( player.Team == 0 ) ER( "You are a cop!.", player );
else if (stats[plr.ID].InTeam == true) ER2("Target player is already in a team.",player);
else
        {
            MessagePlayer("[#" + format("%02X%02X%02X", player.Color.r, player.Color.g, player.Color.b) + "]"+ player.Name +" "+rpmsg+"Wants to team-up with you. (You have 30seconds to /accept or /reject)",plr);
            MessagePlayer(""+rpmsg+"You've sent teamup request to [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+ plr.Name +"",player);
            stats[plr.ID].TeamupFrom = player.ID;
stats[plr.ID].TeamupReq = 1;
stats[player.ID].Team1 = player.Name;
            stats[player.ID].Team2 = plr.Name;
        }
    }
}
 
Code Select
else if ( cmd == "accept" )
{
if( stats[player.ID].TeamupFrom == null) return ER2("You haven't recieved any team-up request yet.",player);
local plr = FindPlayer(stats[player.ID].TeamupFrom);
    if( stats[player.ID].TeamupReq == 0) ER2("You haven't recieved any bribe request yet.",player);
    else
    {
            MessagePlayer(""+rpmsg+"-> accepted [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+plr.Name+""+rpmsg+"'s team-up request.",player);
            MessagePlayer(""+rpmsg+"-> [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+plr.Name+" "+rpmsg+"accepted your team-up request. ",plr);
            stats[player.ID].TeamupFrom = null;
stats[player.ID].Team1 = player.Name;
stats[player.ID].Team2 = plr.Name;
stats[plr.ID].InTeam = true;
stats[player.ID].InTeam = true;
    }
}
Code Select
else if ( cmd == "reject")
{
if( stats[player.ID].TeamupFrom == null) return ER2("You haven't recieved any team-up request yet.",player);
local plr = FindPlayer(stats[player.ID].TeamupFrom);

            MessagePlayer(""+rpmsg+"-> You rejected [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+plr.Name+""+rpmsg+"'s team-up request.",player);
            MessagePlayer(""+rpmsg+"-> [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+plr.Name+" "+rpmsg+"rejected your team-up request. ",plr);
stats[player.ID].TeamupFrom = null;
stats[plr.ID].Team1 = "None";
stats[plr.ID].Team2 = "None";
}
Code Select
else if ( cmd == "tc" || cmd == "teamchat")
{
if(!text) ER2("/"+cmd+" text",player);
else {
local plr = FindPlayer(stats[player.ID].Team2);
MessagePlayer("[#" + format("%02X%02X%02X", player.Color.r, player.Color.g, player.Color.b) + "]"+player.Name+" "+rpmsg+"said: [#ffffff]"+text+"",player);
MessagePlayer("[#" + format("%02X%02X%02X", player.Color.r, player.Color.g, player.Color.b) + "]"+player.Name+" "+rpmsg+"said: [#ffffff]"+text+"",plr);
}
}
Programming is the language I speak, the world I shape, and the future I code

Jutt

#3
Aug 01, 2022, 06:47 AM
waaa yar work kr rha hai good job!
Jutt

Samir_HG

#4
Aug 04, 2022, 05:23 PM
Nice script It worked perfectly. Thanks.

UncleRus

#5
Oct 10, 2022, 09:11 PM
Nice script very good
I LoperkinDead.My brothers scripters TimyrSem,VladSem

Gito Baloch

#6
May 18, 2023, 08:43 AM Last Edit: May 20, 2023, 08:19 AM by Gito Baloch
I received a complaint about my previous code having numerous bugs. Therefore, I have made several changes to enhance its readability and ensure it is error-free.

Here's the updated code:

https://github.com/sibghatcodez/-VCMP-BankRobbery/blob/main/bankRobbery.nut



Add this in your class

Code Select
Team = false;
 Partner = "";
 Requested = false;

 AtAmmu = false;
 BombBought = false;
 InsideLocker = false;


Add this in onScriptLoad


Code Select
insideBank <- CreateCheckpoint(null, 0, true, Vector(-937.568, -351.482, 17.8038), ARGB(255,255,255,255),2)// Banklocker entrance.
outsideBank <- CreateCheckpoint(null, 0, true, Vector(-939.012, -351.882, 7.22692), ARGB(255,255,255,255),2)// Banklocker exit.
bankBomb <- CreateCheckpoint(null, 0, true, Vector(-676.604, 1206.94, 11.1082), ARGB(255,255,16,0),1)// Bank bomb.
bankPickup <- CreatePickup( 410, 1, 0, Vector(-948.597, -344.569, 7.22694), 255, true ); //Bank robbery pickup.


BankRobbed <- true;
BankGettingRobbed <- false;
BankRobTime <- 1800;
BankTime <- 0;

onPlayerCommand Function

Code Select
function onPlayerCommand( player, cmd, text )
{
  switch(cmd) {

    case "bankrob":
    BankRobTimeLeft(player);
    break;
   
    case "team":
    if(!stats[player.ID].Team) MessagePlayer("-> You're not in any team. Use /teamup.",player);
    else {
      MessagePlayer("You: "+player.Name+" | Teammate: "+stats[player.ID].Partner,player);
    }
    break;

    case "teamup":
    if(!text) MessagePlayer("-> /teamup <Target Player>",player);
    else if(stats[player.ID].Team) MessagePlayer("-> You're already in team with "+stats[player.ID].Partner+". Use /leave.",player);
    else {
    local plr = FindPlayer(text);
    if(!plr) MessagePlayer("-> Target Player is offline.",player);
    else if (plr.ID == player.ID) MessagePlayer("-> You can't teamup with yourself.",player);
    else {
      MessagePlayer(">> Team invitation sent to "+plr.Name,player);
      MessagePlayer(">> Team invitation recieved from "+player.Name,plr);
      MessagePlayer(">> /accept to join his team.",plr);
      stats[plr.ID].Requested = true;
      stats[plr.ID].Partner = player.Name;
      print(plr.Name+"|"+stats[plr.ID].Partner);
      Invitation <- NewTimer("InviteExpired",30000,1,plr.ID);
    }
  }
    break;

    case "accept":
    if(!stats[player.ID].Requested) MessagePlayer("-> You have not recieved any team invitation.",player);
    else {
      local plr = FindPlayer(stats[player.ID].Partner);
      print(stats[player.ID].Partner);
      stats[player.ID].Team = true;
      stats[player.ID].Requested = false;
     
      stats[plr.ID].Team = true;
      stats[plr.ID].Partner = player.Name;

      MessagePlayer(">> You're now in team with "+stats[player.ID].Partner,player);
      MessagePlayer(">> You're now in team with "+player.Name,plr);

      teamedUp <- NewTimer("TeamInfo",1000,0,player.ID,plr.ID);
    }
    break;

  case "tc":
  case "teamchat":
  if(!stats[player.ID].Team) MessagePlayer("-> You are not in any team. /teamup with someone.",player);
  else if(!text) MessagePlayer("/teamchat text",player);
  else {
    local plr = FindPlayer(stats[player.ID].Partner);
    MessagePlayer(player.Name+" said: [#ffffff]"+text+"",player);
    MessagePlayer(player.Name+" said: [#ffffff]"+text+"",plr);
  }
  break;

    case "leave":
  if(!stats[player.ID].Team) MessagePlayer("-> You are not in any team. /teamup with someone.",player);
  else {
    local plr = FindPlayer(stats[player.ID].Partner);
    MessagePlayer(">> You're no longer teaming-up with "+plr.Name,player);
    MessagePlayer(">> "+player.Name+" is no longer teaming-up with you.",plr);

      stats[player.ID].Team = false;
      stats[player.ID].Partner = "";

      stats[plr.ID].Team = false;
      stats[plr.ID].Partner = "";
  }
  break;

  case "buybomb":
  if(!stats[player.ID].Team) MessagePlayer("-> You are not in any team. /teamup with someone.",player);
  else if(!stats[player.ID].AtAmmu) MessagePlayer("-> You must be at ammunation to use this command.",player);
  else if(stats[player.ID].BombBought) MessagePlayer("-> You already have a bomb.",player);
  else {
  stats[player.ID].BombBought = true;
  local plr = FindPlayer(stats[player.ID].Partner);
  MessagePlayer(">> Bomb purchased successfully.",player);
  MessagePlayer(">> Your teammate: "+player.Name+" has bought the bomb.",plr);
  }
  break;

  case "usebomb":
  if(!stats[player.ID].BombBought) MessagePlayer("-> You don't have bomb.",player);
  else if(!stats[player.ID].Team) MessagePlayer("-> You are not in any team. /teamup with someone.",player);
  else if(stats[player.ID].InsideLocker == false) MessagePlayer("-> You must be inside the banklocker.",player);
  else if(BankRobTime > 0) BankRobTimeLeft(player);
  else {
  local plr = FindPlayer(stats[player.ID].Partner);
  stats[player.ID].BombBought = false;
  MessagePlayer(">> You have planted the bomb.",player);
  MessagePlayer(">> It will explode in next 5 seconds.",player);
  MessagePlayer(">> Your teammate: "+player.Name+" has planted the bomb.",plr);
  NewTimer( "LoadDoor", 40000, 1 );
  NewTimer( "DoorExplode", 5000, 1 );
  cta <- CreateObject( 380, 1, Vector( -945.589, -343.758, 7.46694), 255 );
  }
  break;
  }
}



Custom functions

Code Select
function Random( min, max ) // incase you don't have the random(a,b) function
{
    if ( min < max )
    return rand() % (max - min + 1) + min.tointeger();
    else if ( min > max )
    return rand() % (min - max + 1) + max.tointeger();
    else if ( min == max )
    return min.tointeger();
}

function InviteExpired(plrID){
  local plr = FindPlayer(plrID);
  if(stats[plr.ID].Requested) stats[plr.ID].Requested = false;
  else if (!plr) Invitation.Delete();
}

function TeamCheck(player){
  if(stats[player.ID].Team) {
  local plr = FindPlayer(stats[player.ID].Partner);

    MessagePlayer(">> "+player.Name+" is no longer teaming-up with you.",plr);

    stats[plr.ID].Team = false;
    stats[plr.ID].Partner = "";
  } else return false;
}


function TeamInfo(player,plr){
  local player = FindPlayer(player), plr = FindPlayer(plr);

  if(player && plr && stats[player.ID].Team && stats[plr.ID].Team && !BankGettingRobbed) {
      Announce("Teammate: ~g~"+plr.Name+" ~h~| Distance: ~g~"+DistanceFromPoint( player.Pos.x, player.Pos.y , plr.Pos.x, plr.Pos.y )+"",player,1);
      Announce("Teammate: ~g~"+plr.Name+" ~h~| Distance: ~g~"+DistanceFromPoint( player.Pos.x, player.Pos.y , plr.Pos.x, plr.Pos.y )+"",plr,1);
  } else if (BankGettingRobbed) {
      local plr = FindPlayer(stats[player.ID].Partner);
      Announce("Robbing Bank: ~g~"+BankTime+"",player,1);
      Announce("Robbing Bank: ~g~"+BankTime+"",plr,1);
  }
  else teamedUp.Delete();
}


function DoorExplode() {
  cta.Delete();
  HideMapObject(4578, -945.596, -342.627, 7.58308);
  CreateExplosion( 1, 7, -945.596, -342.627, 7.58308, -1, true );
}
function LoadDoor() {
  CreateObject( 4578, 1, -945.596, -342.627, 7.58308, 255 );
}
function BankRobTimeLeft(player) {
  local time = BankRobTime;
  local mins = floor(time / 60);
  local sec = time % 60;
  return MessagePlayer((BankRobTime > 0) ? ">> Bank can be robbed after: " + mins + " minutes " + sec + " seconds." : ">> The bank can be robbed now.",player);
}
function BankRobbery(player, plr)
{
local player = FindPlayer(player), plr = FindPlayer(plr);

if(BankTime > 0){
    BankTime--;
    player.PlaySound(370);
    plr.PlaySound(370);
    player.IsFrozen = true;
    player.IsFrozen = true;
}
else {
    local cash_1 = Random(30000,40000), cash_2 = Random(30000,40000);
    Message(">> "+player.Name +" has robbed "+(cash_1 + cash_2)+" from International Bank.");

    player.Cash += cash_1; plr.Cash += cash_2,
    player.PlaySound(470); plr.PlaySound(470);
    player.IsFrozen = false; plr.IsFrozen = false;

    BankRobbed = true;
    BankGettingRobbed = false;
    BankRobTime = 1800;
}
}

onTimeChange Function

Code Select
function onTimeChange(oldHour, oldMin, newHour, newMin) {
  if(BankRobTime > 0) BankRobTime--;
}


CheckPoint Enter and Exit

Code Select
    function onCheckpointEntered(player, checkpoint )
{
    if (checkpoint.ID == 0) {
        player.Pos = Vector(-934.266, -348.206, 7.22692);
        player.PlaySound(465);
        stats[player.ID].InsideLocker = true;
    }
    if (checkpoint.ID == 1) {
        player.Pos = Vector(-934.265, -351.009, 17.8038);
        player.PlaySound(465);
        stats[player.ID].InsideLocker = false;
    }
    if (checkpoint.ID == 2) {
        player.PlaySound(465);
        player.Immunity = 255;
        stats[player.ID].AtAmmu = true;
    }
}
function onCheckpointExited( player, checkpoint )
{
    if (checkpoint.ID == 2) {
        player.Immunity = 0;
        stats[player.ID].AtAmmu = false;
    }
}


Add this onPickupPickedUp

Code Select
if( pickup.Model == 410  )
    {
      if(!stats[player.ID].Team) MessagePlayer("-> You are not in any team. /teamup with someone.",player);
      else if (BankGettingRobbed == true) return false;
      else if(BankRobTime > 0) BankRobTimeLeft(player);
      else {
          local plr = FindPlayer(stats[player.ID].Partner); 
          if ( DistanceFromPoint( player.Pos.x, player.Pos.y , plr.Pos.x, plr.Pos.y ) > 3 ) MessagePlayer(">> Your teammate must be near to you.", player );
      else if(BankRobTime == 0 && stats[player.ID].Team)
      {
          BankGettingRobbed = true;
          NewTimer("BankRobbery",1000,11,player.ID, plr.ID);
          BankTime = 10;
          pickup.RespawnTime = 60000;
      }
    }
  }
Programming is the language I speak, the world I shape, and the future I code

Sandisk

#7
May 19, 2023, 10:58 PM
the reject cmd gives errors i think it must be as this:

Code Select
else if ( cmd == "reject")
{
 if( stats[player.ID].Partner == "" ) return MessagePlayer("You haven't recieved any team-up request yet.",player);
 local plr = FindPlayer(stats[player.ID].Partner);

            MessagePlayer(""+rpmsg+"-> You rejected [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+plr.Name+""+rpmsg+"'s team-up request.",player);
            MessagePlayer(""+rpmsg+"-> [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+player.Name+" "+rpmsg+"rejected your team-up request. ",plr);
  stats[player.ID].Partner = "";
  stats[player.ID].Requested = false;
}

Gito Baloch

#8
May 20, 2023, 01:36 AM
Quote from: Sandisk on May 19, 2023, 10:58 PMthe reject cmd gives errors i think it must be as this:

Code Select
else if ( cmd == "reject")
{
 if( stats[player.ID].Partner == "" ) return MessagePlayer("You haven't recieved any team-up request yet.",player);
 local plr = FindPlayer(stats[player.ID].Partner);

            MessagePlayer(""+rpmsg+"-> You rejected [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+plr.Name+""+rpmsg+"'s team-up request.",player);
            MessagePlayer(""+rpmsg+"-> [#" + format("%02X%02X%02X", plr.Color.r, plr.Color.g, plr.Color.b) + "]"+player.Name+" "+rpmsg+"rejected your team-up request. ",plr);
  stats[player.ID].Partner = "";
  stats[player.ID].Requested = false;
}


I didn't add reject command in the updated version. Because there's a timer when someone sends you request and you ignore it, the invitation will be expired in just 30 seconds.
Programming is the language I speak, the world I shape, and the future I code
Print
Go Up Pages1
User actions