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

Threaded Mode
dialogue style
killing
Big Clucker
***
Posts: 160
Threads: 42
Joined: Aug 2012
Reputation: 0
#1

20.09.2014, 16:42
when some one types /skill all things should be shown in a dialogue plz some one help

Код:
#include <a_samp>
#include <YSI\y_ini>
#include <zcmd>
#include <a_http>
#include <rcredits>

#define red 0xFF0000C8
#define green 0x00FF00C8
#define yellow 0xFFFF00C8

#define Skillpath "/Skills/%s.ini"

enum pInfo
{
 Pistol,
 SPistol,
 Desert,
 Shotgun,
 Sawnoff,
 Spas12,
 Uzi,
 MP5,
 AK47,
 M4,
 Rifle
}
new PlayerInfo[MAX_PLAYERS][pInfo];

forward LoadSkills(playerid, name[], value[]);
forward SkillShow(playerid,targedid);

public LoadSkills(playerid, name[], value[])
{
    new INI:file = INI_Open(SkillPath(playerid));
    INI_Int("Pistol", PlayerInfo[playerid][Pistol]);
    INI_Int("SPistol", PlayerInfo[playerid][SPistol]);
    INI_Int("Desert", PlayerInfo[playerid][Desert]);
    INI_Int("Shotgun", PlayerInfo[playerid][Shotgun]);
    INI_Int("Sawnoff", PlayerInfo[playerid][Sawnoff]);
    INI_Int("Spas12", PlayerInfo[playerid][Spas12]);
    INI_Int("Uzi", PlayerInfo[playerid][Uzi]);
    INI_Int("MP5", PlayerInfo[playerid][MP5]);
    INI_Int("AK47", PlayerInfo[playerid][AK47]);
    INI_Int("M4", PlayerInfo[playerid][M4]);
    INI_Int("Rifle", PlayerInfo[playerid][Rifle]);
    INI_Close(file);
    return 1;
}
stock SkillPath(playerid)
{
    new str[128],name[24];
    GetPlayerName(playerid,name,24);
    format(str,sizeof(str),Skillpath,name);
    return str;
}

public OnPlayerConnect(playerid)
{
        INI_ParseFile(SkillPath(playerid),"LoadSkills",.bExtra = true, .extra = playerid);
        return 1;
}
public OnPlayerDisconnect(playerid,reason)
{
    new sFile[35];
    format(sFile, 35, Skillpath, SkillPath(playerid));
    new INI:skillFile = INI_Open(sFile);
    INI_WriteInt(skillFile, "Pistol", PlayerInfo[playerid][Pistol]);
    INI_WriteInt(skillFile, "SPistol", PlayerInfo[playerid][SPistol]);
    INI_WriteInt(skillFile, "Desert", PlayerInfo[playerid][Desert]);
    INI_WriteInt(skillFile, "Shotgun", PlayerInfo[playerid][Shotgun]);
    INI_WriteInt(skillFile, "Sawnoff", PlayerInfo[playerid][Sawnoff]);
    INI_WriteInt(skillFile, "Spas12", PlayerInfo[playerid][Spas12]);
    INI_WriteInt(skillFile, "Uzi", PlayerInfo[playerid][Uzi]);
    INI_WriteInt(skillFile, "MP5", PlayerInfo[playerid][MP5]);
    INI_WriteInt(skillFile, "AK47", PlayerInfo[playerid][AK47]);
    INI_WriteInt(skillFile, "M4", PlayerInfo[playerid][M4]);
    INI_WriteInt(skillFile, "Rifle", PlayerInfo[playerid][Rifle]);
    INI_Close(skillFile);
    return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
        if(GetPlayerWeapon(killerid) == 22) PlayerInfo[killerid][Pistol]++;
        if(GetPlayerWeapon(killerid) == 23) PlayerInfo[killerid][SPistol]++;
        if(GetPlayerWeapon(killerid) == 24) PlayerInfo[killerid][Desert]++;
        if(GetPlayerWeapon(killerid) == 25) PlayerInfo[killerid][Shotgun]++;
        if(GetPlayerWeapon(killerid) == 26) PlayerInfo[killerid][Sawnoff]++;
        if(GetPlayerWeapon(killerid) == 27) PlayerInfo[killerid][Spas12]++;
        if(GetPlayerWeapon(killerid) == 28) PlayerInfo[killerid][Uzi]++;
        if(GetPlayerWeapon(killerid) == 29) PlayerInfo[killerid][MP5]++;
        if(GetPlayerWeapon(killerid) == 30) PlayerInfo[killerid][AK47]++;
        if(GetPlayerWeapon(killerid) == 31) PlayerInfo[killerid][M4]++;
        if(GetPlayerWeapon(killerid) == 34) PlayerInfo[killerid][Rifle]++;
        return 1;
    }
