1. SA-MP Forums Archive
  2. SA-MP Scripting and Plugins
  3. Filterscripts

Threaded Mode
[FilterScript] Simple VIP system on months with (ZCMD + sscanf + Dini)
IceBilizard
Gangsta
*****
Posts: 869
Threads: 48
Joined: Feb 2012
Reputation: 0
#1

29.07.2014, 14:31
Simple VIP system on months with (ZCMD + sscanf + Dini)
__________________________________________________ __________________________________________________ _________________________________

INTRO:

Hello! this my first VIP system script! I know that there may be many of them which are (maybe) better and/or more advanced than mine, its for newbies and simple on dini + sscanf + ZCMD its on months like if you make someone vip with /setvip 0 1 he will get level 1 with 1 month and after 1 month his VIP feature will auto removed this script got 12 moths vip subscription its not advanced its just a simple script for newbies.

VIP Commands:

pawn Code:
/carcolor (change your vehicle color) 
/changeskin  (change player skin)
/weather  (change player weather)
/veh  (spawn a vehicle with name)
/dvc  (destroy spawned vehicle) 
/nos  (add nos to your vehicle)
/vc  (VIP Chat)
/vpm (VIP Personal message)
/vrepair  (Repair your vehicle)
/vflip      (Flip your vehicle)
/setvip (playerid) (month) //For Rcon Admin
Bugs:

None bugs found i tested this script if you found PM me or share here i will fix it asap.

Requirements:


1-You must have ZCMD + sscanf + dini includes in your pawno/includes folder

2- You must have sscanf.dll plugin in your plugins folder

3- You must have user\'s saving system in your script

3- You must have Accounts or Users folders in your script files (if not then you can simply change your user path from script at
pawn Code:
stock pFile(playerid)//UserFile path
{
    new file[64];
    format(file, sizeof(file), "Accounts/%s.ini",RPN(playerid)); // You can change it to what is your users\'s path
    return file;
}

How to Install:


1st Way:

1- Use the pastebin code and paste in the pawno.

2- Save the file in your filterscripts folder.

3-Compile it then go to your server.cfg file.

4- Add VIP at filterscripts

Example:
Code:
 
echo Executing Server Config...
lanmode 1
rcon_password changeme
maxplayers 30
port 7777
hostname changeme
gamemode0 changeme 1
plugins streamer.dll sscanf.dll 
filterscripts VIP
announce 1
query 1
chatlogging 0
weburl changeme
onfoot_rate 40
incar_rate 40
weapon_rate 40
stream_distance 300.0
stream_rate 1000
maxnpc 1
logtimeformat [%H:%M:%S]
5- Start the server and enjoy.



2nd Way:

1- Download VIP System.rar file from MediaFire and extract at any where

2- Paste the VIP.pawn and VIP.amx files in your filterscripts folder

3- Add the VIP at filterscripts in server.cfg

Example:
Code:
echo Executing Server Config...
lanmode 1
rcon_password changeme
maxplayers 30
port 7777
hostname changeme
gamemode0 changeme 1
plugins streamer.dll sscanf.dll 
filterscripts VIP
announce 1
query 1
chatlogging 0
weburl changeme
onfoot_rate 40
incar_rate 40
weapon_rate 40
stream_distance 300.0
stream_rate 1000
maxnpc 1
logtimeformat [%H:%M:%S]
4- Start the server and enjoy.


Downloads:
Pastebin
MediaFire
Find
Reply
iNiko
Banned
Posts: 148
Threads: 1
Joined: Jun 2014
#2

29.07.2014, 14:48
Nice
Find
Reply
GShock
Big Clucker
***
Posts: 131
Threads: 12
Joined: Aug 2013
Reputation: 0
#3

29.07.2014, 15:11
So after the set months.. VIP automatically gets taken from the player? Good job!
Find
Reply
Tisot
Little Clucker
**
Posts: 30
Threads: 4
Joined: Apr 2014
Reputation: 0
#4

30.07.2014, 06:08
its mine server!
Find
Reply
PaRking
Banned
Posts: 38
Threads: 0
Joined: Jan 2017
#5

25.01.2017, 14:42
Icy nice work :V BTW U KNOW ME
Find
Reply
xRadical3
Gangsta
****
Posts: 700
Threads: 43
Joined: May 2017
Reputation: 0
#6

05.08.2018, 20:14
Nice work

I added to my gm

ty
Find
Reply
CodeStyle175
Banned
Posts: 455
Threads: 29
Joined: Apr 2014
#7

14.08.2018, 13:48
fuck delete this shit why are you defining so many colors for some vip system and also vehicle array and other shit, this vip system cant be used for real server, and loops are horrible whole code is horrible.

and for fuck sake wtf is this ?
PHP Code:
 if(months == 1)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (1 Month) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~1 Month VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (1 Month) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*30);
                        }
                    if(months == 2)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (2 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~2 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (2 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*60);
                    }
                    if(months == 3)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (3 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~3 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (3 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*90);
                    }
                    if(months == 4)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (4 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~4 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (4 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*120);
                    }
                    if(months == 5)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (5 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~5 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (5 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*150);
                    }
                    if(months == 6)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (6 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~6 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (6 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*180);
                    }
                    if(months == 7)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (7 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~7 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (7 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*210);
                    }
                    if(months == 8)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (8 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~8 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (8 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*240);
                    }
                    if(months == 9)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (9 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~9 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (9 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*270);
                    }
                    if(months == 10)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (10 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~10 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (10 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*300);
                    }
                    if(months == 11)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (11 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~11 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (11 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*330);
                    }
            if(months == 12)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (1 Year) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~1 Year VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (1 Year) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*360);
                    }
                    if(months == 0)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package 1 (Life Time) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~Unlimited VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package 1 (Life Time) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*1000);
                    } 
learn to code then try to realease some code
Find
Reply
RogueDrifter
High-roller
*****
Posts: 1,192
Threads: 10
Joined: Dec 2017
Reputation: 0
#8

14.08.2018, 15:06
You\'re all dumb this is a 2014 thread...
Find
Reply
TheToretto
Gangsta
****
Posts: 543
Threads: 4
Joined: Jul 2015
Reputation: 0
#9

21.08.2018, 14:01
Quote:
Originally Posted by CodeStyle175
View Post
fuck delete this shit why are you defining so many colors for some vip system and also vehicle array and other shit, this vip system cant be used for real server, and loops are horrible whole code is horrible.

and for fuck sake wtf is this ?
PHP Code:
 if(months == 1)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (1 Month) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~1 Month VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (1 Month) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*30);
                        }
                    if(months == 2)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (2 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~2 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (2 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*60);
                    }
                    if(months == 3)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (3 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~3 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (3 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*90);
                    }
                    if(months == 4)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (4 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~4 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (4 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*120);
                    }
                    if(months == 5)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (5 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~5 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (5 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*150);
                    }
                    if(months == 6)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (6 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~6 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (6 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*180);
                    }
                    if(months == 7)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (7 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~7 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (7 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*210);
                    }
                    if(months == 8)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (8 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~8 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (8 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*240);
                    }
                    if(months == 9)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (9 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~9 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (9 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*270);
                    }
                    if(months == 10)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (10 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~10 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (10 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*300);
                    }
                    if(months == 11)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (11 Months) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~11 Months VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (11 Months) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*330);
                    }
            if(months == 12)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package (1 Year) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~1 Year VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package (1 Year) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*360);
                    }
                    if(months == 0)
                    {
                        SendClientMessage(ID,0xFFFF00AA,"You have recieved VIP Package 1 (Life Time) Subscribtion.");
                        GameTextForPlayer(ID, "Enjoy ~g~Unlimited VIP!", 3000, 5);
                        SendClientMessage(ID,0xFFFFFFAA,"Type /vcmds for the list of VIP commands.");
                        format(str, sizeof(str),"You\'ve given %s a VIP Package 1 (Life Time) subscription",pname);
                            SendClientMessage(playerid,0xFFFFFFAA,str);
                            dini_IntSet(pFile(ID),"VIP",1);
                            dini_IntSet(pFile(ID),"VIPTIME",gettime()+60*60*24*1000);
                    } 
learn to code then try to realease some code


LMAO My eyes ffs what is this shit, u can make it in just 1/12 of ur code lines
Find
Reply
« Next Oldest | Next Newest »


Forum Jump:


Users browsing this thread: 1 Guest(s)
  1. SA-MP Forums Archive
  2. SA-MP Scripting and Plugins
  3. Filterscripts