Buy-Vip

eXorcism · December 13, 2012

Salut sa-mp.ro am decis sa fac un tutorial bun pentru buyvip nu ce a facut funky plin de greseli.

Voi face comanda pe Zcmd dupa o puteti adapta singuri sistemului vostru de admin/vip.

#include < a_samp  >// Libraria sa-mp by samp team
#include < zcmd      >// procesorul de comenzi by ZeeX
#define Buyvip 1243 // Definitia dialogului
#define  SCM SendClientMessage // si definitia pentru scurtarea SendClientMessage

Acum codul oare cum il facem ? Foarte simplu si rapid!

CMD:buyvip(playerid,params[])
{
    ShowPlayerDialog(playerid, Buyvip , DIALOG_STYLE_LIST, "Buyvip", "Level 1\t* 10 ore *\nLevel 2\t* 20 ore *\nLevel 3\t* 30 ore *", "Buy", "Close"); // Functia care ii arata dialogul la tastarea comenzi!
	return 1;
}

//========================Codul dialogului========================
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	if( dialogid == Buyvip )
	{
	    if( !response )
	        return ( 1 );

		if( listitem == 0 )
		{
		    if( PlayerInfo[ playerid ][ VIPLevel ] == 1 )//functia care verifica daca ai acel level
		        return SCM(playerid,-1,"Ai Dejea Vip Level 1!");//Dupa i se returneaza mesajul Care ii spune ca are deja vip level 1

			if( PlayerInfo[ playerid ][ VIPLevel ] > 1 )//Functia care verifica daca are level mai mare
			    return SCM( playerid, -1, "Ai Level De Vip Mai Mare xD!" );//Dupa ii se returneaza mesajul care ii spune ca are level mai mare!
			    
			if( PlayerInfo[ playerid ][ Hours ] < 10 )//functia ce verifica daca are ore necesare pentru a cumpara vip!
			    return SCM( playerid, -1, "Nu ai destul ore pentru a cumpara vip level 1 !" );//Dupa ii se returneaza mesajul care ii spune ca nu are destule ore
			    
			PlayerInfo[ playerid ][ Hours ] -= 10;//Functia care ii scade orele playerului
			PlayerInfo[ playerid ][ VIPLevel ] = 1;//Functia care ii da levelul

			SCM( playerid, -1, "Ai cumparat VIP Level 1 !" );//functia ce ii da vestea ca a cumparat vip level 1
		}

		if( listitem == 1 )
		{
		   	if( PlayerInfo[ playerid ][ VIPLevel ] == 2 )//functia care verifica daca ai acel level
		        return SCM(playerid,-1,"Ai Dejea Vip Level 2!");//Dupa ii se returneaza mesajul Care ii spune ca are deja vip level 2

			if( PlayerInfo[ playerid ][ VIPLevel ] > 2 )//Functia care verifica daca are level mai mare
			    return SCM( playerid, -1, "Ai Level De Vip Mai Mare xD!" );//Dupa ii se returneaza mesajul care ii spune ca are level mai mare!

			if( PlayerInfo[ playerid ][ Hours ] < 20 )//functia ce verifica daca are ore necesare pentru a cumpara vip!
			    return SCM( playerid, -1, "Nu ai destul ore pentru a cumpara vip level 2 !" );//Dupa ii se returneaza mesajul care ii spune ca nu are destule ore

			PlayerInfo[ playerid ][ Hours ] -= 20;//Functia care ii scade orele playerului
			PlayerInfo[ playerid ][ VIPLevel ] = 2;//Functia care ii da levelul

			SCM( playerid, -1, "Ai cumparat VIP Level 2 !" );//functia ce ii da vestea ca a cumparat vip level 2
		}
        if( listitem == 2 )
		{
			if( PlayerInfo[ playerid ][ VIPLevel ] == 3 )//functia care verifica daca ai acel level
		        return SCM(playerid,-1,"Ai Dejea Vip Level 3!");//Dupa ii se returneaza mesajul Care ii spune ca are deja vip level 3

			if( PlayerInfo[ playerid ][ VIPLevel ] > 3 )//Functia care verifica daca are level mai mare
			    return SCM( playerid, -1, "Ai Level De Vip Mai Mare xD!" );//Dupa ii se returneaza mesajul care ii spune ca are level mai mare!

			if( PlayerInfo[ playerid ][ Hours ] < 30 )//functia ce verifica daca are ore necesare pentru a cumpara vip!
			    return SCM( playerid, -1, "Nu ai destul ore pentru a cumpara vip level 3 !" );//Dupa ii se returneaza mesajul care ii spune ca nu are destule ore

			PlayerInfo[ playerid ][ Hours ] -= 30;//Functia care ii scade orele playerului
			PlayerInfo[ playerid ][ VIPLevel ] = 3;//Functia care ii da levelul

			SCM( playerid, -1, "Ai cumparat VIP Level 3 !" );//functia ce ii da vestea ca a cumparat vip level 3
		}
        
		return ( 1 );
	}

	return ( 1 );
}

