Topics

[Snippet is taken from]

Since the topic has been started by some users so there it is a small guide which I think is a solution.

Snippet is taken from
https://stackoverflow.com/questions/14952157/streaming-mp3-file-through-php/24227722#24227722

What is happening inside php file? :edit:
The links to audio files are stored inside an array( songs ) by user manually and than each audio file in that variable is streamed, an infinite loop has been started in it so that the streaming never ends it repeats every time it reaches to the end of final song in the list.

Steps To Set It Up  :edit:
>> Copy the snippet (Recommended Snippet v-0.2) from bellow link in a php file lets suppose the file is named as audio_stream.php

>> Don't forget to edit this array in it

Code Select Expand

$songs = [
'song1 complete link along with http/https',
'song2 complete link along with http/https',
'song3 complete link along with http/https'
];
In my case it is

Code Select Expand

$songs = [
'http://asian-city.tk/songs/Waqqaberry.mp3',
'http://asian-city.tk/songs/Fly_Project__Get_Wet.mp3'
];

>> Time to upload this audio_stream.php file to any host in which php is available after uploading the streaming link will be as follow

Code Select Expand

http://my_domain.com/audio_stream.php
In my case it is

Code Select Expand

http://asian-city.tk/audio_stream.php

>>Time to use the link of php file in vcmp

Code Select Expand

CreateRadioStream( Any_ID, "Custom Radio", "http://my_domain.com/audio_stream.php", true );
Snippets(Recommended Snippet v-0.2)  :edit:

Code Select Expand

v-0.2 >> https://pastebin.com/78EuuZCf
v-0.1 >> https://pastebin.com/ksgQxtiK
Live Version

Code Select Expand

/* Link To streaming file */
/* http://asian-city.tk/vcmp_stream.php */
/* Create radio statement */
CreateRadioStream( 20, "AC Radio", "http://asian-city.tk/vcmp_stream.php", true );
Note
Better to upload the audio files to the same host where streaming file is upload rather using random links of audio files from other mp3 sites.

[Source:]

Spawn camera from Grand Theft Auto V created for Liberty Unleashed ported to Vice City Multiplayer
Source: Link
https://youtu.be/I8Im8rJtZho

[spoiler=Topic_from_LU]

I got bored and decided to make a spawn camera like the one in Grand Theft Auto V.

You know ... the one where it goes into birds-eye view like the old GTA, then changes a couple of times, each getting closer to the player until finally showing the player and restoring control.

Usually a little dialog in there too, but I didn't recreate that lol.

So behold, the same spawn camera for Liberty Unleashed!
Just plug and play, pretty much. Script folder into server, add to content.xml, and so on.

A couple of things though:
The draw distance sucks for GTA III, so I had to bring the camera view way down. In GTA V they usually start with the whole city or an entire region of the rural area, before making their way down to the smaller area where the player is. This spawn camera I made starts in the small area, and works down from there. Not exactly the same but it's pretty neat though.

Second, normal spawn with the control key is blocked. Use the following snippet of code to use the new spawn camera:

Code Select Expand

GTAVSpawn ( Player pPlayer , Vector pVector );

Anyway, here's the link to the source. Available on GitHub.
https://github.com/VortrexFTW/lu_gtavspawncam

[/spoiler]

How to change the radar I know to make png with 128x128 from 00 to 63 files but my question is

How to find out the correct place of each section?

Is there any software used something like moo mapper or any other to put the radar section in their correct place and leave the rest of sections as empty or water texture.

Anyone convert this vehicle for vcmp never done the conversion stuff if anyone can do it....

http://www.gtainside.com/en/gta3/cars/1429-mg-midget/

[Lottery System]

Lottery System

Credits: LucasRed


Globals goes at the top of script

Code Select Expand

/* <?php */
LotteryWon <- false;
TicketsPurchased <- {};
usedTickets <- [];
LotteryCount <- 0;
LotteryPrize <- 0;


Add it in onScriptLoad() event

Code Select Expand

/* <?php */
function onScriptLoad()
{
  Lottery <- array( GetMaxPlayers(), false );
  Tickets <- array( 60, false );
}


Add it in onPlayerJoin( player ) event

Code Select Expand

