Menu

Show posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.

Show posts Menu

Messages - ali_vcmp

#1
Try This

function SaveStats( player )
{
try{
 local id = player.ID;
 if ( status[ id ].IsReg == true )
 {
       QuerySQL( db, "UPDATE Account SET Kills='" + status[ id ].Kills + "', Deaths='" + status[ player.ID ].Deaths + "', Cash='" + status[ id ].Cash + "', Bank='" + status[ id ].Bank + "', Joins='" + status[id].Joins + "' WHERE Name='" + player.Name + "'" );
   print( "" + player.Name + " Stats Saved [" + player.ID + "]" );
 status[ id ] = null;
 }
}
   catch(e) print( "Save Stats Error: " + e );
}
#2
Then This Msg [Dod-error]?
#3
Beztone Is RIght I Gave U Tomorrow AM I Right Squirrel Master + Phycho killer blah blah blah?
#4
Servers / Re: [0.4] Do Or Die
Jan 02, 2015, 01:40 PM
Thnxx
#5
Servers / [0.4] Do Or Die
Jan 01, 2015, 03:13 PM




Server Name: [0.4] Do OR Die A Crazy Server
Game Mode: Full Time Madness
Irc Channel: #Dod-Vcmp
Server IP: 192.254.78.2:5190
Forum:dod-dm.4rumer.com
Scripter: Ali_Vcmp
Credit: RATHORE
^Developer: Ali_Vcmp



Join Now Do Or Die
#7
Merry Christmas ;)
#8
Nice one
#9
Here's CMd Functions

function IsClanManager( clan )
{

                local q = QuerySQL( db, "SELECT Leaders FROM ClanStats WHERE Clan='" + GetTag( clan ).tolower() + "' COLLATE NOCASE" );
                local Leader = GetSQLColumnData( q, 0 );
                FreeSQLQuery( q );
      if ( Leader )
      {
         local param = split( Leader, ", " );

                          if ( param[ 0 ].tolower() == clan )
                          {
                            local ResultFirst = TruncateClan( param[ 0 ].tolower() );
                                  Result <- ResultFirst == TruncateClan( clan );
                              if ( !Result ) return null;
                        else return Result.tointeger();
                          }
                          if ( param[ 1 ].tolower() == clan )
                          {
                            local ResultSec = TruncateClan( param[ 1 ].tolower() );
                                  Result <- ResultSec == TruncateClan( clan );
                              if ( !Result ) return null;
                        else return Result.tointeger();
                          }
                          if ( param[ 2 ].tolower() == clan )
                          {
                            local ResultTree = TruncateClan( param[ 2 ].tolower() );
                                  Result <- ResultTree == TruncateClan( clan );
                              if ( !Result ) return null;
                        else return Result.tointeger();
                          }
                 }
}
#10
Thijin Message Is normaly Work
#11
I Make This Addmanager Cmd For Clanstats I Type /addmanager (Clan)Ali ITs Doesnt work its show me error on console error
i Error From This Line           else if ( i <= 3 ) Msg( "Syntax > /addmanager <[Tag]Owner> <[Tag]Leader> <[Tag]Leader2> <Clan-Without-Symbol>", player );

I Remove this then its show me 3 error from this line                                 local Owner = params[ 0 ], Manager1 = params[ 1 ], Manager2 = params[ 2 ], Clan = params[ 3 ];


I Was Tried To Fix This Cmd I Update Numtok Gettok Function





             else if ( cmd == "addmanager" )
             {
                    // This command is for any admin
                    if ( !text ) Msg( "Syntax > !addmanager <[Tag]Owner> <[Tag]Leader> <[Tag]Leader2> <Clan-Without-Symbol>", player );
          else if ( i <= 3 ) Msg( "Syntax > !addmanager <[Tag]Owner> <[Tag]Leader> <[Tag]Leader2> <Clan-Without-Symbol>", player );
                    else
                       {
                       if ( !IsClanRegister( params[ 3 ].tolower() ) ) Msg( "Error > The clan " + params[ 3 ] + " is no register!", player );
                       else {
                                local Owner = params[ 0 ], Manager1 = params[ 1 ], Manager2 = params[ 2 ], Clan = params[ 3 ];
                              if ( !GetTag( Owner ) ) PM( "Error > The owner need clan!!", player );
                               else if ( !GetTag( Manager1 ) ) PM( "Error > The Manager 1 need clan!!", player );
                              else if ( !GetTag( Manager2 ) ) PM( "Error > The Manager 2 need clan!!", player );

                                All( player.Name + "'s added owner/managers in Clan: " + Clan );
                                All( "(Owner)-> " + Owner + " - (Managers)-> " + Manager1 + ", " + Manager2 );
                                QuerySQL( db, format( "UPDATE ClanStats SET Leaders='%s' WHERE Clan='" + Clan + "' COLLATE NOCASE", "" + Owner + ", " + Manager1 + ", " + Manager2 + "" ) );

                                PM( "Okay! Now need put !adduser <Your Player Of Clan> Example: deviL", player );
                                local dos = QuerySQL( db, "SELECT Users FROM ClanUsers WHERE Clans='" + Clan.tolower() + "' COLLATE NOCASE" ), Users = GetSQLColumnData( dos, 0 );
                                // Create Managers And owner in database dont delete this "DFAX0067XLPKDW"

                                if ( Users ) QuerySQL( db, format( "UPDATE ClanUsers SET Users='%s' WHERE Clans='" + Clan + "' COLLATE NOCASE", ""+Users+" " + TruncateClan( Owner ) + " " + TruncateClan( Manager1 ) + " " + TruncateClan( Manager2 ) + "" ) );
                                else QuerySQL( db, format( "UPDATE ClanUsers SET Users='%s' WHERE Clans='" + Clan + "' COLLATE NOCASE", "DFAX0067XLPKDW " + TruncateClan( Owner ) + " " + TruncateClan( Manager1 ) + " " + TruncateClan( Manager2 ) + "" ) );

                            }
                       }
             }
#12
Thanks You Banaqs Topic Locked
#13
I Make This Fix Cmd But it Only Increase Vehicle Health Its Doesnt Repair Vehicle Body Idk Why But Pls Need Help
  else if ( cmd == "fix" )
  {
    local veh = player.Vehicle;
if ( !veh ) MessagePlayer( RED+"[Dod-Error] You must be in a Vehicle.", player );
else if ( veh.Health == 1000 ) MessagePlayer( RED+"[Dod-Error] There is no need to fix your vehicle.", player );
else
{
         NewTimer( "Fix", 3000, 1, player.ID );
               MessagePlayer( ORANGE+">> Fixing your Vehicle in 3 secs..", player );
}
  }
Cmd

function Fix(player)
{
local p = FindPlayer( player );
p.Vehicle.Health = 1000;
ePrivMessage( "Successfully fixed your vehicle.", p );
}
#14
Attemp To Call Integar
#15
if( nosEnabled[vehicle.ID] == 0 && nosReloadingTime[vehicle.ID] < time() ) nosSecondsPassed[vehicle.ID] = 9 This line onplayerentervehicle