/safe Rezone Role Play

[Timosha-_-)]

Здраствуйте , решил вырезать систему сейфов из Rezone Role Play , приступим.
Ко всем Define

#define D_JOB 					131

В Enum Hinfo

hKeysafe,
	hNarko,
	hMoney

Далее в stock LoadProperty()

HouseInfo[idx][hKeysafe] = strval(arrCoords[22]);
				HouseInfo[idx][hNarko] = strval(arrCoords[23]);
				HouseInfo[idx][hMoney] = strval(arrCoords[24]);

Далее в stock OnPropUpdate()

format(coordsstring, sizeof(coordsstring), "%f,%f,%f,%f,%f,%f,%s,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%f,%f,%f,%f,%d,%d,%d\n",
HouseInfo[idx][hKeysafe],
		HouseInfo[idx][hNarko],
		HouseInfo[idx][hMoney]);

Потом в stock savehouses()

format(coordsstring, sizeof(coordsstring), "%f,%f,%f,%f,%f,%f,%s,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%d,%f,%f,%f,%f,%d,%d,%d\n",	
HouseInfo[idx][hKeysafe],
		HouseInfo[idx][hNarko],
		HouseInfo[idx][hMoney]);

Далее ставим саму команду

if(strcmp(cmd,"/safe",true) == 0)
	{
		ShowPlayerDialog(playerid, D_JOB+23, 1, "Сейф", "Введите код , если первый раз,  то нажмите  интер:", "Далее", "Назад");
		return 1;
	}

Команда без проверки , ибо везде разное.

Потом ко всем Case( Диалогоам)

case D_JOB+23:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        new pass = strval(inputtext);
	        if(HouseInfo[GetPVarInt(playerid, "Hhouse")][hKeysafe] == pass)
	        {
		        format(string, sizeof(string), "1. Деньги [%d]\n2. Наркотики [%d]\n3. Сменить код", HouseInfo[GetPVarInt(playerid, "Hhouse")][hMoney], HouseInfo[GetPVarInt(playerid, "Hhouse")][hNarko]);
				SPD(playerid, D_JOB+25, DIALOG_STYLE_LIST, "Сейф",string,"Выбрать","Отмена");
			}
			else SendClientMessage(playerid, COLOR_RED,"Код неверный!");
		}
		case D_JOB+24:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        new pass = strval(inputtext);
			HouseInfo[GetPVarInt(playerid, "Hhouse")][hKeysafe] = pass;
			SendMes(playerid, COLOR_GREEN, "Ваш новый код от сейфа: {FFFFFF}%d{FFA500}", pass);
			SendClientMessage(playerid, COLOR_GREEN,"Нажмите клавишу 'F8', Что бы сделать скриншот кода");
			DeletePVar(playerid, "Hhouse");
		}
		case D_JOB+25:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        switch(listitem)
	        {
	            case 0:{ SPD(playerid, D_JOB+26, DIALOG_STYLE_LIST, "Сейф","1. Взять деньги\n2. Положить деньги","Взять","Отмена"); }
	            case 1:{ SPD(playerid, D_JOB+29, DIALOG_STYLE_LIST, "Сейф","1. Взять наркотики\n2. Положить наркотики", "Выбрать","Отмена");}
	            case 2:{ SPD(playerid, D_JOB+24, 1, "Сейф", "Введите новый код сейфа:", "Далее", "Отмена"); }
			}
		}
		case D_JOB+26:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        switch(listitem)
	        {
	            case 0:{ SPD(playerid, D_JOB+27, 1, "Сейф", "Введите сумму:", "Принять", "Отмена"); }
	            case 1:{ SPD(playerid, D_JOB+28, 1, "Сейф", "Введите сумму:", "Принять", "Отмена"); }
			}
		}
		case D_JOB+27:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        new moneys = strval(inputtext);
	        if(moneys < 0||moneys >10000000)return SendClientMessage(playerid, COLOR_RED, "Неверное выражение!");
	        if(HouseInfo[GetPVarInt(playerid, "Hhouse")][hMoney] < moneys)return SendClientMessage(playerid, COLOR_GREEN, "В сейфе нет столько денег!");
			HouseInfo[GetPVarInt(playerid, "Hhouse")][hMoney] -= moneys;
			PlayerInfo[playerid][pCash] +=moneys;
			SendMes(playerid, COLOR_GREEN, "Вы взяли с сейфа: {FFFFFF}%d{FFA500} Долларов", moneys);
			DeletePVar(playerid, "Hhouse");
			return true;
		}
		case D_JOB+28:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        new moneys = strval(inputtext);
	        if(moneys < 0||moneys >10000000)return SendClientMessage(playerid, COLOR_RED, "Неверное выражение!");
	        if(PlayerInfo[playerid][pCash] < moneys)return SendClientMessage(playerid, COLOR_GREEN, "у вас нет столько денег!");
			PlayerInfo[playerid][pCash] -= moneys;
			HouseInfo[GetPVarInt(playerid, "Hhouse")][hMoney] +=moneys;
			SendMes(playerid, COLOR_GREEN, "Вы положили в сейф: {FFFFFF}%d{FFA500} Долларов", moneys);
			DeletePVar(playerid, "Hhouse");
			return true;
		}
		case D_JOB+29:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        switch(listitem)
	        {
	            case 0:{ SPD(playerid, D_JOB+30, 1, "Сейф", "Введите кол-во грамм:", "Далее", "Отмена"); }
	            case 1:{ SPD(playerid, D_JOB+31, 1, "Сейф", "Введите кол-во грамм:", "Далее", "Отмена"); }
			}
		}
		case D_JOB+30:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        new drugs = strval(inputtext);
	        if(drugs < 0||drugs >10000)return SendClientMessage(playerid, COLOR_RED, "У вас нет столько наркотиков!");
	        if(HouseInfo[GetPVarInt(playerid, "Hhouse")][hNarko] < drugs)return SendClientMessage(playerid, COLOR_GREEN, "В сейфе нет столько наркотиков!");
			HouseInfo[GetPVarInt(playerid, "Hhouse")][hNarko] -= drugs;
			PlayerInfo[playerid][pDrugs] +=drugs;
			SendMes(playerid, COLOR_GREEN, "Вы положили: {FFFFFF}%d{FFA500} грамм наркотиков", drugs);
			DeletePVar(playerid, "Hhouse");
			return true;
		}
		case D_JOB+31:
	    {
	        if(!response)return DeletePVar(playerid, "Hhouse");
	        new drugs = strval(inputtext);
	        if(drugs < 0||drugs >10000)return SendClientMessage(playerid, COLOR_RED, "Неверное значение!");
	        if(PlayerInfo[playerid][pDrugs] < drugs)return SendClientMessage(playerid, COLOR_GREEN, "У вас нет столько наркотиков!");
			PlayerInfo[playerid][pDrugs] -= drugs;
			HouseInfo[GetPVarInt(playerid, "Hhouse")][hNarko] +=drugs;
			SendMes(playerid, COLOR_GREEN, "Вы положили в сейф: {FFFFFF}%d{FFA500} Грамм наркотиков", drugs);
			DeletePVar(playerid, "Hhouse");
			return true;
		}

Вот и всё

Автор кода :Plakapenk@
Авто мануала(вырезки) : я

+сы просить не буду , ибо автор кода Plakapenk@. Я лиш вырезал , мож надо кому