Nostalgic Servers
Would you like to react to this message? Create an account in a few clicks or log in to continue.


Welcome to the czechoslovakian clan NSaG
 
HomeHome  SearchSearch  Latest imagesLatest images  Vychozi StrankaVychozi Stranka  RegisterRegister  Log inLog in  
Search
 
 

Display results as :
 
Rechercher Advanced Search
May 2024
MonTueWedThuFriSatSun
  12345
6789101112
13141516171819
20212223242526
2728293031  
CalendarCalendar
Affiliates
free forum

[TuT]Rob System pomoci cteni ze souboru Banner
ChatBox

 

 [TuT]Rob System pomoci cteni ze souboru

Go down 
3 posters
AuthorMessage
Gangstarz
Zakladatel fóra [Pawner]
Zakladatel fóra [Pawner]
Gangstarz


Poèet pøíspìvkù : 111
Join date : 2012-01-05

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptySat Jan 14, 2012 5:24 pm

Zdravím ľudia,dnes vám ukážem svoj rob systém ktorý som stvoril.
No Začneme

Hore do módu
forward robset(playerid);
new rob[MAX_PLAYERS];

potom do OnPlayerCommandTeyt(playerid)
{
if (strcmp("/rob", cmdtext, true) == 0)
{
new line[256];//definujeme radek
new var_from_line[64];//definujeme vec na cteni z radku
new Float:RobX;//definujeme souradnici X
new Float:RobY;//definujeme souradnici Y
new Float:RobZ;//definujeme souradnici Z
new robname;//definujeme robname
new index;//definujeme index
new File:robf=fopen("rob.txt",io_read);//otevirame soubor rob.txt na cteni
while(fread(robf,line,256) > 0){//pouzivame cyklus while na precteni celeho souboru
index=0;//zakladni hodnota index je 0
//float x
index = token_by_delim(line,var_from_line,',',index+1);
if(index == (-1)) continue;//pokud je index-1 pokracuje
RobX = floatstr(var_from_line);
//float y
index = token_by_delim(line,var_from_line,',',index+1);
if(index == (-1)) continue;//pokud je index -1 pokracuje
RobY = floatstr(var_from_line);
//float z
index = token_by_delim(line,var_from_line,',',index+1);
if(index == (-1)) continue;
RobZ = floatstr(var_from_line);
//robname
index = token_by_delim(line,var_from_line,',',index+1);
if(index == (-1)) continue;
robname = strval(var_from_line);
index = token_by_delim(line,var_from_line,',',index+1);
if(index == (-1)) continue;
}
if(IsPlayerInSphere(playerid,RobX,RobY,RobZ,5))
{
if(!PlayerHaveShootingWeapon(playerid))return SendClientMessage(playerid,COLOR_YELLOW,"Nemáte v ruke strelnú zbraň");
if(rob[playerid]==1)return SendClientMessage(playerid,COLOR_YELLOW,"Ešte nemôžes vykradnúť obchod,čakaj prosím");
new money=5000+random(5000);
GivePlayerMoney(playerid,money);
new string[128];
format(string,sizeof(string),"Hráč %s vykradol obchod:%s,získal %d$",PlayerName(playerid),RobName(robname),money);
SendClientMessageToAll(COLOR_BLUE,string);
rob[playerid]=1;
SetTimer("robset",120000,0);
fclose(robf);
}else{
SendClientMessage(playerid,COLOR_YELLOW,"Niesi v obchode");
}
return 1;}
return 0;}
Ted definujeme PlayerHaveShootingWeapon
stock PlayerHaveShootingWeapon(playerid)
{
if(GetPlayerWeapon(playerid)==0)return false;
else if(GetPlayerWeapon(playerid)==1)return false;
else if(GetPlayerWeapon(playerid)==2)return false;
else if(GetPlayerWeapon(playerid)==3)return false;
else if(GetPlayerWeapon(playerid)==4)return false;
else if(GetPlayerWeapon(playerid)==5)return false;
else if(GetPlayerWeapon(playerid)==6)return false;
else if(GetPlayerWeapon(playerid)==7)return false;
else if(GetPlayerWeapon(playerid)==8)return false;
else if(GetPlayerWeapon(playerid)==9)return false;
else if(GetPlayerWeapon(playerid)==10)return false;
else if(GetPlayerWeapon(playerid)==12)return false;
else if(GetPlayerWeapon(playerid)==13)return false;
else if(GetPlayerWeapon(playerid)==14)return false;
else if(GetPlayerWeapon(playerid)==15)return false;
else if(GetPlayerWeapon(playerid)==16)return false;
else if(GetPlayerWeapon(playerid)==17)return false;
else if(GetPlayerWeapon(playerid)==18)return false;
else if(GetPlayerWeapon(playerid)==39)return false;
else if(GetPlayerWeapon(playerid)==40)return false;
else if(GetPlayerWeapon(playerid)==41)return false;
else if(GetPlayerWeapon(playerid)==42)return false;
else if(GetPlayerWeapon(playerid)==43)return false;
else if(GetPlayerWeapon(playerid)==44)return false;
else if(GetPlayerWeapon(playerid)==45)return false;
else if(GetPlayerWeapon(playerid)==46)return false;
return 1;
}
a pak RobName
stock RobName(robid)
{
new robnazov[50];
if(robid==1)robnazov="Cluckin Bell";//pokud je robid 1 nazov je cluckin bell
else if(robid==2)robnazov="Burger Shot";//pokud je robid 2 nazov je burger shot
else if(robid==3)robnazov="Well Stacked Pizza";//pokud je robid 3 nazov je well stacked pizza
return robnazov;//vraci hodnotu robnazov
}


