Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2012-03-25, 21:38


B!4CK
Never give UP!






Wiek: 32
Na forum: 5809 dni
Posty: 1047
Nick w MP: John
Piwa: 1891

Respekt: 124,2
Respekt: 124,2
Cze?? chc? dorobi? komend? ,?e w aptece (interior, takie tam ) i wpisuje /kup i wy?wietla mi si? okienko GUI i pisz? Tabletka przeciw grypie , Tabletka na b?l g?owy.

I cena np za tabletk? na grype 40$ a za apap (przyk?ad) 15$

Tylko ,?e mam kod lecz jest na frakcj? (szpital)

Kod:

CMD:dajlek(playerid, cmdtext[])
{
if(!ToFrakcja(playerid,3)) return 1;
new playa,lek;
if(sscanf(cmdtext, "ii",playa,lek))
{
GuiInfo(playerid,""BIALY"U?yj: /dajlek (id) (lek)\n1 - przeciw grypie\n2 - przeciw b?lom g?owy");
return 1;
}
if(!IsPlayerConnected(playa)||playa==playerid)
{
GuiInfo(playerid,"Nie poprawne id gracza!");
return 1;
}
if(!OdlegloscGracze(5.0, playerid, playa))
{
GuiInfo(playerid,"Gracz nie jest ko?o ciebie!");
return 1;
}
if(lek<1||lek>2)
{
GuiInfo(playerid,"Nie poprawne id leku!");
return 1;
}
if(PlayerInfo[playa][pChoroba]==0)
{
GuiInfo(playerid,"Ten gracz nie jest chory!");
return 1;
}
if(lek==1)
{
if(PlayerInfo[playa][pChoroba]!=1)
{
GuiInfo(playerid,"Ten gracz nie jest chory na grype!");
return 1;
}
format(String, sizeof(String),"Lekarz (%d)%s poda? Tobie lek przeciw grypie.",playerid,Nick[playerid]);
GuiInfo(playa,String);
format(String, sizeof(String),"Poda?e? (%d)%s lek przeciw grypie.",playa,Nick[playa]);
GuiInfo(playerid,String);
PlayerInfo[playa][pChoroba]=0;
SetPlayerDrunkLevel(playa,0);
GameInfo(playa,"~g~odzyskales zdrowie",1);
ZapiszKonto(playa);
return 1;
}
else if(lek==2)
{
if(PlayerInfo[playa][pChoroba]!=2)
{
GuiInfo(playerid,"Ten gracz nie jest chory na b?le g?owy!");
return 1;
}
format(String, sizeof(String),"Lekarz (%d)%s poda? Tobie lek przeciw b?lom g?owy.",playerid,Nick[playerid]);
GuiInfo(playa,String);
format(String, sizeof(String),"Poda?e? (%d)%s lek przeciw b?lom g?owy.",playa,Nick[playa]);
GuiInfo(playerid,String);
PlayerInfo[playa][pChoroba]=0;
SetPlayerDrunkLevel(playa,0);
GameInfo(playa,"~g~odzyskales zdrowie",1);
ZapiszKonto(playa);
return 1;
}
return 1;
}


Wiem ,?e to b?dzie w tym stylu.

Kod:

for(new nr = 0; nr < LIMIT_SKLEPOW; nr++)
{
if(SklepInfo[nr][sAktywny]==true&&DoInRange(5.0,playerid,SklepInfo[nr][sPosX],SklepInfo[nr][sPosY],SklepInfo[nr][sPosZ])&&GetPlayerVirtualWorld(playerid)==SklepInfo[nr][sVir]&&GetPlayerInterior(playerid)==SklepInfo[nr][sInt])
{
if(SklepInfo[nr][sProdukty]<1)
{
GuiInfo(playerid,"Nie mo?esz nic kupi?, poniewa? sko?czy?y si? zapasy!");
return 1;
}
switch(SklepInfo[nr][sTyp])
{
case 1://24/7
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,71,DIALOG_STYLE_LIST,""MAPA"Menu",""MAPA"Baton 3$\n"MAPA"Czekolada 5$\n"MAPA"P?czek 4$\n"MAPA"Dro?dz?wka 5$\n"MAPA"Murzynek 3$\n"MAPA"Krem?wka 6$\n"MAPA"Bu?ka 3$\n"MAPA"Rogal 5$\n"MAPA"Chleb 6$\n"MAPA"Wafelki 9$\n"MAPA"Chipsy 6$\n"MAPA"Ciastka 12$\n"MAPA"Krakersy 8$\n"MAPA"Piwo 7$\n"MAPA"Wino 25$\n"MAPA"W?dka 39$\n"MAPA"Sprunk 6$\n"MAPA"Papierosy 11$","Kup","Wyjd?");
return 1;
}
case 2://elektronika
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,72,DIALOG_STYLE_LIST,""MAPA"Sklep z elektronik? i narz?dziami",""MAPA"Telefon 60$\n"MAPA"W?dka 110$\n"MAPA"?om 11$\n"MAPA"M?otek 14$\n"MAPA"Latarka 21$\n"MAPA"?rubokr?t 7$\n"MAPA"Zegarek 76$\n"MAPA"Aparat 200$\n"MAPA"Kostka 1$\n"MAPA"Karty 9$\n"MAPA"CB-Radio 650$\n"MAPA"GPS 920$","Kup","Wyjd?");
return 1;
}
case 3://odziezowy
{
OdziezID[playerid]=0;
if(OdziezKupuje[playerid]==false)
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,73,DIALOG_STYLE_LIST,""MAPA"Sklep odzie?owy",""MAPA"Ubranie\n"MAPA"Maski\n"MAPA"Okulary\n"MAPA"Nakrycia g?owy","Kup","Wyjd?");
}
else
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,82,DIALOG_STYLE_MSGBOX,""MAPA"Sklep odzie?owy",""MAPA"Czy chcesz kupi? wybrany przez siebie przedmiot?","Tak","Nie");
}
return 1;
}
case 4://bar
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,119,DIALOG_STYLE_LIST,""MAPA"Menu",""MAPA"Chipsy 6$\n"MAPA"Ciastka 12$\n"MAPA"Krakersy 8$\n"MAPA"Piwo 7$\n"MAPA"Wino 25$\n"MAPA"W?dka 39$\n"MAPA"Sprunk 6$","Kup","Wyjd?");
return 1;
}
case 5://fastfood
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,199,DIALOG_STYLE_LIST,""MAPA"Menu",""MAPA"Pizza 20$\n"MAPA"Kebab 15$\n"MAPA"Sur?wka 6$\n"MAPA"Hamburger 7$\n"MAPA"Cheeseburger 8$\n"MAPA"Zapienkanka 5$\n"MAPA"Frytki 9$","Kup","Wyjd?");
return 1;
}
case 6://automat
{
if(dKasa[playerid]<2)
{
GuiInfo(playerid,"Nie sta? Ciebie na sprunka (2$)");
return 1;
}
format(String, sizeof(String),"* "ME"(%d) %s "JA"kupuje sprunka z automatu.",playerid,Nick[playerid]);
WyswietlText(playerid,KOLOR_JA,10.0,String);
dDodajHP(playerid,5);
GlodMinus(playerid,-2);
dDodajKase(playerid,-2);
SetPlayerSpecialAction(playerid,SPECIAL_ACTION_DRINK_SPRUNK);
BiznesInfo[SklepInfo[nr][sBiznes]][bBank]+=2;
SklepInfo[nr][sProdukty]--;
return 1;
}
case 7://restauracja
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,198,DIALOG_STYLE_LIST,""MAPA"Menu",""MAPA"Piwo 7$\n"MAPA"Wino 25$\n"MAPA"W?dka 39$\n"MAPA"Sprunk 6$\n"MAPA"Zupa 15$\n"MAPA"Danie Obiadowe 40$\n"MAPA"Sur?wka 6$\n"MAPA"Pizza 20$\n"MAPA"Ryba 25$\n"MAPA"Nale?niki 15$\n"MAPA"Frytki 9$","Kup","Wyjd?");
return 1;
}
case 8://sklep z broni?
{
if(PlayerInfo[playerid][pLicBron]==false)
{
GuiInfo(playerid,"Nie posiadasz licencji na bro?!");
return 1;
}
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,137,DIALOG_STYLE_LIST,""MAPA"Sklep z broni?",""MAPA"Bassebal 90$\n"MAPA"9mm (100 ammo) 2100$\n"MAPA"9mm (t?umik,100 ammo) 2420$\n"MAPA"Shotgun (50ammo) 2900$","Kup","Wyjd?");
return 1;
}
}//switch
}//warunek sprawdzajacy
}//petla
GuiInfo(playerid,"Nie jeste? w odpowiednim miejscu!");
return 1;
}



