Mohamed's Account System

Started by Mohamed Boubekri, Feb 15, 2018, 06:13 PM

Previous topic - Next topic

Milos

I'm tired of seeing "systems" like that.
Those who have a different way of doing this are rare. More like a copy of the old Warchiefs Squirrel.

=RK=MarineForce

@Mohamed bro its hard to make things in your system . and exchange .

this cash system as soon braindonor me .  can u change it ? which all scripts use it? i m tried to exchange .

as soon i will post my cop system :P
Try to UnderStand ME!

!

#47
Quote from: Pop360 on Jul 20, 2018, 09:50 PMI'm tired of seeing "systems" like that.
Those who have a different way of doing this are rare. More like a copy of the old Warchiefs Squirrel.

Hopefully one will be out soon GUI based by me. ;D

Discord: zeus#5155

KrOoB_

#48
Quote from: =RK=MarineForce on Jul 20, 2018, 06:23 PMcan u give me givemoney cmd
try this

else if ( cmd == "nakityolla" )
{
local Pos = player.Pos, checkpoly;
checkpoly = InPoly( Pos.x, Pos.y, -898.2357,-326.6091,-898.2196,-355.5072,-936.2309,-355.5205,-939.2854,-352.5587,-952.3001,-342.9138,-957.1079,-341.7898,-966.5380,-337.4671,-966.5401,-328.1766 );
if ( stats[ player.ID ].Reg == false ) return MessagePlayer( " [#E0E0E0]kayit olmaniz gerek.", player );
else if ( stats[ player.ID ].Log == false ) return MessagePlayer( " [#E0E0E0]giris yapmaniz gerek", player );
else if ( !player.IsSpawned ) MessagePlayer( " [#E0E0E0]Bunun icin dogman gerek.", player );
else if( checkpoly == false ) MessagePlayer( " [#E0E0E0]Banka kasasina gitmen lazim", player );
else if ( !text )
{
MessagePlayer("Komut: /nakityolla [miktar] [ISIM/ID]", player );
return;
}
else if ( NumTok( text, " " ) < 2 ) MessagePlayer("Komut: /nakityolla [miktar] [ISIM/ID]", player );
else {
local plr = GetPlayer( GetTok( text, " ", 2 ) );
if ( !plr ) MessagePlayer( " Bilinmeyen oyuncu", player );
else if (plr.ID == player.ID) MessagePlayer("Kendine para vermeye calismamalisin",player);
else {
local Poss = plr.Pos, checkpolyy;
checkpolyy = InPoly( Poss.x, Poss.y, -898.2357,-326.6091,-898.2196,-355.5072,-936.2309,-355.5205,-939.2854,-352.5587,-952.3001,-342.9138,-957.1079,-341.7898,-966.5380,-337.4671,-966.5401,-328.1766 );
if ( checkpolyy == false ) {MessagePlayer("Oyuncu banka kasasinda olmali", player ); MessagePlayer(""+player.Name+" adli oyuncu size para vermek istiyor,parayi alabilmek icin bankada olmaniz gerek!",plr);}
else {
if ( text.tointeger() > player.Cash ) MessagePlayer( " [#E0E0E0]Hatali miktar", player );
else if (!IsNum(GetTok( text, " ", 1 ) ) ) MessagePlayer( " [#E0E0E0]Miktar sayilardan olusmali", player );
else if ( text.tointeger() < 0 ) MessagePlayer( "", player );
else {
DecCash( player, text.tointeger() );
IncCash( plr, text.tointeger() );
MessagePlayer("Verilen para " + text.tointeger() + "$, " + plr.Name + "adli kisi gonderildi",player);
MessagePlayer(""+player.Name+" adli oyuncu size, " + text.tointeger() + "$ gonderdi",plr);
}
}
}
}
}

=RK=MarineForce

can u change lang of this plz
Try to UnderStand ME!

Mohamed Boubekri

