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.

Topics - Finch Real
1
Off-Topic General / Inactivity Notice
« on August 6th, 2016, 02:13 PM »
Hello Everyone It seems to be very Tough Decision but i think that will be good enough its been one or two month ago i have lefted vcmp for some time so i just post a topic of inactivity well this topic is for everyone if they found a guy with my nick you can report me ( you will not ) I am sure i will be back soon with suprise :D
It was a long time with this community and i love it Will Miss you guys :)
2
Script and Content Requests / Duel System
« on July 23rd, 2016, 06:29 PM »
As i Came to know this topic is for request so here is my request :D ;D
Duel System in which two players fight with 5 rounds of series the one who wins the most wins the game and get rewards
3
Snippet Showroom / [Untested] Cash on Body
« on July 21st, 2016, 02:50 PM »
Code: [Select]
function onPlayerKill( killer, player, reason, bodypart )
{
  local x = player.Pos.x, y = player.Pos.y, z = player.Pos.z;
local cash = Vector( x.tofloat() + 1, y.tofloat() + 1, z.tofloat() );
CreatePickup( 337, cash );
MessagePlayer( "You have lost 50$", player );
player.Cash -= 50;
Message( "State Alert - 50$ is on the ground Follow the radar on marker to find it and claim it" );
}
function onPlayerDeath( player, reason )
{
    local x = player.Pos.x, y = player.Pos.y, z = player.Pos.z;
local cash = Vector( x.tofloat() + 1, y.tofloat() + 1, z.tofloat() );
CreatePickup( 337, cash );
MessagePlayer( "You have lost 50$", player );
player.Cash -= 50;
Message( "State Alert - 50$ is on the ground Follow the radar on marker to find it and claim it" );
}
function onPickupPickedUp( player, pickup )
{
if ( pickup.Model == 337 )
{
MessagePlayer( "You have claimed 50$", player );
player.Cash += 50;
pickup.Remove();
}
}
I am not from pc so I haven't tested Code But i am sure it will works
Updated!
4
Scripting and Server Management / Onplayerdeath reason code
« on July 21st, 2016, 10:43 AM »
Hello Well I am using this on playerdeath
Message( " you killed " + reason + " " );
But it always return reason in number is there any way i get reason in some nàme like you killed reàson drowned?
5
Snippet Showroom / Robbing System Advanced
« on July 19th, 2016, 09:39 AM »
Hello As i have Released In Past Robbing System but it was Broken Script So here is the advanced way to add it

Credits : [UF]Decent_946

First Add on Commands

Code: [Select]
function onPlayerCommand( player, cmd, text )
{
if ( cmd == "robskills" )
{
MessagePlayer( "Your robbing skill are: " + GetRobskills(player) + "." ,player );
}
}

 
 
   Now Work On Functions
   
   Add this on ScriptLoad
   

Code: [Select]
RobbingSystem();
LoadPickups();
pstats <- array(GetMaxPlayers(), null);
   
   now on Functions.nut
   
   
   
Code: [Select]
function RobbingSystem()
{
QuerySQL( db, "CREATE TABLE IF NOT EXISTS Robskills( Name TEXT),Robskill NUMERIC )" );
}
function GetRobskills( player )
{
   local Robbing =  GetSQLColumnData( QuerySQL( db, "SELECT Robskill FROM Robskills WHERE Name='" + player.Name+"'" ), 0 );
   if ( Robbing ) return Robbing;
   else return 0;
}
function SetRobskills( player, rob )
{
      QuerySQL(db, "UPDATE Robskills SET Robskill='" +  rob.tointeger() + "' WHERE Name='" + player.Name + "'");   
}
   
   
 
   
   Now Lets Move to PickupPickup
   
   

Code: [Select]
function onPickupPickedUp( player, pickup )
{
if ( pickup.Model == 408 )
  {
Message("[#FF0000]"+ player.Name +" has Robbing the "+ GetDistrictName( player.Pos.x, player.Pos.y ) +"");
SetRobskills(player,GetRobskills(player)+1);
Announce( "~y~ You have Robbed :25000", player )
player.Cash += 25000;
pickup.RespawnTime = 30000;
}
}
   
   Now CreatePickups
   
   