Last edited by Gangstarz on Sat Jan 14, 2012 6:42 pm; edited 1 time in total
Back to top Go down
https://nsag.slovakforum.net
_NSaG_NERI

_NSaG_NERI


Poèet pøíspìvkù : 139
NSaG Rank : forum helper
Join date : 2012-01-06
Bydliste : Czech Republic | Praha

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptySat Jan 14, 2012 6:01 pm

Rob Systém = vykrádání obchodů?
Back to top Go down
Gangstarz
Zakladatel fóra [Pawner]
Zakladatel fóra [Pawner]
Gangstarz


Poèet pøíspìvkù : 111
Join date : 2012-01-05

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptySat Jan 14, 2012 6:13 pm

jj
Back to top Go down
https://nsag.slovakforum.net
Markhoss
Majitel fóra
Majitel fóra



Poèet pøíspìvkù : 348
NSaG Rank : Clen tymu
Join date : 2012-01-05
Age : 26
Bydliste : Ceská Republika

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptySat Jan 14, 2012 6:47 pm

jo good ale nevim jestly to nekde pouzijeme
Back to top Go down
http://BRZO vyjde www.markhoss.webs.com/
_NSaG_NERI

_NSaG_NERI


Poèet pøíspìvkù : 139
NSaG Rank : forum helper
Join date : 2012-01-06
Bydliste : Czech Republic | Praha

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptySat Jan 14, 2012 8:11 pm

Použijeme to na vykrádání zbrojnice bachařům Very Happy Very Happy Very Happy
Back to top Go down
Gangstarz
Zakladatel fóra [Pawner]
Zakladatel fóra [Pawner]
Gangstarz


Poèet pøíspìvkù : 111
Join date : 2012-01-05

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptySat Jan 14, 2012 8:29 pm

Souhlasim s nerim

edit:hele tak to nejak udelejte teda ja taky samozrejme souhlasim napad je dobrej ale jeste nemame mapu tak premejslejte nejdriv Wink
Back to top Go down
https://nsag.slovakforum.net
Markhoss
Majitel fóra
Majitel fóra



Poèet pøíspìvkù : 348
NSaG Rank : Clen tymu
Join date : 2012-01-05
Age : 26
Bydliste : Ceská Republika

[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru EmptyFri Feb 03, 2012 11:23 pm

cteni ze souboru? myslis to tak ze v v origo gta sa directory nebo v userfiles z dokumentu jim to precte neoficialni soubory ktery nemaji byt pouzivany v sampu? ze by je to bsnovalo kdyby neco kradly a ukladalo by se to tam? a nas server by to precetl a banoval je ? Smile na to reknu dva veci mozna sem to pochopil a pridal sem napad nebo nepochopil a myslis to jinak jak to je Smile
Back to top Go down
http://BRZO vyjde www.markhoss.webs.com/
Sponsored content





[TuT]Rob System pomoci cteni ze souboru Empty
PostSubject: Re: [TuT]Rob System pomoci cteni ze souboru   [TuT]Rob System pomoci cteni ze souboru Empty

Back to top Go down
 
[TuT]Rob System pomoci cteni ze souboru
Back to top 
Page 1 of 1
 Similar topics
-
» [TuT]Register a login pomoci dini
» Nový systém work in progress
» [PRIPRAVUJEM]Gini - jednoduchý ini systém
» Proc je lepsi pouzivat vlastni ban system

Permissions in this forum:You cannot reply to topics in this forum
Nostalgic Servers :: Grand Theft Auto San Andreas :: Pawno & Mapování & Mody (Pawno & Mapping & Modding) :: Pawno-
Jump to: