Peršokti į turinį

Mašinos nuoma.


TomyG

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 2277 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Recommended Posts

Sveiki, pasidalinsiu su jumis savo kodu. Į minutę nuiims po 100€, galėsite pasikeisti pagal saves. 

viršui modo rašome

new nuoma[6],isspiria[MAX_PLAYERS],NUOMACAR[MAX_PLAYERS];

tada susikuriame mašinas, šiuo atvėju bus SF stotį. Po 

OnGameModeInit

rašom

//NUOMA
nuoma[1] = CreateVehicle(587,-1962.5510254,202.8950043,26.2549992,180.0000000,95,10,15); //Euros
nuoma[2] = CreateVehicle(587,-1966.3790283,202.8269958,26.5200005,180.0000000,95,10,15); //Euros
nuoma[3] = CreateVehicle(587,-1969.8229980,202.7550049,26.7570000,180.0000000,95,10,15); //Euros
nuoma[4] = CreateVehicle(587,-1973.3830566,202.8300018,27.0030003,180.0000000,95,10,15); //Euros
nuoma[5] = CreateVehicle(587,-1977.2729492,202.7380066,27.3120003,180.0000000,95,10,15); //Euros
 

po

OnPlayerStateChange
 
if(vehicleid == nuoma[1] || vehicleid == nuoma[2] || vehicleid == nuoma[3] || vehicleid == nuoma[4] || vehicleid == nuoma[5])
{
ShowPlayerDialog(playerid,7,DIALOG_STYLE_MSGBOX,"Mašinų nuomą","Ar norite išinuomoti automobilį 100€/min","Taip","Ne");
isspiria[playerid]=SetTimerEx("spyris",5000,false,"i",playerid);
return 1;
}

po

OnDialogResponse
if(dialogid == 7)
{
if(response)
{
if(GetPlayerMoneyA(playerid) < 100) return SendClientMessage(playerid,Raudona,"* Neturite 100€"), RemovePlayerFromVehicle(playerid);
NUOMACAR[playerid]=SetTimerEx("JAUYRA",60000,true,"i",playerid);
GivePlayerMoneyA(playerid, -100);
KillTimer(isspiria[playerid]);
SendClientMessage(playerid, -1, "* Išsinuomavai automobilį 100€/min");
return 1;
}
else if(!response) 
{
     if(IsPlayerInAnyVehicle(playerid)) SetVehicleHealth(GetPlayerVehicleID(playerid),-7);
     return 1;
}
}

kažkur gale modo rašom 

forward spyris(playerid);
public spyris(playerid)
{
RemovePlayerFromVehicle(playerid);
ShowPlayerDialog(playerid,-1,0,"","","","");
}

forward JAUYRA( playerid );
public JAUYRA( playerid )
{
GivePlayerMoneyA(playerid, -100);
}

 

po

OnPlayerDisconnect
KillTimer(NUOMACAR[playerid]);

ir po

OnPlayerExitVehicle
KillTimer(NUOMACAR[playerid]);

Paaiškinsiu, kai žaidėjas įlipą startuoja timeris, ir jeigu jis per 5sekundes nepaspaudžia nieko, jį išmeta iš mašinos ir nuima dialoga, kad pvž nepaspaustu tab ir ant kokio žaidėjo info, kad pasikeistu dialogas. Kai jis paspaudžia taip, tada pradeda iš jo imti pinigus. 

Rep neprašau, tiesiog dalinuosi, radot kaip optimizuoti kodą, parašykit apačioj, esu dar žalias.

yra žymiai lengvesnių būdu tai padaryti bet.. pagal tavo parodyta kodą

 

jei naujokas norės pasidaryti daugiau nei 5 mašinas.. tai jis ir tes ta ilga tavo eilute if(vehicleid == nuoma[1] || vehicleid == nuoma[2] || vehicleid == nuoma[3] || vehicleid == nuoma[4] || vehicleid == nuoma[5])

 

new m = GetPlayerVehicleID(playerid);

 

if((nuoma[0] <= m <= nuoma[4]))

 

vietoj taimerių gali naudoti gettime

Nuoroda į komentarą
Dalintis per kitą puslapį

yra žymiai lengvesnių būdu tai padaryti bet.. pagal tavo parodyta kodą

 

jei naujokas norės pasidaryti daugiau nei 5 mašinas.. tai jis ir tes ta ilga tavo eilute if(vehicleid == nuoma[1] || vehicleid == nuoma[2] || vehicleid == nuoma[3] || vehicleid == nuoma[4] || vehicleid == nuoma[5])

 

new m = GetPlayerVehicleID(playerid);

 

if((nuoma[0] <= m <= nuoma[4]))

 

vietoj taimerių gali naudoti gettime

aha ok

Nuoroda į komentarą
Dalintis per kitą puslapį

  • Parašė po 4 savaičių...
C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(172) : error 017: undefined symbol "vehicleid"

C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(331) : error 017: undefined symbol "GetPlayerMoneyA"

C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(331) : error 017: undefined symbol "Raudona"

C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(333) : error 017: undefined symbol "GivePlayerMoneyA"

C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(672) : error 017: undefined symbol "GivePlayerMoneyA"

Amm, gali padėti?

Nuoroda į komentarą
Dalintis per kitą puslapį

 

C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(172) : error 017: undefined symbol "vehicleid"
C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(331) : error 017: undefined symbol "GetPlayerMoneyA"
C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(331) : error 017: undefined symbol "Raudona"
C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(333) : error 017: undefined symbol "GivePlayerMoneyA"
C:\Users\Vartotojas\Desktop\Tusčias GM\gamemodes\GM.pwn(672) : error 017: undefined symbol "GivePlayerMoneyA"
Amm, gali padėti?

 

GivePlayerMoneyA - stock'as buvo sukurtas nuo pinigų buginimo. pažiūrėk kokiam nors mode.

Raudona spalvos kodas. pakeisk į -1

vehicleid - new masina = GetPlayerVehicleID(playerid);

Nuoroda į komentarą
Dalintis per kitą puslapį

GivePlayerMoneyA - stock'as buvo sukurtas nuo pinigų buginimo. pažiūrėk kokiam nors mode.

Raudona spalvos kodas. pakeisk į -1

vehicleid - new masina = GetPlayerVehicleID(playerid);

Dėkui, bet GivePlayerMoneyA vistiek neveikia nerandu... Imečiau tą new masina = GetPlayerVehicleID(playerid); užlušta pawno belenkai.

Redaguota , nario .Schωartzas`
Nuoroda į komentarą
Dalintis per kitą puslapį

Ši tema yra neaktyvi. Paskutinis pranešimas šioje temoje buvo prieš 2277 dienas (-ų). Patariame sukurti naują temą, o ne rašyti naują pranešimą.

Už neaktyvių temų prikėlimą galite sulaukti įspėjimo ir pranešimo pašalinimo!

Prisijungti prie diskusijos

Palikti atsakymą galite iš karto, o užsiregistruoti vėliau. Jeigu jau turite paskyrą mūsų forume, Prisijunkite.

Svečias
Atsakyti šioje temoje...

×   Įklijuotas tekstas turi teksto formatavimą.   Pašalinti teksto formatavimą

  Galimi tik 75 veidukai.

×   Nuoroda buvo automatiškai įterpta.   Įterpti nuorodą paprastai

×   Jūsų ankstesnis pranešimas buvo atkurtas.   Išvalyti redaktorių

×   Jūs negalite įkelti nuotraukas tiesiogiai.Įkelkite arba įdėkite nuotraukas iš URL.

  • Šiame puslapyje naršo:   0 nariai

    • Nėra registruotų narių peržiūrinčių šį forumą.

Skelbimai


×
×
  • Sukurti naują...