Dupa cum observam avem un deja un sistem de buyvip fara buguri si functional + explicatie pentru fiecare functie!

Cui nu ii place sa nu comenteze cui ii place sa lase un comment sa imi spuna daca l-a ajutat tutorialul!

DarkyTheAngel · December 13, 2012

Frumos tutorial.

4/5

nexT. · December 13, 2012

[shadow=red,left]frumos[/shadow]

[glow=red,2,300]frumos[/glow]

[move]frumos[/move]

[table]

frumos

[/table]

eXorcism · December 13, 2012

Multumesc puteam sa il fac mai complicat dar pentru incepatori este bine cred eu

a si daca nu reusiti sa il adaptati lasati aici reply

NEoNX · December 13, 2012

Am o problema cu acesta Functie:

if( ]PlayerInfo[playerid][hours] < 50 )//functia ce verifica daca are ore necesare pentru a cumpara vip!
			    return SCM( playerid, -1, "Nu ai destul ore pentru a cumpara vip level 1 !" );

si Erorile X(

C:\Documents and Settings\Calin\My Documents\RLS\Server RLS\Server RLS\filterscripts\ladmin4v2.pwn(7063) : error 029: invalid expression, assumed zero
C:\Documents and Settings\Calin\My Documents\RLS\Server RLS\Server RLS\filterscripts\ladmin4v2.pwn(7063) : warning 215: expression has no effect
C:\Documents and Settings\Calin\My Documents\RLS\Server RLS\Server RLS\filterscripts\ladmin4v2.pwn(7063) : error 001: expected token: ";", but found ")"
C:\Documents and Settings\Calin\My Documents\RLS\Server RLS\Server RLS\filterscripts\ladmin4v2.pwn(7063) : error 029: invalid expression, assumed zero
C:\Documents and Settings\Calin\My Documents\RLS\Server RLS\Server RLS\filterscripts\ladmin4v2.pwn(7063) : fatal error 107: too many error messages on one line

Compilation aborted.Pawn compiler 3.2.3664	 	 	Copyright (c) 1997-2006, ITB CompuPhase


4 Errors.

eXorcism · December 13, 2012

if( ]PlayerInfo[playerid][hours] < 50 )//functia ce verifica daca are ore necesare pentru a cumpara vip!

return SCM( playerid, -1, "Nu ai destul ore pentru a cumpara vip level 1 !" );

ce cauta la if ] ?

codu e asa

if( PlayerInfo[playerid][hours] < 50 )//functia ce verifica daca are ore necesare pentru a cumpara vip!

return SCM( playerid, -1, "Nu ai destul ore pentru a cumpara vip level 1 !" );

NEoNX · December 13, 2012

Multumesc :*

You Are the Best!

The Matrix · December 14, 2012

Sincer eu stiam a pune un cod in GM, si cred ca asta stie orcine

