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

eXorcism

DarkyTheAngel

nexT.

eXorcism

NEoNX

eXorcism

NEoNX

The Matrix

PawnFox

vasy

Shazam

eXorcism

NeLu.

eXorcism

neXuX

KiLLeR1122

eXorcism

friezakinght

eXorcism

Vladone13

onix09

eXorcism

oLfacTiv

[XSS]Skull

[Funky]Anakin

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

Activity

Important Information