Code: [Select]
function LoadPickups()
{
CreatePickup(408, Vector( 204.29, -490.98, 11.06 ));
CreatePickup(408, Vector(-854.526, -631.75, 11.3756 ));
CreatePickup(408, Vector(-688.706, -1262.49, 16.3473 ));
CreatePickup(408, Vector(-665.025, -1484.42, 13.8016 ));
CreatePickup(408, Vector(-885.324, -469.998, 13.1111 ));
CreatePickup(408, Vector(-847.002, -71.6495, 11.5405 ));
CreatePickup(408, Vector(-1079.64, -275.416, 12.0882 ));
CreatePickup(408, Vector(-1036.4 81.2033, 11.6515 ));
CreatePickup(408, Vector(-992.73, 200.392, 15.2213 ));
CreatePickup(408, Vector(-830.158, 741.534, 11.2885 ));
CreatePickup(408, Vector(-906.182, 799.715, 11.4546 ));
CreatePickup(408, Vector(-854.047, 85 11.3846 ));
CreatePickup(408, Vector(-754.53, 1342.74, 11.767 ));
CreatePickup(408, Vector(472.16, 1009.2, 19.1493 ));
CreatePickup(408, Vector(423.496, 1039.0 18.9648 ));
CreatePickup(408, Vector(364.464, 1075.12, 19.0649 ));
CreatePickup(408, Vector(470.443, 1208.18, 19.0094 ));
}
   
   Enjoy ;)
If you find any problem feel free to post here
6
Servers / ViCe CiTY Cop$ & RobbeR$
« on June 28th, 2016, 04:02 PM »
We Have Finally Released!
[0.4] Vice City Cops & Robbers



VCCNR 5.0 is Released By Watson^ on 28-06-2016.
Our server is Based on Roleplay VCCNR Game-Mode.

Server Information.
Forum:-Clicky
IP:-104.255.97.120:8190 Or server.mccnr.cf:8190
IRC Channel:- #vccnrdm04 on LUNet. ( Everyone is invited to join IRC. )
Server Scripters/Owners:-  Watson^, Decent_946!
Helper:- DeViL_BoY^
Hoster:[DS]Anik



The latest Features of Our Server are.

1.Encrypt Password System.
2.Player Ranks system.
3.News System.
4.Team System.
5.property System.
6.Finance System. With Giverobskill , Givecopskill, ResetStats, ResetCash
8.Vehicles System.
9.VoteKick System.
10.Ping Limit System.
11.Animation System 
12Seperate Place for Battle /hidefight
13Rulk Hunting System
14.Fuel System   
15.Tempban System 
16.Transfer Account System
17.Gang System is Implemented
18.Happy Minute for Robbing
19.Happy Minute for Killing
20.Happy Minute for Vehicles
21.Evaluation System
22.Buy And Eat Products System Checkout Products by /products
23.7 Different Jobs Including Cop, Robber, Kidnapper, DrugDealer, Medical, Taxi, Hitman
24.Reporting System
25.Weapons Blocked in Bank
26.Bank Closed / Open System, Bank 1, 2 Elevator System
27.Echo's System
28.Headshot Sound System
29.Country Detector System
30.Spree System
31.Wstats/Bstats System
32.Top Header Topm4 Implemented
33.Quiz System
34.Subnet Ban System
35.Alias System
36.Top Robbers & Top Cops Implemented
37.Play Casino system
38.Certificate System For more Details http://vccnr.ml/index.php?topic=14.0
39.Donate/VIP System to know more about it http://vccnr.ml/index.php?topic=15.0
40.Anti Spawn Kill
41.RCON AdminCmds Like in 0.3 using /admin <pass>
42.Censor System
43.Spectate System
44.Spawnloc
45.Duel System
46.Race System
47.Maze Race System
48.Loan System


& Much More


Known Bugs Fixed

Cash Bug Fix
Killing Bug Fix
giveCopskills & Giverobskills fix
Cweps Bug Fix
Setlevel Command
Subnet Ban Command



There are Custom Stuff Too in Server Including
6 Weapons
2 Sound Files
2 Skins
1 Objects File
2 Objects RAR Files

Total Size of Custom Stuff is 1.68 MB

Stay Tuned for More Updates
7
Scripting and Server Management / Loan
« on June 22nd, 2016, 11:13 AM »
I am trying to create a loan system when someone take loan by using cmd /takeloan 2000 it return you have taken loan you must return loan in 10 days or your loan will be taken how do i put time in it any example?
8
General Discussion / [Suggestion] Video
« on June 21st, 2016, 12:09 PM »
Hello I comes up with suggestion as there is alot custom stuff like music map etc why not there is video ? There must be video stuff to add video max size 200 mb cant it be devs?
9
Scripting and Server Management / Anti Spawn Kill
« on June 19th, 2016, 09:23 AM »
I have added this on PlayerSpawn

Code: [Select]
SP( player.ID );

But Whenever I spawn it shows error at console

Code: [Select]
attempt to call 'bool'
on Line 707 which is SP( player.ID );

Function SP and SPoff

Code: [Select]
function SP( plr )
 {
 local player = FindPlayer(plr);
 AntiSP[ player.ID ] = "true";
  NewTimer( "SPoff", 5000, 1, player.ID );
  MessagePlayer( "[#daff00]Spawn Protection has been Enabled for 5 Seconds" , player );
 }
function SPoff( p )
{
local player = FindPlayer(p);
if(player){
AntiSP[ player.ID ] = "false";
MessagePlayer( "[#83bab3]Spawn Protection has been Disabled" , player );
}
}
10
Applications / Server Host
« on June 13th, 2016, 07:32 PM »
User Name:Watson^
Email Address:[email protected]
Server Name:[0.4]ViCe CiTY Cop$ & RobbeR$
Port:8190
Slots(10-100):60
11
Scripting and Server Management / TempBan
« on June 13th, 2016, 05:58 PM »
I am using Rocky Temp Ban Everythings Works Fine When i Tempban someone and try to untempban it it say Unbanned successful but didn't Untempban that Guy query is still there in db

Untempban Command
Code: [Select]
else if( cmd == "untempban" )
{
if( GetLevel( player ) < 10 ) MessagePlayer("[TEMPBAN] You must be admin of lvl 10 to use this command.", player );
else if( !text ) MessagePlayer("[TEMPBAN] / untempban <Fullname>", player);
else if( !IsBanned( text ) ) MessagePlayer("[TEMPBAN]Player is not banned.", player);
else
{
        QuerySQL( database, "DELETE TABLE FROM Banned WHERE ban_nick='" + text + "' COLLATE NOCASE" );
Message("Unbanned: [ " + text + " ] by Admin: [ " + player.Name + " ]" );

}
}
12
Scripting and Server Management / Doom Clan stats
« on June 10th, 2016, 06:42 PM »
Well i am using Doom Clan Stats Provided in Old Forum I have replaced Kratos FindClanTag Function and whenever i type /clanstats [HS] or HS it say HS or [HS] does not exist But they are inserted in DB