Quote from: =RK=MarineForce on Jul 23, 2018, 05:19 PMcan u change lang of this plz
You can change lang with yourself by using google.
| What now ? | Not yet ! |
Morrocan:- [ 🇲🇦 ].

=RK=MarineForce

Try to UnderStand ME!

=RK=MarineForce

bro mohammed plz change ur cash system

i can't understand

  else if( cmd == "buyprop" )
        {
            local   lp = lastPickupPickedUp[ player.ID ],
                    pos, plp, lpid;
                   
            if( player.Vehicle ) return pMSG( "Error - Exit the vehicle first.", player );
            else if( lp == null ) return pMSG( "Error - There is no property around.", player );
            else
            {
                if( !FindPickup( lp ) ) return pMSG( "Error - There is no property around.", player );
                else
                {
                    plp = FindPickup( lp );
                    lpid = plp.ID;
                    pos = plp.Pos;
                   
                    if( !PlayerToPoint( player, 1, pos.x, pos.y, pos.z ) ) return pMSG( "Error - There is no property around.", player );
                    else if( prop[ lpid ].Owner != NO_OWNER_MSG ) return pMSG( "Error - This property is not forsale.", player );
                    else if( player.Cash < prop[ lpid ].Price ) return pMSG( "Error - Not enough money.", player );
                    else
                    {
                        pMSG( "Congratz! You bought " + RGB_GREY + prop[ lpid ].Name + RGB_BLUE + " for " + RGB_GREY + prop[ lpid ].Price + RGB_BLUE + " !", player );
                        player.Cash -= prop[ lpid ].Price;
                       
                        UpdateProperty( lpid, prop[ lpid ].Name, prop[ lpid ].Price, player.Name, NO_SHARING_MSG, NO_DESCRIPTION_MSG, pos.x, pos.y, pos.z, plp.World );
                        ReloadProperty( plp, PROP_MODEL_BOUGHT );
                    }
                }
            }
        }
       
        else if( cmd == "sellprop" )
        {
            local   lp = lastPickupPickedUp[ player.ID ],
                    pos, plp, lpid;
                   
            if( player.Vehicle ) return pMSG( "Error - Exit the vehicle first.", player );
            else if( lp == null ) return pMSG( "Error - There is no property around.", player );
            else
            {
                if( !FindPickup( lp ) ) return pMSG( "Error - There is no property around.", player );
                else
                {
                    plp = FindPickup( lp );
                    lpid = plp.ID;
                    pos = plp.Pos;
                   
                    if( !PlayerToPoint( player, 1, pos.x, pos.y, pos.z ) ) return pMSG( "Error - There is no property around.", player );
                    else if( prop[ lpid ].Owner != player.Name ) return pMSG( "Error - You don't own this property.", player );
                    else
                    {
                        pMSG( "Done! " + RGB_GREY + prop[ lpid ].Name + RGB_BLUE + " was sold for " + RGB_GREY + prop[ lpid ].Price + RGB_BLUE + " !", player );
                        player.Cash += prop[ lpid ].Price;
                        UpdateProperty( lpid, prop[ lpid ].Name, prop[ lpid ].Price, NO_OWNER_MSG, NO_SHARING_MSG, NO_DESCRIPTION_MSG, pos.x, pos.y, pos.z, plp.World );
                        ReloadProperty( plp, PROP_MODEL_FORSALE );
                    }
                }
            }
        }
       

how to give player money
when he rob

stats[player.ID].Cash == 500; no work
....
Try to UnderStand ME!

Xhefri


KrOoB_

the best script I see is compatible with all other scripts
 @Mohamed

KrOoB_


does this code belong to you? Or did you get it from someone else ?


[noae]
Quote from: =RK=MarineForce on Jul 23, 2018, 11:12 PMbro mohammed plz change ur cash system