/* <?php */
function onPlayerJoin( player )
{
  Lottery[ player.ID ] = false;
  TicketsPurchased.rawset( player.ID, 0 );
}


Add it in onPlayerPart( player, reason ) event

Code Select Expand

/* <?php */
function onPlayerPart( player, reason )
  {
  if ( Lottery[ player.ID ] == true ) // If the player bought ticket...
  {
    local a = TicketsPurchased.rawget( player.ID );
    Tickets[a] = false;
    TicketsPurchased.rawdelete( player.ID ); // Delete player ticket...
    LotteryCount >= 1 ? LotteryCount -- : ( LotteryCount --, _Lottery.Delete(), EndLottery() ); // decrease participants...
  }
}


Add it in onPlayerCommand( player, cmd, text ) event

Code Select Expand

/* <?php */
function onPlayerCommand( player, cmd, text )
{
  if ( cmd == "lotto" )
  {
    if ( !text ) MessagePlayer( "Error - Syntax: /lotto <number betwen 1 and 60>", player);
    else if ( !IsNum( text ) ) MessagePlayer( "Use numbers", player );
    else
    {
      if ( Lottery[ player.ID ] == true ) MessagePlayer( "Wait for the result. You already have ticket", player );
      else
      {
        if ( Tickets[text.tointeger()] == true ) MessagePlayer( "ticket already bought", player );
        else if ( ( text.tointeger() > 0 ) && ( text.tointeger() < 61 ) )
        {
          if ( player.Cash >= 1000 )
          {
            if ( !LotteryCount )
            {
              Message( "lottery started." );
              _Lottery <- NewTimer( "StartLottery", 2000, 1 );
            }
            player.Cash -= 1000;
            Lottery[ player.ID ] = true;
            Tickets[text.tointeger()] = true;
            usedTickets.push( text.tointeger() );
            LotteryCount ++;
            local value = ( ( rand() % ( 80000 - 50000 ) ) + 50000 );
            LotteryPrize = value.tointeger();
            TicketsPurchased.rawset( player.ID, text.tointeger() ); // Set ticket ID for player...
            MessagePlayer( "You have paid $1000 for ticket", player );
          }
          else MessagePlayer( "You need $1000 to buy ticket", player );
        }
        else
        {
          MessagePlayer( "You need $1000 to buy ticket.", player );
          MessagePlayer("Select number betwen 1 and 60", player );
        }
      }
    }
  }

  else if ( cmd == "lotstats" )
  {
    local a;
    for ( local i = 0; i <= GetMaxPlayers(); i ++ )
    {
      local player = FindPlayer( i );
      if ( player )
      {
        local t = TicketsPurchased.rawget( player.ID );
        if ( a ) a = a + ", " + player.Name + "(" + t + ")";
        else a = player.Name + "(" + t + ")";
      }
    }
    if ( a ) Message( "Tickets: " + a );
    else Message( "No tickets" );
  }
}


functions goes at the end of script

Code Select Expand

/* <?php */
function StartLottery()
{
  if ( LotteryCount >= 3 ) // Lottery starts from three tickets purchased. You chose this...
  {
    local ticket = raffle();
    for ( local i = 0; i <= GetMaxPlayers(); i ++ )
    {
      local player = FindPlayer( i );
      if ( player )
      {
        if ( Lottery[ player.ID ] == true )
        {
          if ( TicketsPurchased.rawget( player.ID ) == ticket )
          {
            LotteryWon = true;
            Message( "Lottery: The winner is..." );
            Message( "Lottery: " + player.Name + ". ( ticket " + TicketsPurchased.rawget( player.ID ) + " )" );
            player.Cash += LotteryPrize;
          }
        }
      }
    }
    LotteryWon ? ( Message( "Closed lottery." ), EndLottery() ) : Message( "Lottery: No winners this time, the prize is now " + LotteryPrize );
  }
  else
  {
    Message( "Lottery delayed for lack of tickets." );
    _Lottery <- NewTimer( "StartLottery", 60000, 1 );
  }
}