Code: [Select]
function FindClanTag( strPlayer )
{
 local
      D_DELIM = regexp(@"([\[(=^<{]+\w+[\])=^>}]+)"),// Checking for double delimiter like [TX],{TX},(TX),=TX=,^TX^,<TX>
      D_DELIM_SYM_2 = regexp(@"([\[(=^<{]+\w+[\.*-=]+\w+[\])=^>}]+)"),    // Checking the presence of symbolic clan tag with 2 alphanumeric values like [T-X]Azazel [ Double Delimiter ]
      D_DELIM_SYM_3 = regexp(@"([\[(=^<{]+\w+[\.*-=]+\w+[\.*-=]+\w+[\])=^>}]+)"), // Checking the presence of symbolic clan tag with 3 alphanumeric values like [F.O.X]Sofia [ Double Delimiter ]
         S_DELIM = regexp(@"(\w.+[.*=]+)"),               // Checking for single delimiter like VT. VT= VT* 

      D_DELIM_res = D_DELIM.capture(strPlayer),// Capturing for the double delimiter expression in player.Name  [ will return some array blocks of clan as [TX] < WITH THE CLAN TAG SYMBOL INCLUDED>]
      D_DELIM_SYM_2_res = D_DELIM_SYM_2.capture(strPlayer),  // Capturing for T-X / T.X / T*X Type
      D_DELIM_SYM_3_res = D_DELIM_SYM_3.capture(strPlayer),  // Capturing for F-O-X / F.O.X / F*O*X Type
      S_DELIM_res = S_DELIM.capture(strPlayer);           // Capturing for the single delimiter expression in player.Name  [ will return some array blocks as VT. < WITH THE CLAN TAG SYMBOL INCLUDED>]

 if ( D_DELIM_res != null )      // Are captured expressions true ? Do they physically exist in memory?
 {
  return strPlayer.slice( D_DELIM_res[ 0 ].begin + 1, D_DELIM_res[ 0 ].end - 1 );   // Slicing [TX] into TX by moving 1 step forward from beginning & same step backward from the end 
 }
 else if ( D_DELIM_SYM_2_res != null )     
 {
  local tag_sym_2 = strPlayer.slice( D_DELIM_SYM_2_res[ 0 ].begin + 1, D_DELIM_SYM_2_res[ 0 ].end - 1 );   // Slicing [T-X] into T-X by moving 1 step forward from beginning & same step backward from the end 
     local amalgamate_2 = split(tag_sym_2, ".*-=");                      // Splitting T-X into 2 array blocks like a[0] = T, a[1] = X [ DEFINED BY SEPARATORS ]
     return (amalgamate_2[0]+amalgamate_2[1]);                         // Returning the Sum i.e. TX
 }
 else if ( D_DELIM_SYM_3_res != null )      // Are captured expressions true ? Do they physically exist in memory?
 {
  local tag_sym_3 = strPlayer.slice( D_DELIM_SYM_3_res[ 0 ].begin + 1, D_DELIM_SYM_3_res[ 0 ].end - 1 );   // Slicing [F.0.X] into F.O.X by moving 1 step forward from beginning & same step backward from the end 
     local amalgamate_3 = split(tag_sym_3, ".*-=");                      // Splitting F.O.X into 3 array blocks like a[0] = F, a[1] = 0, a[2] = X [ DEFINED BY SEPARATORS ]
     return (amalgamate_3[0]+amalgamate_3[1]+amalgamate_3[2]);           // Returning the Sum i.e. FOX
 
 }
 else if ( S_DELIM_res != null )
 {
  return strPlayer.slice( S_DELIM_res[ 0 ].begin, S_DELIM_res[ 0 ].end - 1 ); // Slicing VT. into VT by moving 1 step backward from the end
 }
        else return "";                           // No such expressions found? Probably player isn't in a clan. Let's return null !!!
}

Cmd
Code: [Select]
else if ( cmd == "clanstats" )
    {
        if( !text ) ePrivMessage(">> Use: / clanstats <Clan Name> (Example: / clanstats [MK]. Using only text won't work, Use clan symbols with it)", player );
        else
        {
            local cname = FindClanTag( text );
            if( cname )
            {
                local ckills = GetSQLColumnData( QuerySQL( cs, "SELECT Kills FROM Clan WHERE Name='" + cname + "'" ), 0 );
                if ( ckills )
                {
                Message( ">> " + text + " Has total kills of: " + ckills );
                }
                else ePrivMessage( "Clan " + text + " does not exist ", player );
            }
        }   
    }
13
General Discussion / VCCNR
« on June 10th, 2016, 01:21 PM »
Well I have a question Official VCCNR is Currently Offline Can't There be More than 1 VCCNR?
14
Applications / BNC Request
« on June 5th, 2016, 11:09 AM »
User Name: Watson^
Email Address: [email protected]
Network: LUNet
15
Scripting and Server Management / Objects.xml
« on June 3rd, 2016, 08:04 AM »
Well Hello i have added this on my objects.xml

Code: [Select]
<?xml version="1.0" encoding="ASCII"?>
<objectlist>
<object id="0">
<flags value="0" />
<texture path="door1.txd" />
<collision path="none" />
<model path="none" distance="200" />
</object>
<object id="1">
<flags value="0" />
<texture path="door2.txd" />
<collision path="none" />
<model path="none" distance="200" />
</object>
<object id="2">
<flags value="0" />
<texture path="none" />
<collision path="door3.col" />
<model path="door3.dff" distance="200" />
</object>
<object id="3">
<flags value="0" />
<texture path="hi_cutbnkrecpt.txd" />
<collision path="bgate.col" />
<model path="bnk_maindr1.dff" distance="200" />
</object>
<object id="4">
<flags value="0" />
<texture path="hi_cutbnkrecpt.txd" />
<collision path="bgate.col" />
<model path="bnk_maindr2.dff" distance="200" />
</object>
</objectlist>
But when i run my Server and join it kicks me for reason: invalid definition of objects.xml :(