I zrobi?em co? takiego :
Kod:

case 9: //Apteka
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,71,DIALOG_STYLE_LIST,""MAPA"Menu",""MAPA"Lek przeciw bolowy 5$\n"MAPA"Lek przeciw grypie 15$","Kup","Wyjd?");
return 1;
}


Jak mam dorobi? ,aby kupywa?o mi tabletk? po czym przestaje mie? b?l g?owy itd.
Tak samo jak cmd:dajlek
Podpis
Cześć
! :)


Projekt, który poruszy scenę platformy SA:MP!
Ostatnio zmieniony przez B!4CK 2012-03-26, 16:54, w całości zmieniany 1 raz  
Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-03-26, 12:50


Raydex






Wiek: 36
Na forum: 6037 dni
Posty: 138

Piwa: 1043

Respekt: 41,7
Taki dialog powinien by? git:

Kod:

else if(dialogid==777)
{
if(!response) return 1;
switch(listitem)
{
case 0:
{
if(dKasa[playerid]<15){ GuiInfo(playerid,"Nie masz tyle pieni?dzy!"); return 1; }
{
GuiInfo(playerid,""MAPA"Kupi?e? lek przeciw grypie za 15$");
dDodajKase(playerid,-15);
PlayerInfo[playerid][pChoroba]=0;
SetPlayerDrunkLevel(playerid,0);
GameInfo(playerid,"~g~odzyskales zdrowie",1);
ZapiszKonto(playerid);
format(String, sizeof(String),"* "ME"(%d) %s "JA"wyci?ga pieni?dze z kieszeni i p?aci nimi za lek.",playerid,NickCzat(playerid));
WyswietlText(playerid,KOLOR_JA,10.0,String);
return 1;
}
}
case 1:
{
if(dKasa[playerid]<5){ GuiInfo(playerid,"Nie masz tyle pieni?dzy!"); return 1; }
{
GuiInfo(playerid,""MAPA"Kupi?e? lek przeciwb?lowy za 5$");
dDodajKase(playerid,-5);
format(String, sizeof(String),"* "ME"(%d) %s "JA"wyci?ga pieni?dze z kieszeni i p?aci nimi za lek.",playerid,NickCzat(playerid));
WyswietlText(playerid,KOLOR_JA,10.0,String);
PlayerInfo[playerid][pChoroba]=0;
SetPlayerDrunkLevel(playerid,0);
GameInfo(playerid,"~g~odzyskales zdrowie",1);
ZapiszKonto(playerid);
return 1;
}
}
}
return 1;
}
Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-03-26, 13:22


B!4CK
Never give UP!






Wiek: 32
Na forum: 5809 dni
Posty: 1047
Nick w MP: John
Piwa: 1891

Respekt: 124,2
Respekt: 124,2
Mam takie errory :

Kod:

C:\Documents and Settings\1\Pulpit\igora\gta\larency-wies.pwn(31511) : error 017: undefined symbol "AdminCode"
C:\Documents and Settings\1\Pulpit\igora\gta\larency-wies.pwn(31513) : error 017: undefined symbol "NICK"
C:\Documents and Settings\1\Pulpit\igora\gta\larency-wies.pwn(31513) : error 001: expected token: ";", but found "]"
C:\Documents and Settings\1\Pulpit\igora\gta\larency-wies.pwn(31513) : error 029: invalid expression, assumed zero
C:\Documents and Settings\1\Pulpit\igora\gta\larency-wies.pwn(31513) : fatal error 107: too many error messages on one line

Compilation aborted.Pawn compiler 3.2.3664 Copyright (c) 1997-2006, ITB CompuPhase

5 Errors.




A zrobi?em tak :

Kod:

case 9: //Apteka
{
GraczSklep[playerid]=nr;
dShowPlayerDialog(playerid,71,DIALOG_STYLE_LIST,""MAPA"Menu",""MAPA"Lek przeciw bolowy 5$\n"MAPA"Lek przeciw grypie 15$","Kup","Wyjd?");
return 1;
}


I wcze?niej :

Kod:

//Lek przeciw b?lowy
else if(dialogid==777)
{
if(!response) return 1;
switch(listitem)
{
case 0:
{
if(dKasa[playerid]<15){ GuiInfo(playerid,"Nie masz tyle pieni?dzy!"); return 1; }
{
GuiInfo(playerid,""MAPA"Kupi?e? lek przeciw grypie za 15$");
dDodajKase(playerid,-15);
PlayerInfo[playerid][pChoroba]=0;
SetPlayerDrunkLevel(playerid,0);
GameInfo(playerid,"~g~odzyskales zdrowie",1);
ZapiszKonto(playerid);
format(String, sizeof(String),"* "ME"(%d) %s "JA"wyci?ga pieni?dze z kieszeni i p?aci nimi za lek.",playerid,NickCzat(playerid));
WyswietlText(playerid,KOLOR_JA,10.0,String);
return 1;
}
}
case 1:
{
if(dKasa[playerid]<5){ GuiInfo(playerid,"Nie masz tyle pieni?dzy!"); return 1; }
{
GuiInfo(playerid,""MAPA"Kupi?e? lek przeciwb?lowy za 5$");
dDodajKase(playerid,-5);
format(String, sizeof(String),"* "ME"(%d) %s "JA"wyci?ga pieni?dze z kieszeni i p?aci nimi za lek.",playerid,NickCzat(playerid));
WyswietlText(playerid,KOLOR_JA,10.0,String);
PlayerInfo[playerid][pChoroba]=0;
SetPlayerDrunkLevel(playerid,0);
GameInfo(playerid,"~g~odzyskales zdrowie",1);
ZapiszKonto(playerid);
return 1;
}
}
}
return 1;
}



A mo?e to lepiej zrobi? w cmd:kuplek ?
I wprowadzi? /asklep ( i si? dobiera apteke)

PS. Chyba ,?e poda?bym ci mapk? (edytowan? przeze-mnie) i zrobi?by? mi.
Podpis
Cześć
! :)


Projekt, który poruszy scenę platformy SA:MP!
Postaw piwo autorowi tego posta
 

 
Wysłany: 2012-03-26, 16:00


BraYaN_






Wiek: 34
Na forum: 6602 dni
Posty: 276
Nick w MP: BraYaN_
Piwa: 1614

Respekt: 63
[nt]
Postaw piwo autorowi tego posta
 

 
Tagi: komenda :: /lek :: ból :: głowy.
Anonymous





Na forum: 245 dni
Posty: 1
Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » PAWN Ten temat jest zablokowany bez możliwości zmiany postów lub pisania odpowiedzi

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
 Dodaj temat do Ulubionych
Wersja do druku