function EndLottery()
{
  for ( local i = 0; i <= GetMaxPlayers(); i ++ )
  {
    local player = FindPlayer( i );
    if ( player )
    {
      if ( Lottery[ player.ID ] == true )
      {
        TicketsPurchased.rawset( player.ID, 0 );
        Lottery[ player.ID ] = false;
        LotteryWon = false;
        LotteryCount = 0;
      }
    }
  }

  for ( local i = 1; i < 60; i ++ )
  {
    Tickets[i] = false;
    usedTickets.clear();
  }
}

function raffle()
{
  local rand = rand() % usedTickets.len();
  return usedTickets[rand];
}


Temporary Removed For Confirmation

Lets wait for the results.

[Basic Vehicle Passengers Freeview]

Basic Vehicle Passengers Freeview

Note:

• This system only works for the vehicle passengers not for the vehicle driver & will work only if there is a driver present in vehicle otherwise it will revoke for all passengers.
• Change the 'MaxOccupants' if required cause I am not much sure about max occupants for vehicles like bus but I think 9 is max for vcmp vehicles since some of the users will ask why you have set 'MaxOccupants' to 8 instead of 9 so for their kind information the vehicle.GetOccupant(_integer) starts from 0 in vcmp.

Events Used:

Code Select Expand

onPlayerEnterVehicle( player, vehicle, door )
onPlayerExitVehicle( player, vehicle )
Functions Used:

Code Select Expand

player.SpectateTarget
vehicle.GetOccupant(_integer[max-8])
Snippet:

Code Select Expand

/* <?php */
function onPlayerEnterVehicle( player, vehicle, door )
{
   if ( vehicle.Driver != null )
   {
      if ( vehicle.Driver.ID != player.ID ) player.SpectateTarget = vehicle.Driver;
      else
      {
         local MaxOccupants = 8;
         for( local i = 1; i <= MaxOccupants; i++ )
         {
          local Occupant = vehicle.GetOccupant( i );
            if ( Occupant != null && Occupant.SpectateTarget == null ) Occupant.SpectateTarget = player;
         }
      }
   }
}
   
function onPlayerExitVehicle( player, vehicle )
{
   if ( player.SpectateTarget != null ) player.SpectateTarget = null; /* Its not necessary to use this line */
   if ( vehicle.Driver == null )
   {
      local MaxOccupants = 8;
      for( local i = 1; i <= MaxOccupants; i++ )
      {
         local Occupant = vehicle.GetOccupant( i );
         if ( Occupant != null && Occupant.SpectateTarget != null ) Occupant.SpectateTarget = null;
      }
   }
}
Video:
https://youtu.be/3SpyvfmOTMw
[more]

Did anyone have the fixed link to this file?
http://stormeus.vicelegends.com/SqHTTP.7z

Topic:
http://vcmp.liberty-unleashed.co.uk/forum/index.php?topic=614.0
 

[Grand Theft Auto Asian City]

Is there any board to report or a topic caues this noob named Vattan I don't even know weather its the real one or a fake user used his nick but all I need is to ban this f**king noob server IP from the masterlist.
Remember Grand Theft Auto Asian City was first started by me and now some noobs are trying to steal the name f**k all of em .
If you guys need any evidence I'll post it even most of the users know that the name was first used by me.


Server IP/Port: 178.32.100.87:50597
Evidence:


Is there any possiblity to do it or any one can use anyone's server name except for the official one

https://www.youtube.com/watch?v=r8bwlODaZuE#

[main.nut]

I've seen some users using this function

Code Select Expand

for( local i = 0; i <= GetMaxPlayers(); i++ )
{
   local plr = FindPlayer( i );
   if ( plr ) print("found");
}
Suppose there are 10 player online while the max players is 100 so this function is using the memory for no work.

Code Select Expand

for( local i = 0; i <= GetMaxPlayers(); i++ )
{
   local plr = FindPlayer( i );
   if ( plr ) print("found");
   else print("wasting :P");
}

This simple snippet helps to remove those useless calling.This snippet is very usefull for those who are using global timers for players eg. antibank killing( almost everyone uses a timer for it but looking at published scripts GetMaxPlayers() has been used in it which according to me is a bad idea )

[spoiler=Installation]
This goes at the top of main.nut file

Code Select Expand

/* A global constant/array which stores IDs of online players */
PlrsOnline <- [ ];
/* A global constant/array which handels the functions */
Players <- { };

This goes at the top of onPlayerJoin( player ) function

Code Select Expand

/* Lets adds the ID of player to the online players list */
Players.Inc( player.ID );

This goes at the top of onPlayerPart( player, reason ) function

Code Select Expand

/* Remove the ID of player from the online players list */
Players.Dec( player.ID );

These functions can be pasted at any place in the script

Code Select Expand

/* This functions push the ID to the array */
Players.Inc <- function( Plr_ID ) {
   /* Check is id already available in array, return if it's available */
   if ( PlrsOnline.find( Plr_ID ) != null ) return 0; // Just for precautionary measurement if not removed due to any reason
   /* If it's not available push the ID to the array */
   PlrsOnline.push( Plr_ID );
}
/* This functions removes the ID from the array */
Players.Dec <- function( Plr_ID ) {
   /* Check is id already available in array, return if it's available */
   if ( PlrsOnline.find( Plr_ID ) == null ) return 0; // once again it's for precautionary measurement
/* If it's available remove the ID from array */
PlrsOnline.remove( PlrsOnline.find( Plr_ID ) );
}
[/spoiler]

[spoiler=Usage]

Code Select Expand

foraceh( iPlrID in PlrsOnline )
{
   local plr = FindPlayer( iPlrID );
   if ( plr ) print("found");
}
[spoiler=Usage(healing_all)]

Code Select Expand

foraceh( iPlrID in PlrsOnline )
{
   local plr = FindPlayer( iPlrID );
   if ( plr ) plr.Health = -1;
}
[/spoiler]

[spoiler=Usage(getting_player_by_specific_data/stats)]
Lets suppose we want to get all players having hp less then 50%

Code Select Expand

foraceh( iPlrID in PlrsOnline )
{
   local plr = FindPlayer( iPlrID );
   if ( plr && plr.Health <= 50 ) print( "Found player "+plr.Name+" with ID: "+plr.ID+" having HP: "+plr.Health+"" );
}
[/spoiler]

[/spoiler]

How to set two players immunity which works only for both of them while otheres can kill them?
How to do it when both players have different teams?
P.S: I've used this

Code Select Expand

player.Immunity = 31;
But player is still not immune to weapons like mp5 & pyton. Even tried to use all the immune ids but still not working.

BanPlayer( player );
player.Ban();

And what are their features
I mean protection level etc or how the server heck players banned by these two functions?

Is it possible to convert gta4 cars to vcmp?

http://www.gamemodding.net/en/gta-iv/gta-iv-cars/6843-gemballa-mistrale-concept-2011.html


http://www.gamemodding.net/en/gta-iv/gta-iv-cars/6688-lamborghini-gallardo-hamann.html

Did anyone know the font name

or this one


P.s Link

[Update Reason:]

Update Reason: Used vcmp official hashing, unique id concept has been used and installation is made simple.

Commands:

Code Select Expand

   -> /commands
   -> /register <password>
   -> /login <password>
   -> /changepass <old-password> <new-password>

Installation: Download the file rlc.nut from the link and place it inside svr_dir and place the bellow functions in appropriate server events.

onScriptLoad()

Code Select Expand

/* onScriptLoad() */
dofile( "rlc.nut", true );
rlc_table.onScriptLoad( );

onPlayerJoin( player )

Code Select Expand

/* onPlayerJoin( player ) */
rlc_table.onPlayerJoin( player );

onPlayerPart( player, reason )

Code Select Expand

/* onPlayerPart( player, reason ) */
rlc_table.onPlayerPart( player );

onPlayerCommand( player, command, arguments )

Code Select Expand

/* onPlayerCommand( player, command, arguments ) */
switch( command ) {
 case "register":
 case "login":
 case "changepass":
    rlc_table.onPlayerCommand( player, command, arguments );
 break;
 case "commands":
    MessagePlayer( "[#7bb215][RLC] [#15a26f]RLC Commands: [/] register, login, changepass.", player );
 break;
 default:
    MessagePlayer( "[#7bb215][RLC] [#cc3510](ERROR) Invalid command, use /commands to check for availble commands.", player );
}
Github: Link

[F1]

Credits: Elite Killerz | Estate City Server for give me an idea.

Features
>Syncronised with scroll bar.
>Multiple pages which allow us to write many words.
>Everything is done in clientside.
>Different background pictures.