i can't understand

  else if( cmd == "buyprop" )
        {
            local   lp = lastPickupPickedUp[ player.ID ],
                    pos, plp, lpid;
                   
            if( player.Vehicle ) return pMSG( "Error - Exit the vehicle first.", player );
            else if( lp == null ) return pMSG( "Error - There is no property around.", player );
            else
            {
                if( !FindPickup( lp ) ) return pMSG( "Error - There is no property around.", player );
                else
                {
                    plp = FindPickup( lp );
                    lpid = plp.ID;
                    pos = plp.Pos;
                   
                    if( !PlayerToPoint( player, 1, pos.x, pos.y, pos.z ) ) return pMSG( "Error - There is no property around.", player );
                    else if( prop[ lpid ].Owner != NO_OWNER_MSG ) return pMSG( "Error - This property is not forsale.", player );
                    else if( player.Cash < prop[ lpid ].Price ) return pMSG( "Error - Not enough money.", player );
                    else
                    {
                        pMSG( "Congratz! You bought " + RGB_GREY + prop[ lpid ].Name + RGB_BLUE + " for " + RGB_GREY + prop[ lpid ].Price + RGB_BLUE + " !", player );
                        player.Cash -= prop[ lpid ].Price;
                       
                        UpdateProperty( lpid, prop[ lpid ].Name, prop[ lpid ].Price, player.Name, NO_SHARING_MSG, NO_DESCRIPTION_MSG, pos.x, pos.y, pos.z, plp.World );
                        ReloadProperty( plp, PROP_MODEL_BOUGHT );
                    }
                }
            }
        }
       
        else if( cmd == "sellprop" )
        {
            local   lp = lastPickupPickedUp[ player.ID ],
                    pos, plp, lpid;
                   
            if( player.Vehicle ) return pMSG( "Error - Exit the vehicle first.", player );
            else if( lp == null ) return pMSG( "Error - There is no property around.", player );
            else
            {
                if( !FindPickup( lp ) ) return pMSG( "Error - There is no property around.", player );
                else
                {
                    plp = FindPickup( lp );
                    lpid = plp.ID;
                    pos = plp.Pos;
                   
                    if( !PlayerToPoint( player, 1, pos.x, pos.y, pos.z ) ) return pMSG( "Error - There is no property around.", player );
                    else if( prop[ lpid ].Owner != player.Name ) return pMSG( "Error - You don't own this property.", player );
                    else
                    {
                        pMSG( "Done! " + RGB_GREY + prop[ lpid ].Name + RGB_BLUE + " was sold for " + RGB_GREY + prop[ lpid ].Price + RGB_BLUE + " !", player );
                        player.Cash += prop[ lpid ].Price;
                        UpdateProperty( lpid, prop[ lpid ].Name, prop[ lpid ].Price, NO_OWNER_MSG, NO_SHARING_MSG, NO_DESCRIPTION_MSG, pos.x, pos.y, pos.z, plp.World );
                        ReloadProperty( plp, PROP_MODEL_FORSALE );
                    }
                }
            }
        }
       

how to give player money
when he rob

stats[player.ID].Cash == 500; no work
....
[/noae]

Namir

bro mohamed pls change ur level system

i cant understand

function onScriptUnload()
{
   DisconnectSQL( DataBase );
}

icant add admin levle for my best pakistan friend

Mahmoud Tornado