PawnFox · December 15, 2012

Trebuia sa explici toate functiile folosite ...

Copy / Paste

vasy · December 16, 2012

si chiar vrei sa spui k merge si are si vip

Shazam · December 16, 2012

Multumesc, chiar am avut nevoie de acest buyvip

Nota mea : 5/5

eXorcism · December 16, 2012

Ma tu ai baut apa de la pesti ?

Nu vezi ca la fiecare functie dupa terminare e // explicatia xD

PawnFox" post="126760" timestamp="1355595930"]
Trebuia sa explici toate functiile folosite ...
Copy / Paste

Logic ce crezi ca nu merge testeaza dar schimaba si tu de exemplu cum am pus eu PlayerInfo[playerid][VIPLevel] schimbi in ce ai tu exemplu VipLvl pVip sau cva de genu xD

si chiar vrei sa spui k merge si are si vip

Cu placere eu lam pus sa ajut nu sa stea degeaba xD

Multumesc, chiar am avut nevoie de acest buyvip
Nota mea : 5/5

NeLu. · December 18, 2012

Bravo bun tutorial 5/5

eXorcism · December 23, 2012

Bravo bun tutorial 5/5

Multumesc NeLule xD

neXuX · December 26, 2012

4/5

KiLLeR1122 · December 28, 2012

4/5

Succes.

eXorcism · January 1, 2013

Multumesc pentru toate notele ma asteptam la 2/5 si dastea )

friezakinght · January 5, 2013

Frumos tutorial, bravo 5/5

eXorcism · January 5, 2013

Mersi :)

Vladone13 · January 7, 2013

Bun pacat ca e bun doar pentru un sv stie el ce zic !

onix09 · January 28, 2013

Bun tutorial, si identat bine

4/5

eXorcism · February 8, 2013

Stiu ca este identat bine sunt obsedat de aranjare )

oLfacTiv · February 24, 2013

Tutorialul e bun .. dar eu nus priceput in dastea.

C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 017: undefined symbol "PlayerInfo"

C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : warning 215: expression has no effect

C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 001: expected token: ";", but found "]"

C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 029: invalid expression, assumed zero

C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : fatal error 107: too many error messages on one line

4 Errors.

[XSS]Skull · February 24, 2013

Tutorialul e bun .. dar eu nus priceput in dastea.
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 017: undefined symbol "PlayerInfo"
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : warning 215: expression has no effect
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 001: expected token: ";", but found "]"
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 029: invalid expression, assumed zero
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : fatal error 107: too many error messages on one line
Compilation aborted.Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
4 Errors.

Incearca sa adaugi acest system in Systemul de admin, si de preferat Ladmin4v2, iar daca vrei sa ai pe LuxAdmin inlocuieste [VipLevel] cu [pVip] si PlayerInfo cu AccInfo

[Funky]Anakin · February 24, 2013

Skull" post="133780" timestamp="1361718203"]
Incearca sa adaugi acest system in Systemul de admin, si de preferat Ladmin4v2, iar daca vrei sa ai pe LuxAdmin inlocuieste [VipLevel] cu [pVip] si PlayerInfo cu AccInfo

Bla bla bla.

El a intrebat cum sa rezolve .

Tutorialul e bun .. dar eu nus priceput in dastea.
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 017: undefined symbol "PlayerInfo"
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : warning 215: expression has no effect
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 001: expected token: ";", but found "]"
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : error 029: invalid expression, assumed zero
C:\Documents and Settings\daniel\Desktop\BUYVIP.pwn(24) : fatal error 107: too many error messages on one line
Compilation aborted.Pawn compiler 3.2.3664 Copyright © 1997-2006, ITB CompuPhase
4 Errors.

[pawn]enum PlayerData { VIPLevel , Hours };

new

PlayerInfo[MAX_PLAYERS][PlayerData];[/pawn]

Sign In

Buy-Vip

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Similar Content

Recently Browsing 0 members

Important Information