Kann schon 
s
ocmd:usehanf(playerid,params[])
{
if(!havePlayerHanf(playerid,2)) return SendClientMessage(playerid,ROT,"Du hast kein Hanf");
new name[MAX_PLAYER_NAME]
GetPlayerName(playerid,name,sizeof(name));
format(string,sizeof(string),"** %s hat Hanf geraucht!",name);
givePlayerHanf(playerid,-2);
SetPlayerHealth(playerid,50);
SetPlayerArmour(playerid,50);
return 1;
}
Du musst die funktion auch in dein Script einfügen wenn du sie benutzen willst.
Hier im Forum nützt sie dir herzlich wenig
Du musst davor natürlich auch
stock givePlayerHanf(playerid,anzahl)
{
SetPVarInt(playerid,"Hanf",GetPVarInt(playerid,"Hanf")+anzahl);
return 0;
}
In deinem Script haben 
EDIT : G war klein 
dann achte mal darauf wies geschrieben ist, PAWN ist case sensitve, heißt die Groß und Kleinschribung muss beachtet werden