public OnPlayerSpawn(playerid)
{
        new p1 = PlayerInfo[playerid][Pistol];
        new p2 = PlayerInfo[playerid][SPistol];
        new p3 = PlayerInfo[playerid][Desert];
        new p4 = PlayerInfo[playerid][Shotgun];
        new p5 = PlayerInfo[playerid][Sawnoff];
        new p6 = PlayerInfo[playerid][Spas12];
        new p7 = PlayerInfo[playerid][Uzi];
        new p8 = PlayerInfo[playerid][MP5];
        new p9 = PlayerInfo[playerid][AK47];
        new p10 = PlayerInfo[playerid][M4];
        new p11 = PlayerInfo[playerid][Rifle];
        SetPlayerSkillLevel(playerid, WEAPONSKILL_PISTOL, p1);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_PISTOL_SILENCED, p2);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_DESERT_EAGLE, p3);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SHOTGUN, p4);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SAWNOFF_SHOTGUN, p5);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SPAS12_SHOTGUN, p6);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_MICRO_UZI, p7);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_MP5, p8);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_AK47, p9);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_M4, p10);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SNIPERRIFLE, p11);
        return 1;
  }
  
CMD:skill(playerid, params[])
{
if(IsPlayerConnected(playerid))
{
    SkillShow(playerid,playerid);
    }
return 1;}

public SkillShow(playerid,targedid)
{

new p1 = PlayerInfo[playerid][Pistol];
new p2 = PlayerInfo[playerid][SPistol];
new p3 = PlayerInfo[playerid][Desert];
new p4 = PlayerInfo[playerid][Shotgun];
new p5 = PlayerInfo[playerid][Sawnoff];
new p6 = PlayerInfo[playerid][Spas12];
new p7 = PlayerInfo[playerid][Uzi];
new p8 = PlayerInfo[playerid][MP5];
new p9 = PlayerInfo[playerid][AK47];
new p10 = PlayerInfo[playerid][M4];
new p11 = PlayerInfo[playerid][Rifle];

new pName[MAX_PLAYER_NAME];
GetPlayerName(targedid, pName, sizeof(pName));

new message[128];
new message2[128];
new message3[128];
new message4[128];
new message5[128];

format (message, sizeof(message), "Player %s Stats",pName );
format (message2, sizeof(message2), "Pistol:%i , Silenced Pistol:%i , Desert:%i",p1 , p2 , p3 );
format (message3, sizeof(message3), "Shotgun:%i , SawnOff ShotGun:%i , Spas12 Shotgun:%i",p4 , p5 , p6);
format (message4, sizeof(message4), "Uzi:%i , MP5:%i , AK47:%i",p7 , p8 , p9);
format (message5, sizeof(message5), "M4:%i , Sniper Rifle:%i",p10 , p11);
SendClientMessage(playerid, red, "Player Stats:");
SendClientMessage(playerid, yellow, message);
SendClientMessage(playerid, yellow, message2);
SendClientMessage(playerid, yellow, message3);
SendClientMessage(playerid, yellow, message4);
SendClientMessage(playerid, yellow, message5);
return 1;
}
Find
Reply
killing
Big Clucker
***
Posts: 160
Threads: 42
Joined: Aug 2012
Reputation: 0
#2