Quote from: =RK=MarineForce on Jul 20, 2018, 06:23 PM[noae][noae]  else if( cmd == "buyprop" )
        {
            local   lp = lastPickupPickedUp[ player.ID ],
                    pos, plp, lpid;
                   
            if( player.Vehicle ) return pMSG( "Error - Exit the vehicle first.", player );
            else if( lp == null ) return pMSG( "Error - There is no property around.", player );
            else
            {
                if( !FindPickup( lp ) ) return pMSG( "Error - There is no property around.", player );
                else
                {
                    plp = FindPickup( lp );
                    lpid = plp.ID;
                    pos = plp.Pos;
                   
                    if( !PlayerToPoint( player, 1, pos.x, pos.y, pos.z ) ) return pMSG( "Error - There is no property around.", player );
                    else if( prop[ lpid ].Owner != NO_OWNER_MSG ) return pMSG( "Error - This property is not forsale.", player );
                    else if( player.Cash < prop[ lpid ].Price ) return pMSG( "Error - Not enough money.", player );
                    else
                    {
                        pMSG( "Congratz! You bought " + RGB_GREY + prop[ lpid ].Name + RGB_BLUE + " for " + RGB_GREY + prop[ lpid ].Price + RGB_BLUE + " !", player );
                        player.Cash -= prop[ lpid ].Price;
                       
                        UpdateProperty( lpid, prop[ lpid ].Name, prop[ lpid ].Price, player.Name, NO_SHARING_MSG, NO_DESCRIPTION_MSG, pos.x, pos.y, pos.z, plp.World );
                        ReloadProperty( plp, PROP_MODEL_BOUGHT );
                    }
                }
            }
        }
       
        else if( cmd == "sellprop" )
        {
            local   lp = lastPickupPickedUp[ player.ID ],
                    pos, plp, lpid;
                   
            if( player.Vehicle ) return pMSG( "Error - Exit the vehicle first.", player );
            else if( lp == null ) return pMSG( "Error - There is no property around.", player );
            else
            {
                if( !FindPickup( lp ) ) return pMSG( "Error - There is no property around.", player );
                else
                {
                    plp = FindPickup( lp );
                    lpid = plp.ID;
                    pos = plp.Pos;
                   
                    if( !PlayerToPoint( player, 1, pos.x, pos.y, pos.z ) ) return pMSG( "Error - There is no property around.", player );
                    else if( prop[ lpid ].Owner != player.Name ) return pMSG( "Error - You don't own this property.", player );
                    else
                    {
                        pMSG( "Done! " + RGB_GREY + prop[ lpid ].Name + RGB_BLUE + " was sold for " + RGB_GREY + prop[ lpid ].Price + RGB_BLUE + " !", player );
                        player.Cash += prop[ lpid ].Price;
                        UpdateProperty( lpid, prop[ lpid ].Name, prop[ lpid ].Price, NO_OWNER_MSG, NO_SHARING_MSG, NO_DESCRIPTION_MSG, pos.x, pos.y, pos.z, plp.World );
                        ReloadProperty( plp, PROP_MODEL_FORSALE );
                    }
                }
            }
        }
       
[/noae][/noae]

bro how to convert this in your acccount cash system

Just use this.
[noae]local moy = prop[ lpid ].Price;
DecCash( player, moy );  //in buyprop cmd.
IncCash( player, moy ); //in sellprop cmd.
[/noae]

Mahmoud Tornado

Quote from: =RK=MarineForce on Jul 20, 2018, 06:23 PMcan u give me givemoney cmd

else if ( cmd == "givemoney" )
{
   if ( !text ) MessagePlayer( "/"+cmd+" <Nick/id> <Money>", player );
   else
   {
      local
         plr = GetPlayer( GetTok( text, " ", 1 ) ),
         moy = GetTok( text, " ", 2);
      if ( !plr ) MessagePlayer( "Unknown Player..", player );
      else if ( !moy ) MessagePlayer("You must give an money.", player);
      else if ( !IsNum( moy ) ) MessagePlayer("Money must be numbers.", player);
      else
      {
         IncCash( plr, moy.tointeger(); )
         Message("[#00de00]Administration Command: [#fbf3f3]Admin "+player.Name+" Has give "+plr.Name+" $'"+moy+"'.");
}
}
}

=RK=MarineForce

@Mahmoud Tornado can u save this into cmd i don't know here to add it at line

sell prop

player.Cash += prop[ lpid ].Price;

buy prop


player.Cash -= prop[ lpid ].Price;

how to convert this now
Try to UnderStand ME!