Installation
1.Copy and paste everything from replaceable snippte in correct place in Svr_Dir/store/script/main.nut file.
2.Copy & paste everything from copy & pasteable snippet at the beginning of Svr_Dir/store/script/main.nut file.
3.Create a file in Svr_Dir/store/script/ with name messages.nut or simply copy and paste the messages.nut file from this topic to script directory.

Pictures
Link
[spoiler=Pics]



[/spoiler]

Downloadable Stuff
1.Sample file for messages.nut


2.Sample Pictures(copy and paste them in Svr_Dir/store/sprites)


Snippets
[spoiler=Replaceable-Snippet]
Replace every thing in the correct place in Svr_Dir/store/script/main.nut file
[noae][noae][noae]

Code Select Expand

/* <?php */
keyBIND_F1 <- KeyBind( 0x70 );
COLOR_BLUE   <- Colour( 0, 0, 255 );

function Script::ScriptLoad( )
{
dofile( "messages.nut" );  //This is the file from which we are going to read memobox data.
}

function GUI::ScrollbarScroll( scrollbar, position, change )
{
GUI_ServerLogs.ScrollbarScroll( scrollbar, position );
}

function GUI::ElementClick(element, mousex, mousey)
{
GUI_ServerLogs.ElementClick( element );
}

function KeyBind::OnDown( keyBind )
{
if ( keyBind == keyBIND_F1 ) GUI_ServerLogs.Decide( );
}

function GUI::ElementRelease(element, mouseX, mouseY)
{
GUI_ServerLogs.ElementRelease( element );
}

function GUI::GameResize( width, height )
{
GUI_ServerLogs.GameResize( );
}
[/noae][/noae][/noae]
[/spoiler]

[spoiler=Copy&Pasteable-Snippet]
Copy & paste this snippet at the beginning of Svr_Dir/store/script/main.nut file
[noae][noae][noae]

Code Select Expand