20.09.2014, 16:57
and need help with this also help pls
Код:
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : error 001: expected token: "-string end-", but found "-identifier-"
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : warning 215: expression has no effect
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : warning 215: expression has no effect
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : error 037: invalid string (possibly non-terminated string)
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : warning 215: expression has no effect
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : error 001: expected token: ";", but found ")"
D:\TDm 2.0\ilkul new wala\filterscripts\skills.txt(151) : fatal error 107: too many error messages on one line

Compilation aborted.Pawn compiler 3.2.3664	 	 	Copyright © 1997-2006, ITB CompuPhase


4 Errors.
Код:
#include <a_samp>
#include <YSI\y_ini>
#include <zcmd>
#include <a_http>

#define red 0xFF0000C8
#define green 0x00FF00C8
#define yellow 0xFFFF00C8
#define DIALOG_SKILL

#define Skillpath "/Skills/%s.ini"

enum pInfo
{
	Pistol,
	SPistol,
	Desert,
	Shotgun,
	Sawnoff,
	Spas12,
	Uzi,
	MP5,
	AK47,
	M4,
	Rifle
}
new PlayerInfo[MAX_PLAYERS][pInfo];

forward LoadSkills(playerid, name[], value[]);
forward SkillShow(playerid,targedid);

public LoadSkills(playerid, name[], value[])
{
    new INI:file = INI_Open(SkillPath(playerid));
    INI_Int("Pistol", PlayerInfo[playerid][Pistol]);
    INI_Int("SPistol", PlayerInfo[playerid][SPistol]);
    INI_Int("Desert", PlayerInfo[playerid][Desert]);
    INI_Int("Shotgun", PlayerInfo[playerid][Shotgun]);
    INI_Int("Sawnoff", PlayerInfo[playerid][Sawnoff]);
    INI_Int("Spas12", PlayerInfo[playerid][Spas12]);
    INI_Int("Uzi", PlayerInfo[playerid][Uzi]);
    INI_Int("MP5", PlayerInfo[playerid][MP5]);
    INI_Int("AK47", PlayerInfo[playerid][AK47]);
    INI_Int("M4", PlayerInfo[playerid][M4]);
    INI_Int("Rifle", PlayerInfo[playerid][Rifle]);
    INI_Close(file);
    return 1;
}
stock SkillPath(playerid)
{
    new str[128],name[24];
    GetPlayerName(playerid,name,24);
    format(str,sizeof(str),Skillpath,name);
    return str;
}

public OnPlayerConnect(playerid)
{
        INI_ParseFile(SkillPath(playerid),"LoadSkills",.bExtra = true, .extra = playerid);
        return 1;
}
public OnPlayerDisconnect(playerid,reason)
{
    new sFile[35];
    format(sFile, 35, Skillpath, SkillPath(playerid));
    new INI:skillFile = INI_Open(sFile);
    INI_WriteInt(skillFile, "Pistol", PlayerInfo[playerid][Pistol]);
    INI_WriteInt(skillFile, "SPistol", PlayerInfo[playerid][SPistol]);
    INI_WriteInt(skillFile, "Desert", PlayerInfo[playerid][Desert]);
    INI_WriteInt(skillFile, "Shotgun", PlayerInfo[playerid][Shotgun]);
    INI_WriteInt(skillFile, "Sawnoff", PlayerInfo[playerid][Sawnoff]);
    INI_WriteInt(skillFile, "Spas12", PlayerInfo[playerid][Spas12]);
    INI_WriteInt(skillFile, "Uzi", PlayerInfo[playerid][Uzi]);
    INI_WriteInt(skillFile, "MP5", PlayerInfo[playerid][MP5]);
    INI_WriteInt(skillFile, "AK47", PlayerInfo[playerid][AK47]);
    INI_WriteInt(skillFile, "M4", PlayerInfo[playerid][M4]);
    INI_WriteInt(skillFile, "Rifle", PlayerInfo[playerid][Rifle]);
    INI_Close(skillFile);
    return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
        if(GetPlayerWeapon(killerid) == 22) PlayerInfo[killerid][Pistol]++;
        if(GetPlayerWeapon(killerid) == 23) PlayerInfo[killerid][SPistol]++;
        if(GetPlayerWeapon(killerid) == 24) PlayerInfo[killerid][Desert]++;
        if(GetPlayerWeapon(killerid) == 25) PlayerInfo[killerid][Shotgun]++;
        if(GetPlayerWeapon(killerid) == 26) PlayerInfo[killerid][Sawnoff]++;
        if(GetPlayerWeapon(killerid) == 27) PlayerInfo[killerid][Spas12]++;
        if(GetPlayerWeapon(killerid) == 28) PlayerInfo[killerid][Uzi]++;
        if(GetPlayerWeapon(killerid) == 29) PlayerInfo[killerid][MP5]++;
        if(GetPlayerWeapon(killerid) == 30) PlayerInfo[killerid][AK47]++;
        if(GetPlayerWeapon(killerid) == 31) PlayerInfo[killerid][M4]++;
        if(GetPlayerWeapon(killerid) == 34) PlayerInfo[killerid][Rifle]++;
        return 1;
    }
