[L'M] VM SYSTEM

///////  VM SYSTEM by L'M (Rikko)
new klausimas[MAX_PLAYERS],tats[MAX_PLAYERS], laikoteises[MAX_PLAYERS];
enum VairavimoTeorija
{
	vmID,
	vKlausimas[200],
	vPasirinkimas1[10],
	vPasirinkimas2[10],
	bool:vAts
}
new vmT[10][VairavimoTeorija]={
	{1,"Kuria kelio puse reikia važiuoti?\n \n{ffff00}A :{ffffff} Kaire\n{ffff00}B : {ffffff}Dešine","A","B",false},
	{2,"Kada privaloma praleisti neregį?\n \n{ffff00}A :{ffffff} Pėsčiūjų perėjoje\n{ffff00}B : {ffffff}Mosuojant neregio lazdele","A","B",false},
	{3,"Ar galima lenkti posukyje?\n \n{ffff00}A :{ffffff} Taip, galima\n{ffff00}B : {ffffff}Ne, negalima","A","B",false},
	{4,"Kuris šviesoforo signalas simbolizuoja galima eismą?\n \n{ffff00}A :{ffffff} Mėlynas\n{ffff00}B : {ffffff}Žalias","A","B",false},
	{5,"Ką darote pamatę policijos pareigūnus su švyturėliais?\n \n{ffff00}A :{ffffff} Sustoju kelkraštyje\n{ffff00}B : {ffffff}Atsijungiu","A","B",true},
	{6,"Pasirinkite teisingą trumpinį.\n \n{ffffff}Kelių eismo taisyklės yra :","KET","NRP",true},
	{7,"Kiek varomųjų ratų turi automobilis?\n \n{ffff00}A :{ffffff} 3\n{ffff00}B : {ffffff}2 arba 4","A","B",false},
	{8,"Ar turėsite pirmumo teisę išsukdami iš šalutinio kelio į pagrindinį?\n \n{ffff00}A :{ffffff} Ne, neturėsite\n{ffff00}B : {ffffff}Taip, turėsite","A","B",true},
	{9,"Ka privalote padaryti prieš užvesdami variklį?\n \n{ffff00}A :{ffffff} Įsitikinti, jog gerai atrodote\n{ffff00}B : {ffffff}Įsitikinti savo saugumo, užsisegti saugos diržus","A","B",false},
    {10,"Kas gali atsitikti lenkiant posukyje?\n \n{ffff00}A :{ffffff} Galite nepamatyti iš priekio artėjančio automobilio\n{ffff00}B : {ffffff}Lenkiama tr. priemonė gali jus aptaškyti","A","B",true}};
enum VairavimoVaziavimas
{
	Float:vmPosX,
	Float:vmPosY,
	Float:vmPosZ
}
new vmV[16][VairavimoVaziavimas]={
	{-2047.2552,-93.7513,34.8785}, // VM 1
	{-2066.6519,-68.4467,34.8790}, // VM 2
	{-2143.7053,-67.8679,34.8776}, // VM 3
	{-2164.0034,22.2269,34.8751}, // VM 4
	{-2144.5884,299.6204,34.8776}, // VM 5
	{-2279.5266,322.6248,36.4317}, // VM 6
	{-2654.0327,159.7107,3.8843}, // VM 7
	{-2708.6313,53.6142,3.8854}, // VM 8
	{-2619.9727,-71.7571,3.8046}, // VM 9   -2665.2842,-73.3289,3.8869
	{-2606.2100,-173.2784,3.8854}, // VM 10   -2606.2100,-173.2784,3.8854
	{-2479.2629,-213.0107,28.2628}, // VM 11
	{-2419.7842,-84.3899,34.8790}, // VM 12
	{-2284.8525,-72.8111,34.8698}, // VM 13
	{-2126.5564,-72.4438,34.8843}, // VM 14
	{-2045.4202,-90.3465,34.8773}, // VM 15
	{-2047.6315,-84.0612,34.7891}};

public OnPlayerEnterRaceCheckpoint(playerid)
{
	if(laikoteises[playerid]>0)
	{
		new id = laikoteises[playerid];
		DisablePlayerRaceCheckpoint(playerid);
		if(laikoteises[playerid]<= 13) SetPlayerRaceCheckpoint(playerid,0,vmV[id][vmPosX],vmV[id][vmPosY],vmV[id][vmPosZ],vmV[id+1][vmPosX],vmV[id+1][vmPosY],vmV[id+1][vmPosZ],8);
		if(laikoteises[playerid]== 14) SetPlayerRaceCheckpoint(playerid,1,vmV[id][vmPosX],vmV[id][vmPosY],vmV[id][vmPosZ],-1,-1,-1,8);
		laikoteises[playerid]++;
	}
	return 1;
}

public OnPlayerUpdate(playerid)
{
	//VM system
	if(klausimas[playerid] == 10)
	{
		if(tats[playerid]>=8) pinfo[playerid][teorija]=true, SendClientMessage(playerid,0xaaaaaaaa,"[»»] {8470ff}Sėkmingai {aaaaaa}išlaikėte{8470ff} teorijos egzaminą.");
		else SendClientMessage(playerid,0xaaaaaaaa,"[»»] {DC143C}Apgailestaujame, tačiau {aaaaaa}neišlaikėte{DC143C} teorijos egzamino.");
		//tats[playerid] = 0;
		new msg[100];
		format(msg,100,"[»»] {8470ff}Teisingai atsakėte į {aaaaaa}%d/10{8470ff} klausimų.",tats[playerid]);
		SendClientMessage(playerid,0xaaaaaaaa,msg);
		klausimas[playerid] = 0;
	}
	if(laikoteises[playerid]==16)
	{
	    new veh = GetPlayerVehicleID(playerid);
	    new Float:vehHP; GetVehicleHealth(veh,vehHP);
	    if(vehHP < 800) SendClientMessage(playerid,0xaaaaaaaa,"[»»] {DC143C}Apgailestaujame, tačiau {aaaaaa}neišlaikėte{DC143C} vairavimo egzamino.");
	    else
	    {
	        SendClientMessage(playerid,0xaaaaaaaa,"[»»]{8470ff} Sėkmingai {aaaaaa}išlaikėte{8470ff} vairavimo egzaminą. Gavote teises.");
		    pinfo[playerid][teises]=true;
		}
		SetPlayerVirtualWorld(playerid,0);
		SetPlayerInterior(playerid,0);
		DestroyVehicle(veh);
		laikoteises[playerid]=-1;
	}
	return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	switch(dialogid)
	{
		case 9:  // VMdialog-1
		{
		    if(!response) return 0;
			switch(listitem)
			{
			    case 0: ShowPlayerDialog(playerid,0,DIALOG_STYLE_LIST,"Vairavimo mokykla","{8470ff} Čia kažką reiks įrašyt...","Išeiti","");

			    case 1:
			    {
			        if(pinfo[playerid][teorija] == true) return klaida(playerid,"Jūs jau esate išsilaikęs teorijos egzaminą.");
				    SendClientMessage(playerid,-1,"Atsakymai  B B B B A A B A B A");
					tats[playerid]=0;
					klausimas[playerid] = 0;
					new msg[400],pav[20];
					format(msg,400,"{8470ff}%s",vmT[klausimas[playerid]][vKlausimas]);
					format(pav,20,"%d/10",vmT[klausimas[playerid]][vmID]);
					ShowPlayerDialog(playerid,10,DIALOG_STYLE_MSGBOX,pav,msg,vmT[klausimas[playerid]][vPasirinkimas1],vmT[klausimas[playerid]][vPasirinkimas2]);
		        }
		        case 2:
		        {
		            if(pinfo[playerid][teises] == true) return klaida(playerid,"Jūs jau esate išsilaikęs vairavimo egzaminą.");
		            laikoteises[playerid]=1;
					new id = laikoteises[playerid];
					SetPlayerPos(playerid,vmV[0][vmPosX],vmV[0][vmPosY],vmV[0][vmPosZ]);
					new veh = CreateVehicle(541,vmV[0][vmPosX],vmV[0][vmPosY],vmV[0][vmPosZ],359.6827,1,1,10);
					SetPlayerInterior(playerid,0);
					SetVehicleVirtualWorld(veh,playerid);
					SetPlayerVirtualWorld(playerid,playerid);
					PutPlayerInVehicle(playerid,veh,0);
					SetPlayerRaceCheckpoint(playerid,0,vmV[id][vmPosX],vmV[id][vmPosY],vmV[id][vmPosZ],vmV[id+1][vmPosX],vmV[id+1][vmPosY],vmV[id+1][vmPosZ],8);
				}
			}
			return 1;
		}

		case VMdialog:
		{
		    if(response && vmT[klausimas[playerid]][vAts]==true) tats[playerid]+= 1;
		    else if(!response && vmT[klausimas[playerid]][vAts]==false) tats[playerid]+= 1;
		    klausimas[playerid]++;
		    new msg[400],pav[20];
			format(msg,400,"{8470ff}%s",vmT[klausimas[playerid]][vKlausimas]);
			format(pav,20,"%d/10",vmT[klausimas[playerid]][vmID]);
			if(klausimas[playerid] <= 9) ShowPlayerDialog(playerid,VMdialog,DIALOG_STYLE_MSGBOX,pav,msg,vmT[klausimas[playerid]][vPasirinkimas1],vmT[klausimas[playerid]][vPasirinkimas2]);
			return 1;
		}
	}
	return 1;
}