/* <?php */
GUI_ServerLogs <- {
LogsW = null,   //Logs Window (leve it as it is)
LogsB = null,   //Logs Board (leve it as it is)
LogsS = null,   //Logs Scroll (leve it as it is)
LogsE = null,   //Logs Exit (leve it as it is)
LogsN = null,   //Logs Next (leve it as it is)
LogsP = null,   //Logs Previous (leve it as it is)
PageID = 1,   //Current Page (leve it as it is)

MaxPages = 3,   //Max NO. Of Pages (set it according to your need)
Pics = 3,   //Background Pictures (set it according to your need)

ShowGUI = 0,   //Showing GUI  (leve it as it is)

function Create( )
{
//Credits: EK.IceFlake for sample script + idea
local cScreenSize = GUI.GetScreenSize();
local Pic_No = rand()%Pics;

//Set the bellow pics names starting with car_...
if ( Pic_No == 0 ) LogsW = ::GUISprite( "car_1.jpg", VectorScreen( 0, 0 ) );
if ( Pic_No == 1 ) LogsW = ::GUISprite( "car_2.jpg", VectorScreen( 0, 0 ) );
if ( Pic_No == 2 ) LogsW = ::GUISprite( "car_3.jpg", VectorScreen( 0, 0 ) );

LogsW.Size = cScreenSize;
LogsB = ::GUIMemobox( VectorScreen( 32, 32 ), VectorScreen( cScreenSize.X - 80, cScreenSize.Y - 64 ), Colour( 255, 255, 255, 128 ), GUI_FLAG_TEXT_TAGS );
LogsB.HistorySize = 255;
LogsS = ::GUIScrollbar( VectorScreen( cScreenSize.X - 48, 32 ), VectorScreen( 16, cScreenSize.Y - 64 ) );
LogsE = ::GUILabel(VectorScreen( cScreenSize.X - 28, cScreenSize.Y / 2 - 10 ), Colour( 179, 0, 0 ), "Exit" );
DecidePage( );
LogsE.TextAlignment = GUI_ALIGN_LEFT;
LogsE.FontName = "Corbel";
LogsE.FontSize = 13;
LogsE.AddFlags( GUI_FLAG_MOUSECTRL );
::GUI.SetMouseEnabled( );
}

function DecidePageButtons( )
{
if ( ShowGUI == 0 ) return;

if ( ( LogsS.BarPosition != 0 && LogsP != null ) || ( LogsS.BarPosition != 1 && LogsN != null ) ) RemovePageButtons( );

if ( LogsS.BarPosition != 0 && LogsS.BarPosition != 1 ) return;

if ( LogsS.BarPosition == 0 && LogsP == null && PageID != 1 )
{
RemovePageButtons( );
local cScreenSize = GUI.GetScreenSize();
LogsP = GUIButton( VectorScreen( cScreenSize.X - 130, 7 ), VectorScreen( 85, 20 ), Colour( 140, 140, 140 ), "Previous Page", ( GUI_FFLAG_BOLD | GUI_FFLAG_ULINE ) );
LogsP.TextColour  = COLOR_BLUE;
return;
}

if ( LogsS.BarPosition == 1 && LogsN == null && PageID != MaxPages )
{
RemovePageButtons( );
local cScreenSize = GUI.GetScreenSize();
LogsN = GUIButton( VectorScreen( cScreenSize.X - 130, cScreenSize.Y - 27 ), VectorScreen( 65, 20 ), Colour( 140, 140, 140 ), "Next Page", ( GUI_FFLAG_BOLD | GUI_FFLAG_ULINE ) );
LogsN.Alpha = 200;
LogsN.TextColour  = COLOR_BLUE;
return;
}
}

function ScrollbarScroll( scrollbar, position )
{
if ( !ShowGUI ) return;

switch( scrollbar )
{
case LogsS:
GUI_ServerLogs.DecidePageButtons( );
GUI_ServerLogs.LogsB.DisplayPos = 1 - position;
break;
}
}

function ElementClick( element )
{
if ( !ShowGUI ) return;

switch( element )
{
case LogsE:
Close( );
break;
}
}

function ElementRelease( element )
{
if ( !ShowGUI ) return;

switch( element )
{
case LogsN:
PageID++;
DecidePage( );
break;
case LogsP:
PageID--;
DecidePage( );
break;
}
}

function GameResize( )
{
if ( !ShowGUI ) return;

Close( );
}

function RemovePageButtons( )
{
if ( !ShowGUI ) return;

if ( LogsN != null ) LogsN = null;
if ( LogsP != null ) LogsP = null;
}

function DecidePage( )
{
if ( !ShowGUI ) return;

local NPageID = PageID + 1;
RemovePageButtons( );
LogsB.Clear();
LogsB.AddLine( "", Colour( 64, 64, 64 ) );
LogsB.AddLine( "Grand Theft Auto Asian City ChangeLogs Page: "+PageID, Colour( 150, 0, 50 ) );
if ( PageID == 1 ) foreach ( lr in ::split( SvrLogs3, "\n" ) ) LogsB.AddLine( lr, Colour( 64, 64, 64 ) );
else if ( PageID == 2 ) foreach ( lr in ::split( SvrLogs2, "\n" ) ) LogsB.AddLine( lr, Colour( 64, 64, 64 ) );
else if ( PageID == 3 ) foreach ( lr in ::split( SvrLogs1, "\n" ) ) LogsB.AddLine( lr, Colour( 64, 64, 64 ) );

if ( PageID == MaxPages ) LogsB.AddLine( "End of server changelogs.", Colour( 150, 0, 50 ) );
else LogsB.AddLine( "Click on next page button for page: "+NPageID, Colour( 150, 0, 50 ) );

LogsS.BarPosition = 0;
LogsB.DisplayPos = 1;
}

function Close( )
{
if ( !ShowGUI ) return;

LogsW = null;
LogsB = null;
LogsS = null;
LogsE = null;
LogsN = null;
LogsP = null;
::GUI.SetMouseEnabled(false);

ShowGUI = 0;
}

function Show( )
{
if ( ShowGUI ) return;
ShowGUI = 1;
Create( );
}

function Decide( )
{
if ( ShowGUI ) Close( );
else Show( );
}
}
[/noae][/noae][/noae]
[/spoiler]

Note:
Press F1 key to open and close the memobox.

[spoiler=Sample_Store_File]

[/spoiler]

Is it possible to get a random location ( for example inside airport or all downtown. ) instead of saving some coordinates and getting random from them.