public OnPlayerSpawn(playerid)
{
        new p1 = PlayerInfo[playerid][Pistol];
        new p2 = PlayerInfo[playerid][SPistol];
        new p3 = PlayerInfo[playerid][Desert];
        new p4 = PlayerInfo[playerid][Shotgun];
        new p5 = PlayerInfo[playerid][Sawnoff];
        new p6 = PlayerInfo[playerid][Spas12];
        new p7 = PlayerInfo[playerid][Uzi];
        new p8 = PlayerInfo[playerid][MP5];
        new p9 = PlayerInfo[playerid][AK47];
        new p10 = PlayerInfo[playerid][M4];
        new p11 = PlayerInfo[playerid][Rifle];
        SetPlayerSkillLevel(playerid, WEAPONSKILL_PISTOL, p1);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_PISTOL_SILENCED, p2);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_DESERT_EAGLE, p3);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SHOTGUN, p4);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SAWNOFF_SHOTGUN, p5);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SPAS12_SHOTGUN, p6);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_MICRO_UZI, p7);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_MP5, p8);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_AK47, p9);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_M4, p10);
        SetPlayerSkillLevel(playerid, WEAPONSKILL_SNIPERRIFLE, p11);
        return 1;
		}
		
CMD:skills(playerid, params[])
{
if(IsPlayerConnected(playerid))
{
    SkillShow(playerid,playerid);
    }
return 1;}

public SkillShow(playerid,targedid)
{

new p1 = PlayerInfo[playerid][Pistol];
new p2 = PlayerInfo[playerid][SPistol];
new p3 = PlayerInfo[playerid][Desert];
new p4 = PlayerInfo[playerid][Shotgun];
new p5 = PlayerInfo[playerid][Sawnoff];
new p6 = PlayerInfo[playerid][Spas12];
new p7 = PlayerInfo[playerid][Uzi];
new p8 = PlayerInfo[playerid][MP5];
new p9 = PlayerInfo[playerid][AK47];
new p10 = PlayerInfo[playerid][M4];
new p11 = PlayerInfo[playerid][Rifle];

new pName[MAX_PLAYER_NAME];
GetPlayerName(targedid, pName, sizeof(pName));

{
	new cmdstring[500];
[ this is line number 151]    strcat(cmdstring,"Pistol:%i , Silenced Pistol:%i , Desert:%i"p1 , p2 , p3");
	strcat(cmdstring,"Shotgun:%i , SawnOff ShotGun:%i , Spas12 Shotgun:%i",p4 , p5 , p6");
	strcat(cmdstring,"Uzi:%i , MP5:%i , AK47:%i",p7 , p8 , p9");
	strcat(cmdstring,"M4:%i , Sniper Rifle:%i",p10 , p11");
    ShowPlayerDialog(playerid,DIALOG_CMDS,DIALOG_STYLE_MSGBOX,"Skills!",cmdstring,"Close","");
	return 1;
}
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. Scripting Help